{-# 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.Devices.Operations.Delete
(
EnterprisesDevicesOperationsDeleteResource
, enterprisesDevicesOperationsDelete
, EnterprisesDevicesOperationsDelete
, edodXgafv
, edodUploadProtocol
, edodAccessToken
, edodUploadType
, edodName
, edodCallback
) where
import Network.Google.AndroidManagement.Types
import Network.Google.Prelude
type EnterprisesDevicesOperationsDeleteResource =
"v1" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Delete '[JSON] Empty
data EnterprisesDevicesOperationsDelete = EnterprisesDevicesOperationsDelete'
{ _edodXgafv :: !(Maybe Xgafv)
, _edodUploadProtocol :: !(Maybe Text)
, _edodAccessToken :: !(Maybe Text)
, _edodUploadType :: !(Maybe Text)
, _edodName :: !Text
, _edodCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
enterprisesDevicesOperationsDelete
:: Text
-> EnterprisesDevicesOperationsDelete
enterprisesDevicesOperationsDelete pEdodName_ =
EnterprisesDevicesOperationsDelete'
{ _edodXgafv = Nothing
, _edodUploadProtocol = Nothing
, _edodAccessToken = Nothing
, _edodUploadType = Nothing
, _edodName = pEdodName_
, _edodCallback = Nothing
}
edodXgafv :: Lens' EnterprisesDevicesOperationsDelete (Maybe Xgafv)
edodXgafv
= lens _edodXgafv (\ s a -> s{_edodXgafv = a})
edodUploadProtocol :: Lens' EnterprisesDevicesOperationsDelete (Maybe Text)
edodUploadProtocol
= lens _edodUploadProtocol
(\ s a -> s{_edodUploadProtocol = a})
edodAccessToken :: Lens' EnterprisesDevicesOperationsDelete (Maybe Text)
edodAccessToken
= lens _edodAccessToken
(\ s a -> s{_edodAccessToken = a})
edodUploadType :: Lens' EnterprisesDevicesOperationsDelete (Maybe Text)
edodUploadType
= lens _edodUploadType
(\ s a -> s{_edodUploadType = a})
edodName :: Lens' EnterprisesDevicesOperationsDelete Text
edodName = lens _edodName (\ s a -> s{_edodName = a})
edodCallback :: Lens' EnterprisesDevicesOperationsDelete (Maybe Text)
edodCallback
= lens _edodCallback (\ s a -> s{_edodCallback = a})
instance GoogleRequest
EnterprisesDevicesOperationsDelete where
type Rs EnterprisesDevicesOperationsDelete = Empty
type Scopes EnterprisesDevicesOperationsDelete =
'["https://www.googleapis.com/auth/androidmanagement"]
requestClient EnterprisesDevicesOperationsDelete'{..}
= go _edodName _edodXgafv _edodUploadProtocol
_edodAccessToken
_edodUploadType
_edodCallback
(Just AltJSON)
androidManagementService
where go
= buildClient
(Proxy ::
Proxy EnterprisesDevicesOperationsDeleteResource)
mempty