module Network.Google.Resource.MapsEngine.Assets.List
(
AssetsListResource
, assetsList
, AssetsList
, alCreatedAfter
, alCreatorEmail
, alRole
, alBbox
, alModifiedAfter
, alModifiedBefore
, alPageToken
, alProjectId
, alType
, alSearch
, alMaxResults
, alTags
, alCreatedBefore
) where
import Network.Google.MapsEngine.Types
import Network.Google.Prelude
type AssetsListResource =
"mapsengine" :>
"v1" :>
"assets" :>
QueryParam "createdAfter" DateTime' :>
QueryParam "creatorEmail" Text :>
QueryParam "role" AssetsListRole :>
QueryParam "bbox" Text :>
QueryParam "modifiedAfter" DateTime' :>
QueryParam "modifiedBefore" DateTime' :>
QueryParam "pageToken" Text :>
QueryParam "projectId" Text :>
QueryParam "type" Text :>
QueryParam "search" Text :>
QueryParam "maxResults" (Textual Word32) :>
QueryParam "tags" Text :>
QueryParam "createdBefore" DateTime' :>
QueryParam "alt" AltJSON :>
Get '[JSON] AssetsListResponse
data AssetsList = AssetsList
{ _alCreatedAfter :: !(Maybe DateTime')
, _alCreatorEmail :: !(Maybe Text)
, _alRole :: !(Maybe AssetsListRole)
, _alBbox :: !(Maybe Text)
, _alModifiedAfter :: !(Maybe DateTime')
, _alModifiedBefore :: !(Maybe DateTime')
, _alPageToken :: !(Maybe Text)
, _alProjectId :: !(Maybe Text)
, _alType :: !(Maybe Text)
, _alSearch :: !(Maybe Text)
, _alMaxResults :: !(Maybe (Textual Word32))
, _alTags :: !(Maybe Text)
, _alCreatedBefore :: !(Maybe DateTime')
} deriving (Eq,Show,Data,Typeable,Generic)
assetsList
:: AssetsList
assetsList =
AssetsList
{ _alCreatedAfter = Nothing
, _alCreatorEmail = Nothing
, _alRole = Nothing
, _alBbox = Nothing
, _alModifiedAfter = Nothing
, _alModifiedBefore = Nothing
, _alPageToken = Nothing
, _alProjectId = Nothing
, _alType = Nothing
, _alSearch = Nothing
, _alMaxResults = Nothing
, _alTags = Nothing
, _alCreatedBefore = Nothing
}
alCreatedAfter :: Lens' AssetsList (Maybe UTCTime)
alCreatedAfter
= lens _alCreatedAfter
(\ s a -> s{_alCreatedAfter = a})
. mapping _DateTime
alCreatorEmail :: Lens' AssetsList (Maybe Text)
alCreatorEmail
= lens _alCreatorEmail
(\ s a -> s{_alCreatorEmail = a})
alRole :: Lens' AssetsList (Maybe AssetsListRole)
alRole = lens _alRole (\ s a -> s{_alRole = a})
alBbox :: Lens' AssetsList (Maybe Text)
alBbox = lens _alBbox (\ s a -> s{_alBbox = a})
alModifiedAfter :: Lens' AssetsList (Maybe UTCTime)
alModifiedAfter
= lens _alModifiedAfter
(\ s a -> s{_alModifiedAfter = a})
. mapping _DateTime
alModifiedBefore :: Lens' AssetsList (Maybe UTCTime)
alModifiedBefore
= lens _alModifiedBefore
(\ s a -> s{_alModifiedBefore = a})
. mapping _DateTime
alPageToken :: Lens' AssetsList (Maybe Text)
alPageToken
= lens _alPageToken (\ s a -> s{_alPageToken = a})
alProjectId :: Lens' AssetsList (Maybe Text)
alProjectId
= lens _alProjectId (\ s a -> s{_alProjectId = a})
alType :: Lens' AssetsList (Maybe Text)
alType = lens _alType (\ s a -> s{_alType = a})
alSearch :: Lens' AssetsList (Maybe Text)
alSearch = lens _alSearch (\ s a -> s{_alSearch = a})
alMaxResults :: Lens' AssetsList (Maybe Word32)
alMaxResults
= lens _alMaxResults (\ s a -> s{_alMaxResults = a})
. mapping _Coerce
alTags :: Lens' AssetsList (Maybe Text)
alTags = lens _alTags (\ s a -> s{_alTags = a})
alCreatedBefore :: Lens' AssetsList (Maybe UTCTime)
alCreatedBefore
= lens _alCreatedBefore
(\ s a -> s{_alCreatedBefore = a})
. mapping _DateTime
instance GoogleRequest AssetsList where
type Rs AssetsList = AssetsListResponse
requestClient AssetsList{..}
= go _alCreatedAfter _alCreatorEmail _alRole _alBbox
_alModifiedAfter
_alModifiedBefore
_alPageToken
_alProjectId
_alType
_alSearch
_alMaxResults
_alTags
_alCreatedBefore
(Just AltJSON)
mapsEngineService
where go
= buildClient (Proxy :: Proxy AssetsListResource)
mempty