{-# 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.Entities.BatchDelete
(
ProjectsAgentEntityTypesEntitiesBatchDeleteResource
, projectsAgentEntityTypesEntitiesBatchDelete
, ProjectsAgentEntityTypesEntitiesBatchDelete
, paetebdParent
, paetebdXgafv
, paetebdUploadProtocol
, paetebdAccessToken
, paetebdUploadType
, paetebdPayload
, paetebdCallback
) where
import Network.Google.DialogFlow.Types
import Network.Google.Prelude
type ProjectsAgentEntityTypesEntitiesBatchDeleteResource
=
"v2" :>
Capture "parent" Text :>
"entities:batchDelete" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON]
GoogleCloudDialogflowV2BatchDeleteEntitiesRequest
:> Post '[JSON] GoogleLongrunningOperation
data ProjectsAgentEntityTypesEntitiesBatchDelete = ProjectsAgentEntityTypesEntitiesBatchDelete'
{ _paetebdParent :: !Text
, _paetebdXgafv :: !(Maybe Xgafv)
, _paetebdUploadProtocol :: !(Maybe Text)
, _paetebdAccessToken :: !(Maybe Text)
, _paetebdUploadType :: !(Maybe Text)
, _paetebdPayload :: !GoogleCloudDialogflowV2BatchDeleteEntitiesRequest
, _paetebdCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsAgentEntityTypesEntitiesBatchDelete
:: Text
-> GoogleCloudDialogflowV2BatchDeleteEntitiesRequest
-> ProjectsAgentEntityTypesEntitiesBatchDelete
projectsAgentEntityTypesEntitiesBatchDelete pPaetebdParent_ pPaetebdPayload_ =
ProjectsAgentEntityTypesEntitiesBatchDelete'
{ _paetebdParent = pPaetebdParent_
, _paetebdXgafv = Nothing
, _paetebdUploadProtocol = Nothing
, _paetebdAccessToken = Nothing
, _paetebdUploadType = Nothing
, _paetebdPayload = pPaetebdPayload_
, _paetebdCallback = Nothing
}
paetebdParent :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete Text
paetebdParent
= lens _paetebdParent
(\ s a -> s{_paetebdParent = a})
paetebdXgafv :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete (Maybe Xgafv)
paetebdXgafv
= lens _paetebdXgafv (\ s a -> s{_paetebdXgafv = a})
paetebdUploadProtocol :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete (Maybe Text)
paetebdUploadProtocol
= lens _paetebdUploadProtocol
(\ s a -> s{_paetebdUploadProtocol = a})
paetebdAccessToken :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete (Maybe Text)
paetebdAccessToken
= lens _paetebdAccessToken
(\ s a -> s{_paetebdAccessToken = a})
paetebdUploadType :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete (Maybe Text)
paetebdUploadType
= lens _paetebdUploadType
(\ s a -> s{_paetebdUploadType = a})
paetebdPayload :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete GoogleCloudDialogflowV2BatchDeleteEntitiesRequest
paetebdPayload
= lens _paetebdPayload
(\ s a -> s{_paetebdPayload = a})
paetebdCallback :: Lens' ProjectsAgentEntityTypesEntitiesBatchDelete (Maybe Text)
paetebdCallback
= lens _paetebdCallback
(\ s a -> s{_paetebdCallback = a})
instance GoogleRequest
ProjectsAgentEntityTypesEntitiesBatchDelete where
type Rs ProjectsAgentEntityTypesEntitiesBatchDelete =
GoogleLongrunningOperation
type Scopes
ProjectsAgentEntityTypesEntitiesBatchDelete
=
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/dialogflow"]
requestClient
ProjectsAgentEntityTypesEntitiesBatchDelete'{..}
= go _paetebdParent _paetebdXgafv
_paetebdUploadProtocol
_paetebdAccessToken
_paetebdUploadType
_paetebdCallback
(Just AltJSON)
_paetebdPayload
dialogFlowService
where go
= buildClient
(Proxy ::
Proxy
ProjectsAgentEntityTypesEntitiesBatchDeleteResource)
mempty