{-# 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.ProximityBeacon.Beacons.Attachments.BatchDelete
(
BeaconsAttachmentsBatchDeleteResource
, beaconsAttachmentsBatchDelete
, BeaconsAttachmentsBatchDelete
, babdXgafv
, babdUploadProtocol
, babdAccessToken
, babdBeaconName
, babdUploadType
, babdNamespacedType
, babdProjectId
, babdCallback
) where
import Network.Google.Prelude
import Network.Google.ProximityBeacon.Types
type BeaconsAttachmentsBatchDeleteResource =
"v1beta1" :>
Capture "beaconName" Text :>
"attachments:batchDelete" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "namespacedType" Text :>
QueryParam "projectId" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Post '[JSON] DeleteAttachmentsResponse
data BeaconsAttachmentsBatchDelete = BeaconsAttachmentsBatchDelete'
{ _babdXgafv :: !(Maybe Xgafv)
, _babdUploadProtocol :: !(Maybe Text)
, _babdAccessToken :: !(Maybe Text)
, _babdBeaconName :: !Text
, _babdUploadType :: !(Maybe Text)
, _babdNamespacedType :: !(Maybe Text)
, _babdProjectId :: !(Maybe Text)
, _babdCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
beaconsAttachmentsBatchDelete
:: Text
-> BeaconsAttachmentsBatchDelete
beaconsAttachmentsBatchDelete pBabdBeaconName_ =
BeaconsAttachmentsBatchDelete'
{ _babdXgafv = Nothing
, _babdUploadProtocol = Nothing
, _babdAccessToken = Nothing
, _babdBeaconName = pBabdBeaconName_
, _babdUploadType = Nothing
, _babdNamespacedType = Nothing
, _babdProjectId = Nothing
, _babdCallback = Nothing
}
babdXgafv :: Lens' BeaconsAttachmentsBatchDelete (Maybe Xgafv)
babdXgafv
= lens _babdXgafv (\ s a -> s{_babdXgafv = a})
babdUploadProtocol :: Lens' BeaconsAttachmentsBatchDelete (Maybe Text)
babdUploadProtocol
= lens _babdUploadProtocol
(\ s a -> s{_babdUploadProtocol = a})
babdAccessToken :: Lens' BeaconsAttachmentsBatchDelete (Maybe Text)
babdAccessToken
= lens _babdAccessToken
(\ s a -> s{_babdAccessToken = a})
babdBeaconName :: Lens' BeaconsAttachmentsBatchDelete Text
babdBeaconName
= lens _babdBeaconName
(\ s a -> s{_babdBeaconName = a})
babdUploadType :: Lens' BeaconsAttachmentsBatchDelete (Maybe Text)
babdUploadType
= lens _babdUploadType
(\ s a -> s{_babdUploadType = a})
babdNamespacedType :: Lens' BeaconsAttachmentsBatchDelete (Maybe Text)
babdNamespacedType
= lens _babdNamespacedType
(\ s a -> s{_babdNamespacedType = a})
babdProjectId :: Lens' BeaconsAttachmentsBatchDelete (Maybe Text)
babdProjectId
= lens _babdProjectId
(\ s a -> s{_babdProjectId = a})
babdCallback :: Lens' BeaconsAttachmentsBatchDelete (Maybe Text)
babdCallback
= lens _babdCallback (\ s a -> s{_babdCallback = a})
instance GoogleRequest BeaconsAttachmentsBatchDelete
where
type Rs BeaconsAttachmentsBatchDelete =
DeleteAttachmentsResponse
type Scopes BeaconsAttachmentsBatchDelete =
'["https://www.googleapis.com/auth/userlocation.beacon.registry"]
requestClient BeaconsAttachmentsBatchDelete'{..}
= go _babdBeaconName _babdXgafv _babdUploadProtocol
_babdAccessToken
_babdUploadType
_babdNamespacedType
_babdProjectId
_babdCallback
(Just AltJSON)
proximityBeaconService
where go
= buildClient
(Proxy ::
Proxy BeaconsAttachmentsBatchDeleteResource)
mempty