module Network.Google.Resource.Genomics.DataSets.List
(
DataSetsListResource
, dataSetsList
, DataSetsList
, dslXgafv
, dslUploadProtocol
, dslPp
, dslAccessToken
, dslUploadType
, dslBearerToken
, dslPageToken
, dslProjectId
, dslPageSize
, dslCallback
) where
import Network.Google.Genomics.Types
import Network.Google.Prelude
type DataSetsListResource =
"v1" :>
"datasets" :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "pageToken" Text :>
QueryParam "projectId" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListDataSetsResponse
data DataSetsList = DataSetsList
{ _dslXgafv :: !(Maybe Text)
, _dslUploadProtocol :: !(Maybe Text)
, _dslPp :: !Bool
, _dslAccessToken :: !(Maybe Text)
, _dslUploadType :: !(Maybe Text)
, _dslBearerToken :: !(Maybe Text)
, _dslPageToken :: !(Maybe Text)
, _dslProjectId :: !(Maybe Text)
, _dslPageSize :: !(Maybe (Textual Int32))
, _dslCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
dataSetsList
:: DataSetsList
dataSetsList =
DataSetsList
{ _dslXgafv = Nothing
, _dslUploadProtocol = Nothing
, _dslPp = True
, _dslAccessToken = Nothing
, _dslUploadType = Nothing
, _dslBearerToken = Nothing
, _dslPageToken = Nothing
, _dslProjectId = Nothing
, _dslPageSize = Nothing
, _dslCallback = Nothing
}
dslXgafv :: Lens' DataSetsList (Maybe Text)
dslXgafv = lens _dslXgafv (\ s a -> s{_dslXgafv = a})
dslUploadProtocol :: Lens' DataSetsList (Maybe Text)
dslUploadProtocol
= lens _dslUploadProtocol
(\ s a -> s{_dslUploadProtocol = a})
dslPp :: Lens' DataSetsList Bool
dslPp = lens _dslPp (\ s a -> s{_dslPp = a})
dslAccessToken :: Lens' DataSetsList (Maybe Text)
dslAccessToken
= lens _dslAccessToken
(\ s a -> s{_dslAccessToken = a})
dslUploadType :: Lens' DataSetsList (Maybe Text)
dslUploadType
= lens _dslUploadType
(\ s a -> s{_dslUploadType = a})
dslBearerToken :: Lens' DataSetsList (Maybe Text)
dslBearerToken
= lens _dslBearerToken
(\ s a -> s{_dslBearerToken = a})
dslPageToken :: Lens' DataSetsList (Maybe Text)
dslPageToken
= lens _dslPageToken (\ s a -> s{_dslPageToken = a})
dslProjectId :: Lens' DataSetsList (Maybe Text)
dslProjectId
= lens _dslProjectId (\ s a -> s{_dslProjectId = a})
dslPageSize :: Lens' DataSetsList (Maybe Int32)
dslPageSize
= lens _dslPageSize (\ s a -> s{_dslPageSize = a}) .
mapping _Coerce
dslCallback :: Lens' DataSetsList (Maybe Text)
dslCallback
= lens _dslCallback (\ s a -> s{_dslCallback = a})
instance GoogleRequest DataSetsList where
type Rs DataSetsList = ListDataSetsResponse
requestClient DataSetsList{..}
= go _dslXgafv _dslUploadProtocol (Just _dslPp)
_dslAccessToken
_dslUploadType
_dslBearerToken
_dslPageToken
_dslProjectId
_dslPageSize
_dslCallback
(Just AltJSON)
genomicsService
where go
= buildClient (Proxy :: Proxy DataSetsListResource)
mempty