module Network.Google.Resource.Dataflow.Projects.Jobs.Get
(
ProjectsJobsGetResource
, projectsJobsGet
, ProjectsJobsGet
, pjgXgafv
, pjgJobId
, pjgUploadProtocol
, pjgPp
, pjgAccessToken
, pjgUploadType
, pjgBearerToken
, pjgView
, pjgProjectId
, pjgCallback
) where
import Network.Google.Dataflow.Types
import Network.Google.Prelude
type ProjectsJobsGetResource =
"v1b3" :>
"projects" :>
Capture "projectId" Text :>
"jobs" :>
Capture "jobId" Text :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "view" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Get '[JSON] Job
data ProjectsJobsGet = ProjectsJobsGet
{ _pjgXgafv :: !(Maybe Text)
, _pjgJobId :: !Text
, _pjgUploadProtocol :: !(Maybe Text)
, _pjgPp :: !Bool
, _pjgAccessToken :: !(Maybe Text)
, _pjgUploadType :: !(Maybe Text)
, _pjgBearerToken :: !(Maybe Text)
, _pjgView :: !(Maybe Text)
, _pjgProjectId :: !Text
, _pjgCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsJobsGet
:: Text
-> Text
-> ProjectsJobsGet
projectsJobsGet pPjgJobId_ pPjgProjectId_ =
ProjectsJobsGet
{ _pjgXgafv = Nothing
, _pjgJobId = pPjgJobId_
, _pjgUploadProtocol = Nothing
, _pjgPp = True
, _pjgAccessToken = Nothing
, _pjgUploadType = Nothing
, _pjgBearerToken = Nothing
, _pjgView = Nothing
, _pjgProjectId = pPjgProjectId_
, _pjgCallback = Nothing
}
pjgXgafv :: Lens' ProjectsJobsGet (Maybe Text)
pjgXgafv = lens _pjgXgafv (\ s a -> s{_pjgXgafv = a})
pjgJobId :: Lens' ProjectsJobsGet Text
pjgJobId = lens _pjgJobId (\ s a -> s{_pjgJobId = a})
pjgUploadProtocol :: Lens' ProjectsJobsGet (Maybe Text)
pjgUploadProtocol
= lens _pjgUploadProtocol
(\ s a -> s{_pjgUploadProtocol = a})
pjgPp :: Lens' ProjectsJobsGet Bool
pjgPp = lens _pjgPp (\ s a -> s{_pjgPp = a})
pjgAccessToken :: Lens' ProjectsJobsGet (Maybe Text)
pjgAccessToken
= lens _pjgAccessToken
(\ s a -> s{_pjgAccessToken = a})
pjgUploadType :: Lens' ProjectsJobsGet (Maybe Text)
pjgUploadType
= lens _pjgUploadType
(\ s a -> s{_pjgUploadType = a})
pjgBearerToken :: Lens' ProjectsJobsGet (Maybe Text)
pjgBearerToken
= lens _pjgBearerToken
(\ s a -> s{_pjgBearerToken = a})
pjgView :: Lens' ProjectsJobsGet (Maybe Text)
pjgView = lens _pjgView (\ s a -> s{_pjgView = a})
pjgProjectId :: Lens' ProjectsJobsGet Text
pjgProjectId
= lens _pjgProjectId (\ s a -> s{_pjgProjectId = a})
pjgCallback :: Lens' ProjectsJobsGet (Maybe Text)
pjgCallback
= lens _pjgCallback (\ s a -> s{_pjgCallback = a})
instance GoogleRequest ProjectsJobsGet where
type Rs ProjectsJobsGet = Job
requestClient ProjectsJobsGet{..}
= go _pjgProjectId _pjgJobId _pjgXgafv
_pjgUploadProtocol
(Just _pjgPp)
_pjgAccessToken
_pjgUploadType
_pjgBearerToken
_pjgView
_pjgCallback
(Just AltJSON)
dataflowService
where go
= buildClient
(Proxy :: Proxy ProjectsJobsGetResource)
mempty