module Network.Google.Resource.DFAReporting.DirectorySiteContacts.List
(
DirectorySiteContactsListResource
, directorySiteContactsList
, DirectorySiteContactsList
, dsclSearchString
, dsclIds
, dsclProFileId
, dsclDirectorySiteIds
, dsclSortOrder
, dsclPageToken
, dsclSortField
, dsclMaxResults
) where
import Network.Google.DFAReporting.Types
import Network.Google.Prelude
type DirectorySiteContactsListResource =
"dfareporting" :>
"v2.5" :>
"userprofiles" :>
Capture "profileId" (Textual Int64) :>
"directorySiteContacts" :>
QueryParam "searchString" Text :>
QueryParams "ids" (Textual Int64) :>
QueryParams "directorySiteIds" (Textual Int64) :>
QueryParam "sortOrder"
DirectorySiteContactsListSortOrder
:>
QueryParam "pageToken" Text :>
QueryParam "sortField"
DirectorySiteContactsListSortField
:>
QueryParam "maxResults" (Textual Int32) :>
QueryParam "alt" AltJSON :>
Get '[JSON] DirectorySiteContactsListResponse
data DirectorySiteContactsList = DirectorySiteContactsList'
{ _dsclSearchString :: !(Maybe Text)
, _dsclIds :: !(Maybe [Textual Int64])
, _dsclProFileId :: !(Textual Int64)
, _dsclDirectorySiteIds :: !(Maybe [Textual Int64])
, _dsclSortOrder :: !(Maybe DirectorySiteContactsListSortOrder)
, _dsclPageToken :: !(Maybe Text)
, _dsclSortField :: !(Maybe DirectorySiteContactsListSortField)
, _dsclMaxResults :: !(Maybe (Textual Int32))
} deriving (Eq,Show,Data,Typeable,Generic)
directorySiteContactsList
:: Int64
-> DirectorySiteContactsList
directorySiteContactsList pDsclProFileId_ =
DirectorySiteContactsList'
{ _dsclSearchString = Nothing
, _dsclIds = Nothing
, _dsclProFileId = _Coerce # pDsclProFileId_
, _dsclDirectorySiteIds = Nothing
, _dsclSortOrder = Nothing
, _dsclPageToken = Nothing
, _dsclSortField = Nothing
, _dsclMaxResults = Nothing
}
dsclSearchString :: Lens' DirectorySiteContactsList (Maybe Text)
dsclSearchString
= lens _dsclSearchString
(\ s a -> s{_dsclSearchString = a})
dsclIds :: Lens' DirectorySiteContactsList [Int64]
dsclIds
= lens _dsclIds (\ s a -> s{_dsclIds = a}) . _Default
. _Coerce
dsclProFileId :: Lens' DirectorySiteContactsList Int64
dsclProFileId
= lens _dsclProFileId
(\ s a -> s{_dsclProFileId = a})
. _Coerce
dsclDirectorySiteIds :: Lens' DirectorySiteContactsList [Int64]
dsclDirectorySiteIds
= lens _dsclDirectorySiteIds
(\ s a -> s{_dsclDirectorySiteIds = a})
. _Default
. _Coerce
dsclSortOrder :: Lens' DirectorySiteContactsList (Maybe DirectorySiteContactsListSortOrder)
dsclSortOrder
= lens _dsclSortOrder
(\ s a -> s{_dsclSortOrder = a})
dsclPageToken :: Lens' DirectorySiteContactsList (Maybe Text)
dsclPageToken
= lens _dsclPageToken
(\ s a -> s{_dsclPageToken = a})
dsclSortField :: Lens' DirectorySiteContactsList (Maybe DirectorySiteContactsListSortField)
dsclSortField
= lens _dsclSortField
(\ s a -> s{_dsclSortField = a})
dsclMaxResults :: Lens' DirectorySiteContactsList (Maybe Int32)
dsclMaxResults
= lens _dsclMaxResults
(\ s a -> s{_dsclMaxResults = a})
. mapping _Coerce
instance GoogleRequest DirectorySiteContactsList
where
type Rs DirectorySiteContactsList =
DirectorySiteContactsListResponse
type Scopes DirectorySiteContactsList =
'["https://www.googleapis.com/auth/dfatrafficking"]
requestClient DirectorySiteContactsList'{..}
= go _dsclProFileId _dsclSearchString
(_dsclIds ^. _Default)
(_dsclDirectorySiteIds ^. _Default)
_dsclSortOrder
_dsclPageToken
_dsclSortField
_dsclMaxResults
(Just AltJSON)
dFAReportingService
where go
= buildClient
(Proxy :: Proxy DirectorySiteContactsListResource)
mempty