{-# 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.BatchCreate
(
ProjectsAgentEntityTypesEntitiesBatchCreateResource
, projectsAgentEntityTypesEntitiesBatchCreate
, ProjectsAgentEntityTypesEntitiesBatchCreate
, paetebcParent
, paetebcXgafv
, paetebcUploadProtocol
, paetebcAccessToken
, paetebcUploadType
, paetebcPayload
, paetebcCallback
) where
import Network.Google.DialogFlow.Types
import Network.Google.Prelude
type ProjectsAgentEntityTypesEntitiesBatchCreateResource
=
"v2" :>
Capture "parent" Text :>
"entities:batchCreate" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
ReqBody '[JSON]
GoogleCloudDialogflowV2BatchCreateEntitiesRequest
:> Post '[JSON] GoogleLongrunningOperation
data ProjectsAgentEntityTypesEntitiesBatchCreate = ProjectsAgentEntityTypesEntitiesBatchCreate'
{ _paetebcParent :: !Text
, _paetebcXgafv :: !(Maybe Xgafv)
, _paetebcUploadProtocol :: !(Maybe Text)
, _paetebcAccessToken :: !(Maybe Text)
, _paetebcUploadType :: !(Maybe Text)
, _paetebcPayload :: !GoogleCloudDialogflowV2BatchCreateEntitiesRequest
, _paetebcCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsAgentEntityTypesEntitiesBatchCreate
:: Text
-> GoogleCloudDialogflowV2BatchCreateEntitiesRequest
-> ProjectsAgentEntityTypesEntitiesBatchCreate
projectsAgentEntityTypesEntitiesBatchCreate pPaetebcParent_ pPaetebcPayload_ =
ProjectsAgentEntityTypesEntitiesBatchCreate'
{ _paetebcParent = pPaetebcParent_
, _paetebcXgafv = Nothing
, _paetebcUploadProtocol = Nothing
, _paetebcAccessToken = Nothing
, _paetebcUploadType = Nothing
, _paetebcPayload = pPaetebcPayload_
, _paetebcCallback = Nothing
}
paetebcParent :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate Text
paetebcParent
= lens _paetebcParent
(\ s a -> s{_paetebcParent = a})
paetebcXgafv :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate (Maybe Xgafv)
paetebcXgafv
= lens _paetebcXgafv (\ s a -> s{_paetebcXgafv = a})
paetebcUploadProtocol :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate (Maybe Text)
paetebcUploadProtocol
= lens _paetebcUploadProtocol
(\ s a -> s{_paetebcUploadProtocol = a})
paetebcAccessToken :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate (Maybe Text)
paetebcAccessToken
= lens _paetebcAccessToken
(\ s a -> s{_paetebcAccessToken = a})
paetebcUploadType :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate (Maybe Text)
paetebcUploadType
= lens _paetebcUploadType
(\ s a -> s{_paetebcUploadType = a})
paetebcPayload :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate GoogleCloudDialogflowV2BatchCreateEntitiesRequest
paetebcPayload
= lens _paetebcPayload
(\ s a -> s{_paetebcPayload = a})
paetebcCallback :: Lens' ProjectsAgentEntityTypesEntitiesBatchCreate (Maybe Text)
paetebcCallback
= lens _paetebcCallback
(\ s a -> s{_paetebcCallback = a})
instance GoogleRequest
ProjectsAgentEntityTypesEntitiesBatchCreate where
type Rs ProjectsAgentEntityTypesEntitiesBatchCreate =
GoogleLongrunningOperation
type Scopes
ProjectsAgentEntityTypesEntitiesBatchCreate
=
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/dialogflow"]
requestClient
ProjectsAgentEntityTypesEntitiesBatchCreate'{..}
= go _paetebcParent _paetebcXgafv
_paetebcUploadProtocol
_paetebcAccessToken
_paetebcUploadType
_paetebcCallback
(Just AltJSON)
_paetebcPayload
dialogFlowService
where go
= buildClient
(Proxy ::
Proxy
ProjectsAgentEntityTypesEntitiesBatchCreateResource)
mempty