module Network.Google.Resource.TagManager.Accounts.Containers.Variables.Delete
(
AccountsContainersVariablesDeleteResource
, accountsContainersVariablesDelete
, AccountsContainersVariablesDelete
, acvdContainerId
, acvdVariableId
, acvdAccountId
) where
import Network.Google.Prelude
import Network.Google.TagManager.Types
type AccountsContainersVariablesDeleteResource =
"tagmanager" :>
"v1" :>
"accounts" :>
Capture "accountId" Text :>
"containers" :>
Capture "containerId" Text :>
"variables" :>
Capture "variableId" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] ()
data AccountsContainersVariablesDelete = AccountsContainersVariablesDelete'
{ _acvdContainerId :: !Text
, _acvdVariableId :: !Text
, _acvdAccountId :: !Text
} deriving (Eq,Show,Data,Typeable,Generic)
accountsContainersVariablesDelete
:: Text
-> Text
-> Text
-> AccountsContainersVariablesDelete
accountsContainersVariablesDelete pAcvdContainerId_ pAcvdVariableId_ pAcvdAccountId_ =
AccountsContainersVariablesDelete'
{ _acvdContainerId = pAcvdContainerId_
, _acvdVariableId = pAcvdVariableId_
, _acvdAccountId = pAcvdAccountId_
}
acvdContainerId :: Lens' AccountsContainersVariablesDelete Text
acvdContainerId
= lens _acvdContainerId
(\ s a -> s{_acvdContainerId = a})
acvdVariableId :: Lens' AccountsContainersVariablesDelete Text
acvdVariableId
= lens _acvdVariableId
(\ s a -> s{_acvdVariableId = a})
acvdAccountId :: Lens' AccountsContainersVariablesDelete Text
acvdAccountId
= lens _acvdAccountId
(\ s a -> s{_acvdAccountId = a})
instance GoogleRequest
AccountsContainersVariablesDelete where
type Rs AccountsContainersVariablesDelete = ()
type Scopes AccountsContainersVariablesDelete =
'["https://www.googleapis.com/auth/tagmanager.edit.containers"]
requestClient AccountsContainersVariablesDelete'{..}
= go _acvdAccountId _acvdContainerId _acvdVariableId
(Just AltJSON)
tagManagerService
where go
= buildClient
(Proxy ::
Proxy AccountsContainersVariablesDeleteResource)
mempty