module Network.Google.Resource.YouTubeReporting.Jobs.List
(
JobsListResource
, jobsList
, JobsList
, jlXgafv
, jlUploadProtocol
, jlPp
, jlAccessToken
, jlUploadType
, jlOnBehalfOfContentOwner
, jlBearerToken
, jlPageToken
, jlPageSize
, jlCallback
) where
import Network.Google.Prelude
import Network.Google.YouTubeReporting.Types
type JobsListResource =
"v1" :>
"jobs" :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "onBehalfOfContentOwner" Text :>
QueryParam "bearer_token" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListJobsResponse
data JobsList = JobsList
{ _jlXgafv :: !(Maybe Text)
, _jlUploadProtocol :: !(Maybe Text)
, _jlPp :: !Bool
, _jlAccessToken :: !(Maybe Text)
, _jlUploadType :: !(Maybe Text)
, _jlOnBehalfOfContentOwner :: !(Maybe Text)
, _jlBearerToken :: !(Maybe Text)
, _jlPageToken :: !(Maybe Text)
, _jlPageSize :: !(Maybe (Textual Int32))
, _jlCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
jobsList
:: JobsList
jobsList =
JobsList
{ _jlXgafv = Nothing
, _jlUploadProtocol = Nothing
, _jlPp = True
, _jlAccessToken = Nothing
, _jlUploadType = Nothing
, _jlOnBehalfOfContentOwner = Nothing
, _jlBearerToken = Nothing
, _jlPageToken = Nothing
, _jlPageSize = Nothing
, _jlCallback = Nothing
}
jlXgafv :: Lens' JobsList (Maybe Text)
jlXgafv = lens _jlXgafv (\ s a -> s{_jlXgafv = a})
jlUploadProtocol :: Lens' JobsList (Maybe Text)
jlUploadProtocol
= lens _jlUploadProtocol
(\ s a -> s{_jlUploadProtocol = a})
jlPp :: Lens' JobsList Bool
jlPp = lens _jlPp (\ s a -> s{_jlPp = a})
jlAccessToken :: Lens' JobsList (Maybe Text)
jlAccessToken
= lens _jlAccessToken
(\ s a -> s{_jlAccessToken = a})
jlUploadType :: Lens' JobsList (Maybe Text)
jlUploadType
= lens _jlUploadType (\ s a -> s{_jlUploadType = a})
jlOnBehalfOfContentOwner :: Lens' JobsList (Maybe Text)
jlOnBehalfOfContentOwner
= lens _jlOnBehalfOfContentOwner
(\ s a -> s{_jlOnBehalfOfContentOwner = a})
jlBearerToken :: Lens' JobsList (Maybe Text)
jlBearerToken
= lens _jlBearerToken
(\ s a -> s{_jlBearerToken = a})
jlPageToken :: Lens' JobsList (Maybe Text)
jlPageToken
= lens _jlPageToken (\ s a -> s{_jlPageToken = a})
jlPageSize :: Lens' JobsList (Maybe Int32)
jlPageSize
= lens _jlPageSize (\ s a -> s{_jlPageSize = a}) .
mapping _Coerce
jlCallback :: Lens' JobsList (Maybe Text)
jlCallback
= lens _jlCallback (\ s a -> s{_jlCallback = a})
instance GoogleRequest JobsList where
type Rs JobsList = ListJobsResponse
requestClient JobsList{..}
= go _jlXgafv _jlUploadProtocol (Just _jlPp)
_jlAccessToken
_jlUploadType
_jlOnBehalfOfContentOwner
_jlBearerToken
_jlPageToken
_jlPageSize
_jlCallback
(Just AltJSON)
youTubeReportingService
where go
= buildClient (Proxy :: Proxy JobsListResource)
mempty