module Network.Google.Resource.TagManager.Accounts.Containers.Variables.List
(
AccountsContainersVariablesListResource
, accountsContainersVariablesList
, AccountsContainersVariablesList
, acvlcContainerId
, acvlcAccountId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersVariablesListResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"variables" :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListVariablesResponse
data AccountsContainersVariablesList = AccountsContainersVariablesList'
{ _acvlcContainerId :: !Text
, _acvlcAccountId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersVariablesList
:: Text
-> Text
-> AccountsContainersVariablesList
accountsContainersVariablesList pAcvlcContainerId_ pAcvlcAccountId_ =
AccountsContainersVariablesList'
{ _acvlcContainerId = pAcvlcContainerId_
, _acvlcAccountId = pAcvlcAccountId_
}
acvlcContainerId :: Lens' AccountsContainersVariablesList Text
acvlcContainerId
= lens _acvlcContainerId
(\ s a -> s{_acvlcContainerId = a})
acvlcAccountId :: Lens' AccountsContainersVariablesList Text
acvlcAccountId
= lens _acvlcAccountId
(\ s a -> s{_acvlcAccountId = a})
instance GoogleRequest
AccountsContainersVariablesList where
type Rs AccountsContainersVariablesList =
ListVariablesResponse
type Scopes AccountsContainersVariablesList =
'["https://www.googleapis.com/auth/tagmanager.edit.containers",
"https://www.googleapis.com/auth/tagmanager.readonly"]
requestClient AccountsContainersVariablesList'{..}
= go _acvlcAccountId _acvlcContainerId (Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersVariablesListResource)
mempty