{-# 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.SecurityCenter.Organizations.Operations.Delete
(
OrganizationsOperationsDeleteResource
, organizationsOperationsDelete
, OrganizationsOperationsDelete
, oodXgafv
, oodUploadProtocol
, oodAccessToken
, oodUploadType
, oodName
, oodCallback
) where
import Network.Google.Prelude
import Network.Google.SecurityCenter.Types
type OrganizationsOperationsDeleteResource =
"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 OrganizationsOperationsDelete =
OrganizationsOperationsDelete'
{ _oodXgafv :: !(Maybe Xgafv)
, _oodUploadProtocol :: !(Maybe Text)
, _oodAccessToken :: !(Maybe Text)
, _oodUploadType :: !(Maybe Text)
, _oodName :: !Text
, _oodCallback :: !(Maybe Text)
}
deriving (Eq, Show, Data, Typeable, Generic)
organizationsOperationsDelete
:: Text
-> OrganizationsOperationsDelete
organizationsOperationsDelete pOodName_ =
OrganizationsOperationsDelete'
{ _oodXgafv = Nothing
, _oodUploadProtocol = Nothing
, _oodAccessToken = Nothing
, _oodUploadType = Nothing
, _oodName = pOodName_
, _oodCallback = Nothing
}
oodXgafv :: Lens' OrganizationsOperationsDelete (Maybe Xgafv)
oodXgafv = lens _oodXgafv (\ s a -> s{_oodXgafv = a})
oodUploadProtocol :: Lens' OrganizationsOperationsDelete (Maybe Text)
oodUploadProtocol
= lens _oodUploadProtocol
(\ s a -> s{_oodUploadProtocol = a})
oodAccessToken :: Lens' OrganizationsOperationsDelete (Maybe Text)
oodAccessToken
= lens _oodAccessToken
(\ s a -> s{_oodAccessToken = a})
oodUploadType :: Lens' OrganizationsOperationsDelete (Maybe Text)
oodUploadType
= lens _oodUploadType
(\ s a -> s{_oodUploadType = a})
oodName :: Lens' OrganizationsOperationsDelete Text
oodName = lens _oodName (\ s a -> s{_oodName = a})
oodCallback :: Lens' OrganizationsOperationsDelete (Maybe Text)
oodCallback
= lens _oodCallback (\ s a -> s{_oodCallback = a})
instance GoogleRequest OrganizationsOperationsDelete
where
type Rs OrganizationsOperationsDelete = Empty
type Scopes OrganizationsOperationsDelete =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient OrganizationsOperationsDelete'{..}
= go _oodName _oodXgafv _oodUploadProtocol
_oodAccessToken
_oodUploadType
_oodCallback
(Just AltJSON)
securityCenterService
where go
= buildClient
(Proxy ::
Proxy OrganizationsOperationsDeleteResource)
mempty