{-# 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.AndroidManagement.Enterprises.WebApps.List
(
EnterprisesWebAppsListResource
, enterprisesWebAppsList
, EnterprisesWebAppsList
, ewalParent
, ewalXgafv
, ewalUploadProtocol
, ewalAccessToken
, ewalUploadType
, ewalPageToken
, ewalPageSize
, ewalCallback
) where
import Network.Google.AndroidManagement.Types
import Network.Google.Prelude
type EnterprisesWebAppsListResource =
"v1" :>
Capture "parent" Text :>
"webApps" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListWebAppsResponse
data EnterprisesWebAppsList =
EnterprisesWebAppsList'
{ _ewalParent :: !Text
, _ewalXgafv :: !(Maybe Xgafv)
, _ewalUploadProtocol :: !(Maybe Text)
, _ewalAccessToken :: !(Maybe Text)
, _ewalUploadType :: !(Maybe Text)
, _ewalPageToken :: !(Maybe Text)
, _ewalPageSize :: !(Maybe (Textual Int32))
, _ewalCallback :: !(Maybe Text)
}
deriving (Eq, Show, Data, Typeable, Generic)
enterprisesWebAppsList
:: Text
-> EnterprisesWebAppsList
enterprisesWebAppsList pEwalParent_ =
EnterprisesWebAppsList'
{ _ewalParent = pEwalParent_
, _ewalXgafv = Nothing
, _ewalUploadProtocol = Nothing
, _ewalAccessToken = Nothing
, _ewalUploadType = Nothing
, _ewalPageToken = Nothing
, _ewalPageSize = Nothing
, _ewalCallback = Nothing
}
ewalParent :: Lens' EnterprisesWebAppsList Text
ewalParent
= lens _ewalParent (\ s a -> s{_ewalParent = a})
ewalXgafv :: Lens' EnterprisesWebAppsList (Maybe Xgafv)
ewalXgafv
= lens _ewalXgafv (\ s a -> s{_ewalXgafv = a})
ewalUploadProtocol :: Lens' EnterprisesWebAppsList (Maybe Text)
ewalUploadProtocol
= lens _ewalUploadProtocol
(\ s a -> s{_ewalUploadProtocol = a})
ewalAccessToken :: Lens' EnterprisesWebAppsList (Maybe Text)
ewalAccessToken
= lens _ewalAccessToken
(\ s a -> s{_ewalAccessToken = a})
ewalUploadType :: Lens' EnterprisesWebAppsList (Maybe Text)
ewalUploadType
= lens _ewalUploadType
(\ s a -> s{_ewalUploadType = a})
ewalPageToken :: Lens' EnterprisesWebAppsList (Maybe Text)
ewalPageToken
= lens _ewalPageToken
(\ s a -> s{_ewalPageToken = a})
ewalPageSize :: Lens' EnterprisesWebAppsList (Maybe Int32)
ewalPageSize
= lens _ewalPageSize (\ s a -> s{_ewalPageSize = a})
. mapping _Coerce
ewalCallback :: Lens' EnterprisesWebAppsList (Maybe Text)
ewalCallback
= lens _ewalCallback (\ s a -> s{_ewalCallback = a})
instance GoogleRequest EnterprisesWebAppsList where
type Rs EnterprisesWebAppsList = ListWebAppsResponse
type Scopes EnterprisesWebAppsList =
'["https://www.googleapis.com/auth/androidmanagement"]
requestClient EnterprisesWebAppsList'{..}
= go _ewalParent _ewalXgafv _ewalUploadProtocol
_ewalAccessToken
_ewalUploadType
_ewalPageToken
_ewalPageSize
_ewalCallback
(Just AltJSON)
androidManagementService
where go
= buildClient
(Proxy :: Proxy EnterprisesWebAppsListResource)
mempty