{-# 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.FireStore.Projects.Databases.CollectionGroups.Fields.List
(
ProjectsDatabasesCollectionGroupsFieldsListResource
, projectsDatabasesCollectionGroupsFieldsList
, ProjectsDatabasesCollectionGroupsFieldsList
, pdcgflParent
, pdcgflXgafv
, pdcgflUploadProtocol
, pdcgflAccessToken
, pdcgflUploadType
, pdcgflFilter
, pdcgflPageToken
, pdcgflPageSize
, pdcgflCallback
) where
import Network.Google.FireStore.Types
import Network.Google.Prelude
type ProjectsDatabasesCollectionGroupsFieldsListResource
=
"v1" :>
Capture "parent" Text :>
"fields" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "filter" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON]
GoogleFirestoreAdminV1ListFieldsResponse
data ProjectsDatabasesCollectionGroupsFieldsList = ProjectsDatabasesCollectionGroupsFieldsList'
{ _pdcgflParent :: !Text
, _pdcgflXgafv :: !(Maybe Xgafv)
, _pdcgflUploadProtocol :: !(Maybe Text)
, _pdcgflAccessToken :: !(Maybe Text)
, _pdcgflUploadType :: !(Maybe Text)
, _pdcgflFilter :: !(Maybe Text)
, _pdcgflPageToken :: !(Maybe Text)
, _pdcgflPageSize :: !(Maybe (Textual Int32))
, _pdcgflCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsDatabasesCollectionGroupsFieldsList
:: Text
-> ProjectsDatabasesCollectionGroupsFieldsList
projectsDatabasesCollectionGroupsFieldsList pPdcgflParent_ =
ProjectsDatabasesCollectionGroupsFieldsList'
{ _pdcgflParent = pPdcgflParent_
, _pdcgflXgafv = Nothing
, _pdcgflUploadProtocol = Nothing
, _pdcgflAccessToken = Nothing
, _pdcgflUploadType = Nothing
, _pdcgflFilter = Nothing
, _pdcgflPageToken = Nothing
, _pdcgflPageSize = Nothing
, _pdcgflCallback = Nothing
}
pdcgflParent :: Lens' ProjectsDatabasesCollectionGroupsFieldsList Text
pdcgflParent
= lens _pdcgflParent (\ s a -> s{_pdcgflParent = a})
pdcgflXgafv :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Xgafv)
pdcgflXgafv
= lens _pdcgflXgafv (\ s a -> s{_pdcgflXgafv = a})
pdcgflUploadProtocol :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Text)
pdcgflUploadProtocol
= lens _pdcgflUploadProtocol
(\ s a -> s{_pdcgflUploadProtocol = a})
pdcgflAccessToken :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Text)
pdcgflAccessToken
= lens _pdcgflAccessToken
(\ s a -> s{_pdcgflAccessToken = a})
pdcgflUploadType :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Text)
pdcgflUploadType
= lens _pdcgflUploadType
(\ s a -> s{_pdcgflUploadType = a})
pdcgflFilter :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Text)
pdcgflFilter
= lens _pdcgflFilter (\ s a -> s{_pdcgflFilter = a})
pdcgflPageToken :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Text)
pdcgflPageToken
= lens _pdcgflPageToken
(\ s a -> s{_pdcgflPageToken = a})
pdcgflPageSize :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Int32)
pdcgflPageSize
= lens _pdcgflPageSize
(\ s a -> s{_pdcgflPageSize = a})
. mapping _Coerce
pdcgflCallback :: Lens' ProjectsDatabasesCollectionGroupsFieldsList (Maybe Text)
pdcgflCallback
= lens _pdcgflCallback
(\ s a -> s{_pdcgflCallback = a})
instance GoogleRequest
ProjectsDatabasesCollectionGroupsFieldsList where
type Rs ProjectsDatabasesCollectionGroupsFieldsList =
GoogleFirestoreAdminV1ListFieldsResponse
type Scopes
ProjectsDatabasesCollectionGroupsFieldsList
=
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/datastore"]
requestClient
ProjectsDatabasesCollectionGroupsFieldsList'{..}
= go _pdcgflParent _pdcgflXgafv _pdcgflUploadProtocol
_pdcgflAccessToken
_pdcgflUploadType
_pdcgflFilter
_pdcgflPageToken
_pdcgflPageSize
_pdcgflCallback
(Just AltJSON)
fireStoreService
where go
= buildClient
(Proxy ::
Proxy
ProjectsDatabasesCollectionGroupsFieldsListResource)
mempty