{-# 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.DialogFlow.Projects.Agent.EntityTypes.BatchDelete
(
ProjectsAgentEntityTypesBatchDeleteResource
, projectsAgentEntityTypesBatchDelete
, ProjectsAgentEntityTypesBatchDelete
, paetbdParent
, paetbdXgafv
, paetbdUploadProtocol
, paetbdAccessToken
, paetbdUploadType
, paetbdPayload
, paetbdCallback
) where
import Network.Google.DialogFlow.Types
import Network.Google.Prelude
type ProjectsAgentEntityTypesBatchDeleteResource =
"v2" :>
Capture "parent" Text :>
"entityTypes:batchDelete" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON]
GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest
:> Post '[JSON] GoogleLongrunningOperation
data ProjectsAgentEntityTypesBatchDelete = ProjectsAgentEntityTypesBatchDelete'
{ _paetbdParent :: !Text
, _paetbdXgafv :: !(Maybe Xgafv)
, _paetbdUploadProtocol :: !(Maybe Text)
, _paetbdAccessToken :: !(Maybe Text)
, _paetbdUploadType :: !(Maybe Text)
, _paetbdPayload :: !GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest
, _paetbdCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsAgentEntityTypesBatchDelete
:: Text
-> GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest
-> ProjectsAgentEntityTypesBatchDelete
projectsAgentEntityTypesBatchDelete pPaetbdParent_ pPaetbdPayload_ =
ProjectsAgentEntityTypesBatchDelete'
{ _paetbdParent = pPaetbdParent_
, _paetbdXgafv = Nothing
, _paetbdUploadProtocol = Nothing
, _paetbdAccessToken = Nothing
, _paetbdUploadType = Nothing
, _paetbdPayload = pPaetbdPayload_
, _paetbdCallback = Nothing
}
paetbdParent :: Lens' ProjectsAgentEntityTypesBatchDelete Text
paetbdParent
= lens _paetbdParent (\ s a -> s{_paetbdParent = a})
paetbdXgafv :: Lens' ProjectsAgentEntityTypesBatchDelete (Maybe Xgafv)
paetbdXgafv
= lens _paetbdXgafv (\ s a -> s{_paetbdXgafv = a})
paetbdUploadProtocol :: Lens' ProjectsAgentEntityTypesBatchDelete (Maybe Text)
paetbdUploadProtocol
= lens _paetbdUploadProtocol
(\ s a -> s{_paetbdUploadProtocol = a})
paetbdAccessToken :: Lens' ProjectsAgentEntityTypesBatchDelete (Maybe Text)
paetbdAccessToken
= lens _paetbdAccessToken
(\ s a -> s{_paetbdAccessToken = a})
paetbdUploadType :: Lens' ProjectsAgentEntityTypesBatchDelete (Maybe Text)
paetbdUploadType
= lens _paetbdUploadType
(\ s a -> s{_paetbdUploadType = a})
paetbdPayload :: Lens' ProjectsAgentEntityTypesBatchDelete GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest
paetbdPayload
= lens _paetbdPayload
(\ s a -> s{_paetbdPayload = a})
paetbdCallback :: Lens' ProjectsAgentEntityTypesBatchDelete (Maybe Text)
paetbdCallback
= lens _paetbdCallback
(\ s a -> s{_paetbdCallback = a})
instance GoogleRequest
ProjectsAgentEntityTypesBatchDelete where
type Rs ProjectsAgentEntityTypesBatchDelete =
GoogleLongrunningOperation
type Scopes ProjectsAgentEntityTypesBatchDelete =
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/dialogflow"]
requestClient
ProjectsAgentEntityTypesBatchDelete'{..}
= go _paetbdParent _paetbdXgafv _paetbdUploadProtocol
_paetbdAccessToken
_paetbdUploadType
_paetbdCallback
(Just AltJSON)
_paetbdPayload
dialogFlowService
where go
= buildClient
(Proxy ::
Proxy ProjectsAgentEntityTypesBatchDeleteResource)
mempty