{-# 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.DLP.Organizations.InspectTemplates.Patch
(
OrganizationsInspectTemplatesPatchResource
, organizationsInspectTemplatesPatch
, OrganizationsInspectTemplatesPatch
, oitpXgafv
, oitpUploadProtocol
, oitpAccessToken
, oitpUploadType
, oitpPayload
, oitpName
, oitpCallback
) where
import Network.Google.DLP.Types
import Network.Google.Prelude
type OrganizationsInspectTemplatesPatchResource =
"v2" :>
Capture "name" Text :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON]
GooglePrivacyDlpV2UpdateInspectTemplateRequest
:> Patch '[JSON] GooglePrivacyDlpV2InspectTemplate
data OrganizationsInspectTemplatesPatch = OrganizationsInspectTemplatesPatch'
{ _oitpXgafv :: !(Maybe Xgafv)
, _oitpUploadProtocol :: !(Maybe Text)
, _oitpAccessToken :: !(Maybe Text)
, _oitpUploadType :: !(Maybe Text)
, _oitpPayload :: !GooglePrivacyDlpV2UpdateInspectTemplateRequest
, _oitpName :: !Text
, _oitpCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
organizationsInspectTemplatesPatch
:: GooglePrivacyDlpV2UpdateInspectTemplateRequest
-> Text
-> OrganizationsInspectTemplatesPatch
organizationsInspectTemplatesPatch pOitpPayload_ pOitpName_ =
OrganizationsInspectTemplatesPatch'
{ _oitpXgafv = Nothing
, _oitpUploadProtocol = Nothing
, _oitpAccessToken = Nothing
, _oitpUploadType = Nothing
, _oitpPayload = pOitpPayload_
, _oitpName = pOitpName_
, _oitpCallback = Nothing
}
oitpXgafv :: Lens' OrganizationsInspectTemplatesPatch (Maybe Xgafv)
oitpXgafv
= lens _oitpXgafv (\ s a -> s{_oitpXgafv = a})
oitpUploadProtocol :: Lens' OrganizationsInspectTemplatesPatch (Maybe Text)
oitpUploadProtocol
= lens _oitpUploadProtocol
(\ s a -> s{_oitpUploadProtocol = a})
oitpAccessToken :: Lens' OrganizationsInspectTemplatesPatch (Maybe Text)
oitpAccessToken
= lens _oitpAccessToken
(\ s a -> s{_oitpAccessToken = a})
oitpUploadType :: Lens' OrganizationsInspectTemplatesPatch (Maybe Text)
oitpUploadType
= lens _oitpUploadType
(\ s a -> s{_oitpUploadType = a})
oitpPayload :: Lens' OrganizationsInspectTemplatesPatch GooglePrivacyDlpV2UpdateInspectTemplateRequest
oitpPayload
= lens _oitpPayload (\ s a -> s{_oitpPayload = a})
oitpName :: Lens' OrganizationsInspectTemplatesPatch Text
oitpName = lens _oitpName (\ s a -> s{_oitpName = a})
oitpCallback :: Lens' OrganizationsInspectTemplatesPatch (Maybe Text)
oitpCallback
= lens _oitpCallback (\ s a -> s{_oitpCallback = a})
instance GoogleRequest
OrganizationsInspectTemplatesPatch where
type Rs OrganizationsInspectTemplatesPatch =
GooglePrivacyDlpV2InspectTemplate
type Scopes OrganizationsInspectTemplatesPatch =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient OrganizationsInspectTemplatesPatch'{..}
= go _oitpName _oitpXgafv _oitpUploadProtocol
_oitpAccessToken
_oitpUploadType
_oitpCallback
(Just AltJSON)
_oitpPayload
dLPService
where go
= buildClient
(Proxy ::
Proxy OrganizationsInspectTemplatesPatchResource)
mempty