packages feed

gogol-bigquerydatatransfer 0.4.0 → 0.5.0

raw patch · 35 files changed

+1274/−357 lines, 35 filesdep ~gogol-core

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.3.0`+`0.5.0`   ## Description
gen/Network/Google/BigQueryDataTransfer.hs view
@@ -13,8 +13,8 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Transfers data from partner SaaS applications to Google BigQuery on a--- scheduled, managed basis.+-- Schedule queries or transfer external data from SaaS applications to+-- Google BigQuery on a regular basis. -- -- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> module Network.Google.BigQueryDataTransfer@@ -86,6 +86,9 @@     -- ** bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns     , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns +    -- ** bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns+    , module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns+     -- ** bigquerydatatransfer.projects.transferConfigs.create     , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create @@ -116,6 +119,9 @@     -- ** bigquerydatatransfer.projects.transferConfigs.scheduleRuns     , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns +    -- ** bigquerydatatransfer.projects.transferConfigs.startManualRuns+    , module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns+     -- * Types      -- ** DataSourceParameterType@@ -134,22 +140,28 @@     , llrNextPageToken     , llrLocations +    -- ** TimeRange+    , TimeRange+    , timeRange+    , trStartTime+    , trEndTime+     -- ** TransferRun     , TransferRun     , transferRun-    , trRunTime-    , trErrorStatus-    , trState-    , trSchedule-    , trStartTime-    , trScheduleTime-    , trDataSourceId-    , trParams-    , trUserId-    , trUpdateTime-    , trName-    , trEndTime-    , trDestinationDataSetId+    , tRunTime+    , tErrorStatus+    , tState+    , tSchedule+    , tStartTime+    , tScheduleTime+    , tDataSourceId+    , tParams+    , tUserId+    , tUpdateTime+    , tName+    , tEndTime+    , tDestinationDataSetId      -- ** CheckValidCredsRequest     , CheckValidCredsRequest@@ -179,6 +191,13 @@     , Empty     , empty +    -- ** ScheduleOptions+    , ScheduleOptions+    , scheduleOptions+    , soStartTime+    , soDisableAutoScheduling+    , soEndTime+     -- ** TransferRunState     , TransferRunState (..) @@ -239,6 +258,12 @@     , ldsrNextPageToken     , ldsrDataSources +    -- ** StartManualTransferRunsRequest+    , StartManualTransferRunsRequest+    , startManualTransferRunsRequest+    , smtrrRequestedRunTime+    , smtrrRequestedTimeRange+     -- ** Xgafv     , Xgafv (..) @@ -285,6 +310,11 @@     , locationLabels     , llAddtional +    -- ** StartManualTransferRunsResponse+    , StartManualTransferRunsResponse+    , startManualTransferRunsResponse+    , smtrrRuns+     -- ** LocationMetadata     , LocationMetadata     , locationMetadata@@ -307,6 +337,7 @@     , transferConfig     , tcState     , tcSchedule+    , tcScheduleOptions     , tcDisabled     , tcDataSourceId     , tcParams@@ -340,6 +371,7 @@ import           Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List import           Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List import           Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns+import           Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get@@ -350,6 +382,7 @@ import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns+import           Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns  {- $resources TODO@@ -367,6 +400,7 @@        :<|> ProjectsTransferConfigsRunsDeleteResource        :<|> ProjectsTransferConfigsScheduleRunsResource        :<|> ProjectsTransferConfigsListResource+       :<|> ProjectsTransferConfigsStartManualRunsResource        :<|> ProjectsTransferConfigsPatchResource        :<|> ProjectsTransferConfigsGetResource        :<|> ProjectsTransferConfigsCreateResource@@ -384,6 +418,8 @@        :<|>        ProjectsLocationsTransferConfigsScheduleRunsResource        :<|> ProjectsLocationsTransferConfigsListResource+       :<|>+       ProjectsLocationsTransferConfigsStartManualRunsResource        :<|> ProjectsLocationsTransferConfigsPatchResource        :<|> ProjectsLocationsTransferConfigsGetResource        :<|> ProjectsLocationsTransferConfigsCreateResource
gen/Network/Google/BigQueryDataTransfer/Types.hs view
@@ -40,22 +40,28 @@     , llrNextPageToken     , llrLocations +    -- * TimeRange+    , TimeRange+    , timeRange+    , trStartTime+    , trEndTime+     -- * TransferRun     , TransferRun     , transferRun-    , trRunTime-    , trErrorStatus-    , trState-    , trSchedule-    , trStartTime-    , trScheduleTime-    , trDataSourceId-    , trParams-    , trUserId-    , trUpdateTime-    , trName-    , trEndTime-    , trDestinationDataSetId+    , tRunTime+    , tErrorStatus+    , tState+    , tSchedule+    , tStartTime+    , tScheduleTime+    , tDataSourceId+    , tParams+    , tUserId+    , tUpdateTime+    , tName+    , tEndTime+    , tDestinationDataSetId      -- * CheckValidCredsRequest     , CheckValidCredsRequest@@ -85,6 +91,13 @@     , Empty     , empty +    -- * ScheduleOptions+    , ScheduleOptions+    , scheduleOptions+    , soStartTime+    , soDisableAutoScheduling+    , soEndTime+     -- * TransferRunState     , TransferRunState (..) @@ -145,6 +158,12 @@     , ldsrNextPageToken     , ldsrDataSources +    -- * StartManualTransferRunsRequest+    , StartManualTransferRunsRequest+    , startManualTransferRunsRequest+    , smtrrRequestedRunTime+    , smtrrRequestedTimeRange+     -- * Xgafv     , Xgafv (..) @@ -191,6 +210,11 @@     , locationLabels     , llAddtional +    -- * StartManualTransferRunsResponse+    , StartManualTransferRunsResponse+    , startManualTransferRunsResponse+    , smtrrRuns+     -- * LocationMetadata     , LocationMetadata     , locationMetadata@@ -213,6 +237,7 @@     , transferConfig     , tcState     , tcSchedule+    , tcScheduleOptions     , tcDisabled     , tcDataSourceId     , tcParams@@ -239,12 +264,12 @@  -- | View your data across Google Cloud Platform services cloudPlatformReadOnlyScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform.read-only"]-cloudPlatformReadOnlyScope = Proxy;+cloudPlatformReadOnlyScope = Proxy  -- | View and manage your data across Google Cloud Platform services cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy;+cloudPlatformScope = Proxy  -- | View and manage your data in Google BigQuery bigQueryScope :: Proxy '["https://www.googleapis.com/auth/bigquery"]-bigQueryScope = Proxy;+bigQueryScope = Proxy
gen/Network/Google/BigQueryDataTransfer/Types/Product.hs view
@@ -57,12 +57,15 @@ -- security\/privacy reasons. -- -- /See:/ 'status' smart constructor.-data Status = Status'+data Status =+  Status'     { _sDetails :: !(Maybe [StatusDetailsItem])     , _sCode    :: !(Maybe (Textual Int32))     , _sMessage :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Status' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -74,13 +77,9 @@ -- * 'sMessage' status     :: Status-status =-    Status'-    { _sDetails = Nothing-    , _sCode = Nothing-    , _sMessage = Nothing-    }+status = Status' {_sDetails = Nothing, _sCode = Nothing, _sMessage = Nothing} + -- | A list of messages that carry the error details. There is a common set -- of message types for APIs to use. sDetails :: Lens' Status [StatusDetailsItem]@@ -120,11 +119,14 @@ -- | The response message for Locations.ListLocations. -- -- /See:/ 'listLocationsResponse' smart constructor.-data ListLocationsResponse = ListLocationsResponse'+data ListLocationsResponse =+  ListLocationsResponse'     { _llrNextPageToken :: !(Maybe Text)     , _llrLocations     :: !(Maybe [Location])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListLocationsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -135,11 +137,9 @@ listLocationsResponse     :: ListLocationsResponse listLocationsResponse =-    ListLocationsResponse'-    { _llrNextPageToken = Nothing-    , _llrLocations = Nothing-    }+  ListLocationsResponse' {_llrNextPageToken = Nothing, _llrLocations = Nothing} + -- | The standard List next-page token. llrNextPageToken :: Lens' ListLocationsResponse (Maybe Text) llrNextPageToken@@ -168,153 +168,212 @@                  [("nextPageToken" .=) <$> _llrNextPageToken,                   ("locations" .=) <$> _llrLocations]) +-- | A specification for a time range, this will request transfer runs with+-- run_time between start_time (inclusive) and end_time (exclusive).+--+-- /See:/ 'timeRange' smart constructor.+data TimeRange =+  TimeRange'+    { _trStartTime :: !(Maybe DateTime')+    , _trEndTime   :: !(Maybe DateTime')+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'TimeRange' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'trStartTime'+--+-- * 'trEndTime'+timeRange+    :: TimeRange+timeRange = TimeRange' {_trStartTime = Nothing, _trEndTime = Nothing}+++-- | Start time of the range of transfer runs. For example,+-- \`\"2017-05-25T00:00:00+00:00\"\`. The start_time must be strictly less+-- than the end_time. Creates transfer runs where run_time is in the range+-- betwen start_time (inclusive) and end_time (exlusive).+trStartTime :: Lens' TimeRange (Maybe UTCTime)+trStartTime+  = lens _trStartTime (\ s a -> s{_trStartTime = a}) .+      mapping _DateTime++-- | End time of the range of transfer runs. For example,+-- \`\"2017-05-30T00:00:00+00:00\"\`. The end_time must not be in the+-- future. Creates transfer runs where run_time is in the range betwen+-- start_time (inclusive) and end_time (exlusive).+trEndTime :: Lens' TimeRange (Maybe UTCTime)+trEndTime+  = lens _trEndTime (\ s a -> s{_trEndTime = a}) .+      mapping _DateTime++instance FromJSON TimeRange where+        parseJSON+          = withObject "TimeRange"+              (\ o ->+                 TimeRange' <$>+                   (o .:? "startTime") <*> (o .:? "endTime"))++instance ToJSON TimeRange where+        toJSON TimeRange'{..}+          = object+              (catMaybes+                 [("startTime" .=) <$> _trStartTime,+                  ("endTime" .=) <$> _trEndTime])+ -- | Represents a data transfer run. -- -- /See:/ 'transferRun' smart constructor.-data TransferRun = TransferRun'-    { _trRunTime              :: !(Maybe DateTime')-    , _trErrorStatus          :: !(Maybe Status)-    , _trState                :: !(Maybe TransferRunState)-    , _trSchedule             :: !(Maybe Text)-    , _trStartTime            :: !(Maybe DateTime')-    , _trScheduleTime         :: !(Maybe DateTime')-    , _trDataSourceId         :: !(Maybe Text)-    , _trParams               :: !(Maybe TransferRunParams)-    , _trUserId               :: !(Maybe (Textual Int64))-    , _trUpdateTime           :: !(Maybe DateTime')-    , _trName                 :: !(Maybe Text)-    , _trEndTime              :: !(Maybe DateTime')-    , _trDestinationDataSetId :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+data TransferRun =+  TransferRun'+    { _tRunTime              :: !(Maybe DateTime')+    , _tErrorStatus          :: !(Maybe Status)+    , _tState                :: !(Maybe TransferRunState)+    , _tSchedule             :: !(Maybe Text)+    , _tStartTime            :: !(Maybe DateTime')+    , _tScheduleTime         :: !(Maybe DateTime')+    , _tDataSourceId         :: !(Maybe Text)+    , _tParams               :: !(Maybe TransferRunParams)+    , _tUserId               :: !(Maybe (Textual Int64))+    , _tUpdateTime           :: !(Maybe DateTime')+    , _tName                 :: !(Maybe Text)+    , _tEndTime              :: !(Maybe DateTime')+    , _tDestinationDataSetId :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TransferRun' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'trRunTime'+-- * 'tRunTime' ----- * 'trErrorStatus'+-- * 'tErrorStatus' ----- * 'trState'+-- * 'tState' ----- * 'trSchedule'+-- * 'tSchedule' ----- * 'trStartTime'+-- * 'tStartTime' ----- * 'trScheduleTime'+-- * 'tScheduleTime' ----- * 'trDataSourceId'+-- * 'tDataSourceId' ----- * 'trParams'+-- * 'tParams' ----- * 'trUserId'+-- * 'tUserId' ----- * 'trUpdateTime'+-- * 'tUpdateTime' ----- * 'trName'+-- * 'tName' ----- * 'trEndTime'+-- * 'tEndTime' ----- * 'trDestinationDataSetId'+-- * 'tDestinationDataSetId' transferRun     :: TransferRun transferRun =-    TransferRun'-    { _trRunTime = Nothing-    , _trErrorStatus = Nothing-    , _trState = Nothing-    , _trSchedule = Nothing-    , _trStartTime = Nothing-    , _trScheduleTime = Nothing-    , _trDataSourceId = Nothing-    , _trParams = Nothing-    , _trUserId = Nothing-    , _trUpdateTime = Nothing-    , _trName = Nothing-    , _trEndTime = Nothing-    , _trDestinationDataSetId = Nothing+  TransferRun'+    { _tRunTime = Nothing+    , _tErrorStatus = Nothing+    , _tState = Nothing+    , _tSchedule = Nothing+    , _tStartTime = Nothing+    , _tScheduleTime = Nothing+    , _tDataSourceId = Nothing+    , _tParams = Nothing+    , _tUserId = Nothing+    , _tUpdateTime = Nothing+    , _tName = Nothing+    , _tEndTime = Nothing+    , _tDestinationDataSetId = Nothing     } + -- | For batch transfer runs, specifies the date and time that data should be -- ingested.-trRunTime :: Lens' TransferRun (Maybe UTCTime)-trRunTime-  = lens _trRunTime (\ s a -> s{_trRunTime = a}) .+tRunTime :: Lens' TransferRun (Maybe UTCTime)+tRunTime+  = lens _tRunTime (\ s a -> s{_tRunTime = a}) .       mapping _DateTime  -- | Status of the transfer run.-trErrorStatus :: Lens' TransferRun (Maybe Status)-trErrorStatus-  = lens _trErrorStatus-      (\ s a -> s{_trErrorStatus = a})+tErrorStatus :: Lens' TransferRun (Maybe Status)+tErrorStatus+  = lens _tErrorStatus (\ s a -> s{_tErrorStatus = a})  -- | Data transfer run state. Ignored for input requests.-trState :: Lens' TransferRun (Maybe TransferRunState)-trState = lens _trState (\ s a -> s{_trState = a})+tState :: Lens' TransferRun (Maybe TransferRunState)+tState = lens _tState (\ s a -> s{_tState = a})  -- | Output only. Describes the schedule of this transfer run if it was -- created as part of a regular schedule. For batch transfer runs that are -- scheduled manually, this is empty. NOTE: the system might choose to -- delay the schedule depending on the current load, so \`schedule_time\` -- doesn\'t always match this.-trSchedule :: Lens' TransferRun (Maybe Text)-trSchedule-  = lens _trSchedule (\ s a -> s{_trSchedule = a})+tSchedule :: Lens' TransferRun (Maybe Text)+tSchedule+  = lens _tSchedule (\ s a -> s{_tSchedule = a})  -- | Output only. Time when transfer run was started. Parameter ignored by -- server for input requests.-trStartTime :: Lens' TransferRun (Maybe UTCTime)-trStartTime-  = lens _trStartTime (\ s a -> s{_trStartTime = a}) .+tStartTime :: Lens' TransferRun (Maybe UTCTime)+tStartTime+  = lens _tStartTime (\ s a -> s{_tStartTime = a}) .       mapping _DateTime  -- | Minimum time after which a transfer run can be started.-trScheduleTime :: Lens' TransferRun (Maybe UTCTime)-trScheduleTime-  = lens _trScheduleTime-      (\ s a -> s{_trScheduleTime = a})+tScheduleTime :: Lens' TransferRun (Maybe UTCTime)+tScheduleTime+  = lens _tScheduleTime+      (\ s a -> s{_tScheduleTime = a})       . mapping _DateTime  -- | Output only. Data source id.-trDataSourceId :: Lens' TransferRun (Maybe Text)-trDataSourceId-  = lens _trDataSourceId-      (\ s a -> s{_trDataSourceId = a})+tDataSourceId :: Lens' TransferRun (Maybe Text)+tDataSourceId+  = lens _tDataSourceId+      (\ s a -> s{_tDataSourceId = a})  -- | Output only. Data transfer specific parameters.-trParams :: Lens' TransferRun (Maybe TransferRunParams)-trParams = lens _trParams (\ s a -> s{_trParams = a})+tParams :: Lens' TransferRun (Maybe TransferRunParams)+tParams = lens _tParams (\ s a -> s{_tParams = a})  -- | Deprecated. Unique ID of the user on whose behalf transfer is done.-trUserId :: Lens' TransferRun (Maybe Int64)-trUserId-  = lens _trUserId (\ s a -> s{_trUserId = a}) .+tUserId :: Lens' TransferRun (Maybe Int64)+tUserId+  = lens _tUserId (\ s a -> s{_tUserId = a}) .       mapping _Coerce  -- | Output only. Last time the data transfer run state was updated.-trUpdateTime :: Lens' TransferRun (Maybe UTCTime)-trUpdateTime-  = lens _trUpdateTime (\ s a -> s{_trUpdateTime = a})-      . mapping _DateTime+tUpdateTime :: Lens' TransferRun (Maybe UTCTime)+tUpdateTime+  = lens _tUpdateTime (\ s a -> s{_tUpdateTime = a}) .+      mapping _DateTime  -- | The resource name of the transfer run. Transfer run names have the form -- \`projects\/{project_id}\/locations\/{location}\/transferConfigs\/{config_id}\/runs\/{run_id}\`. -- The name is ignored when creating a transfer run.-trName :: Lens' TransferRun (Maybe Text)-trName = lens _trName (\ s a -> s{_trName = a})+tName :: Lens' TransferRun (Maybe Text)+tName = lens _tName (\ s a -> s{_tName = a})  -- | Output only. Time when transfer run ended. Parameter ignored by server -- for input requests.-trEndTime :: Lens' TransferRun (Maybe UTCTime)-trEndTime-  = lens _trEndTime (\ s a -> s{_trEndTime = a}) .+tEndTime :: Lens' TransferRun (Maybe UTCTime)+tEndTime+  = lens _tEndTime (\ s a -> s{_tEndTime = a}) .       mapping _DateTime  -- | Output only. The BigQuery target dataset id.-trDestinationDataSetId :: Lens' TransferRun (Maybe Text)-trDestinationDataSetId-  = lens _trDestinationDataSetId-      (\ s a -> s{_trDestinationDataSetId = a})+tDestinationDataSetId :: Lens' TransferRun (Maybe Text)+tDestinationDataSetId+  = lens _tDestinationDataSetId+      (\ s a -> s{_tDestinationDataSetId = a})  instance FromJSON TransferRun where         parseJSON@@ -338,20 +397,19 @@         toJSON TransferRun'{..}           = object               (catMaybes-                 [("runTime" .=) <$> _trRunTime,-                  ("errorStatus" .=) <$> _trErrorStatus,-                  ("state" .=) <$> _trState,-                  ("schedule" .=) <$> _trSchedule,-                  ("startTime" .=) <$> _trStartTime,-                  ("scheduleTime" .=) <$> _trScheduleTime,-                  ("dataSourceId" .=) <$> _trDataSourceId,-                  ("params" .=) <$> _trParams,-                  ("userId" .=) <$> _trUserId,-                  ("updateTime" .=) <$> _trUpdateTime,-                  ("name" .=) <$> _trName,-                  ("endTime" .=) <$> _trEndTime,+                 [("runTime" .=) <$> _tRunTime,+                  ("errorStatus" .=) <$> _tErrorStatus,+                  ("state" .=) <$> _tState,+                  ("schedule" .=) <$> _tSchedule,+                  ("startTime" .=) <$> _tStartTime,+                  ("scheduleTime" .=) <$> _tScheduleTime,+                  ("dataSourceId" .=) <$> _tDataSourceId,+                  ("params" .=) <$> _tParams,+                  ("userId" .=) <$> _tUserId,+                  ("updateTime" .=) <$> _tUpdateTime,+                  ("name" .=) <$> _tName, ("endTime" .=) <$> _tEndTime,                   ("destinationDatasetId" .=) <$>-                    _trDestinationDataSetId])+                    _tDestinationDataSetId])  -- | A request to determine whether the user has valid credentials. This -- method is used to limit the number of OAuth popups in the user@@ -362,15 +420,17 @@ -- -- /See:/ 'checkValidCredsRequest' smart constructor. data CheckValidCredsRequest =-    CheckValidCredsRequest'-    deriving (Eq,Show,Data,Typeable,Generic)+  CheckValidCredsRequest'+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CheckValidCredsRequest' with the minimum fields required to make a request. -- checkValidCredsRequest     :: CheckValidCredsRequest checkValidCredsRequest = CheckValidCredsRequest' + instance FromJSON CheckValidCredsRequest where         parseJSON           = withObject "CheckValidCredsRequest"@@ -382,10 +442,13 @@ -- | Data transfer specific parameters. -- -- /See:/ 'transferConfigParams' smart constructor.-newtype TransferConfigParams = TransferConfigParams'+newtype TransferConfigParams =+  TransferConfigParams'     { _tcpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TransferConfigParams' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -395,10 +458,9 @@     :: HashMap Text JSONValue -- ^ 'tcpAddtional'     -> TransferConfigParams transferConfigParams pTcpAddtional_ =-    TransferConfigParams'-    { _tcpAddtional = _Coerce # pTcpAddtional_-    }+  TransferConfigParams' {_tcpAddtional = _Coerce # pTcpAddtional_} + -- | Properties of the object. tcpAddtional :: Lens' TransferConfigParams (HashMap Text JSONValue) tcpAddtional@@ -417,11 +479,14 @@ -- | A request to schedule transfer runs for a time range. -- -- /See:/ 'scheduleTransferRunsRequest' smart constructor.-data ScheduleTransferRunsRequest = ScheduleTransferRunsRequest'+data ScheduleTransferRunsRequest =+  ScheduleTransferRunsRequest'     { _strrStartTime :: !(Maybe DateTime')     , _strrEndTime   :: !(Maybe DateTime')-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ScheduleTransferRunsRequest' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -432,11 +497,10 @@ scheduleTransferRunsRequest     :: ScheduleTransferRunsRequest scheduleTransferRunsRequest =-    ScheduleTransferRunsRequest'-    { _strrStartTime = Nothing-    , _strrEndTime = Nothing-    }+  ScheduleTransferRunsRequest'+    {_strrStartTime = Nothing, _strrEndTime = Nothing} + -- | Start time of the range of transfer runs. For example, -- \`\"2017-05-25T00:00:00+00:00\"\`. strrStartTime :: Lens' ScheduleTransferRunsRequest (Maybe UTCTime)@@ -469,14 +533,17 @@ -- | A resource that represents Google Cloud Platform location. -- -- /See:/ 'location' smart constructor.-data Location = Location'+data Location =+  Location'     { _lName        :: !(Maybe Text)     , _lMetadata    :: !(Maybe LocationMetadata)     , _lDisplayName :: !(Maybe Text)     , _lLabels      :: !(Maybe LocationLabels)     , _lLocationId  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Location' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -493,7 +560,7 @@ location     :: Location location =-    Location'+  Location'     { _lName = Nothing     , _lMetadata = Nothing     , _lDisplayName = Nothing@@ -501,6 +568,7 @@     , _lLocationId = Nothing     } + -- | Resource name for the location, which may vary between implementations. -- For example: \`\"projects\/example-project\/locations\/us-east1\"\` lName :: Lens' Location (Maybe Text)@@ -556,29 +624,111 @@ -- -- /See:/ 'empty' smart constructor. data Empty =-    Empty'-    deriving (Eq,Show,Data,Typeable,Generic)+  Empty'+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Empty' with the minimum fields required to make a request. -- empty     :: Empty empty = Empty' + instance FromJSON Empty where         parseJSON = withObject "Empty" (\ o -> pure Empty')  instance ToJSON Empty where         toJSON = const emptyObject +-- | Options customizing the data transfer schedule.+--+-- /See:/ 'scheduleOptions' smart constructor.+data ScheduleOptions =+  ScheduleOptions'+    { _soStartTime             :: !(Maybe DateTime')+    , _soDisableAutoScheduling :: !(Maybe Bool)+    , _soEndTime               :: !(Maybe DateTime')+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ScheduleOptions' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'soStartTime'+--+-- * 'soDisableAutoScheduling'+--+-- * 'soEndTime'+scheduleOptions+    :: ScheduleOptions+scheduleOptions =+  ScheduleOptions'+    { _soStartTime = Nothing+    , _soDisableAutoScheduling = Nothing+    , _soEndTime = Nothing+    }+++-- | Specifies time to start scheduling transfer runs. The first run will be+-- scheduled at or after the start time according to a recurrence pattern+-- defined in the schedule string. The start time can be changed at any+-- moment. The time when a data transfer can be trigerred manually is not+-- limited by this option.+soStartTime :: Lens' ScheduleOptions (Maybe UTCTime)+soStartTime+  = lens _soStartTime (\ s a -> s{_soStartTime = a}) .+      mapping _DateTime++-- | If true, automatic scheduling of data transfer runs for this+-- configuration will be disabled. The runs can be started on ad-hoc basis+-- using StartManualTransferRuns API. When automatic scheduling is+-- disabled, the TransferConfig.schedule field will be ignored.+soDisableAutoScheduling :: Lens' ScheduleOptions (Maybe Bool)+soDisableAutoScheduling+  = lens _soDisableAutoScheduling+      (\ s a -> s{_soDisableAutoScheduling = a})++-- | Defines time to stop scheduling transfer runs. A transfer run cannot be+-- scheduled at or after the end time. The end time can be changed at any+-- moment. The time when a data transfer can be trigerred manually is not+-- limited by this option.+soEndTime :: Lens' ScheduleOptions (Maybe UTCTime)+soEndTime+  = lens _soEndTime (\ s a -> s{_soEndTime = a}) .+      mapping _DateTime++instance FromJSON ScheduleOptions where+        parseJSON+          = withObject "ScheduleOptions"+              (\ o ->+                 ScheduleOptions' <$>+                   (o .:? "startTime") <*>+                     (o .:? "disableAutoScheduling")+                     <*> (o .:? "endTime"))++instance ToJSON ScheduleOptions where+        toJSON ScheduleOptions'{..}+          = object+              (catMaybes+                 [("startTime" .=) <$> _soStartTime,+                  ("disableAutoScheduling" .=) <$>+                    _soDisableAutoScheduling,+                  ("endTime" .=) <$> _soEndTime])+ -- | The returned list transfer run messages. -- -- /See:/ 'listTransferLogsResponse' smart constructor.-data ListTransferLogsResponse = ListTransferLogsResponse'+data ListTransferLogsResponse =+  ListTransferLogsResponse'     { _ltlrNextPageToken    :: !(Maybe Text)     , _ltlrTransferMessages :: !(Maybe [TransferMessage])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListTransferLogsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -589,11 +739,10 @@ listTransferLogsResponse     :: ListTransferLogsResponse listTransferLogsResponse =-    ListTransferLogsResponse'-    { _ltlrNextPageToken = Nothing-    , _ltlrTransferMessages = Nothing-    }+  ListTransferLogsResponse'+    {_ltlrNextPageToken = Nothing, _ltlrTransferMessages = Nothing} + -- | Output only. The next-pagination token. For multiple-page list results, -- this token can be used as the \`GetTransferRunLogRequest.page_token\` to -- request the next page of list results.@@ -628,10 +777,13 @@ -- | A response indicating whether the credentials exist and are valid. -- -- /See:/ 'checkValidCredsResponse' smart constructor.-newtype CheckValidCredsResponse = CheckValidCredsResponse'+newtype CheckValidCredsResponse =+  CheckValidCredsResponse'     { _cvcrHasValidCreds :: Maybe Bool-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CheckValidCredsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -640,10 +792,9 @@ checkValidCredsResponse     :: CheckValidCredsResponse checkValidCredsResponse =-    CheckValidCredsResponse'-    { _cvcrHasValidCreds = Nothing-    }+  CheckValidCredsResponse' {_cvcrHasValidCreds = Nothing} + -- | If set to \`true\`, the credentials exist and are valid. cvcrHasValidCreds :: Lens' CheckValidCredsResponse (Maybe Bool) cvcrHasValidCreds@@ -664,10 +815,13 @@  -- -- /See:/ 'statusDetailsItem' smart constructor.-newtype StatusDetailsItem = StatusDetailsItem'+newtype StatusDetailsItem =+  StatusDetailsItem'     { _sdiAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -677,10 +831,9 @@     :: HashMap Text JSONValue -- ^ 'sdiAddtional'     -> StatusDetailsItem statusDetailsItem pSdiAddtional_ =-    StatusDetailsItem'-    { _sdiAddtional = _Coerce # pSdiAddtional_-    }+  StatusDetailsItem' {_sdiAddtional = _Coerce # pSdiAddtional_} + -- | Properties of the object. Contains field \'type with type URL. sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue) sdiAddtional@@ -698,10 +851,13 @@ -- | Output only. Data transfer specific parameters. -- -- /See:/ 'transferRunParams' smart constructor.-newtype TransferRunParams = TransferRunParams'+newtype TransferRunParams =+  TransferRunParams'     { _trpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TransferRunParams' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -711,10 +867,9 @@     :: HashMap Text JSONValue -- ^ 'trpAddtional'     -> TransferRunParams transferRunParams pTrpAddtional_ =-    TransferRunParams'-    { _trpAddtional = _Coerce # pTrpAddtional_-    }+  TransferRunParams' {_trpAddtional = _Coerce # pTrpAddtional_} + -- | Properties of the object. trpAddtional :: Lens' TransferRunParams (HashMap Text JSONValue) trpAddtional@@ -736,7 +891,8 @@ -- generate either generic ui, or custom data source specific forms. -- -- /See:/ 'dataSourceParameter' smart constructor.-data DataSourceParameter = DataSourceParameter'+data DataSourceParameter =+  DataSourceParameter'     { _dspMaxValue              :: !(Maybe (Textual Double))     , _dspParamId               :: !(Maybe Text)     , _dspImmutable             :: !(Maybe Bool)@@ -752,8 +908,10 @@     , _dspMinValue              :: !(Maybe (Textual Double))     , _dspValidationHelpURL     :: !(Maybe Text)     , _dspFields                :: !(Maybe [DataSourceParameter])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DataSourceParameter' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -790,7 +948,7 @@ dataSourceParameter     :: DataSourceParameter dataSourceParameter =-    DataSourceParameter'+  DataSourceParameter'     { _dspMaxValue = Nothing     , _dspParamId = Nothing     , _dspImmutable = Nothing@@ -808,6 +966,7 @@     , _dspFields = Nothing     } + -- | For integer and double values specifies maxminum allowed value. dspMaxValue :: Lens' DataSourceParameter (Maybe Double) dspMaxValue@@ -939,10 +1098,13 @@ -- | A response to schedule transfer runs for a time range. -- -- /See:/ 'scheduleTransferRunsResponse' smart constructor.-newtype ScheduleTransferRunsResponse = ScheduleTransferRunsResponse'+newtype ScheduleTransferRunsResponse =+  ScheduleTransferRunsResponse'     { _strrRuns :: Maybe [TransferRun]-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ScheduleTransferRunsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -951,10 +1113,9 @@ scheduleTransferRunsResponse     :: ScheduleTransferRunsResponse scheduleTransferRunsResponse =-    ScheduleTransferRunsResponse'-    { _strrRuns = Nothing-    }+  ScheduleTransferRunsResponse' {_strrRuns = Nothing} + -- | The transfer runs that were scheduled. strrRuns :: Lens' ScheduleTransferRunsResponse [TransferRun] strrRuns@@ -976,11 +1137,14 @@ -- | Returns list of supported data sources and their metadata. -- -- /See:/ 'listDataSourcesResponse' smart constructor.-data ListDataSourcesResponse = ListDataSourcesResponse'+data ListDataSourcesResponse =+  ListDataSourcesResponse'     { _ldsrNextPageToken :: !(Maybe Text)     , _ldsrDataSources   :: !(Maybe [DataSource])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListDataSourcesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -991,11 +1155,10 @@ listDataSourcesResponse     :: ListDataSourcesResponse listDataSourcesResponse =-    ListDataSourcesResponse'-    { _ldsrNextPageToken = Nothing-    , _ldsrDataSources = Nothing-    }+  ListDataSourcesResponse'+    {_ldsrNextPageToken = Nothing, _ldsrDataSources = Nothing} + -- | Output only. The next-pagination token. For multiple-page list results, -- this token can be used as the \`ListDataSourcesRequest.page_token\` to -- request the next page of list results.@@ -1027,11 +1190,68 @@                  [("nextPageToken" .=) <$> _ldsrNextPageToken,                   ("dataSources" .=) <$> _ldsrDataSources]) +-- | A request to start manual transfer runs.+--+-- /See:/ 'startManualTransferRunsRequest' smart constructor.+data StartManualTransferRunsRequest =+  StartManualTransferRunsRequest'+    { _smtrrRequestedRunTime   :: !(Maybe DateTime')+    , _smtrrRequestedTimeRange :: !(Maybe TimeRange)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'StartManualTransferRunsRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'smtrrRequestedRunTime'+--+-- * 'smtrrRequestedTimeRange'+startManualTransferRunsRequest+    :: StartManualTransferRunsRequest+startManualTransferRunsRequest =+  StartManualTransferRunsRequest'+    {_smtrrRequestedRunTime = Nothing, _smtrrRequestedTimeRange = Nothing}+++-- | Specific run_time for a transfer run to be started. The+-- requested_run_time must not be in the future.+smtrrRequestedRunTime :: Lens' StartManualTransferRunsRequest (Maybe UTCTime)+smtrrRequestedRunTime+  = lens _smtrrRequestedRunTime+      (\ s a -> s{_smtrrRequestedRunTime = a})+      . mapping _DateTime++-- | Time range for the transfer runs that should be started.+smtrrRequestedTimeRange :: Lens' StartManualTransferRunsRequest (Maybe TimeRange)+smtrrRequestedTimeRange+  = lens _smtrrRequestedTimeRange+      (\ s a -> s{_smtrrRequestedTimeRange = a})++instance FromJSON StartManualTransferRunsRequest+         where+        parseJSON+          = withObject "StartManualTransferRunsRequest"+              (\ o ->+                 StartManualTransferRunsRequest' <$>+                   (o .:? "requestedRunTime") <*>+                     (o .:? "requestedTimeRange"))++instance ToJSON StartManualTransferRunsRequest where+        toJSON StartManualTransferRunsRequest'{..}+          = object+              (catMaybes+                 [("requestedRunTime" .=) <$> _smtrrRequestedRunTime,+                  ("requestedTimeRange" .=) <$>+                    _smtrrRequestedTimeRange])+ -- | Represents data source metadata. Metadata is sufficient to render UI and -- request proper OAuth tokens. -- -- /See:/ 'dataSource' smart constructor.-data DataSource = DataSource'+data DataSource =+  DataSource'     { _dsClientId                     :: !(Maybe Text)     , _dsMinimumScheduleInterval      :: !(Maybe GDuration)     , _dsSupportsCustomSchedule       :: !(Maybe Bool)@@ -1050,8 +1270,10 @@     , _dsAuthorizationType            :: !(Maybe DataSourceAuthorizationType)     , _dsDefaultSchedule              :: !(Maybe Text)     , _dsDescription                  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'DataSource' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1094,7 +1316,7 @@ dataSource     :: DataSource dataSource =-    DataSource'+  DataSource'     { _dsClientId = Nothing     , _dsMinimumScheduleInterval = Nothing     , _dsSupportsCustomSchedule = Nothing@@ -1115,6 +1337,7 @@     , _dsDescription = Nothing     } + -- | Data source client id which should be used to receive refresh token. dsClientId :: Lens' DataSource (Maybe Text) dsClientId@@ -1290,11 +1513,14 @@ -- | The returned list of pipelines in the project. -- -- /See:/ 'listTransferRunsResponse' smart constructor.-data ListTransferRunsResponse = ListTransferRunsResponse'+data ListTransferRunsResponse =+  ListTransferRunsResponse'     { _ltrrNextPageToken :: !(Maybe Text)     , _ltrrTransferRuns  :: !(Maybe [TransferRun])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListTransferRunsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1305,11 +1531,10 @@ listTransferRunsResponse     :: ListTransferRunsResponse listTransferRunsResponse =-    ListTransferRunsResponse'-    { _ltrrNextPageToken = Nothing-    , _ltrrTransferRuns = Nothing-    }+  ListTransferRunsResponse'+    {_ltrrNextPageToken = Nothing, _ltrrTransferRuns = Nothing} + -- | Output only. The next-pagination token. For multiple-page list results, -- this token can be used as the \`ListTransferRunsRequest.page_token\` to -- request the next page of list results.@@ -1344,12 +1569,15 @@ -- | Represents a user facing message for a particular data transfer run. -- -- /See:/ 'transferMessage' smart constructor.-data TransferMessage = TransferMessage'+data TransferMessage =+  TransferMessage'     { _tmSeverity    :: !(Maybe TransferMessageSeverity)     , _tmMessageTime :: !(Maybe DateTime')     , _tmMessageText :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TransferMessage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1362,12 +1590,10 @@ transferMessage     :: TransferMessage transferMessage =-    TransferMessage'-    { _tmSeverity = Nothing-    , _tmMessageTime = Nothing-    , _tmMessageText = Nothing-    }+  TransferMessage'+    {_tmSeverity = Nothing, _tmMessageTime = Nothing, _tmMessageText = Nothing} + -- | Message severity. tmSeverity :: Lens' TransferMessage (Maybe TransferMessageSeverity) tmSeverity@@ -1406,10 +1632,13 @@ -- {\"cloud.googleapis.com\/region\": \"us-east1\"} -- -- /See:/ 'locationLabels' smart constructor.-newtype LocationLabels = LocationLabels'+newtype LocationLabels =+  LocationLabels'     { _llAddtional :: HashMap Text Text-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LocationLabels' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1419,10 +1648,9 @@     :: HashMap Text Text -- ^ 'llAddtional'     -> LocationLabels locationLabels pLlAddtional_ =-    LocationLabels'-    { _llAddtional = _Coerce # pLlAddtional_-    }+  LocationLabels' {_llAddtional = _Coerce # pLlAddtional_} + llAddtional :: Lens' LocationLabels (HashMap Text Text) llAddtional   = lens _llAddtional (\ s a -> s{_llAddtional = a}) .@@ -1436,14 +1664,57 @@ instance ToJSON LocationLabels where         toJSON = toJSON . _llAddtional +-- | A response to start manual transfer runs.+--+-- /See:/ 'startManualTransferRunsResponse' smart constructor.+newtype StartManualTransferRunsResponse =+  StartManualTransferRunsResponse'+    { _smtrrRuns :: Maybe [TransferRun]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'StartManualTransferRunsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'smtrrRuns'+startManualTransferRunsResponse+    :: StartManualTransferRunsResponse+startManualTransferRunsResponse =+  StartManualTransferRunsResponse' {_smtrrRuns = Nothing}+++-- | The transfer runs that were created.+smtrrRuns :: Lens' StartManualTransferRunsResponse [TransferRun]+smtrrRuns+  = lens _smtrrRuns (\ s a -> s{_smtrrRuns = a}) .+      _Default+      . _Coerce++instance FromJSON StartManualTransferRunsResponse+         where+        parseJSON+          = withObject "StartManualTransferRunsResponse"+              (\ o ->+                 StartManualTransferRunsResponse' <$>+                   (o .:? "runs" .!= mempty))++instance ToJSON StartManualTransferRunsResponse where+        toJSON StartManualTransferRunsResponse'{..}+          = object (catMaybes [("runs" .=) <$> _smtrrRuns])+ -- | Service-specific metadata. For example the available capacity at the -- given location. -- -- /See:/ 'locationMetadata' smart constructor.-newtype LocationMetadata = LocationMetadata'+newtype LocationMetadata =+  LocationMetadata'     { _lmAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'LocationMetadata' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1453,10 +1724,9 @@     :: HashMap Text JSONValue -- ^ 'lmAddtional'     -> LocationMetadata locationMetadata pLmAddtional_ =-    LocationMetadata'-    { _lmAddtional = _Coerce # pLmAddtional_-    }+  LocationMetadata' {_lmAddtional = _Coerce # pLmAddtional_} + -- | Properties of the object. Contains field \'type with type URL. lmAddtional :: Lens' LocationMetadata (HashMap Text JSONValue) lmAddtional@@ -1474,11 +1744,14 @@ -- | The returned list of pipelines in the project. -- -- /See:/ 'listTransferConfigsResponse' smart constructor.-data ListTransferConfigsResponse = ListTransferConfigsResponse'+data ListTransferConfigsResponse =+  ListTransferConfigsResponse'     { _ltcrNextPageToken   :: !(Maybe Text)     , _ltcrTransferConfigs :: !(Maybe [TransferConfig])-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListTransferConfigsResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1489,11 +1762,10 @@ listTransferConfigsResponse     :: ListTransferConfigsResponse listTransferConfigsResponse =-    ListTransferConfigsResponse'-    { _ltcrNextPageToken = Nothing-    , _ltcrTransferConfigs = Nothing-    }+  ListTransferConfigsResponse'+    {_ltcrNextPageToken = Nothing, _ltcrTransferConfigs = Nothing} + -- | Output only. The next-pagination token. For multiple-page list results, -- this token can be used as the \`ListTransferConfigsRequest.page_token\` -- to request the next page of list results.@@ -1533,9 +1805,11 @@ -- appropriate data source service account. -- -- /See:/ 'transferConfig' smart constructor.-data TransferConfig = TransferConfig'+data TransferConfig =+  TransferConfig'     { _tcState                 :: !(Maybe TransferConfigState)     , _tcSchedule              :: !(Maybe Text)+    , _tcScheduleOptions       :: !(Maybe ScheduleOptions)     , _tcDisabled              :: !(Maybe Bool)     , _tcDataSourceId          :: !(Maybe Text)     , _tcParams                :: !(Maybe TransferConfigParams)@@ -1547,8 +1821,10 @@     , _tcNextRunTime           :: !(Maybe DateTime')     , _tcDestinationDataSetId  :: !(Maybe Text)     , _tcDataRefreshWindowDays :: !(Maybe (Textual Int32))-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'TransferConfig' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -1557,6 +1833,8 @@ -- -- * 'tcSchedule' --+-- * 'tcScheduleOptions'+-- -- * 'tcDisabled' -- -- * 'tcDataSourceId'@@ -1581,9 +1859,10 @@ transferConfig     :: TransferConfig transferConfig =-    TransferConfig'+  TransferConfig'     { _tcState = Nothing     , _tcSchedule = Nothing+    , _tcScheduleOptions = Nothing     , _tcDisabled = Nothing     , _tcDataSourceId = Nothing     , _tcParams = Nothing@@ -1597,6 +1876,7 @@     , _tcDataRefreshWindowDays = Nothing     } + -- | Output only. State of the most recently updated transfer run. tcState :: Lens' TransferConfig (Maybe TransferConfigState) tcState = lens _tcState (\ s a -> s{_tcState = a})@@ -1613,6 +1893,12 @@ tcSchedule   = lens _tcSchedule (\ s a -> s{_tcSchedule = a}) +-- | Options customizing the data transfer schedule.+tcScheduleOptions :: Lens' TransferConfig (Maybe ScheduleOptions)+tcScheduleOptions+  = lens _tcScheduleOptions+      (\ s a -> s{_tcScheduleOptions = a})+ -- | Is this config disabled. When set to true, no runs are scheduled for a -- given transfer. tcDisabled :: Lens' TransferConfig (Maybe Bool)@@ -1694,7 +1980,8 @@               (\ o ->                  TransferConfig' <$>                    (o .:? "state") <*> (o .:? "schedule") <*>-                     (o .:? "disabled")+                     (o .:? "scheduleOptions")+                     <*> (o .:? "disabled")                      <*> (o .:? "dataSourceId")                      <*> (o .:? "params")                      <*> (o .:? "userId")@@ -1712,6 +1999,7 @@               (catMaybes                  [("state" .=) <$> _tcState,                   ("schedule" .=) <$> _tcSchedule,+                  ("scheduleOptions" .=) <$> _tcScheduleOptions,                   ("disabled" .=) <$> _tcDisabled,                   ("dataSourceId" .=) <$> _tcDataSourceId,                   ("params" .=) <$> _tcParams,
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/DataSources/CheckValidCreds.hs view
@@ -70,7 +70,8 @@ -- pre-requisite before user can create a transfer config. -- -- /See:/ 'projectsDataSourcesCheckValidCreds' smart constructor.-data ProjectsDataSourcesCheckValidCreds = ProjectsDataSourcesCheckValidCreds'+data ProjectsDataSourcesCheckValidCreds =+  ProjectsDataSourcesCheckValidCreds'     { _pdscvcXgafv          :: !(Maybe Xgafv)     , _pdscvcUploadProtocol :: !(Maybe Text)     , _pdscvcAccessToken    :: !(Maybe Text)@@ -78,8 +79,10 @@     , _pdscvcPayload        :: !CheckValidCredsRequest     , _pdscvcName           :: !Text     , _pdscvcCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsDataSourcesCheckValidCreds' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -102,7 +105,7 @@     -> Text -- ^ 'pdscvcName'     -> ProjectsDataSourcesCheckValidCreds projectsDataSourcesCheckValidCreds pPdscvcPayload_ pPdscvcName_ =-    ProjectsDataSourcesCheckValidCreds'+  ProjectsDataSourcesCheckValidCreds'     { _pdscvcXgafv = Nothing     , _pdscvcUploadProtocol = Nothing     , _pdscvcAccessToken = Nothing@@ -112,6 +115,7 @@     , _pdscvcCallback = Nothing     } + -- | V1 error format. pdscvcXgafv :: Lens' ProjectsDataSourcesCheckValidCreds (Maybe Xgafv) pdscvcXgafv@@ -154,7 +158,8 @@       (\ s a -> s{_pdscvcCallback = a})  instance GoogleRequest-         ProjectsDataSourcesCheckValidCreds where+           ProjectsDataSourcesCheckValidCreds+         where         type Rs ProjectsDataSourcesCheckValidCreds =              CheckValidCredsResponse         type Scopes ProjectsDataSourcesCheckValidCreds =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/DataSources/Get.hs view
@@ -61,15 +61,18 @@ -- used for UI rendering. -- -- /See:/ 'projectsDataSourcesGet' smart constructor.-data ProjectsDataSourcesGet = ProjectsDataSourcesGet'+data ProjectsDataSourcesGet =+  ProjectsDataSourcesGet'     { _pdsgXgafv          :: !(Maybe Xgafv)     , _pdsgUploadProtocol :: !(Maybe Text)     , _pdsgAccessToken    :: !(Maybe Text)     , _pdsgUploadType     :: !(Maybe Text)     , _pdsgName           :: !Text     , _pdsgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsDataSourcesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -89,7 +92,7 @@     :: Text -- ^ 'pdsgName'     -> ProjectsDataSourcesGet projectsDataSourcesGet pPdsgName_ =-    ProjectsDataSourcesGet'+  ProjectsDataSourcesGet'     { _pdsgXgafv = Nothing     , _pdsgUploadProtocol = Nothing     , _pdsgAccessToken = Nothing@@ -97,6 +100,7 @@     , _pdsgName = pPdsgName_     , _pdsgCallback = Nothing     }+  -- | V1 error format. pdsgXgafv :: Lens' ProjectsDataSourcesGet (Maybe Xgafv)
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/DataSources/List.hs view
@@ -67,7 +67,8 @@ -- used for UI rendering. -- -- /See:/ 'projectsDataSourcesList' smart constructor.-data ProjectsDataSourcesList = ProjectsDataSourcesList'+data ProjectsDataSourcesList =+  ProjectsDataSourcesList'     { _pdslParent         :: !Text     , _pdslXgafv          :: !(Maybe Xgafv)     , _pdslUploadProtocol :: !(Maybe Text)@@ -76,8 +77,10 @@     , _pdslPageToken      :: !(Maybe Text)     , _pdslPageSize       :: !(Maybe (Textual Int32))     , _pdslCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsDataSourcesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -101,7 +104,7 @@     :: Text -- ^ 'pdslParent'     -> ProjectsDataSourcesList projectsDataSourcesList pPdslParent_ =-    ProjectsDataSourcesList'+  ProjectsDataSourcesList'     { _pdslParent = pPdslParent_     , _pdslXgafv = Nothing     , _pdslUploadProtocol = Nothing@@ -111,6 +114,7 @@     , _pdslPageSize = Nothing     , _pdslCallback = Nothing     }+  -- | The BigQuery project id for which data sources should be returned. Must -- be in the form: \`projects\/{project_id}\`
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/DataSources/CheckValidCreds.hs view
@@ -71,7 +71,8 @@ -- pre-requisite before user can create a transfer config. -- -- /See:/ 'projectsLocationsDataSourcesCheckValidCreds' smart constructor.-data ProjectsLocationsDataSourcesCheckValidCreds = ProjectsLocationsDataSourcesCheckValidCreds'+data ProjectsLocationsDataSourcesCheckValidCreds =+  ProjectsLocationsDataSourcesCheckValidCreds'     { _pldscvcXgafv          :: !(Maybe Xgafv)     , _pldscvcUploadProtocol :: !(Maybe Text)     , _pldscvcAccessToken    :: !(Maybe Text)@@ -79,8 +80,10 @@     , _pldscvcPayload        :: !CheckValidCredsRequest     , _pldscvcName           :: !Text     , _pldscvcCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsDataSourcesCheckValidCreds' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -103,7 +106,7 @@     -> Text -- ^ 'pldscvcName'     -> ProjectsLocationsDataSourcesCheckValidCreds projectsLocationsDataSourcesCheckValidCreds pPldscvcPayload_ pPldscvcName_ =-    ProjectsLocationsDataSourcesCheckValidCreds'+  ProjectsLocationsDataSourcesCheckValidCreds'     { _pldscvcXgafv = Nothing     , _pldscvcUploadProtocol = Nothing     , _pldscvcAccessToken = Nothing@@ -113,6 +116,7 @@     , _pldscvcCallback = Nothing     } + -- | V1 error format. pldscvcXgafv :: Lens' ProjectsLocationsDataSourcesCheckValidCreds (Maybe Xgafv) pldscvcXgafv@@ -155,7 +159,8 @@       (\ s a -> s{_pldscvcCallback = a})  instance GoogleRequest-         ProjectsLocationsDataSourcesCheckValidCreds where+           ProjectsLocationsDataSourcesCheckValidCreds+         where         type Rs ProjectsLocationsDataSourcesCheckValidCreds =              CheckValidCredsResponse         type Scopes
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/DataSources/Get.hs view
@@ -61,15 +61,18 @@ -- used for UI rendering. -- -- /See:/ 'projectsLocationsDataSourcesGet' smart constructor.-data ProjectsLocationsDataSourcesGet = ProjectsLocationsDataSourcesGet'+data ProjectsLocationsDataSourcesGet =+  ProjectsLocationsDataSourcesGet'     { _pldsgXgafv          :: !(Maybe Xgafv)     , _pldsgUploadProtocol :: !(Maybe Text)     , _pldsgAccessToken    :: !(Maybe Text)     , _pldsgUploadType     :: !(Maybe Text)     , _pldsgName           :: !Text     , _pldsgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsDataSourcesGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -89,7 +92,7 @@     :: Text -- ^ 'pldsgName'     -> ProjectsLocationsDataSourcesGet projectsLocationsDataSourcesGet pPldsgName_ =-    ProjectsLocationsDataSourcesGet'+  ProjectsLocationsDataSourcesGet'     { _pldsgXgafv = Nothing     , _pldsgUploadProtocol = Nothing     , _pldsgAccessToken = Nothing@@ -98,6 +101,7 @@     , _pldsgCallback = Nothing     } + -- | V1 error format. pldsgXgafv :: Lens' ProjectsLocationsDataSourcesGet (Maybe Xgafv) pldsgXgafv@@ -134,7 +138,8 @@       (\ s a -> s{_pldsgCallback = a})  instance GoogleRequest-         ProjectsLocationsDataSourcesGet where+           ProjectsLocationsDataSourcesGet+         where         type Rs ProjectsLocationsDataSourcesGet = DataSource         type Scopes ProjectsLocationsDataSourcesGet =              '["https://www.googleapis.com/auth/bigquery",
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/DataSources/List.hs view
@@ -67,7 +67,8 @@ -- used for UI rendering. -- -- /See:/ 'projectsLocationsDataSourcesList' smart constructor.-data ProjectsLocationsDataSourcesList = ProjectsLocationsDataSourcesList'+data ProjectsLocationsDataSourcesList =+  ProjectsLocationsDataSourcesList'     { _pldslParent         :: !Text     , _pldslXgafv          :: !(Maybe Xgafv)     , _pldslUploadProtocol :: !(Maybe Text)@@ -76,8 +77,10 @@     , _pldslPageToken      :: !(Maybe Text)     , _pldslPageSize       :: !(Maybe (Textual Int32))     , _pldslCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsDataSourcesList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -101,7 +104,7 @@     :: Text -- ^ 'pldslParent'     -> ProjectsLocationsDataSourcesList projectsLocationsDataSourcesList pPldslParent_ =-    ProjectsLocationsDataSourcesList'+  ProjectsLocationsDataSourcesList'     { _pldslParent = pPldslParent_     , _pldslXgafv = Nothing     , _pldslUploadProtocol = Nothing@@ -112,6 +115,7 @@     , _pldslCallback = Nothing     } + -- | The BigQuery project id for which data sources should be returned. Must -- be in the form: \`projects\/{project_id}\` pldslParent :: Lens' ProjectsLocationsDataSourcesList Text@@ -165,7 +169,8 @@       (\ s a -> s{_pldslCallback = a})  instance GoogleRequest-         ProjectsLocationsDataSourcesList where+           ProjectsLocationsDataSourcesList+         where         type Rs ProjectsLocationsDataSourcesList =              ListDataSourcesResponse         type Scopes ProjectsLocationsDataSourcesList =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/Get.hs view
@@ -59,15 +59,18 @@ -- | Gets information about a location. -- -- /See:/ 'projectsLocationsGet' smart constructor.-data ProjectsLocationsGet = ProjectsLocationsGet'+data ProjectsLocationsGet =+  ProjectsLocationsGet'     { _plgXgafv          :: !(Maybe Xgafv)     , _plgUploadProtocol :: !(Maybe Text)     , _plgAccessToken    :: !(Maybe Text)     , _plgUploadType     :: !(Maybe Text)     , _plgName           :: !Text     , _plgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -87,7 +90,7 @@     :: Text -- ^ 'plgName'     -> ProjectsLocationsGet projectsLocationsGet pPlgName_ =-    ProjectsLocationsGet'+  ProjectsLocationsGet'     { _plgXgafv = Nothing     , _plgUploadProtocol = Nothing     , _plgAccessToken = Nothing@@ -95,6 +98,7 @@     , _plgName = pPlgName_     , _plgCallback = Nothing     }+  -- | V1 error format. plgXgafv :: Lens' ProjectsLocationsGet (Maybe Xgafv)
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/List.hs view
@@ -67,7 +67,8 @@ -- | Lists information about the supported locations for this service. -- -- /See:/ 'projectsLocationsList' smart constructor.-data ProjectsLocationsList = ProjectsLocationsList'+data ProjectsLocationsList =+  ProjectsLocationsList'     { _pllXgafv          :: !(Maybe Xgafv)     , _pllUploadProtocol :: !(Maybe Text)     , _pllAccessToken    :: !(Maybe Text)@@ -77,8 +78,10 @@     , _pllPageToken      :: !(Maybe Text)     , _pllPageSize       :: !(Maybe (Textual Int32))     , _pllCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -104,7 +107,7 @@     :: Text -- ^ 'pllName'     -> ProjectsLocationsList projectsLocationsList pPllName_ =-    ProjectsLocationsList'+  ProjectsLocationsList'     { _pllXgafv = Nothing     , _pllUploadProtocol = Nothing     , _pllAccessToken = Nothing@@ -115,6 +118,7 @@     , _pllPageSize = Nothing     , _pllCallback = Nothing     }+  -- | V1 error format. pllXgafv :: Lens' ProjectsLocationsList (Maybe Xgafv)
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Create.hs view
@@ -40,6 +40,7 @@     , pltccUploadType     , pltccAuthorizationCode     , pltccPayload+    , pltccVersionInfo     , pltccCallback     ) where @@ -57,15 +58,17 @@                QueryParam "access_token" Text :>                  QueryParam "uploadType" Text :>                    QueryParam "authorizationCode" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] TransferConfig :>-                           Post '[JSON] TransferConfig+                     QueryParam "versionInfo" Text :>+                       QueryParam "callback" Text :>+                         QueryParam "alt" AltJSON :>+                           ReqBody '[JSON] TransferConfig :>+                             Post '[JSON] TransferConfig  -- | Creates a new data transfer configuration. -- -- /See:/ 'projectsLocationsTransferConfigsCreate' smart constructor.-data ProjectsLocationsTransferConfigsCreate = ProjectsLocationsTransferConfigsCreate'+data ProjectsLocationsTransferConfigsCreate =+  ProjectsLocationsTransferConfigsCreate'     { _pltccParent            :: !Text     , _pltccXgafv             :: !(Maybe Xgafv)     , _pltccUploadProtocol    :: !(Maybe Text)@@ -73,9 +76,12 @@     , _pltccUploadType        :: !(Maybe Text)     , _pltccAuthorizationCode :: !(Maybe Text)     , _pltccPayload           :: !TransferConfig+    , _pltccVersionInfo       :: !(Maybe Text)     , _pltccCallback          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsCreate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -94,13 +100,15 @@ -- -- * 'pltccPayload' --+-- * 'pltccVersionInfo'+-- -- * 'pltccCallback' projectsLocationsTransferConfigsCreate     :: Text -- ^ 'pltccParent'     -> TransferConfig -- ^ 'pltccPayload'     -> ProjectsLocationsTransferConfigsCreate projectsLocationsTransferConfigsCreate pPltccParent_ pPltccPayload_ =-    ProjectsLocationsTransferConfigsCreate'+  ProjectsLocationsTransferConfigsCreate'     { _pltccParent = pPltccParent_     , _pltccXgafv = Nothing     , _pltccUploadProtocol = Nothing@@ -108,9 +116,11 @@     , _pltccUploadType = Nothing     , _pltccAuthorizationCode = Nothing     , _pltccPayload = pPltccPayload_+    , _pltccVersionInfo = Nothing     , _pltccCallback = Nothing     } + -- | The BigQuery project id where the transfer configuration should be -- created. Must be in the format -- projects\/{project_id}\/locations\/{location_id} If specified location@@ -167,6 +177,17 @@ pltccPayload   = lens _pltccPayload (\ s a -> s{_pltccPayload = a}) +-- | Optional version info. If users want to find a very recent access token,+-- that is, immediately after approving access, users have to set the+-- version_info claim in the token request. To obtain the version_info,+-- users must use the “none+gsession” response type. which be return a+-- version_info back in the authorization response which be be put in a JWT+-- claim in the token request.+pltccVersionInfo :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text)+pltccVersionInfo+  = lens _pltccVersionInfo+      (\ s a -> s{_pltccVersionInfo = a})+ -- | JSONP pltccCallback :: Lens' ProjectsLocationsTransferConfigsCreate (Maybe Text) pltccCallback@@ -174,7 +195,8 @@       (\ s a -> s{_pltccCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsCreate where+           ProjectsLocationsTransferConfigsCreate+         where         type Rs ProjectsLocationsTransferConfigsCreate =              TransferConfig         type Scopes ProjectsLocationsTransferConfigsCreate =@@ -185,6 +207,7 @@               _pltccAccessToken               _pltccUploadType               _pltccAuthorizationCode+              _pltccVersionInfo               _pltccCallback               (Just AltJSON)               _pltccPayload
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Delete.hs view
@@ -61,15 +61,18 @@ -- runs and logs. -- -- /See:/ 'projectsLocationsTransferConfigsDelete' smart constructor.-data ProjectsLocationsTransferConfigsDelete = ProjectsLocationsTransferConfigsDelete'+data ProjectsLocationsTransferConfigsDelete =+  ProjectsLocationsTransferConfigsDelete'     { _pltcdXgafv          :: !(Maybe Xgafv)     , _pltcdUploadProtocol :: !(Maybe Text)     , _pltcdAccessToken    :: !(Maybe Text)     , _pltcdUploadType     :: !(Maybe Text)     , _pltcdName           :: !Text     , _pltcdCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -89,7 +92,7 @@     :: Text -- ^ 'pltcdName'     -> ProjectsLocationsTransferConfigsDelete projectsLocationsTransferConfigsDelete pPltcdName_ =-    ProjectsLocationsTransferConfigsDelete'+  ProjectsLocationsTransferConfigsDelete'     { _pltcdXgafv = Nothing     , _pltcdUploadProtocol = Nothing     , _pltcdAccessToken = Nothing@@ -98,6 +101,7 @@     , _pltcdCallback = Nothing     } + -- | V1 error format. pltcdXgafv :: Lens' ProjectsLocationsTransferConfigsDelete (Maybe Xgafv) pltcdXgafv@@ -134,7 +138,8 @@       (\ s a -> s{_pltcdCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsDelete where+           ProjectsLocationsTransferConfigsDelete+         where         type Rs ProjectsLocationsTransferConfigsDelete =              Empty         type Scopes ProjectsLocationsTransferConfigsDelete =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Get.hs view
@@ -60,15 +60,18 @@ -- | Returns information about a data transfer config. -- -- /See:/ 'projectsLocationsTransferConfigsGet' smart constructor.-data ProjectsLocationsTransferConfigsGet = ProjectsLocationsTransferConfigsGet'+data ProjectsLocationsTransferConfigsGet =+  ProjectsLocationsTransferConfigsGet'     { _pltcgXgafv          :: !(Maybe Xgafv)     , _pltcgUploadProtocol :: !(Maybe Text)     , _pltcgAccessToken    :: !(Maybe Text)     , _pltcgUploadType     :: !(Maybe Text)     , _pltcgName           :: !Text     , _pltcgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -88,7 +91,7 @@     :: Text -- ^ 'pltcgName'     -> ProjectsLocationsTransferConfigsGet projectsLocationsTransferConfigsGet pPltcgName_ =-    ProjectsLocationsTransferConfigsGet'+  ProjectsLocationsTransferConfigsGet'     { _pltcgXgafv = Nothing     , _pltcgUploadProtocol = Nothing     , _pltcgAccessToken = Nothing@@ -97,6 +100,7 @@     , _pltcgCallback = Nothing     } + -- | V1 error format. pltcgXgafv :: Lens' ProjectsLocationsTransferConfigsGet (Maybe Xgafv) pltcgXgafv@@ -133,7 +137,8 @@       (\ s a -> s{_pltcgCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsGet where+           ProjectsLocationsTransferConfigsGet+         where         type Rs ProjectsLocationsTransferConfigsGet =              TransferConfig         type Scopes ProjectsLocationsTransferConfigsGet =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/List.hs view
@@ -67,7 +67,8 @@ -- | Returns information about all data transfers in the project. -- -- /See:/ 'projectsLocationsTransferConfigsList' smart constructor.-data ProjectsLocationsTransferConfigsList = ProjectsLocationsTransferConfigsList'+data ProjectsLocationsTransferConfigsList =+  ProjectsLocationsTransferConfigsList'     { _pltclParent         :: !Text     , _pltclXgafv          :: !(Maybe Xgafv)     , _pltclUploadProtocol :: !(Maybe Text)@@ -77,8 +78,10 @@     , _pltclDataSourceIds  :: !(Maybe [Text])     , _pltclPageSize       :: !(Maybe (Textual Int32))     , _pltclCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -104,7 +107,7 @@     :: Text -- ^ 'pltclParent'     -> ProjectsLocationsTransferConfigsList projectsLocationsTransferConfigsList pPltclParent_ =-    ProjectsLocationsTransferConfigsList'+  ProjectsLocationsTransferConfigsList'     { _pltclParent = pPltclParent_     , _pltclXgafv = Nothing     , _pltclUploadProtocol = Nothing@@ -116,6 +119,7 @@     , _pltclCallback = Nothing     } + -- | The BigQuery project id for which data sources should be returned: -- \`projects\/{project_id}\`. pltclParent :: Lens' ProjectsLocationsTransferConfigsList Text@@ -178,7 +182,8 @@       (\ s a -> s{_pltclCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsList where+           ProjectsLocationsTransferConfigsList+         where         type Rs ProjectsLocationsTransferConfigsList =              ListTransferConfigsResponse         type Scopes ProjectsLocationsTransferConfigsList =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Patch.hs view
@@ -41,6 +41,7 @@     , pltcpUploadType     , pltcpAuthorizationCode     , pltcpPayload+    , pltcpVersionInfo     , pltcpName     , pltcpCallback     ) where@@ -59,16 +60,18 @@                QueryParam "access_token" Text :>                  QueryParam "uploadType" Text :>                    QueryParam "authorizationCode" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] TransferConfig :>-                           Patch '[JSON] TransferConfig+                     QueryParam "versionInfo" Text :>+                       QueryParam "callback" Text :>+                         QueryParam "alt" AltJSON :>+                           ReqBody '[JSON] TransferConfig :>+                             Patch '[JSON] TransferConfig  -- | Updates a data transfer configuration. All fields must be set, even if -- they are not updated. -- -- /See:/ 'projectsLocationsTransferConfigsPatch' smart constructor.-data ProjectsLocationsTransferConfigsPatch = ProjectsLocationsTransferConfigsPatch'+data ProjectsLocationsTransferConfigsPatch =+  ProjectsLocationsTransferConfigsPatch'     { _pltcpXgafv             :: !(Maybe Xgafv)     , _pltcpUploadProtocol    :: !(Maybe Text)     , _pltcpUpdateMask        :: !(Maybe GFieldMask)@@ -76,10 +79,13 @@     , _pltcpUploadType        :: !(Maybe Text)     , _pltcpAuthorizationCode :: !(Maybe Text)     , _pltcpPayload           :: !TransferConfig+    , _pltcpVersionInfo       :: !(Maybe Text)     , _pltcpName              :: !Text     , _pltcpCallback          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsPatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -98,6 +104,8 @@ -- -- * 'pltcpPayload' --+-- * 'pltcpVersionInfo'+-- -- * 'pltcpName' -- -- * 'pltcpCallback'@@ -106,7 +114,7 @@     -> Text -- ^ 'pltcpName'     -> ProjectsLocationsTransferConfigsPatch projectsLocationsTransferConfigsPatch pPltcpPayload_ pPltcpName_ =-    ProjectsLocationsTransferConfigsPatch'+  ProjectsLocationsTransferConfigsPatch'     { _pltcpXgafv = Nothing     , _pltcpUploadProtocol = Nothing     , _pltcpUpdateMask = Nothing@@ -114,10 +122,12 @@     , _pltcpUploadType = Nothing     , _pltcpAuthorizationCode = Nothing     , _pltcpPayload = pPltcpPayload_+    , _pltcpVersionInfo = Nothing     , _pltcpName = pPltcpName_     , _pltcpCallback = Nothing     } + -- | V1 error format. pltcpXgafv :: Lens' ProjectsLocationsTransferConfigsPatch (Maybe Xgafv) pltcpXgafv@@ -171,6 +181,17 @@ pltcpPayload   = lens _pltcpPayload (\ s a -> s{_pltcpPayload = a}) +-- | Optional version info. If users want to find a very recent access token,+-- that is, immediately after approving access, users have to set the+-- version_info claim in the token request. To obtain the version_info,+-- users must use the “none+gsession” response type. which be return a+-- version_info back in the authorization response which be be put in a JWT+-- claim in the token request.+pltcpVersionInfo :: Lens' ProjectsLocationsTransferConfigsPatch (Maybe Text)+pltcpVersionInfo+  = lens _pltcpVersionInfo+      (\ s a -> s{_pltcpVersionInfo = a})+ -- | The resource name of the transfer config. Transfer config names have the -- form of -- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.@@ -189,7 +210,8 @@       (\ s a -> s{_pltcpCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsPatch where+           ProjectsLocationsTransferConfigsPatch+         where         type Rs ProjectsLocationsTransferConfigsPatch =              TransferConfig         type Scopes ProjectsLocationsTransferConfigsPatch =@@ -201,6 +223,7 @@               _pltcpAccessToken               _pltcpUploadType               _pltcpAuthorizationCode+              _pltcpVersionInfo               _pltcpCallback               (Just AltJSON)               _pltcpPayload
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Runs/Delete.hs view
@@ -60,15 +60,18 @@ -- | Deletes the specified transfer run. -- -- /See:/ 'projectsLocationsTransferConfigsRunsDelete' smart constructor.-data ProjectsLocationsTransferConfigsRunsDelete = ProjectsLocationsTransferConfigsRunsDelete'+data ProjectsLocationsTransferConfigsRunsDelete =+  ProjectsLocationsTransferConfigsRunsDelete'     { _pltcrdXgafv          :: !(Maybe Xgafv)     , _pltcrdUploadProtocol :: !(Maybe Text)     , _pltcrdAccessToken    :: !(Maybe Text)     , _pltcrdUploadType     :: !(Maybe Text)     , _pltcrdName           :: !Text     , _pltcrdCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsRunsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -88,7 +91,7 @@     :: Text -- ^ 'pltcrdName'     -> ProjectsLocationsTransferConfigsRunsDelete projectsLocationsTransferConfigsRunsDelete pPltcrdName_ =-    ProjectsLocationsTransferConfigsRunsDelete'+  ProjectsLocationsTransferConfigsRunsDelete'     { _pltcrdXgafv = Nothing     , _pltcrdUploadProtocol = Nothing     , _pltcrdAccessToken = Nothing@@ -97,6 +100,7 @@     , _pltcrdCallback = Nothing     } + -- | V1 error format. pltcrdXgafv :: Lens' ProjectsLocationsTransferConfigsRunsDelete (Maybe Xgafv) pltcrdXgafv@@ -133,7 +137,8 @@       (\ s a -> s{_pltcrdCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsRunsDelete where+           ProjectsLocationsTransferConfigsRunsDelete+         where         type Rs ProjectsLocationsTransferConfigsRunsDelete =              Empty         type Scopes
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Runs/Get.hs view
@@ -60,15 +60,18 @@ -- | Returns information about the particular transfer run. -- -- /See:/ 'projectsLocationsTransferConfigsRunsGet' smart constructor.-data ProjectsLocationsTransferConfigsRunsGet = ProjectsLocationsTransferConfigsRunsGet'+data ProjectsLocationsTransferConfigsRunsGet =+  ProjectsLocationsTransferConfigsRunsGet'     { _pltcrgXgafv          :: !(Maybe Xgafv)     , _pltcrgUploadProtocol :: !(Maybe Text)     , _pltcrgAccessToken    :: !(Maybe Text)     , _pltcrgUploadType     :: !(Maybe Text)     , _pltcrgName           :: !Text     , _pltcrgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsRunsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -88,7 +91,7 @@     :: Text -- ^ 'pltcrgName'     -> ProjectsLocationsTransferConfigsRunsGet projectsLocationsTransferConfigsRunsGet pPltcrgName_ =-    ProjectsLocationsTransferConfigsRunsGet'+  ProjectsLocationsTransferConfigsRunsGet'     { _pltcrgXgafv = Nothing     , _pltcrgUploadProtocol = Nothing     , _pltcrgAccessToken = Nothing@@ -97,6 +100,7 @@     , _pltcrgCallback = Nothing     } + -- | V1 error format. pltcrgXgafv :: Lens' ProjectsLocationsTransferConfigsRunsGet (Maybe Xgafv) pltcrgXgafv@@ -133,7 +137,8 @@       (\ s a -> s{_pltcrgCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsRunsGet where+           ProjectsLocationsTransferConfigsRunsGet+         where         type Rs ProjectsLocationsTransferConfigsRunsGet =              TransferRun         type Scopes ProjectsLocationsTransferConfigsRunsGet =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Runs/List.hs view
@@ -70,7 +70,8 @@ -- | Returns information about running and completed jobs. -- -- /See:/ 'projectsLocationsTransferConfigsRunsList' smart constructor.-data ProjectsLocationsTransferConfigsRunsList = ProjectsLocationsTransferConfigsRunsList'+data ProjectsLocationsTransferConfigsRunsList =+  ProjectsLocationsTransferConfigsRunsList'     { _pltcrlRunAttempt     :: !(Maybe Text)     , _pltcrlParent         :: !Text     , _pltcrlStates         :: !(Maybe [Text])@@ -81,8 +82,10 @@     , _pltcrlPageToken      :: !(Maybe Text)     , _pltcrlPageSize       :: !(Maybe (Textual Int32))     , _pltcrlCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsRunsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -110,7 +113,7 @@     :: Text -- ^ 'pltcrlParent'     -> ProjectsLocationsTransferConfigsRunsList projectsLocationsTransferConfigsRunsList pPltcrlParent_ =-    ProjectsLocationsTransferConfigsRunsList'+  ProjectsLocationsTransferConfigsRunsList'     { _pltcrlRunAttempt = Nothing     , _pltcrlParent = pPltcrlParent_     , _pltcrlStates = Nothing@@ -123,6 +126,7 @@     , _pltcrlCallback = Nothing     } + -- | Indicates how run attempts are to be pulled. pltcrlRunAttempt :: Lens' ProjectsLocationsTransferConfigsRunsList (Maybe Text) pltcrlRunAttempt@@ -190,7 +194,8 @@       (\ s a -> s{_pltcrlCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsRunsList where+           ProjectsLocationsTransferConfigsRunsList+         where         type Rs ProjectsLocationsTransferConfigsRunsList =              ListTransferRunsResponse         type Scopes ProjectsLocationsTransferConfigsRunsList
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/Runs/TransferLogs/List.hs view
@@ -68,7 +68,8 @@ -- | Returns user facing log messages for the data transfer run. -- -- /See:/ 'projectsLocationsTransferConfigsRunsTransferLogsList' smart constructor.-data ProjectsLocationsTransferConfigsRunsTransferLogsList = ProjectsLocationsTransferConfigsRunsTransferLogsList'+data ProjectsLocationsTransferConfigsRunsTransferLogsList =+  ProjectsLocationsTransferConfigsRunsTransferLogsList'     { _pltcrtllParent         :: !Text     , _pltcrtllXgafv          :: !(Maybe Xgafv)     , _pltcrtllUploadProtocol :: !(Maybe Text)@@ -78,8 +79,10 @@     , _pltcrtllPageToken      :: !(Maybe Text)     , _pltcrtllPageSize       :: !(Maybe (Textual Int32))     , _pltcrtllCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsRunsTransferLogsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -105,7 +108,7 @@     :: Text -- ^ 'pltcrtllParent'     -> ProjectsLocationsTransferConfigsRunsTransferLogsList projectsLocationsTransferConfigsRunsTransferLogsList pPltcrtllParent_ =-    ProjectsLocationsTransferConfigsRunsTransferLogsList'+  ProjectsLocationsTransferConfigsRunsTransferLogsList'     { _pltcrtllParent = pPltcrtllParent_     , _pltcrtllXgafv = Nothing     , _pltcrtllUploadProtocol = Nothing@@ -117,6 +120,7 @@     , _pltcrtllCallback = Nothing     } + -- | Transfer run name in the form: -- \`projects\/{project_id}\/transferConfigs\/{config_Id}\/runs\/{run_id}\`. pltcrtllParent :: Lens' ProjectsLocationsTransferConfigsRunsTransferLogsList Text@@ -181,7 +185,7 @@       (\ s a -> s{_pltcrtllCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsRunsTransferLogsList+           ProjectsLocationsTransferConfigsRunsTransferLogsList          where         type Rs                ProjectsLocationsTransferConfigsRunsTransferLogsList
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/ScheduleRuns.hs view
@@ -23,7 +23,7 @@ -- Creates transfer runs for a time range [start_time, end_time]. For each -- date - or whatever granularity the data source supports - in the range, -- one transfer run is created. Note that runs are created per UTC time in--- the time range.+-- the time range. DEPRECATED: use StartManualTransferRuns instead. -- -- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.locations.transferConfigs.scheduleRuns@. module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns@@ -66,10 +66,11 @@ -- | Creates transfer runs for a time range [start_time, end_time]. For each -- date - or whatever granularity the data source supports - in the range, -- one transfer run is created. Note that runs are created per UTC time in--- the time range.+-- the time range. DEPRECATED: use StartManualTransferRuns instead. -- -- /See:/ 'projectsLocationsTransferConfigsScheduleRuns' smart constructor.-data ProjectsLocationsTransferConfigsScheduleRuns = ProjectsLocationsTransferConfigsScheduleRuns'+data ProjectsLocationsTransferConfigsScheduleRuns =+  ProjectsLocationsTransferConfigsScheduleRuns'     { _pltcsrParent         :: !Text     , _pltcsrXgafv          :: !(Maybe Xgafv)     , _pltcsrUploadProtocol :: !(Maybe Text)@@ -77,8 +78,10 @@     , _pltcsrUploadType     :: !(Maybe Text)     , _pltcsrPayload        :: !ScheduleTransferRunsRequest     , _pltcsrCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsLocationsTransferConfigsScheduleRuns' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -101,7 +104,7 @@     -> ScheduleTransferRunsRequest -- ^ 'pltcsrPayload'     -> ProjectsLocationsTransferConfigsScheduleRuns projectsLocationsTransferConfigsScheduleRuns pPltcsrParent_ pPltcsrPayload_ =-    ProjectsLocationsTransferConfigsScheduleRuns'+  ProjectsLocationsTransferConfigsScheduleRuns'     { _pltcsrParent = pPltcsrParent_     , _pltcsrXgafv = Nothing     , _pltcsrUploadProtocol = Nothing@@ -111,6 +114,7 @@     , _pltcsrCallback = Nothing     } + -- | Transfer configuration name in the form: -- \`projects\/{project_id}\/transferConfigs\/{config_id}\`. pltcsrParent :: Lens' ProjectsLocationsTransferConfigsScheduleRuns Text@@ -153,7 +157,8 @@       (\ s a -> s{_pltcsrCallback = a})  instance GoogleRequest-         ProjectsLocationsTransferConfigsScheduleRuns where+           ProjectsLocationsTransferConfigsScheduleRuns+         where         type Rs ProjectsLocationsTransferConfigsScheduleRuns              = ScheduleTransferRunsResponse         type Scopes
+ gen/Network/Google/Resource/BigQueryDataTransfer/Projects/Locations/TransferConfigs/StartManualRuns.hs view
@@ -0,0 +1,186 @@+{-# 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.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Start manual transfer runs to be executed now with schedule_time equal+-- to current time. The transfer runs can be created for a time range where+-- the run_time is between start_time (inclusive) and end_time (exclusive),+-- or for a specific run_time.+--+-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns@.+module Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns+    (+    -- * REST Resource+      ProjectsLocationsTransferConfigsStartManualRunsResource++    -- * Creating a Request+    , projectsLocationsTransferConfigsStartManualRuns+    , ProjectsLocationsTransferConfigsStartManualRuns++    -- * Request Lenses+    , pltcsmrParent+    , pltcsmrXgafv+    , pltcsmrUploadProtocol+    , pltcsmrAccessToken+    , pltcsmrUploadType+    , pltcsmrPayload+    , pltcsmrCallback+    ) where++import           Network.Google.BigQueryDataTransfer.Types+import           Network.Google.Prelude++-- | A resource alias for @bigquerydatatransfer.projects.locations.transferConfigs.startManualRuns@ method which the+-- 'ProjectsLocationsTransferConfigsStartManualRuns' request conforms to.+type ProjectsLocationsTransferConfigsStartManualRunsResource+     =+     "v1" :>+       CaptureMode "parent" "startManualRuns" Text :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "access_token" Text :>+               QueryParam "uploadType" Text :>+                 QueryParam "callback" Text :>+                   QueryParam "alt" AltJSON :>+                     ReqBody '[JSON] StartManualTransferRunsRequest :>+                       Post '[JSON] StartManualTransferRunsResponse++-- | Start manual transfer runs to be executed now with schedule_time equal+-- to current time. The transfer runs can be created for a time range where+-- the run_time is between start_time (inclusive) and end_time (exclusive),+-- or for a specific run_time.+--+-- /See:/ 'projectsLocationsTransferConfigsStartManualRuns' smart constructor.+data ProjectsLocationsTransferConfigsStartManualRuns =+  ProjectsLocationsTransferConfigsStartManualRuns'+    { _pltcsmrParent         :: !Text+    , _pltcsmrXgafv          :: !(Maybe Xgafv)+    , _pltcsmrUploadProtocol :: !(Maybe Text)+    , _pltcsmrAccessToken    :: !(Maybe Text)+    , _pltcsmrUploadType     :: !(Maybe Text)+    , _pltcsmrPayload        :: !StartManualTransferRunsRequest+    , _pltcsmrCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ProjectsLocationsTransferConfigsStartManualRuns' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'pltcsmrParent'+--+-- * 'pltcsmrXgafv'+--+-- * 'pltcsmrUploadProtocol'+--+-- * 'pltcsmrAccessToken'+--+-- * 'pltcsmrUploadType'+--+-- * 'pltcsmrPayload'+--+-- * 'pltcsmrCallback'+projectsLocationsTransferConfigsStartManualRuns+    :: Text -- ^ 'pltcsmrParent'+    -> StartManualTransferRunsRequest -- ^ 'pltcsmrPayload'+    -> ProjectsLocationsTransferConfigsStartManualRuns+projectsLocationsTransferConfigsStartManualRuns pPltcsmrParent_ pPltcsmrPayload_ =+  ProjectsLocationsTransferConfigsStartManualRuns'+    { _pltcsmrParent = pPltcsmrParent_+    , _pltcsmrXgafv = Nothing+    , _pltcsmrUploadProtocol = Nothing+    , _pltcsmrAccessToken = Nothing+    , _pltcsmrUploadType = Nothing+    , _pltcsmrPayload = pPltcsmrPayload_+    , _pltcsmrCallback = Nothing+    }+++-- | Transfer configuration name in the form:+-- \`projects\/{project_id}\/transferConfigs\/{config_id}\`.+pltcsmrParent :: Lens' ProjectsLocationsTransferConfigsStartManualRuns Text+pltcsmrParent+  = lens _pltcsmrParent+      (\ s a -> s{_pltcsmrParent = a})++-- | V1 error format.+pltcsmrXgafv :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Xgafv)+pltcsmrXgafv+  = lens _pltcsmrXgafv (\ s a -> s{_pltcsmrXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+pltcsmrUploadProtocol :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)+pltcsmrUploadProtocol+  = lens _pltcsmrUploadProtocol+      (\ s a -> s{_pltcsmrUploadProtocol = a})++-- | OAuth access token.+pltcsmrAccessToken :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)+pltcsmrAccessToken+  = lens _pltcsmrAccessToken+      (\ s a -> s{_pltcsmrAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+pltcsmrUploadType :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)+pltcsmrUploadType+  = lens _pltcsmrUploadType+      (\ s a -> s{_pltcsmrUploadType = a})++-- | Multipart request metadata.+pltcsmrPayload :: Lens' ProjectsLocationsTransferConfigsStartManualRuns StartManualTransferRunsRequest+pltcsmrPayload+  = lens _pltcsmrPayload+      (\ s a -> s{_pltcsmrPayload = a})++-- | JSONP+pltcsmrCallback :: Lens' ProjectsLocationsTransferConfigsStartManualRuns (Maybe Text)+pltcsmrCallback+  = lens _pltcsmrCallback+      (\ s a -> s{_pltcsmrCallback = a})++instance GoogleRequest+           ProjectsLocationsTransferConfigsStartManualRuns+         where+        type Rs+               ProjectsLocationsTransferConfigsStartManualRuns+             = StartManualTransferRunsResponse+        type Scopes+               ProjectsLocationsTransferConfigsStartManualRuns+             =+             '["https://www.googleapis.com/auth/bigquery",+               "https://www.googleapis.com/auth/cloud-platform"]+        requestClient+          ProjectsLocationsTransferConfigsStartManualRuns'{..}+          = go _pltcsmrParent _pltcsmrXgafv+              _pltcsmrUploadProtocol+              _pltcsmrAccessToken+              _pltcsmrUploadType+              _pltcsmrCallback+              (Just AltJSON)+              _pltcsmrPayload+              bigQueryDataTransferService+          where go+                  = buildClient+                      (Proxy ::+                         Proxy+                           ProjectsLocationsTransferConfigsStartManualRunsResource)+                      mempty
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Create.hs view
@@ -40,6 +40,7 @@     , ptccUploadType     , ptccAuthorizationCode     , ptccPayload+    , ptccVersionInfo     , ptccCallback     ) where @@ -57,15 +58,17 @@                QueryParam "access_token" Text :>                  QueryParam "uploadType" Text :>                    QueryParam "authorizationCode" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] TransferConfig :>-                           Post '[JSON] TransferConfig+                     QueryParam "versionInfo" Text :>+                       QueryParam "callback" Text :>+                         QueryParam "alt" AltJSON :>+                           ReqBody '[JSON] TransferConfig :>+                             Post '[JSON] TransferConfig  -- | Creates a new data transfer configuration. -- -- /See:/ 'projectsTransferConfigsCreate' smart constructor.-data ProjectsTransferConfigsCreate = ProjectsTransferConfigsCreate'+data ProjectsTransferConfigsCreate =+  ProjectsTransferConfigsCreate'     { _ptccParent            :: !Text     , _ptccXgafv             :: !(Maybe Xgafv)     , _ptccUploadProtocol    :: !(Maybe Text)@@ -73,9 +76,12 @@     , _ptccUploadType        :: !(Maybe Text)     , _ptccAuthorizationCode :: !(Maybe Text)     , _ptccPayload           :: !TransferConfig+    , _ptccVersionInfo       :: !(Maybe Text)     , _ptccCallback          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsCreate' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -94,13 +100,15 @@ -- -- * 'ptccPayload' --+-- * 'ptccVersionInfo'+-- -- * 'ptccCallback' projectsTransferConfigsCreate     :: Text -- ^ 'ptccParent'     -> TransferConfig -- ^ 'ptccPayload'     -> ProjectsTransferConfigsCreate projectsTransferConfigsCreate pPtccParent_ pPtccPayload_ =-    ProjectsTransferConfigsCreate'+  ProjectsTransferConfigsCreate'     { _ptccParent = pPtccParent_     , _ptccXgafv = Nothing     , _ptccUploadProtocol = Nothing@@ -108,9 +116,11 @@     , _ptccUploadType = Nothing     , _ptccAuthorizationCode = Nothing     , _ptccPayload = pPtccPayload_+    , _ptccVersionInfo = Nothing     , _ptccCallback = Nothing     } + -- | The BigQuery project id where the transfer configuration should be -- created. Must be in the format -- projects\/{project_id}\/locations\/{location_id} If specified location@@ -167,6 +177,17 @@ ptccPayload   = lens _ptccPayload (\ s a -> s{_ptccPayload = a}) +-- | Optional version info. If users want to find a very recent access token,+-- that is, immediately after approving access, users have to set the+-- version_info claim in the token request. To obtain the version_info,+-- users must use the “none+gsession” response type. which be return a+-- version_info back in the authorization response which be be put in a JWT+-- claim in the token request.+ptccVersionInfo :: Lens' ProjectsTransferConfigsCreate (Maybe Text)+ptccVersionInfo+  = lens _ptccVersionInfo+      (\ s a -> s{_ptccVersionInfo = a})+ -- | JSONP ptccCallback :: Lens' ProjectsTransferConfigsCreate (Maybe Text) ptccCallback@@ -183,6 +204,7 @@               _ptccAccessToken               _ptccUploadType               _ptccAuthorizationCode+              _ptccVersionInfo               _ptccCallback               (Just AltJSON)               _ptccPayload
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Delete.hs view
@@ -61,15 +61,18 @@ -- runs and logs. -- -- /See:/ 'projectsTransferConfigsDelete' smart constructor.-data ProjectsTransferConfigsDelete = ProjectsTransferConfigsDelete'+data ProjectsTransferConfigsDelete =+  ProjectsTransferConfigsDelete'     { _ptcdXgafv          :: !(Maybe Xgafv)     , _ptcdUploadProtocol :: !(Maybe Text)     , _ptcdAccessToken    :: !(Maybe Text)     , _ptcdUploadType     :: !(Maybe Text)     , _ptcdName           :: !Text     , _ptcdCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -89,7 +92,7 @@     :: Text -- ^ 'ptcdName'     -> ProjectsTransferConfigsDelete projectsTransferConfigsDelete pPtcdName_ =-    ProjectsTransferConfigsDelete'+  ProjectsTransferConfigsDelete'     { _ptcdXgafv = Nothing     , _ptcdUploadProtocol = Nothing     , _ptcdAccessToken = Nothing@@ -97,6 +100,7 @@     , _ptcdName = pPtcdName_     , _ptcdCallback = Nothing     }+  -- | V1 error format. ptcdXgafv :: Lens' ProjectsTransferConfigsDelete (Maybe Xgafv)
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Get.hs view
@@ -60,15 +60,18 @@ -- | Returns information about a data transfer config. -- -- /See:/ 'projectsTransferConfigsGet' smart constructor.-data ProjectsTransferConfigsGet = ProjectsTransferConfigsGet'+data ProjectsTransferConfigsGet =+  ProjectsTransferConfigsGet'     { _ptcgXgafv          :: !(Maybe Xgafv)     , _ptcgUploadProtocol :: !(Maybe Text)     , _ptcgAccessToken    :: !(Maybe Text)     , _ptcgUploadType     :: !(Maybe Text)     , _ptcgName           :: !Text     , _ptcgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -88,7 +91,7 @@     :: Text -- ^ 'ptcgName'     -> ProjectsTransferConfigsGet projectsTransferConfigsGet pPtcgName_ =-    ProjectsTransferConfigsGet'+  ProjectsTransferConfigsGet'     { _ptcgXgafv = Nothing     , _ptcgUploadProtocol = Nothing     , _ptcgAccessToken = Nothing@@ -96,6 +99,7 @@     , _ptcgName = pPtcgName_     , _ptcgCallback = Nothing     }+  -- | V1 error format. ptcgXgafv :: Lens' ProjectsTransferConfigsGet (Maybe Xgafv)
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/List.hs view
@@ -67,7 +67,8 @@ -- | Returns information about all data transfers in the project. -- -- /See:/ 'projectsTransferConfigsList' smart constructor.-data ProjectsTransferConfigsList = ProjectsTransferConfigsList'+data ProjectsTransferConfigsList =+  ProjectsTransferConfigsList'     { _ptclParent         :: !Text     , _ptclXgafv          :: !(Maybe Xgafv)     , _ptclUploadProtocol :: !(Maybe Text)@@ -77,8 +78,10 @@     , _ptclDataSourceIds  :: !(Maybe [Text])     , _ptclPageSize       :: !(Maybe (Textual Int32))     , _ptclCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -104,7 +107,7 @@     :: Text -- ^ 'ptclParent'     -> ProjectsTransferConfigsList projectsTransferConfigsList pPtclParent_ =-    ProjectsTransferConfigsList'+  ProjectsTransferConfigsList'     { _ptclParent = pPtclParent_     , _ptclXgafv = Nothing     , _ptclUploadProtocol = Nothing@@ -115,6 +118,7 @@     , _ptclPageSize = Nothing     , _ptclCallback = Nothing     }+  -- | The BigQuery project id for which data sources should be returned: -- \`projects\/{project_id}\`.
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Patch.hs view
@@ -41,6 +41,7 @@     , ptcpUploadType     , ptcpAuthorizationCode     , ptcpPayload+    , ptcpVersionInfo     , ptcpName     , ptcpCallback     ) where@@ -59,16 +60,18 @@                QueryParam "access_token" Text :>                  QueryParam "uploadType" Text :>                    QueryParam "authorizationCode" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] TransferConfig :>-                           Patch '[JSON] TransferConfig+                     QueryParam "versionInfo" Text :>+                       QueryParam "callback" Text :>+                         QueryParam "alt" AltJSON :>+                           ReqBody '[JSON] TransferConfig :>+                             Patch '[JSON] TransferConfig  -- | Updates a data transfer configuration. All fields must be set, even if -- they are not updated. -- -- /See:/ 'projectsTransferConfigsPatch' smart constructor.-data ProjectsTransferConfigsPatch = ProjectsTransferConfigsPatch'+data ProjectsTransferConfigsPatch =+  ProjectsTransferConfigsPatch'     { _ptcpXgafv             :: !(Maybe Xgafv)     , _ptcpUploadProtocol    :: !(Maybe Text)     , _ptcpUpdateMask        :: !(Maybe GFieldMask)@@ -76,10 +79,13 @@     , _ptcpUploadType        :: !(Maybe Text)     , _ptcpAuthorizationCode :: !(Maybe Text)     , _ptcpPayload           :: !TransferConfig+    , _ptcpVersionInfo       :: !(Maybe Text)     , _ptcpName              :: !Text     , _ptcpCallback          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsPatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -98,6 +104,8 @@ -- -- * 'ptcpPayload' --+-- * 'ptcpVersionInfo'+-- -- * 'ptcpName' -- -- * 'ptcpCallback'@@ -106,7 +114,7 @@     -> Text -- ^ 'ptcpName'     -> ProjectsTransferConfigsPatch projectsTransferConfigsPatch pPtcpPayload_ pPtcpName_ =-    ProjectsTransferConfigsPatch'+  ProjectsTransferConfigsPatch'     { _ptcpXgafv = Nothing     , _ptcpUploadProtocol = Nothing     , _ptcpUpdateMask = Nothing@@ -114,10 +122,12 @@     , _ptcpUploadType = Nothing     , _ptcpAuthorizationCode = Nothing     , _ptcpPayload = pPtcpPayload_+    , _ptcpVersionInfo = Nothing     , _ptcpName = pPtcpName_     , _ptcpCallback = Nothing     } + -- | V1 error format. ptcpXgafv :: Lens' ProjectsTransferConfigsPatch (Maybe Xgafv) ptcpXgafv@@ -171,6 +181,17 @@ ptcpPayload   = lens _ptcpPayload (\ s a -> s{_ptcpPayload = a}) +-- | Optional version info. If users want to find a very recent access token,+-- that is, immediately after approving access, users have to set the+-- version_info claim in the token request. To obtain the version_info,+-- users must use the “none+gsession” response type. which be return a+-- version_info back in the authorization response which be be put in a JWT+-- claim in the token request.+ptcpVersionInfo :: Lens' ProjectsTransferConfigsPatch (Maybe Text)+ptcpVersionInfo+  = lens _ptcpVersionInfo+      (\ s a -> s{_ptcpVersionInfo = a})+ -- | The resource name of the transfer config. Transfer config names have the -- form of -- \`projects\/{project_id}\/locations\/{region}\/transferConfigs\/{config_id}\`.@@ -197,6 +218,7 @@               _ptcpAccessToken               _ptcpUploadType               _ptcpAuthorizationCode+              _ptcpVersionInfo               _ptcpCallback               (Just AltJSON)               _ptcpPayload
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Runs/Delete.hs view
@@ -59,15 +59,18 @@ -- | Deletes the specified transfer run. -- -- /See:/ 'projectsTransferConfigsRunsDelete' smart constructor.-data ProjectsTransferConfigsRunsDelete = ProjectsTransferConfigsRunsDelete'+data ProjectsTransferConfigsRunsDelete =+  ProjectsTransferConfigsRunsDelete'     { _ptcrdXgafv          :: !(Maybe Xgafv)     , _ptcrdUploadProtocol :: !(Maybe Text)     , _ptcrdAccessToken    :: !(Maybe Text)     , _ptcrdUploadType     :: !(Maybe Text)     , _ptcrdName           :: !Text     , _ptcrdCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsRunsDelete' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -87,7 +90,7 @@     :: Text -- ^ 'ptcrdName'     -> ProjectsTransferConfigsRunsDelete projectsTransferConfigsRunsDelete pPtcrdName_ =-    ProjectsTransferConfigsRunsDelete'+  ProjectsTransferConfigsRunsDelete'     { _ptcrdXgafv = Nothing     , _ptcrdUploadProtocol = Nothing     , _ptcrdAccessToken = Nothing@@ -96,6 +99,7 @@     , _ptcrdCallback = Nothing     } + -- | V1 error format. ptcrdXgafv :: Lens' ProjectsTransferConfigsRunsDelete (Maybe Xgafv) ptcrdXgafv@@ -132,7 +136,8 @@       (\ s a -> s{_ptcrdCallback = a})  instance GoogleRequest-         ProjectsTransferConfigsRunsDelete where+           ProjectsTransferConfigsRunsDelete+         where         type Rs ProjectsTransferConfigsRunsDelete = Empty         type Scopes ProjectsTransferConfigsRunsDelete =              '["https://www.googleapis.com/auth/bigquery",
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Runs/Get.hs view
@@ -59,15 +59,18 @@ -- | Returns information about the particular transfer run. -- -- /See:/ 'projectsTransferConfigsRunsGet' smart constructor.-data ProjectsTransferConfigsRunsGet = ProjectsTransferConfigsRunsGet'+data ProjectsTransferConfigsRunsGet =+  ProjectsTransferConfigsRunsGet'     { _ptcrgXgafv          :: !(Maybe Xgafv)     , _ptcrgUploadProtocol :: !(Maybe Text)     , _ptcrgAccessToken    :: !(Maybe Text)     , _ptcrgUploadType     :: !(Maybe Text)     , _ptcrgName           :: !Text     , _ptcrgCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsRunsGet' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -87,7 +90,7 @@     :: Text -- ^ 'ptcrgName'     -> ProjectsTransferConfigsRunsGet projectsTransferConfigsRunsGet pPtcrgName_ =-    ProjectsTransferConfigsRunsGet'+  ProjectsTransferConfigsRunsGet'     { _ptcrgXgafv = Nothing     , _ptcrgUploadProtocol = Nothing     , _ptcrgAccessToken = Nothing@@ -95,6 +98,7 @@     , _ptcrgName = pPtcrgName_     , _ptcrgCallback = Nothing     }+  -- | V1 error format. ptcrgXgafv :: Lens' ProjectsTransferConfigsRunsGet (Maybe Xgafv)
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Runs/List.hs view
@@ -69,7 +69,8 @@ -- | Returns information about running and completed jobs. -- -- /See:/ 'projectsTransferConfigsRunsList' smart constructor.-data ProjectsTransferConfigsRunsList = ProjectsTransferConfigsRunsList'+data ProjectsTransferConfigsRunsList =+  ProjectsTransferConfigsRunsList'     { _ptcrlRunAttempt     :: !(Maybe Text)     , _ptcrlParent         :: !Text     , _ptcrlStates         :: !(Maybe [Text])@@ -80,8 +81,10 @@     , _ptcrlPageToken      :: !(Maybe Text)     , _ptcrlPageSize       :: !(Maybe (Textual Int32))     , _ptcrlCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsRunsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -109,7 +112,7 @@     :: Text -- ^ 'ptcrlParent'     -> ProjectsTransferConfigsRunsList projectsTransferConfigsRunsList pPtcrlParent_ =-    ProjectsTransferConfigsRunsList'+  ProjectsTransferConfigsRunsList'     { _ptcrlRunAttempt = Nothing     , _ptcrlParent = pPtcrlParent_     , _ptcrlStates = Nothing@@ -122,6 +125,7 @@     , _ptcrlCallback = Nothing     } + -- | Indicates how run attempts are to be pulled. ptcrlRunAttempt :: Lens' ProjectsTransferConfigsRunsList (Maybe Text) ptcrlRunAttempt@@ -189,7 +193,8 @@       (\ s a -> s{_ptcrlCallback = a})  instance GoogleRequest-         ProjectsTransferConfigsRunsList where+           ProjectsTransferConfigsRunsList+         where         type Rs ProjectsTransferConfigsRunsList =              ListTransferRunsResponse         type Scopes ProjectsTransferConfigsRunsList =
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/Runs/TransferLogs/List.hs view
@@ -68,7 +68,8 @@ -- | Returns user facing log messages for the data transfer run. -- -- /See:/ 'projectsTransferConfigsRunsTransferLogsList' smart constructor.-data ProjectsTransferConfigsRunsTransferLogsList = ProjectsTransferConfigsRunsTransferLogsList'+data ProjectsTransferConfigsRunsTransferLogsList =+  ProjectsTransferConfigsRunsTransferLogsList'     { _ptcrtllParent         :: !Text     , _ptcrtllXgafv          :: !(Maybe Xgafv)     , _ptcrtllUploadProtocol :: !(Maybe Text)@@ -78,8 +79,10 @@     , _ptcrtllPageToken      :: !(Maybe Text)     , _ptcrtllPageSize       :: !(Maybe (Textual Int32))     , _ptcrtllCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsRunsTransferLogsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -105,7 +108,7 @@     :: Text -- ^ 'ptcrtllParent'     -> ProjectsTransferConfigsRunsTransferLogsList projectsTransferConfigsRunsTransferLogsList pPtcrtllParent_ =-    ProjectsTransferConfigsRunsTransferLogsList'+  ProjectsTransferConfigsRunsTransferLogsList'     { _ptcrtllParent = pPtcrtllParent_     , _ptcrtllXgafv = Nothing     , _ptcrtllUploadProtocol = Nothing@@ -117,6 +120,7 @@     , _ptcrtllCallback = Nothing     } + -- | Transfer run name in the form: -- \`projects\/{project_id}\/transferConfigs\/{config_Id}\/runs\/{run_id}\`. ptcrtllParent :: Lens' ProjectsTransferConfigsRunsTransferLogsList Text@@ -180,7 +184,8 @@       (\ s a -> s{_ptcrtllCallback = a})  instance GoogleRequest-         ProjectsTransferConfigsRunsTransferLogsList where+           ProjectsTransferConfigsRunsTransferLogsList+         where         type Rs ProjectsTransferConfigsRunsTransferLogsList =              ListTransferLogsResponse         type Scopes
gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/ScheduleRuns.hs view
@@ -23,7 +23,7 @@ -- Creates transfer runs for a time range [start_time, end_time]. For each -- date - or whatever granularity the data source supports - in the range, -- one transfer run is created. Note that runs are created per UTC time in--- the time range.+-- the time range. DEPRECATED: use StartManualTransferRuns instead. -- -- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.transferConfigs.scheduleRuns@. module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns@@ -65,10 +65,11 @@ -- | Creates transfer runs for a time range [start_time, end_time]. For each -- date - or whatever granularity the data source supports - in the range, -- one transfer run is created. Note that runs are created per UTC time in--- the time range.+-- the time range. DEPRECATED: use StartManualTransferRuns instead. -- -- /See:/ 'projectsTransferConfigsScheduleRuns' smart constructor.-data ProjectsTransferConfigsScheduleRuns = ProjectsTransferConfigsScheduleRuns'+data ProjectsTransferConfigsScheduleRuns =+  ProjectsTransferConfigsScheduleRuns'     { _ptcsrParent         :: !Text     , _ptcsrXgafv          :: !(Maybe Xgafv)     , _ptcsrUploadProtocol :: !(Maybe Text)@@ -76,8 +77,10 @@     , _ptcsrUploadType     :: !(Maybe Text)     , _ptcsrPayload        :: !ScheduleTransferRunsRequest     , _ptcsrCallback       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)+    }+  deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ProjectsTransferConfigsScheduleRuns' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -100,7 +103,7 @@     -> ScheduleTransferRunsRequest -- ^ 'ptcsrPayload'     -> ProjectsTransferConfigsScheduleRuns projectsTransferConfigsScheduleRuns pPtcsrParent_ pPtcsrPayload_ =-    ProjectsTransferConfigsScheduleRuns'+  ProjectsTransferConfigsScheduleRuns'     { _ptcsrParent = pPtcsrParent_     , _ptcsrXgafv = Nothing     , _ptcsrUploadProtocol = Nothing@@ -110,6 +113,7 @@     , _ptcsrCallback = Nothing     } + -- | Transfer configuration name in the form: -- \`projects\/{project_id}\/transferConfigs\/{config_id}\`. ptcsrParent :: Lens' ProjectsTransferConfigsScheduleRuns Text@@ -151,7 +155,8 @@       (\ s a -> s{_ptcsrCallback = a})  instance GoogleRequest-         ProjectsTransferConfigsScheduleRuns where+           ProjectsTransferConfigsScheduleRuns+         where         type Rs ProjectsTransferConfigsScheduleRuns =              ScheduleTransferRunsResponse         type Scopes ProjectsTransferConfigsScheduleRuns =
+ gen/Network/Google/Resource/BigQueryDataTransfer/Projects/TransferConfigs/StartManualRuns.hs view
@@ -0,0 +1,179 @@+{-# 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.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns+-- Copyright   : (c) 2015-2016 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Start manual transfer runs to be executed now with schedule_time equal+-- to current time. The transfer runs can be created for a time range where+-- the run_time is between start_time (inclusive) and end_time (exclusive),+-- or for a specific run_time.+--+-- /See:/ <https://cloud.google.com/bigquery/ BigQuery Data Transfer API Reference> for @bigquerydatatransfer.projects.transferConfigs.startManualRuns@.+module Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns+    (+    -- * REST Resource+      ProjectsTransferConfigsStartManualRunsResource++    -- * Creating a Request+    , projectsTransferConfigsStartManualRuns+    , ProjectsTransferConfigsStartManualRuns++    -- * Request Lenses+    , ptcsmrParent+    , ptcsmrXgafv+    , ptcsmrUploadProtocol+    , ptcsmrAccessToken+    , ptcsmrUploadType+    , ptcsmrPayload+    , ptcsmrCallback+    ) where++import           Network.Google.BigQueryDataTransfer.Types+import           Network.Google.Prelude++-- | A resource alias for @bigquerydatatransfer.projects.transferConfigs.startManualRuns@ method which the+-- 'ProjectsTransferConfigsStartManualRuns' request conforms to.+type ProjectsTransferConfigsStartManualRunsResource =+     "v1" :>+       CaptureMode "parent" "startManualRuns" Text :>+         QueryParam "$.xgafv" Xgafv :>+           QueryParam "upload_protocol" Text :>+             QueryParam "access_token" Text :>+               QueryParam "uploadType" Text :>+                 QueryParam "callback" Text :>+                   QueryParam "alt" AltJSON :>+                     ReqBody '[JSON] StartManualTransferRunsRequest :>+                       Post '[JSON] StartManualTransferRunsResponse++-- | Start manual transfer runs to be executed now with schedule_time equal+-- to current time. The transfer runs can be created for a time range where+-- the run_time is between start_time (inclusive) and end_time (exclusive),+-- or for a specific run_time.+--+-- /See:/ 'projectsTransferConfigsStartManualRuns' smart constructor.+data ProjectsTransferConfigsStartManualRuns =+  ProjectsTransferConfigsStartManualRuns'+    { _ptcsmrParent         :: !Text+    , _ptcsmrXgafv          :: !(Maybe Xgafv)+    , _ptcsmrUploadProtocol :: !(Maybe Text)+    , _ptcsmrAccessToken    :: !(Maybe Text)+    , _ptcsmrUploadType     :: !(Maybe Text)+    , _ptcsmrPayload        :: !StartManualTransferRunsRequest+    , _ptcsmrCallback       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ProjectsTransferConfigsStartManualRuns' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'ptcsmrParent'+--+-- * 'ptcsmrXgafv'+--+-- * 'ptcsmrUploadProtocol'+--+-- * 'ptcsmrAccessToken'+--+-- * 'ptcsmrUploadType'+--+-- * 'ptcsmrPayload'+--+-- * 'ptcsmrCallback'+projectsTransferConfigsStartManualRuns+    :: Text -- ^ 'ptcsmrParent'+    -> StartManualTransferRunsRequest -- ^ 'ptcsmrPayload'+    -> ProjectsTransferConfigsStartManualRuns+projectsTransferConfigsStartManualRuns pPtcsmrParent_ pPtcsmrPayload_ =+  ProjectsTransferConfigsStartManualRuns'+    { _ptcsmrParent = pPtcsmrParent_+    , _ptcsmrXgafv = Nothing+    , _ptcsmrUploadProtocol = Nothing+    , _ptcsmrAccessToken = Nothing+    , _ptcsmrUploadType = Nothing+    , _ptcsmrPayload = pPtcsmrPayload_+    , _ptcsmrCallback = Nothing+    }+++-- | Transfer configuration name in the form:+-- \`projects\/{project_id}\/transferConfigs\/{config_id}\`.+ptcsmrParent :: Lens' ProjectsTransferConfigsStartManualRuns Text+ptcsmrParent+  = lens _ptcsmrParent (\ s a -> s{_ptcsmrParent = a})++-- | V1 error format.+ptcsmrXgafv :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Xgafv)+ptcsmrXgafv+  = lens _ptcsmrXgafv (\ s a -> s{_ptcsmrXgafv = a})++-- | Upload protocol for media (e.g. \"raw\", \"multipart\").+ptcsmrUploadProtocol :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)+ptcsmrUploadProtocol+  = lens _ptcsmrUploadProtocol+      (\ s a -> s{_ptcsmrUploadProtocol = a})++-- | OAuth access token.+ptcsmrAccessToken :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)+ptcsmrAccessToken+  = lens _ptcsmrAccessToken+      (\ s a -> s{_ptcsmrAccessToken = a})++-- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+ptcsmrUploadType :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)+ptcsmrUploadType+  = lens _ptcsmrUploadType+      (\ s a -> s{_ptcsmrUploadType = a})++-- | Multipart request metadata.+ptcsmrPayload :: Lens' ProjectsTransferConfigsStartManualRuns StartManualTransferRunsRequest+ptcsmrPayload+  = lens _ptcsmrPayload+      (\ s a -> s{_ptcsmrPayload = a})++-- | JSONP+ptcsmrCallback :: Lens' ProjectsTransferConfigsStartManualRuns (Maybe Text)+ptcsmrCallback+  = lens _ptcsmrCallback+      (\ s a -> s{_ptcsmrCallback = a})++instance GoogleRequest+           ProjectsTransferConfigsStartManualRuns+         where+        type Rs ProjectsTransferConfigsStartManualRuns =+             StartManualTransferRunsResponse+        type Scopes ProjectsTransferConfigsStartManualRuns =+             '["https://www.googleapis.com/auth/bigquery",+               "https://www.googleapis.com/auth/cloud-platform"]+        requestClient+          ProjectsTransferConfigsStartManualRuns'{..}+          = go _ptcsmrParent _ptcsmrXgafv _ptcsmrUploadProtocol+              _ptcsmrAccessToken+              _ptcsmrUploadType+              _ptcsmrCallback+              (Just AltJSON)+              _ptcsmrPayload+              bigQueryDataTransferService+          where go+                  = buildClient+                      (Proxy ::+                         Proxy ProjectsTransferConfigsStartManualRunsResource)+                      mempty
gogol-bigquerydatatransfer.cabal view
@@ -1,5 +1,5 @@ name:                  gogol-bigquerydatatransfer-version:               0.4.0+version:               0.5.0 synopsis:              Google BigQuery Data Transfer SDK. homepage:              https://github.com/brendanhay/gogol bug-reports:           https://github.com/brendanhay/gogol/issues@@ -14,8 +14,8 @@ extra-source-files:    README.md src/.gitkeep  description:-    Transfers data from partner SaaS applications to Google BigQuery on a-    scheduled, managed basis.+    Schedule queries or transfer external data from SaaS applications to+    Google BigQuery on a regular basis.     .     /Warning:/ This is an experimental prototype/preview release which is still     under exploratory development and not intended for public use, caveat emptor!@@ -54,6 +54,7 @@         , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.List         , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.Runs.TransferLogs.List         , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.ScheduleRuns+        , Network.Google.Resource.BigQueryDataTransfer.Projects.Locations.TransferConfigs.StartManualRuns         , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Create         , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Delete         , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Get@@ -64,11 +65,12 @@         , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.List         , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.Runs.TransferLogs.List         , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.ScheduleRuns+        , Network.Google.Resource.BigQueryDataTransfer.Projects.TransferConfigs.StartManualRuns      other-modules:           Network.Google.BigQueryDataTransfer.Types.Product         , Network.Google.BigQueryDataTransfer.Types.Sum      build-depends:-          gogol-core == 0.4.0.*+          gogol-core == 0.5.0.*         , base       >= 4.7 && < 5