{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.Classroom.UserProFiles.GuardianInvitations.Get
(
UserProFilesGuardianInvitationsGetResource
, userProFilesGuardianInvitationsGet
, UserProFilesGuardianInvitationsGet
, upfgigStudentId
, upfgigXgafv
, upfgigUploadProtocol
, upfgigAccessToken
, upfgigUploadType
, upfgigInvitationId
, upfgigCallback
) where
import Network.Google.Classroom.Types
import Network.Google.Prelude
type UserProFilesGuardianInvitationsGetResource =
"v1" :>
"userProfiles" :>
Capture "studentId" Text :>
"guardianInvitations" :>
Capture "invitationId" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] GuardianInvitation
data UserProFilesGuardianInvitationsGet = UserProFilesGuardianInvitationsGet'
{ _upfgigStudentId :: !Text
, _upfgigXgafv :: !(Maybe Xgafv)
, _upfgigUploadProtocol :: !(Maybe Text)
, _upfgigAccessToken :: !(Maybe Text)
, _upfgigUploadType :: !(Maybe Text)
, _upfgigInvitationId :: !Text
, _upfgigCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
userProFilesGuardianInvitationsGet
:: Text
-> Text
-> UserProFilesGuardianInvitationsGet
userProFilesGuardianInvitationsGet pUpfgigStudentId_ pUpfgigInvitationId_ =
UserProFilesGuardianInvitationsGet'
{ _upfgigStudentId = pUpfgigStudentId_
, _upfgigXgafv = Nothing
, _upfgigUploadProtocol = Nothing
, _upfgigAccessToken = Nothing
, _upfgigUploadType = Nothing
, _upfgigInvitationId = pUpfgigInvitationId_
, _upfgigCallback = Nothing
}
upfgigStudentId :: Lens' UserProFilesGuardianInvitationsGet Text
upfgigStudentId
= lens _upfgigStudentId
(\ s a -> s{_upfgigStudentId = a})
upfgigXgafv :: Lens' UserProFilesGuardianInvitationsGet (Maybe Xgafv)
upfgigXgafv
= lens _upfgigXgafv (\ s a -> s{_upfgigXgafv = a})
upfgigUploadProtocol :: Lens' UserProFilesGuardianInvitationsGet (Maybe Text)
upfgigUploadProtocol
= lens _upfgigUploadProtocol
(\ s a -> s{_upfgigUploadProtocol = a})
upfgigAccessToken :: Lens' UserProFilesGuardianInvitationsGet (Maybe Text)
upfgigAccessToken
= lens _upfgigAccessToken
(\ s a -> s{_upfgigAccessToken = a})
upfgigUploadType :: Lens' UserProFilesGuardianInvitationsGet (Maybe Text)
upfgigUploadType
= lens _upfgigUploadType
(\ s a -> s{_upfgigUploadType = a})
upfgigInvitationId :: Lens' UserProFilesGuardianInvitationsGet Text
upfgigInvitationId
= lens _upfgigInvitationId
(\ s a -> s{_upfgigInvitationId = a})
upfgigCallback :: Lens' UserProFilesGuardianInvitationsGet (Maybe Text)
upfgigCallback
= lens _upfgigCallback
(\ s a -> s{_upfgigCallback = a})
instance GoogleRequest
UserProFilesGuardianInvitationsGet where
type Rs UserProFilesGuardianInvitationsGet =
GuardianInvitation
type Scopes UserProFilesGuardianInvitationsGet =
'["https://www.googleapis.com/auth/classroom.guardianlinks.students",
"https://www.googleapis.com/auth/classroom.guardianlinks.students.readonly"]
requestClient UserProFilesGuardianInvitationsGet'{..}
= go _upfgigStudentId _upfgigInvitationId
_upfgigXgafv
_upfgigUploadProtocol
_upfgigAccessToken
_upfgigUploadType
_upfgigCallback
(Just AltJSON)
classroomService
where go
= buildClient
(Proxy ::
Proxy UserProFilesGuardianInvitationsGetResource)
mempty