{-# 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.Sessions.EntityTypes.List
(
ProjectsAgentSessionsEntityTypesListResource
, projectsAgentSessionsEntityTypesList
, ProjectsAgentSessionsEntityTypesList
, paSetlParent
, paSetlXgafv
, paSetlUploadProtocol
, paSetlAccessToken
, paSetlUploadType
, paSetlPageToken
, paSetlPageSize
, paSetlCallback
) where
import Network.Google.DialogFlow.Types
import Network.Google.Prelude
type ProjectsAgentSessionsEntityTypesListResource =
"v2" :>
Capture "parent" Text :>
"entityTypes" :>
QueryParam "$.xgafv" Xgafv :>
QueryParam "upload_protocol" Text :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON]
GoogleCloudDialogflowV2ListSessionEntityTypesResponse
data ProjectsAgentSessionsEntityTypesList = ProjectsAgentSessionsEntityTypesList'
{ _paSetlParent :: !Text
, _paSetlXgafv :: !(Maybe Xgafv)
, _paSetlUploadProtocol :: !(Maybe Text)
, _paSetlAccessToken :: !(Maybe Text)
, _paSetlUploadType :: !(Maybe Text)
, _paSetlPageToken :: !(Maybe Text)
, _paSetlPageSize :: !(Maybe (Textual Int32))
, _paSetlCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsAgentSessionsEntityTypesList
:: Text
-> ProjectsAgentSessionsEntityTypesList
projectsAgentSessionsEntityTypesList pPaSetlParent_ =
ProjectsAgentSessionsEntityTypesList'
{ _paSetlParent = pPaSetlParent_
, _paSetlXgafv = Nothing
, _paSetlUploadProtocol = Nothing
, _paSetlAccessToken = Nothing
, _paSetlUploadType = Nothing
, _paSetlPageToken = Nothing
, _paSetlPageSize = Nothing
, _paSetlCallback = Nothing
}
paSetlParent :: Lens' ProjectsAgentSessionsEntityTypesList Text
paSetlParent
= lens _paSetlParent (\ s a -> s{_paSetlParent = a})
paSetlXgafv :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Xgafv)
paSetlXgafv
= lens _paSetlXgafv (\ s a -> s{_paSetlXgafv = a})
paSetlUploadProtocol :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Text)
paSetlUploadProtocol
= lens _paSetlUploadProtocol
(\ s a -> s{_paSetlUploadProtocol = a})
paSetlAccessToken :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Text)
paSetlAccessToken
= lens _paSetlAccessToken
(\ s a -> s{_paSetlAccessToken = a})
paSetlUploadType :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Text)
paSetlUploadType
= lens _paSetlUploadType
(\ s a -> s{_paSetlUploadType = a})
paSetlPageToken :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Text)
paSetlPageToken
= lens _paSetlPageToken
(\ s a -> s{_paSetlPageToken = a})
paSetlPageSize :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Int32)
paSetlPageSize
= lens _paSetlPageSize
(\ s a -> s{_paSetlPageSize = a})
. mapping _Coerce
paSetlCallback :: Lens' ProjectsAgentSessionsEntityTypesList (Maybe Text)
paSetlCallback
= lens _paSetlCallback
(\ s a -> s{_paSetlCallback = a})
instance GoogleRequest
ProjectsAgentSessionsEntityTypesList where
type Rs ProjectsAgentSessionsEntityTypesList =
GoogleCloudDialogflowV2ListSessionEntityTypesResponse
type Scopes ProjectsAgentSessionsEntityTypesList =
'["https://www.googleapis.com/auth/cloud-platform",
"https://www.googleapis.com/auth/dialogflow"]
requestClient
ProjectsAgentSessionsEntityTypesList'{..}
= go _paSetlParent _paSetlXgafv _paSetlUploadProtocol
_paSetlAccessToken
_paSetlUploadType
_paSetlPageToken
_paSetlPageSize
_paSetlCallback
(Just AltJSON)
dialogFlowService
where go
= buildClient
(Proxy ::
Proxy ProjectsAgentSessionsEntityTypesListResource)
mempty