amazonka-dms 1.4.2 → 1.4.3

raw patch · 30 files changed

+293/−500 lines, 30 filesdep ~amazonka-coredep ~amazonka-dmsdep ~amazonka-testPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: amazonka-core, amazonka-dms, amazonka-test

API changes (from Hackage documentation)

Files

• README.md +2/−7
• amazonka-dms.cabal +6/−11
• gen/Network/AWS/DMS.hs +1/−6
• gen/Network/AWS/DMS/AddTagsToResource.hs +2/−7
• gen/Network/AWS/DMS/CreateEndpoint.hs +3/−10
• gen/Network/AWS/DMS/CreateReplicationInstance.hs +11/−27
• gen/Network/AWS/DMS/CreateReplicationSubnetGroup.hs +3/−6
• gen/Network/AWS/DMS/CreateReplicationTask.hs +2/−4
• gen/Network/AWS/DMS/DeleteEndpoint.hs +2/−4
• gen/Network/AWS/DMS/DeleteReplicationInstance.hs +2/−4
• gen/Network/AWS/DMS/DescribeAccountAttributes.hs +1/−5
• gen/Network/AWS/DMS/DescribeConnections.hs +4/−13
• gen/Network/AWS/DMS/DescribeEndpointTypes.hs +3/−10
• gen/Network/AWS/DMS/DescribeEndpoints.hs +5/−14
• gen/Network/AWS/DMS/DescribeOrderableReplicationInstances.hs +4/−12
• gen/Network/AWS/DMS/DescribeRefreshSchemasStatus.hs +1/−2
• gen/Network/AWS/DMS/DescribeReplicationInstances.hs +5/−14
• gen/Network/AWS/DMS/DescribeReplicationSubnetGroups.hs +3/−10
• gen/Network/AWS/DMS/DescribeReplicationTasks.hs +5/−14
• gen/Network/AWS/DMS/DescribeSchemas.hs +4/−12
• gen/Network/AWS/DMS/DescribeTableStatistics.hs +4/−12
• gen/Network/AWS/DMS/ListTagsForResource.hs +1/−2
• gen/Network/AWS/DMS/ModifyEndpoint.hs +3/−7
• gen/Network/AWS/DMS/ModifyReplicationInstance.hs +9/−30
• gen/Network/AWS/DMS/RefreshSchemas.hs +2/−5
• gen/Network/AWS/DMS/RemoveTagsFromResource.hs +1/−2
• gen/Network/AWS/DMS/TestConnection.hs +1/−2
• gen/Network/AWS/DMS/Types.hs +2/−4
• gen/Network/AWS/DMS/Types/Product.hs +27/−70
• test/Test/AWS/Gen/DMS.hs +174/−174

@@ -8,19 +8,14 @@  ## Version -`1.4.2`+`1.4.3`   ## Description  AWS Database Migration Service -AWS Database Migration Service (AWS DMS) can migrate your data to and-from the most widely used commercial and open-source databases such as-Oracle, PostgreSQL, Microsoft SQL Server, MariaDB, Amazon Aurora, and-MySQL. The service supports homogeneous migrations such as Oracle to-Oracle, as well as heterogeneous migrations between different database-platforms, such as Oracle to MySQL or SQL Server to PostgreSQL.+AWS Database Migration Service (AWS DMS) can migrate your data to and from the most widely used commercial and open-source databases such as Oracle, PostgreSQL, Microsoft SQL Server, MariaDB, Amazon Aurora, and MySQL. The service supports homogeneous migrations such as Oracle to Oracle, as well as heterogeneous migrations between different database platforms, such as Oracle to MySQL or SQL Server to PostgreSQL.  Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-dms) and the [AWS API Reference](https://aws.amazon.com/documentation/).

@@ -1,5 +1,5 @@ name:                  amazonka-dms-version:               1.4.2+version:               1.4.3 synopsis:              Amazon Database Migration Service SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -15,12 +15,7 @@ description:     AWS Database Migration Service -    AWS Database Migration Service (AWS DMS) can migrate your data to and-    from the most widely used commercial and open-source databases such as-    Oracle, PostgreSQL, Microsoft SQL Server, MariaDB, Amazon Aurora, and-    MySQL. The service supports homogeneous migrations such as Oracle to-    Oracle, as well as heterogeneous migrations between different database-    platforms, such as Oracle to MySQL or SQL Server to PostgreSQL.+    AWS Database Migration Service (AWS DMS) can migrate your data to and from the most widely used commercial and open-source databases such as Oracle, PostgreSQL, Microsoft SQL Server, MariaDB, Amazon Aurora, and MySQL. The service supports homogeneous migrations such as Oracle to Oracle, as well as heterogeneous migrations between different database platforms, such as Oracle to MySQL or SQL Server to PostgreSQL.     .     The types from this library are intended to be used with     <http://hackage.haskell.org/package/amazonka amazonka>, which provides@@ -85,7 +80,7 @@         , Network.AWS.DMS.Types.Sum      build-depends:-          amazonka-core == 1.4.2.*+          amazonka-core == 1.4.3.*         , base          >= 4.7     && < 5  test-suite amazonka-dms-test@@ -105,9 +100,9 @@         , Test.AWS.DMS.Internal      build-depends:-          amazonka-core == 1.4.2.*-        , amazonka-test == 1.4.2.*-        , amazonka-dms == 1.4.2.*+          amazonka-core == 1.4.3.*+        , amazonka-test == 1.4.3.*+        , amazonka-dms == 1.4.3.*         , base         , bytestring         , tasty

@@ -13,12 +13,7 @@ -- -- AWS Database Migration Service ----- AWS Database Migration Service (AWS DMS) can migrate your data to and--- from the most widely used commercial and open-source databases such as--- Oracle, PostgreSQL, Microsoft SQL Server, MariaDB, Amazon Aurora, and--- MySQL. The service supports homogeneous migrations such as Oracle to--- Oracle, as well as heterogeneous migrations between different database--- platforms, such as Oracle to MySQL or SQL Server to PostgreSQL.+-- AWS Database Migration Service (AWS DMS) can migrate your data to and from the most widely used commercial and open-source databases such as Oracle, PostgreSQL, Microsoft SQL Server, MariaDB, Amazon Aurora, and MySQL. The service supports homogeneous migrations such as Oracle to Oracle, as well as heterogeneous migrations between different database platforms, such as Oracle to MySQL or SQL Server to PostgreSQL. module Network.AWS.DMS     (     -- * Service Configuration

@@ -18,10 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Adds metadata tags to a DMS resource, including replication instance,--- endpoint, security group, and migration task. These tags can also be--- used with cost allocation reporting to track cost associated with DMS--- resources, or used in a Condition statement in an IAM policy for DMS.+-- Adds metadata tags to a DMS resource, including replication instance, endpoint, security group, and migration task. These tags can also be used with cost allocation reporting to track cost associated with DMS resources, or used in a Condition statement in an IAM policy for DMS. -- module Network.AWS.DMS.AddTagsToResource     (@@ -68,9 +65,7 @@     , _attrTags = mempty     } --- | The Amazon Resource Name (ARN) of the AWS DMS resource the tag is to be--- added to. AWS DMS resources include a replication instance, endpoint,--- and a replication task.+-- | The Amazon Resource Name (ARN) of the AWS DMS resource the tag is to be added to. AWS DMS resources include a replication instance, endpoint, and a replication task. attrResourceARN :: Lens' AddTagsToResource Text attrResourceARN = lens _attrResourceARN (\ s a -> s{_attrResourceARN = a}); 

@@ -121,11 +121,7 @@ ceExtraConnectionAttributes :: Lens' CreateEndpoint (Maybe Text) ceExtraConnectionAttributes = lens _ceExtraConnectionAttributes (\ s a -> s{_ceExtraConnectionAttributes = a}); --- | The KMS key identifier that will be used to encrypt the connection--- parameters. If you do not specify a value for the KmsKeyId parameter,--- then AWS DMS will use your default encryption key. AWS KMS creates the--- default encryption key for your AWS account. Your AWS account has a--- different default encryption key for each AWS region.+-- | The KMS key identifier that will be used to encrypt the connection parameters. If you do not specify a value for the KmsKeyId parameter, then AWS DMS will use your default encryption key. AWS KMS creates the default encryption key for your AWS account. Your AWS account has a different default encryption key for each AWS region. ceKMSKeyId :: Lens' CreateEndpoint (Maybe Text) ceKMSKeyId = lens _ceKMSKeyId (\ s a -> s{_ceKMSKeyId = a}); @@ -137,9 +133,7 @@ ceTags :: Lens' CreateEndpoint [Tag] ceTags = lens _ceTags (\ s a -> s{_ceTags = a}) . _Default . _Coerce; --- | The database endpoint identifier. Identifiers must begin with a letter;--- must contain only ASCII letters, digits, and hyphens; and must not end--- with a hyphen or contain two consecutive hyphens.+-- | The database endpoint identifier. Identifiers must begin with a letter; must contain only ASCII letters, digits, and hyphens; and must not end with a hyphen or contain two consecutive hyphens. ceEndpointIdentifier :: Lens' CreateEndpoint Text ceEndpointIdentifier = lens _ceEndpointIdentifier (\ s a -> s{_ceEndpointIdentifier = a}); @@ -147,8 +141,7 @@ ceEndpointType :: Lens' CreateEndpoint ReplicationEndpointTypeValue ceEndpointType = lens _ceEndpointType (\ s a -> s{_ceEndpointType = a}); --- | The type of engine for the endpoint. Valid values include MYSQL, ORACLE,--- POSTGRES, MARIADB, AURORA, SQLSERVER.+-- | The type of engine for the endpoint. Valid values include MYSQL, ORACLE, POSTGRES, MARIADB, AURORA, SQLSERVER. ceEngineName :: Lens' CreateEndpoint Text ceEngineName = lens _ceEngineName (\ s a -> s{_ceEngineName = a}); 

@@ -118,15 +118,11 @@ criEngineVersion :: Lens' CreateReplicationInstance (Maybe Text) criEngineVersion = lens _criEngineVersion (\ s a -> s{_criEngineVersion = a}); --- | Specifies the accessibility options for the replication instance. A--- value of 'true' represents an instance with a public IP address. A value--- of 'false' represents an instance with a private IP address. The default--- value is 'true'.+-- | Specifies the accessibility options for the replication instance. A value of 'true' represents an instance with a public IP address. A value of 'false' represents an instance with a private IP address. The default value is 'true'. criPubliclyAccessible :: Lens' CreateReplicationInstance (Maybe Bool) criPubliclyAccessible = lens _criPubliclyAccessible (\ s a -> s{_criPubliclyAccessible = a}); --- | Indicates that minor engine upgrades will be applied automatically to--- the replication instance during the maintenance window.+-- | Indicates that minor engine upgrades will be applied automatically to the replication instance during the maintenance window. -- -- Default: 'true' criAutoMinorVersionUpgrade :: Lens' CreateReplicationInstance (Maybe Bool)@@ -136,13 +132,11 @@ criReplicationSubnetGroupIdentifier :: Lens' CreateReplicationInstance (Maybe Text) criReplicationSubnetGroupIdentifier = lens _criReplicationSubnetGroupIdentifier (\ s a -> s{_criReplicationSubnetGroupIdentifier = a}); --- | The weekly time range during which system maintenance can occur, in--- Universal Coordinated Time (UTC).+-- | The weekly time range during which system maintenance can occur, in Universal Coordinated Time (UTC). -- -- Format: 'ddd:hh24:mi-ddd:hh24:mi' ----- Default: A 30-minute window selected at random from an 8-hour block of--- time per region, occurring on a random day of the week.+-- Default: A 30-minute window selected at random from an 8-hour block of time per region, occurring on a random day of the week. -- -- Valid Days: Mon, Tue, Wed, Thu, Fri, Sat, Sun --@@ -150,26 +144,19 @@ criPreferredMaintenanceWindow :: Lens' CreateReplicationInstance (Maybe Text) criPreferredMaintenanceWindow = lens _criPreferredMaintenanceWindow (\ s a -> s{_criPreferredMaintenanceWindow = a}); --- | The KMS key identifier that will be used to encrypt the content on the--- replication instance. If you do not specify a value for the KmsKeyId--- parameter, then AWS DMS will use your default encryption key. AWS KMS--- creates the default encryption key for your AWS account. Your AWS--- account has a different default encryption key for each AWS region.+-- | The KMS key identifier that will be used to encrypt the content on the replication instance. If you do not specify a value for the KmsKeyId parameter, then AWS DMS will use your default encryption key. AWS KMS creates the default encryption key for your AWS account. Your AWS account has a different default encryption key for each AWS region. criKMSKeyId :: Lens' CreateReplicationInstance (Maybe Text) criKMSKeyId = lens _criKMSKeyId (\ s a -> s{_criKMSKeyId = a}); --- | The EC2 Availability Zone that the replication instance will be created--- in.+-- | The EC2 Availability Zone that the replication instance will be created in. ----- Default: A random, system-chosen Availability Zone in the endpoint\'s--- region.+-- Default: A random, system-chosen Availability Zone in the endpoint\'s region. -- -- Example: 'us-east-1d' criAvailabilityZone :: Lens' CreateReplicationInstance (Maybe Text) criAvailabilityZone = lens _criAvailabilityZone (\ s a -> s{_criAvailabilityZone = a}); --- | The amount of storage (in gigabytes) to be initially allocated for the--- replication instance.+-- | The amount of storage (in gigabytes) to be initially allocated for the replication instance. criAllocatedStorage :: Lens' CreateReplicationInstance (Maybe Int) criAllocatedStorage = lens _criAllocatedStorage (\ s a -> s{_criAllocatedStorage = a}); @@ -177,8 +164,7 @@ criTags :: Lens' CreateReplicationInstance [Tag] criTags = lens _criTags (\ s a -> s{_criTags = a}) . _Default . _Coerce; --- | The replication instance identifier. This parameter is stored as a--- lowercase string.+-- | The replication instance identifier. This parameter is stored as a lowercase string. -- -- Constraints: --@@ -190,11 +176,9 @@ criReplicationInstanceIdentifier :: Lens' CreateReplicationInstance Text criReplicationInstanceIdentifier = lens _criReplicationInstanceIdentifier (\ s a -> s{_criReplicationInstanceIdentifier = a}); --- | The compute and memory capacity of the replication instance as specified--- by the replication instance class.+-- | The compute and memory capacity of the replication instance as specified by the replication instance class. ----- Valid Values:--- 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge '+-- Valid Values: 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge ' criReplicationInstanceClass :: Lens' CreateReplicationInstance Text criReplicationInstanceClass = lens _criReplicationInstanceClass (\ s a -> s{_criReplicationInstanceClass = a}); 

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Creates a replication subnet group given a list of the subnet IDs in a--- VPC.+-- Creates a replication subnet group given a list of the subnet IDs in a VPC. -- module Network.AWS.DMS.CreateReplicationSubnetGroup     (@@ -82,11 +81,9 @@ crsgTags :: Lens' CreateReplicationSubnetGroup [Tag] crsgTags = lens _crsgTags (\ s a -> s{_crsgTags = a}) . _Default . _Coerce; --- | The name for the replication subnet group. This value is stored as a--- lowercase string.+-- | The name for the replication subnet group. This value is stored as a lowercase string. ----- Constraints: Must contain no more than 255 alphanumeric characters,--- periods, spaces, underscores, or hyphens. Must not be \"default\".+-- Constraints: Must contain no more than 255 alphanumeric characters, periods, spaces, underscores, or hyphens. Must not be \"default\". -- -- Example: 'mySubnetgroup' crsgReplicationSubnetGroupIdentifier :: Lens' CreateReplicationSubnetGroup Text

@@ -128,13 +128,11 @@ crtReplicationTaskIdentifier :: Lens' CreateReplicationTask Text crtReplicationTaskIdentifier = lens _crtReplicationTaskIdentifier (\ s a -> s{_crtReplicationTaskIdentifier = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. crtSourceEndpointARN :: Lens' CreateReplicationTask Text crtSourceEndpointARN = lens _crtSourceEndpointARN (\ s a -> s{_crtSourceEndpointARN = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. crtTargetEndpointARN :: Lens' CreateReplicationTask Text crtTargetEndpointARN = lens _crtTargetEndpointARN (\ s a -> s{_crtTargetEndpointARN = a}); 

@@ -20,8 +20,7 @@ -- -- Deletes the specified endpoint. ----- All tasks associated with the endpoint must be deleted before you can--- delete the endpoint.+-- All tasks associated with the endpoint must be deleted before you can delete the endpoint. -- module Network.AWS.DMS.DeleteEndpoint     (@@ -64,8 +63,7 @@     { _deEndpointARN = pEndpointARN_     } --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. deEndpointARN :: Lens' DeleteEndpoint Text deEndpointARN = lens _deEndpointARN (\ s a -> s{_deEndpointARN = a}); 

@@ -20,8 +20,7 @@ -- -- Deletes the specified replication instance. ----- You must delete any migration tasks that are associated with the--- replication instance before you can delete it.+-- You must delete any migration tasks that are associated with the replication instance before you can delete it. -- module Network.AWS.DMS.DeleteReplicationInstance     (@@ -64,8 +63,7 @@     { _driReplicationInstanceARN = pReplicationInstanceARN_     } --- | The Amazon Resource Name (ARN) of the replication instance to be--- deleted.+-- | The Amazon Resource Name (ARN) of the replication instance to be deleted. driReplicationInstanceARN :: Lens' DeleteReplicationInstance Text driReplicationInstanceARN = lens _driReplicationInstanceARN (\ s a -> s{_driReplicationInstanceARN = a}); 

@@ -18,11 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Lists all of the AWS DMS attributes for a customer account. The--- attributes include AWS DMS quotas for the account, such as the number of--- replication instances allowed. The description for a quota includes the--- quota name, current usage toward that quota, and the quota\'s maximum--- value.+-- Lists all of the AWS DMS attributes for a customer account. The attributes include AWS DMS quotas for the account, such as the number of replication instances allowed. The description for a quota includes the quota name, current usage toward that quota, and the quota\'s maximum value. -- -- This command does not take any parameters. --

@@ -18,9 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Describes the status of the connections that have been made between the--- replication instance and an endpoint. Connections are created when you--- test an endpoint.+-- Describes the status of the connections that have been made between the replication instance and an endpoint. Connections are created when you test an endpoint. -- module Network.AWS.DMS.DescribeConnections     (@@ -79,16 +77,11 @@ dcFilters :: Lens' DescribeConnections [Filter] dcFilters = lens _dcFilters (\ s a -> s{_dcFilters = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dcMarker :: Lens' DescribeConnections (Maybe Text) dcMarker = lens _dcMarker (\ s a -> s{_dcMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -165,9 +158,7 @@ dcrsConnections :: Lens' DescribeConnectionsResponse [Connection] dcrsConnections = lens _dcrsConnections (\ s a -> s{_dcrsConnections = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dcrsMarker :: Lens' DescribeConnectionsResponse (Maybe Text) dcrsMarker = lens _dcrsMarker (\ s a -> s{_dcrsMarker = a}); 

@@ -77,16 +77,11 @@ detFilters :: Lens' DescribeEndpointTypes [Filter] detFilters = lens _detFilters (\ s a -> s{_detFilters = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. detMarker :: Lens' DescribeEndpointTypes (Maybe Text) detMarker = lens _detMarker (\ s a -> s{_detMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -164,9 +159,7 @@ detrsSupportedEndpointTypes :: Lens' DescribeEndpointTypesResponse [SupportedEndpointType] detrsSupportedEndpointTypes = lens _detrsSupportedEndpointTypes (\ s a -> s{_detrsSupportedEndpointTypes = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. detrsMarker :: Lens' DescribeEndpointTypesResponse (Maybe Text) detrsMarker = lens _detrsMarker (\ s a -> s{_detrsMarker = a}); 

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns information about the endpoints for your account in the current--- region.+-- Returns information about the endpoints for your account in the current region. -- module Network.AWS.DMS.DescribeEndpoints     (@@ -74,21 +73,15 @@  -- | Filters applied to the describe action. ----- Valid filter names: endpoint-arn | endpoint-type | endpoint-id |--- engine-name+-- Valid filter names: endpoint-arn | endpoint-type | endpoint-id | engine-name deFilters :: Lens' DescribeEndpoints [Filter] deFilters = lens _deFilters (\ s a -> s{_deFilters = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. deMarker :: Lens' DescribeEndpoints (Maybe Text) deMarker = lens _deMarker (\ s a -> s{_deMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -160,9 +153,7 @@     , _dersResponseStatus = pResponseStatus_     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dersMarker :: Lens' DescribeEndpointsResponse (Maybe Text) dersMarker = lens _dersMarker (\ s a -> s{_dersMarker = a}); 

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns information about the replication instance types that can be--- created in the specified region.+-- Returns information about the replication instance types that can be created in the specified region. -- module Network.AWS.DMS.DescribeOrderableReplicationInstances     (@@ -67,16 +66,11 @@     , _doriMaxRecords = Nothing     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. doriMarker :: Lens' DescribeOrderableReplicationInstances (Maybe Text) doriMarker = lens _doriMarker (\ s a -> s{_doriMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -155,9 +149,7 @@     , _dorirsResponseStatus = pResponseStatus_     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dorirsMarker :: Lens' DescribeOrderableReplicationInstancesResponse (Maybe Text) dorirsMarker = lens _dorirsMarker (\ s a -> s{_dorirsMarker = a}); 

@@ -61,8 +61,7 @@     { _drssEndpointARN = pEndpointARN_     } --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. drssEndpointARN :: Lens' DescribeRefreshSchemasStatus Text drssEndpointARN = lens _drssEndpointARN (\ s a -> s{_drssEndpointARN = a}); 

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns information about replication instances for your account in the--- current region.+-- Returns information about replication instances for your account in the current region. -- module Network.AWS.DMS.DescribeReplicationInstances     (@@ -74,21 +73,15 @@  -- | Filters applied to the describe action. ----- Valid filter names: replication-instance-arn | replication-instance-id |--- replication-instance-class | engine-version+-- Valid filter names: replication-instance-arn | replication-instance-id | replication-instance-class | engine-version driFilters :: Lens' DescribeReplicationInstances [Filter] driFilters = lens _driFilters (\ s a -> s{_driFilters = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. driMarker :: Lens' DescribeReplicationInstances (Maybe Text) driMarker = lens _driMarker (\ s a -> s{_driMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -163,9 +156,7 @@     , _drisrsResponseStatus = pResponseStatus_     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. drisrsMarker :: Lens' DescribeReplicationInstancesResponse (Maybe Text) drisrsMarker = lens _drisrsMarker (\ s a -> s{_drisrsMarker = a}); 

@@ -75,16 +75,11 @@ drsgFilters :: Lens' DescribeReplicationSubnetGroups [Filter] drsgFilters = lens _drsgFilters (\ s a -> s{_drsgFilters = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. drsgMarker :: Lens' DescribeReplicationSubnetGroups (Maybe Text) drsgMarker = lens _drsgMarker (\ s a -> s{_drsgMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -161,9 +156,7 @@     , _drsgsrsResponseStatus = pResponseStatus_     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. drsgsrsMarker :: Lens' DescribeReplicationSubnetGroupsResponse (Maybe Text) drsgsrsMarker = lens _drsgsrsMarker (\ s a -> s{_drsgsrsMarker = a}); 

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns information about replication tasks for your account in the--- current region.+-- Returns information about replication tasks for your account in the current region. -- module Network.AWS.DMS.DescribeReplicationTasks     (@@ -74,21 +73,15 @@  -- | Filters applied to the describe action. ----- Valid filter names: replication-task-arn | replication-task-id |--- migration-type | endpoint-arn | replication-instance-arn+-- Valid filter names: replication-task-arn | replication-task-id | migration-type | endpoint-arn | replication-instance-arn drtFilters :: Lens' DescribeReplicationTasks [Filter] drtFilters = lens _drtFilters (\ s a -> s{_drtFilters = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. drtMarker :: Lens' DescribeReplicationTasks (Maybe Text) drtMarker = lens _drtMarker (\ s a -> s{_drtMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -166,9 +159,7 @@ drtsrsReplicationTasks :: Lens' DescribeReplicationTasksResponse [ReplicationTask] drtsrsReplicationTasks = lens _drtsrsReplicationTasks (\ s a -> s{_drtsrsReplicationTasks = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. drtsrsMarker :: Lens' DescribeReplicationTasksResponse (Maybe Text) drtsrsMarker = lens _drtsrsMarker (\ s a -> s{_drtsrsMarker = a}); 

@@ -72,16 +72,11 @@     , _dsEndpointARN = pEndpointARN_     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dsMarker :: Lens' DescribeSchemas (Maybe Text) dsMarker = lens _dsMarker (\ s a -> s{_dsMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -89,8 +84,7 @@ dsMaxRecords :: Lens' DescribeSchemas (Maybe Int) dsMaxRecords = lens _dsMaxRecords (\ s a -> s{_dsMaxRecords = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. dsEndpointARN :: Lens' DescribeSchemas Text dsEndpointARN = lens _dsEndpointARN (\ s a -> s{_dsEndpointARN = a}); @@ -161,9 +155,7 @@ dsrsSchemas :: Lens' DescribeSchemasResponse [Text] dsrsSchemas = lens _dsrsSchemas (\ s a -> s{_dsrsSchemas = a}) . _Default . _Coerce; --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dsrsMarker :: Lens' DescribeSchemasResponse (Maybe Text) dsrsMarker = lens _dsrsMarker (\ s a -> s{_dsrsMarker = a}); 

@@ -18,8 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns table statistics on the database migration task, including table--- name, rows inserted, rows updated, and rows deleted.+-- Returns table statistics on the database migration task, including table name, rows inserted, rows updated, and rows deleted. -- module Network.AWS.DMS.DescribeTableStatistics     (@@ -74,16 +73,11 @@     , _dtsReplicationTaskARN = pReplicationTaskARN_     } --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dtsMarker :: Lens' DescribeTableStatistics (Maybe Text) dtsMarker = lens _dtsMarker (\ s a -> s{_dtsMarker = a}); --- | The maximum number of records to include in the response. If more--- records exist than the specified 'MaxRecords' value, a pagination token--- called a marker is included in the response so that the remaining--- results can be retrieved.+-- | The maximum number of records to include in the response. If more records exist than the specified 'MaxRecords' value, a pagination token called a marker is included in the response so that the remaining results can be retrieved. -- -- Default: 100 --@@ -170,9 +164,7 @@ dtsrsReplicationTaskARN :: Lens' DescribeTableStatisticsResponse (Maybe Text) dtsrsReplicationTaskARN = lens _dtsrsReplicationTaskARN (\ s a -> s{_dtsrsReplicationTaskARN = a}); --- | An optional pagination token provided by a previous request. If this--- parameter is specified, the response includes only records beyond the--- marker, up to the value specified by 'MaxRecords'.+-- | An optional pagination token provided by a previous request. If this parameter is specified, the response includes only records beyond the marker, up to the value specified by 'MaxRecords'. dtsrsMarker :: Lens' DescribeTableStatisticsResponse (Maybe Text) dtsrsMarker = lens _dtsrsMarker (\ s a -> s{_dtsrsMarker = a}); 

@@ -61,8 +61,7 @@     { _ltfrResourceARN = pResourceARN_     } --- | The Amazon Resource Name (ARN) string that uniquely identifies the AWS--- DMS resource.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the AWS DMS resource. ltfrResourceARN :: Lens' ListTagsForResource Text ltfrResourceARN = lens _ltfrResourceARN (\ s a -> s{_ltfrResourceARN = a}); 

@@ -122,8 +122,7 @@ meUsername :: Lens' ModifyEndpoint (Maybe Text) meUsername = lens _meUsername (\ s a -> s{_meUsername = a}); --- | The type of engine for the endpoint. Valid values include MYSQL, ORACLE,--- POSTGRES.+-- | The type of engine for the endpoint. Valid values include MYSQL, ORACLE, POSTGRES. meEngineName :: Lens' ModifyEndpoint (Maybe Text) meEngineName = lens _meEngineName (\ s a -> s{_meEngineName = a}); @@ -135,9 +134,7 @@ meDatabaseName :: Lens' ModifyEndpoint (Maybe Text) meDatabaseName = lens _meDatabaseName (\ s a -> s{_meDatabaseName = a}); --- | The database endpoint identifier. Identifiers must begin with a letter;--- must contain only ASCII letters, digits, and hyphens; and must not end--- with a hyphen or contain two consecutive hyphens.+-- | The database endpoint identifier. Identifiers must begin with a letter; must contain only ASCII letters, digits, and hyphens; and must not end with a hyphen or contain two consecutive hyphens. meEndpointIdentifier :: Lens' ModifyEndpoint (Maybe Text) meEndpointIdentifier = lens _meEndpointIdentifier (\ s a -> s{_meEndpointIdentifier = a}); @@ -145,8 +142,7 @@ mePort :: Lens' ModifyEndpoint (Maybe Int) mePort = lens _mePort (\ s a -> s{_mePort = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. meEndpointARN :: Lens' ModifyEndpoint Text meEndpointARN = lens _meEndpointARN (\ s a -> s{_meEndpointARN = a}); 

@@ -18,9 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Modifies the replication instance to apply new settings. You can change--- one or more parameters by specifying these parameters and the new values--- in the request.+-- Modifies the replication instance to apply new settings. You can change one or more parameters by specifying these parameters and the new values in the request. -- -- Some settings are applied during the maintenance window. --@@ -109,32 +107,17 @@ mriEngineVersion :: Lens' ModifyReplicationInstance (Maybe Text) mriEngineVersion = lens _mriEngineVersion (\ s a -> s{_mriEngineVersion = a}); --- | Indicates that minor version upgrades will be applied automatically to--- the replication instance during the maintenance window. Changing this--- parameter does not result in an outage except in the following case and--- the change is asynchronously applied as soon as possible. An outage will--- result if this parameter is set to 'true' during the maintenance window,--- and a newer minor version is available, and AWS DMS has enabled auto--- patching for that engine version.+-- | Indicates that minor version upgrades will be applied automatically to the replication instance during the maintenance window. Changing this parameter does not result in an outage except in the following case and the change is asynchronously applied as soon as possible. An outage will result if this parameter is set to 'true' during the maintenance window, and a newer minor version is available, and AWS DMS has enabled auto patching for that engine version. mriAutoMinorVersionUpgrade :: Lens' ModifyReplicationInstance (Maybe Bool) mriAutoMinorVersionUpgrade = lens _mriAutoMinorVersionUpgrade (\ s a -> s{_mriAutoMinorVersionUpgrade = a}); --- | Indicates that major version upgrades are allowed. Changing this--- parameter does not result in an outage and the change is asynchronously--- applied as soon as possible.+-- | Indicates that major version upgrades are allowed. Changing this parameter does not result in an outage and the change is asynchronously applied as soon as possible. ----- Constraints: This parameter must be set to true when specifying a value--- for the 'EngineVersion' parameter that is a different major version than--- the replication instance\'s current version.+-- Constraints: This parameter must be set to true when specifying a value for the 'EngineVersion' parameter that is a different major version than the replication instance\'s current version. mriAllowMajorVersionUpgrade :: Lens' ModifyReplicationInstance (Maybe Bool) mriAllowMajorVersionUpgrade = lens _mriAllowMajorVersionUpgrade (\ s a -> s{_mriAllowMajorVersionUpgrade = a}); --- | The weekly time range (in UTC) during which system maintenance can--- occur, which might result in an outage. Changing this parameter does not--- result in an outage, except in the following situation, and the change--- is asynchronously applied as soon as possible. If moving this window to--- the current time, there must be at least 30 minutes between the current--- time and end of the window to ensure pending changes are applied.+-- | The weekly time range (in UTC) during which system maintenance can occur, which might result in an outage. Changing this parameter does not result in an outage, except in the following situation, and the change is asynchronously applied as soon as possible. If moving this window to the current time, there must be at least 30 minutes between the current time and end of the window to ensure pending changes are applied. -- -- Default: Uses existing setting --@@ -146,25 +129,21 @@ mriPreferredMaintenanceWindow :: Lens' ModifyReplicationInstance (Maybe Text) mriPreferredMaintenanceWindow = lens _mriPreferredMaintenanceWindow (\ s a -> s{_mriPreferredMaintenanceWindow = a}); --- | The amount of storage (in gigabytes) to be allocated for the replication--- instance.+-- | The amount of storage (in gigabytes) to be allocated for the replication instance. mriAllocatedStorage :: Lens' ModifyReplicationInstance (Maybe Int) mriAllocatedStorage = lens _mriAllocatedStorage (\ s a -> s{_mriAllocatedStorage = a}); --- | Indicates whether the changes should be applied immediately or during--- the next maintenance window.+-- | Indicates whether the changes should be applied immediately or during the next maintenance window. mriApplyImmediately :: Lens' ModifyReplicationInstance (Maybe Bool) mriApplyImmediately = lens _mriApplyImmediately (\ s a -> s{_mriApplyImmediately = a});  -- | The compute and memory capacity of the replication instance. ----- Valid Values:--- 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge '+-- Valid Values: 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge ' mriReplicationInstanceClass :: Lens' ModifyReplicationInstance (Maybe Text) mriReplicationInstanceClass = lens _mriReplicationInstanceClass (\ s a -> s{_mriReplicationInstanceClass = a}); --- | The replication instance identifier. This parameter is stored as a--- lowercase string.+-- | The replication instance identifier. This parameter is stored as a lowercase string. mriReplicationInstanceIdentifier :: Lens' ModifyReplicationInstance (Maybe Text) mriReplicationInstanceIdentifier = lens _mriReplicationInstanceIdentifier (\ s a -> s{_mriReplicationInstanceIdentifier = a}); 

@@ -18,9 +18,7 @@ -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Populates the schema for the specified endpoint. This is an asynchronous--- operation and can take several minutes. You can check the status of this--- operation by calling the DescribeRefreshSchemasStatus operation.+-- Populates the schema for the specified endpoint. This is an asynchronous operation and can take several minutes. You can check the status of this operation by calling the DescribeRefreshSchemasStatus operation. -- module Network.AWS.DMS.RefreshSchemas     (@@ -69,8 +67,7 @@     , _rsReplicationInstanceARN = pReplicationInstanceARN_     } --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. rsEndpointARN :: Lens' RefreshSchemas Text rsEndpointARN = lens _rsEndpointARN (\ s a -> s{_rsEndpointARN = a}); 

@@ -65,8 +65,7 @@     , _rtfrTagKeys = mempty     } --- | >The Amazon Resource Name (ARN) of the AWS DMS resource the tag is to be--- removed from.+-- | >The Amazon Resource Name (ARN) of the AWS DMS resource the tag is to be removed from. rtfrResourceARN :: Lens' RemoveTagsFromResource Text rtfrResourceARN = lens _rtfrResourceARN (\ s a -> s{_rtfrResourceARN = a}); 

@@ -71,8 +71,7 @@ tcReplicationInstanceARN :: Lens' TestConnection Text tcReplicationInstanceARN = lens _tcReplicationInstanceARN (\ s a -> s{_tcReplicationInstanceARN = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. tcEndpointARN :: Lens' TestConnection Text tcEndpointARN = lens _tcEndpointARN (\ s a -> s{_tcEndpointARN = a}); 

@@ -249,14 +249,12 @@ _KMSKeyNotAccessibleFault :: AsError a => Getting (First ServiceError) a ServiceError _KMSKeyNotAccessibleFault = _ServiceError . hasCode "KMSKeyNotAccessibleFault" --- | The replication subnet group does not cover enough Availability Zones--- (AZs). Edit the replication subnet group and add more AZs.+-- | The replication subnet group does not cover enough Availability Zones (AZs). Edit the replication subnet group and add more AZs. _ReplicationSubnetGroupDoesNotCoverEnoughAZs :: AsError a => Getting (First ServiceError) a ServiceError _ReplicationSubnetGroupDoesNotCoverEnoughAZs =     _ServiceError . hasCode "ReplicationSubnetGroupDoesNotCoverEnoughAZs" --- | The resource is in a state that prevents it from being used for database--- migration.+-- | The resource is in a state that prevents it from being used for database migration. _InvalidResourceStateFault :: AsError a => Getting (First ServiceError) a ServiceError _InvalidResourceStateFault =     _ServiceError . hasCode "InvalidResourceStateFault"

@@ -21,8 +21,7 @@ import           Network.AWS.Lens import           Network.AWS.Prelude --- | Describes a quota for an AWS account, for example, the number of--- replication instances allowed.+-- | Describes a quota for an AWS account, for example, the number of replication instances allowed. -- -- /See:/ 'accountQuota' smart constructor. data AccountQuota = AccountQuota'@@ -148,19 +147,15 @@ cReplicationInstanceARN :: Lens' Connection (Maybe Text) cReplicationInstanceARN = lens _cReplicationInstanceARN (\ s a -> s{_cReplicationInstanceARN = a}); --- | The identifier of the endpoint. Identifiers must begin with a letter;--- must contain only ASCII letters, digits, and hyphens; and must not end--- with a hyphen or contain two consecutive hyphens.+-- | The identifier of the endpoint. Identifiers must begin with a letter; must contain only ASCII letters, digits, and hyphens; and must not end with a hyphen or contain two consecutive hyphens. cEndpointIdentifier :: Lens' Connection (Maybe Text) cEndpointIdentifier = lens _cEndpointIdentifier (\ s a -> s{_cEndpointIdentifier = a}); --- | The replication instance identifier. This parameter is stored as a--- lowercase string.+-- | The replication instance identifier. This parameter is stored as a lowercase string. cReplicationInstanceIdentifier :: Lens' Connection (Maybe Text) cReplicationInstanceIdentifier = lens _cReplicationInstanceIdentifier (\ s a -> s{_cReplicationInstanceIdentifier = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. cEndpointARN :: Lens' Connection (Maybe Text) cEndpointARN = lens _cEndpointARN (\ s a -> s{_cEndpointARN = a}); @@ -264,11 +259,7 @@ eEngineName :: Lens' Endpoint (Maybe Text) eEngineName = lens _eEngineName (\ s a -> s{_eEngineName = a}); --- | The KMS key identifier that will be used to encrypt the connection--- parameters. If you do not specify a value for the KmsKeyId parameter,--- then AWS DMS will use your default encryption key. AWS KMS creates the--- default encryption key for your AWS account. Your AWS account has a--- different default encryption key for each AWS region.+-- | The KMS key identifier that will be used to encrypt the connection parameters. If you do not specify a value for the KmsKeyId parameter, then AWS DMS will use your default encryption key. AWS KMS creates the default encryption key for your AWS account. Your AWS account has a different default encryption key for each AWS region. eKMSKeyId :: Lens' Endpoint (Maybe Text) eKMSKeyId = lens _eKMSKeyId (\ s a -> s{_eKMSKeyId = a}); @@ -276,14 +267,11 @@ eDatabaseName :: Lens' Endpoint (Maybe Text) eDatabaseName = lens _eDatabaseName (\ s a -> s{_eDatabaseName = a}); --- | The database endpoint identifier. Identifiers must begin with a letter;--- must contain only ASCII letters, digits, and hyphens; and must not end--- with a hyphen or contain two consecutive hyphens.+-- | The database endpoint identifier. Identifiers must begin with a letter; must contain only ASCII letters, digits, and hyphens; and must not end with a hyphen or contain two consecutive hyphens. eEndpointIdentifier :: Lens' Endpoint (Maybe Text) eEndpointIdentifier = lens _eEndpointIdentifier (\ s a -> s{_eEndpointIdentifier = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. eEndpointARN :: Lens' Endpoint (Maybe Text) eEndpointARN = lens _eEndpointARN (\ s a -> s{_eEndpointARN = a}); @@ -397,30 +385,25 @@ oriEngineVersion :: Lens' OrderableReplicationInstance (Maybe Text) oriEngineVersion = lens _oriEngineVersion (\ s a -> s{_oriEngineVersion = a}); --- | The minimum amount of storage (in gigabytes) that can be allocated for--- the replication instance.+-- | The minimum amount of storage (in gigabytes) that can be allocated for the replication instance. oriMinAllocatedStorage :: Lens' OrderableReplicationInstance (Maybe Int) oriMinAllocatedStorage = lens _oriMinAllocatedStorage (\ s a -> s{_oriMinAllocatedStorage = a}); --- | The amount of storage (in gigabytes) that is allocated for the--- replication instance.+-- | The amount of storage (in gigabytes) that is allocated for the replication instance. oriIncludedAllocatedStorage :: Lens' OrderableReplicationInstance (Maybe Int) oriIncludedAllocatedStorage = lens _oriIncludedAllocatedStorage (\ s a -> s{_oriIncludedAllocatedStorage = a}); --- | The minimum amount of storage (in gigabytes) that can be allocated for--- the replication instance.+-- | The minimum amount of storage (in gigabytes) that can be allocated for the replication instance. oriMaxAllocatedStorage :: Lens' OrderableReplicationInstance (Maybe Int) oriMaxAllocatedStorage = lens _oriMaxAllocatedStorage (\ s a -> s{_oriMaxAllocatedStorage = a});  -- | The compute and memory capacity of the replication instance. ----- Valid Values:--- 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge '+-- Valid Values: 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge ' oriReplicationInstanceClass :: Lens' OrderableReplicationInstance (Maybe Text) oriReplicationInstanceClass = lens _oriReplicationInstanceClass (\ s a -> s{_oriReplicationInstanceClass = a}); --- | The default amount of storage (in gigabytes) that is allocated for the--- replication instance.+-- | The default amount of storage (in gigabytes) that is allocated for the replication instance. oriDefaultAllocatedStorage :: Lens' OrderableReplicationInstance (Maybe Int) oriDefaultAllocatedStorage = lens _oriDefaultAllocatedStorage (\ s a -> s{_oriDefaultAllocatedStorage = a}); @@ -490,8 +473,7 @@ rssReplicationInstanceARN :: Lens' RefreshSchemasStatus (Maybe Text) rssReplicationInstanceARN = lens _rssReplicationInstanceARN (\ s a -> s{_rssReplicationInstanceARN = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. rssEndpointARN :: Lens' RefreshSchemasStatus (Maybe Text) rssEndpointARN = lens _rssEndpointARN (\ s a -> s{_rssEndpointARN = a}); @@ -594,15 +576,11 @@ riEngineVersion :: Lens' ReplicationInstance (Maybe Text) riEngineVersion = lens _riEngineVersion (\ s a -> s{_riEngineVersion = a}); --- | Specifies the accessibility options for the replication instance. A--- value of 'true' represents an instance with a public IP address. A value--- of 'false' represents an instance with a private IP address. The default--- value is 'true'.+-- | Specifies the accessibility options for the replication instance. A value of 'true' represents an instance with a public IP address. A value of 'false' represents an instance with a private IP address. The default value is 'true'. riPubliclyAccessible :: Lens' ReplicationInstance (Maybe Bool) riPubliclyAccessible = lens _riPubliclyAccessible (\ s a -> s{_riPubliclyAccessible = a}); --- | Boolean value indicating if minor version upgrades will be automatically--- applied to the instance.+-- | Boolean value indicating if minor version upgrades will be automatically applied to the instance. riAutoMinorVersionUpgrade :: Lens' ReplicationInstance (Maybe Bool) riAutoMinorVersionUpgrade = lens _riAutoMinorVersionUpgrade (\ s a -> s{_riAutoMinorVersionUpgrade = a}); @@ -626,11 +604,7 @@ riReplicationInstancePrivateIPAddress :: Lens' ReplicationInstance (Maybe Text) riReplicationInstancePrivateIPAddress = lens _riReplicationInstancePrivateIPAddress (\ s a -> s{_riReplicationInstancePrivateIPAddress = a}); --- | The KMS key identifier that is used to encrypt the content on the--- replication instance. If you do not specify a value for the KmsKeyId--- parameter, then AWS DMS will use your default encryption key. AWS KMS--- creates the default encryption key for your AWS account. Your AWS--- account has a different default encryption key for each AWS region.+-- | The KMS key identifier that is used to encrypt the content on the replication instance. If you do not specify a value for the KmsKeyId parameter, then AWS DMS will use your default encryption key. AWS KMS creates the default encryption key for your AWS account. Your AWS account has a different default encryption key for each AWS region. riKMSKeyId :: Lens' ReplicationInstance (Maybe Text) riKMSKeyId = lens _riKMSKeyId (\ s a -> s{_riKMSKeyId = a}); @@ -642,8 +616,7 @@ riReplicationInstanceARN :: Lens' ReplicationInstance (Maybe Text) riReplicationInstanceARN = lens _riReplicationInstanceARN (\ s a -> s{_riReplicationInstanceARN = a}); --- | The amount of storage (in gigabytes) that is allocated for the--- replication instance.+-- | The amount of storage (in gigabytes) that is allocated for the replication instance. riAllocatedStorage :: Lens' ReplicationInstance (Maybe Int) riAllocatedStorage = lens _riAllocatedStorage (\ s a -> s{_riAllocatedStorage = a}); @@ -653,13 +626,11 @@  -- | The compute and memory capacity of the replication instance. ----- Valid Values:--- 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge '+-- Valid Values: 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge ' riReplicationInstanceClass :: Lens' ReplicationInstance (Maybe Text) riReplicationInstanceClass = lens _riReplicationInstanceClass (\ s a -> s{_riReplicationInstanceClass = a}); --- | The replication instance identifier. This parameter is stored as a--- lowercase string.+-- | The replication instance identifier. This parameter is stored as a lowercase string. -- -- Constraints: --@@ -730,15 +701,13 @@ rpmvEngineVersion :: Lens' ReplicationPendingModifiedValues (Maybe Text) rpmvEngineVersion = lens _rpmvEngineVersion (\ s a -> s{_rpmvEngineVersion = a}); --- | The amount of storage (in gigabytes) that is allocated for the--- replication instance.+-- | The amount of storage (in gigabytes) that is allocated for the replication instance. rpmvAllocatedStorage :: Lens' ReplicationPendingModifiedValues (Maybe Int) rpmvAllocatedStorage = lens _rpmvAllocatedStorage (\ s a -> s{_rpmvAllocatedStorage = a});  -- | The compute and memory capacity of the replication instance. ----- Valid Values:--- 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge '+-- Valid Values: 'dms.t2.micro | dms.t2.small | dms.t2.medium | dms.t2.large | dms.c4.large | dms.c4.xlarge | dms.c4.2xlarge | dms.c4.4xlarge ' rpmvReplicationInstanceClass :: Lens' ReplicationPendingModifiedValues (Maybe Text) rpmvReplicationInstanceClass = lens _rpmvReplicationInstanceClass (\ s a -> s{_rpmvReplicationInstanceClass = a}); @@ -896,8 +865,7 @@ rtStatus :: Lens' ReplicationTask (Maybe Text) rtStatus = lens _rtStatus (\ s a -> s{_rtStatus = a}); --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. rtTargetEndpointARN :: Lens' ReplicationTask (Maybe Text) rtTargetEndpointARN = lens _rtTargetEndpointARN (\ s a -> s{_rtTargetEndpointARN = a}); @@ -915,8 +883,7 @@ rtReplicationTaskStartDate :: Lens' ReplicationTask (Maybe UTCTime) rtReplicationTaskStartDate = lens _rtReplicationTaskStartDate (\ s a -> s{_rtReplicationTaskStartDate = a}) . mapping _Time; --- | The Amazon Resource Name (ARN) string that uniquely identifies the--- endpoint.+-- | The Amazon Resource Name (ARN) string that uniquely identifies the endpoint. rtSourceEndpointARN :: Lens' ReplicationTask (Maybe Text) rtSourceEndpointARN = lens _rtSourceEndpointARN (\ s a -> s{_rtSourceEndpointARN = a}); @@ -936,8 +903,7 @@ rtReplicationTaskARN :: Lens' ReplicationTask (Maybe Text) rtReplicationTaskARN = lens _rtReplicationTaskARN (\ s a -> s{_rtReplicationTaskARN = a}); --- | The statistics for the task, including elapsed time, tables loaded, and--- table errors.+-- | The statistics for the task, including elapsed time, tables loaded, and table errors. rtReplicationTaskStats :: Lens' ReplicationTask (Maybe ReplicationTaskStats) rtReplicationTaskStats = lens _rtReplicationTaskStats (\ s a -> s{_rtReplicationTaskStats = a}); @@ -1212,8 +1178,7 @@ tsTableState :: Lens' TableStatistics (Maybe Text) tsTableState = lens _tsTableState (\ s a -> s{_tsTableState = a}); --- | The Data Definition Language (DDL) used to build and modify the--- structure of your tables.+-- | The Data Definition Language (DDL) used to build and modify the structure of your tables. tsDdls :: Lens' TableStatistics (Maybe Integer) tsDdls = lens _tsDdls (\ s a -> s{_tsDdls = a}); @@ -1272,19 +1237,11 @@     , _tagKey = Nothing     } --- | A value is the optional value of the tag. The string value can be from 1--- to 256 Unicode characters in length and cannot be prefixed with \"aws:\"--- or \"dms:\". The string can only contain only the set of Unicode--- letters, digits, white-space, \'_\', \'.\', \'\/\', \'=\', \'+\', \'-\'--- (Java regex: \"^([\\\\p{L}\\\\p{Z}\\\\p{N}_.:\/=+\\\\-]*)$\").+-- | A value is the optional value of the tag. The string value can be from 1 to 256 Unicode characters in length and cannot be prefixed with \"aws:\" or \"dms:\". The string can only contain only the set of Unicode letters, digits, white-space, \'_\', \'.\', \'\/\', \'=\', \'+\', \'-\' (Java regex: \"^([\\\\p{L}\\\\p{Z}\\\\p{N}_.:\/=+\\\\-]*)>\"). tagValue :: Lens' Tag (Maybe Text) tagValue = lens _tagValue (\ s a -> s{_tagValue = a}); --- | A key is the required name of the tag. The string value can be from 1 to--- 128 Unicode characters in length and cannot be prefixed with \"aws:\" or--- \"dms:\". The string can only contain only the set of Unicode letters,--- digits, white-space, \'_\', \'.\', \'\/\', \'=\', \'+\', \'-\' (Java--- regex: \"^([\\\\p{L}\\\\p{Z}\\\\p{N}_.:\/=+\\\\-]*)$\").+-- | A key is the required name of the tag. The string value can be from 1 to 128 Unicode characters in length and cannot be prefixed with \"aws:\" or \"dms:\". The string can only contain only the set of Unicode letters, digits, white-space, \'_\', \'.\', \'\/\', \'=\', \'+\', \'-\' (Java regex: \"^([\\\\p{L}\\\\p{Z}\\\\p{N}_.:\/=+\\\\-]*)>\"). tagKey :: Lens' Tag (Maybe Text) tagKey = lens _tagKey (\ s a -> s{_tagKey = a}); 

@@ -28,181 +28,181 @@ -- fixtures :: TestTree -- fixtures = --     [ testGroup "request"---         [ testDeleteReplicationInstance $+--         [ requestDeleteReplicationInstance $ --             deleteReplicationInstance -----         , testCreateEndpoint $+--         , requestCreateEndpoint $ --             createEndpoint -----         , testDescribeSchemas $+--         , requestDescribeSchemas $ --             describeSchemas -----         , testDeleteEndpoint $+--         , requestDeleteEndpoint $ --             deleteEndpoint -----         , testListTagsForResource $+--         , requestListTagsForResource $ --             listTagsForResource -----         , testDescribeEndpointTypes $+--         , requestDescribeEndpointTypes $ --             describeEndpointTypes -----         , testDeleteReplicationTask $+--         , requestDeleteReplicationTask $ --             deleteReplicationTask -----         , testTestConnection $+--         , requestTestConnection $ --             testConnection -----         , testDescribeConnections $+--         , requestDescribeConnections $ --             describeConnections -----         , testRemoveTagsFromResource $+--         , requestRemoveTagsFromResource $ --             removeTagsFromResource -----         , testModifyEndpoint $+--         , requestModifyEndpoint $ --             modifyEndpoint -----         , testDescribeTableStatistics $+--         , requestDescribeTableStatistics $ --             describeTableStatistics -----         , testDescribeReplicationSubnetGroups $+--         , requestDescribeReplicationSubnetGroups $ --             describeReplicationSubnetGroups -----         , testStartReplicationTask $+--         , requestStartReplicationTask $ --             startReplicationTask -----         , testAddTagsToResource $+--         , requestAddTagsToResource $ --             addTagsToResource -----         , testCreateReplicationSubnetGroup $+--         , requestCreateReplicationSubnetGroup $ --             createReplicationSubnetGroup -----         , testRefreshSchemas $+--         , requestRefreshSchemas $ --             refreshSchemas -----         , testDescribeReplicationTasks $+--         , requestDescribeReplicationTasks $ --             describeReplicationTasks -----         , testDescribeOrderableReplicationInstances $+--         , requestDescribeOrderableReplicationInstances $ --             describeOrderableReplicationInstances -----         , testCreateReplicationTask $+--         , requestCreateReplicationTask $ --             createReplicationTask -----         , testDescribeEndpoints $+--         , requestDescribeEndpoints $ --             describeEndpoints -----         , testModifyReplicationInstance $+--         , requestModifyReplicationInstance $ --             modifyReplicationInstance -----         , testModifyReplicationSubnetGroup $+--         , requestModifyReplicationSubnetGroup $ --             modifyReplicationSubnetGroup -----         , testDescribeAccountAttributes $+--         , requestDescribeAccountAttributes $ --             describeAccountAttributes -----         , testDescribeReplicationInstances $+--         , requestDescribeReplicationInstances $ --             describeReplicationInstances -----         , testDescribeRefreshSchemasStatus $+--         , requestDescribeRefreshSchemasStatus $ --             describeRefreshSchemasStatus -----         , testStopReplicationTask $+--         , requestStopReplicationTask $ --             stopReplicationTask -----         , testCreateReplicationInstance $+--         , requestCreateReplicationInstance $ --             createReplicationInstance -----         , testDeleteReplicationSubnetGroup $+--         , requestDeleteReplicationSubnetGroup $ --             deleteReplicationSubnetGroup -- --           ]  --     , testGroup "response"---         [ testDeleteReplicationInstanceResponse $+--         [ responseDeleteReplicationInstance $ --             deleteReplicationInstanceResponse -----         , testCreateEndpointResponse $+--         , responseCreateEndpoint $ --             createEndpointResponse -----         , testDescribeSchemasResponse $+--         , responseDescribeSchemas $ --             describeSchemasResponse -----         , testDeleteEndpointResponse $+--         , responseDeleteEndpoint $ --             deleteEndpointResponse -----         , testListTagsForResourceResponse $+--         , responseListTagsForResource $ --             listTagsForResourceResponse -----         , testDescribeEndpointTypesResponse $+--         , responseDescribeEndpointTypes $ --             describeEndpointTypesResponse -----         , testDeleteReplicationTaskResponse $+--         , responseDeleteReplicationTask $ --             deleteReplicationTaskResponse -----         , testTestConnectionResponse $+--         , responseTestConnection $ --             testConnectionResponse -----         , testDescribeConnectionsResponse $+--         , responseDescribeConnections $ --             describeConnectionsResponse -----         , testRemoveTagsFromResourceResponse $+--         , responseRemoveTagsFromResource $ --             removeTagsFromResourceResponse -----         , testModifyEndpointResponse $+--         , responseModifyEndpoint $ --             modifyEndpointResponse -----         , testDescribeTableStatisticsResponse $+--         , responseDescribeTableStatistics $ --             describeTableStatisticsResponse -----         , testDescribeReplicationSubnetGroupsResponse $+--         , responseDescribeReplicationSubnetGroups $ --             describeReplicationSubnetGroupsResponse -----         , testStartReplicationTaskResponse $+--         , responseStartReplicationTask $ --             startReplicationTaskResponse -----         , testAddTagsToResourceResponse $+--         , responseAddTagsToResource $ --             addTagsToResourceResponse -----         , testCreateReplicationSubnetGroupResponse $+--         , responseCreateReplicationSubnetGroup $ --             createReplicationSubnetGroupResponse -----         , testRefreshSchemasResponse $+--         , responseRefreshSchemas $ --             refreshSchemasResponse -----         , testDescribeReplicationTasksResponse $+--         , responseDescribeReplicationTasks $ --             describeReplicationTasksResponse -----         , testDescribeOrderableReplicationInstancesResponse $+--         , responseDescribeOrderableReplicationInstances $ --             describeOrderableReplicationInstancesResponse -----         , testCreateReplicationTaskResponse $+--         , responseCreateReplicationTask $ --             createReplicationTaskResponse -----         , testDescribeEndpointsResponse $+--         , responseDescribeEndpoints $ --             describeEndpointsResponse -----         , testModifyReplicationInstanceResponse $+--         , responseModifyReplicationInstance $ --             modifyReplicationInstanceResponse -----         , testModifyReplicationSubnetGroupResponse $+--         , responseModifyReplicationSubnetGroup $ --             modifyReplicationSubnetGroupResponse -----         , testDescribeAccountAttributesResponse $+--         , responseDescribeAccountAttributes $ --             describeAccountAttributesResponse -----         , testDescribeReplicationInstancesResponse $+--         , responseDescribeReplicationInstances $ --             describeReplicationInstancesResponse -----         , testDescribeRefreshSchemasStatusResponse $+--         , responseDescribeRefreshSchemasStatus $ --             describeRefreshSchemasStatusResponse -----         , testStopReplicationTaskResponse $+--         , responseStopReplicationTask $ --             stopReplicationTaskResponse -----         , testCreateReplicationInstanceResponse $+--         , responseCreateReplicationInstance $ --             createReplicationInstanceResponse -----         , testDeleteReplicationSubnetGroupResponse $+--         , responseDeleteReplicationSubnetGroup $ --             deleteReplicationSubnetGroupResponse -- --           ]@@ -210,351 +210,351 @@  -- Requests -testDeleteReplicationInstance :: DeleteReplicationInstance -> TestTree-testDeleteReplicationInstance = req+requestDeleteReplicationInstance :: DeleteReplicationInstance -> TestTree+requestDeleteReplicationInstance = req     "DeleteReplicationInstance"     "fixture/DeleteReplicationInstance.yaml" -testCreateEndpoint :: CreateEndpoint -> TestTree-testCreateEndpoint = req+requestCreateEndpoint :: CreateEndpoint -> TestTree+requestCreateEndpoint = req     "CreateEndpoint"     "fixture/CreateEndpoint.yaml" -testDescribeSchemas :: DescribeSchemas -> TestTree-testDescribeSchemas = req+requestDescribeSchemas :: DescribeSchemas -> TestTree+requestDescribeSchemas = req     "DescribeSchemas"     "fixture/DescribeSchemas.yaml" -testDeleteEndpoint :: DeleteEndpoint -> TestTree-testDeleteEndpoint = req+requestDeleteEndpoint :: DeleteEndpoint -> TestTree+requestDeleteEndpoint = req     "DeleteEndpoint"     "fixture/DeleteEndpoint.yaml" -testListTagsForResource :: ListTagsForResource -> TestTree-testListTagsForResource = req+requestListTagsForResource :: ListTagsForResource -> TestTree+requestListTagsForResource = req     "ListTagsForResource"     "fixture/ListTagsForResource.yaml" -testDescribeEndpointTypes :: DescribeEndpointTypes -> TestTree-testDescribeEndpointTypes = req+requestDescribeEndpointTypes :: DescribeEndpointTypes -> TestTree+requestDescribeEndpointTypes = req     "DescribeEndpointTypes"     "fixture/DescribeEndpointTypes.yaml" -testDeleteReplicationTask :: DeleteReplicationTask -> TestTree-testDeleteReplicationTask = req+requestDeleteReplicationTask :: DeleteReplicationTask -> TestTree+requestDeleteReplicationTask = req     "DeleteReplicationTask"     "fixture/DeleteReplicationTask.yaml" -testTestConnection :: TestConnection -> TestTree-testTestConnection = req+requestTestConnection :: TestConnection -> TestTree+requestTestConnection = req     "TestConnection"     "fixture/TestConnection.yaml" -testDescribeConnections :: DescribeConnections -> TestTree-testDescribeConnections = req+requestDescribeConnections :: DescribeConnections -> TestTree+requestDescribeConnections = req     "DescribeConnections"     "fixture/DescribeConnections.yaml" -testRemoveTagsFromResource :: RemoveTagsFromResource -> TestTree-testRemoveTagsFromResource = req+requestRemoveTagsFromResource :: RemoveTagsFromResource -> TestTree+requestRemoveTagsFromResource = req     "RemoveTagsFromResource"     "fixture/RemoveTagsFromResource.yaml" -testModifyEndpoint :: ModifyEndpoint -> TestTree-testModifyEndpoint = req+requestModifyEndpoint :: ModifyEndpoint -> TestTree+requestModifyEndpoint = req     "ModifyEndpoint"     "fixture/ModifyEndpoint.yaml" -testDescribeTableStatistics :: DescribeTableStatistics -> TestTree-testDescribeTableStatistics = req+requestDescribeTableStatistics :: DescribeTableStatistics -> TestTree+requestDescribeTableStatistics = req     "DescribeTableStatistics"     "fixture/DescribeTableStatistics.yaml" -testDescribeReplicationSubnetGroups :: DescribeReplicationSubnetGroups -> TestTree-testDescribeReplicationSubnetGroups = req+requestDescribeReplicationSubnetGroups :: DescribeReplicationSubnetGroups -> TestTree+requestDescribeReplicationSubnetGroups = req     "DescribeReplicationSubnetGroups"     "fixture/DescribeReplicationSubnetGroups.yaml" -testStartReplicationTask :: StartReplicationTask -> TestTree-testStartReplicationTask = req+requestStartReplicationTask :: StartReplicationTask -> TestTree+requestStartReplicationTask = req     "StartReplicationTask"     "fixture/StartReplicationTask.yaml" -testAddTagsToResource :: AddTagsToResource -> TestTree-testAddTagsToResource = req+requestAddTagsToResource :: AddTagsToResource -> TestTree+requestAddTagsToResource = req     "AddTagsToResource"     "fixture/AddTagsToResource.yaml" -testCreateReplicationSubnetGroup :: CreateReplicationSubnetGroup -> TestTree-testCreateReplicationSubnetGroup = req+requestCreateReplicationSubnetGroup :: CreateReplicationSubnetGroup -> TestTree+requestCreateReplicationSubnetGroup = req     "CreateReplicationSubnetGroup"     "fixture/CreateReplicationSubnetGroup.yaml" -testRefreshSchemas :: RefreshSchemas -> TestTree-testRefreshSchemas = req+requestRefreshSchemas :: RefreshSchemas -> TestTree+requestRefreshSchemas = req     "RefreshSchemas"     "fixture/RefreshSchemas.yaml" -testDescribeReplicationTasks :: DescribeReplicationTasks -> TestTree-testDescribeReplicationTasks = req+requestDescribeReplicationTasks :: DescribeReplicationTasks -> TestTree+requestDescribeReplicationTasks = req     "DescribeReplicationTasks"     "fixture/DescribeReplicationTasks.yaml" -testDescribeOrderableReplicationInstances :: DescribeOrderableReplicationInstances -> TestTree-testDescribeOrderableReplicationInstances = req+requestDescribeOrderableReplicationInstances :: DescribeOrderableReplicationInstances -> TestTree+requestDescribeOrderableReplicationInstances = req     "DescribeOrderableReplicationInstances"     "fixture/DescribeOrderableReplicationInstances.yaml" -testCreateReplicationTask :: CreateReplicationTask -> TestTree-testCreateReplicationTask = req+requestCreateReplicationTask :: CreateReplicationTask -> TestTree+requestCreateReplicationTask = req     "CreateReplicationTask"     "fixture/CreateReplicationTask.yaml" -testDescribeEndpoints :: DescribeEndpoints -> TestTree-testDescribeEndpoints = req+requestDescribeEndpoints :: DescribeEndpoints -> TestTree+requestDescribeEndpoints = req     "DescribeEndpoints"     "fixture/DescribeEndpoints.yaml" -testModifyReplicationInstance :: ModifyReplicationInstance -> TestTree-testModifyReplicationInstance = req+requestModifyReplicationInstance :: ModifyReplicationInstance -> TestTree+requestModifyReplicationInstance = req     "ModifyReplicationInstance"     "fixture/ModifyReplicationInstance.yaml" -testModifyReplicationSubnetGroup :: ModifyReplicationSubnetGroup -> TestTree-testModifyReplicationSubnetGroup = req+requestModifyReplicationSubnetGroup :: ModifyReplicationSubnetGroup -> TestTree+requestModifyReplicationSubnetGroup = req     "ModifyReplicationSubnetGroup"     "fixture/ModifyReplicationSubnetGroup.yaml" -testDescribeAccountAttributes :: DescribeAccountAttributes -> TestTree-testDescribeAccountAttributes = req+requestDescribeAccountAttributes :: DescribeAccountAttributes -> TestTree+requestDescribeAccountAttributes = req     "DescribeAccountAttributes"     "fixture/DescribeAccountAttributes.yaml" -testDescribeReplicationInstances :: DescribeReplicationInstances -> TestTree-testDescribeReplicationInstances = req+requestDescribeReplicationInstances :: DescribeReplicationInstances -> TestTree+requestDescribeReplicationInstances = req     "DescribeReplicationInstances"     "fixture/DescribeReplicationInstances.yaml" -testDescribeRefreshSchemasStatus :: DescribeRefreshSchemasStatus -> TestTree-testDescribeRefreshSchemasStatus = req+requestDescribeRefreshSchemasStatus :: DescribeRefreshSchemasStatus -> TestTree+requestDescribeRefreshSchemasStatus = req     "DescribeRefreshSchemasStatus"     "fixture/DescribeRefreshSchemasStatus.yaml" -testStopReplicationTask :: StopReplicationTask -> TestTree-testStopReplicationTask = req+requestStopReplicationTask :: StopReplicationTask -> TestTree+requestStopReplicationTask = req     "StopReplicationTask"     "fixture/StopReplicationTask.yaml" -testCreateReplicationInstance :: CreateReplicationInstance -> TestTree-testCreateReplicationInstance = req+requestCreateReplicationInstance :: CreateReplicationInstance -> TestTree+requestCreateReplicationInstance = req     "CreateReplicationInstance"     "fixture/CreateReplicationInstance.yaml" -testDeleteReplicationSubnetGroup :: DeleteReplicationSubnetGroup -> TestTree-testDeleteReplicationSubnetGroup = req+requestDeleteReplicationSubnetGroup :: DeleteReplicationSubnetGroup -> TestTree+requestDeleteReplicationSubnetGroup = req     "DeleteReplicationSubnetGroup"     "fixture/DeleteReplicationSubnetGroup.yaml"  -- Responses -testDeleteReplicationInstanceResponse :: DeleteReplicationInstanceResponse -> TestTree-testDeleteReplicationInstanceResponse = res+responseDeleteReplicationInstance :: DeleteReplicationInstanceResponse -> TestTree+responseDeleteReplicationInstance = res     "DeleteReplicationInstanceResponse"     "fixture/DeleteReplicationInstanceResponse.proto"     dms     (Proxy :: Proxy DeleteReplicationInstance) -testCreateEndpointResponse :: CreateEndpointResponse -> TestTree-testCreateEndpointResponse = res+responseCreateEndpoint :: CreateEndpointResponse -> TestTree+responseCreateEndpoint = res     "CreateEndpointResponse"     "fixture/CreateEndpointResponse.proto"     dms     (Proxy :: Proxy CreateEndpoint) -testDescribeSchemasResponse :: DescribeSchemasResponse -> TestTree-testDescribeSchemasResponse = res+responseDescribeSchemas :: DescribeSchemasResponse -> TestTree+responseDescribeSchemas = res     "DescribeSchemasResponse"     "fixture/DescribeSchemasResponse.proto"     dms     (Proxy :: Proxy DescribeSchemas) -testDeleteEndpointResponse :: DeleteEndpointResponse -> TestTree-testDeleteEndpointResponse = res+responseDeleteEndpoint :: DeleteEndpointResponse -> TestTree+responseDeleteEndpoint = res     "DeleteEndpointResponse"     "fixture/DeleteEndpointResponse.proto"     dms     (Proxy :: Proxy DeleteEndpoint) -testListTagsForResourceResponse :: ListTagsForResourceResponse -> TestTree-testListTagsForResourceResponse = res+responseListTagsForResource :: ListTagsForResourceResponse -> TestTree+responseListTagsForResource = res     "ListTagsForResourceResponse"     "fixture/ListTagsForResourceResponse.proto"     dms     (Proxy :: Proxy ListTagsForResource) -testDescribeEndpointTypesResponse :: DescribeEndpointTypesResponse -> TestTree-testDescribeEndpointTypesResponse = res+responseDescribeEndpointTypes :: DescribeEndpointTypesResponse -> TestTree+responseDescribeEndpointTypes = res     "DescribeEndpointTypesResponse"     "fixture/DescribeEndpointTypesResponse.proto"     dms     (Proxy :: Proxy DescribeEndpointTypes) -testDeleteReplicationTaskResponse :: DeleteReplicationTaskResponse -> TestTree-testDeleteReplicationTaskResponse = res+responseDeleteReplicationTask :: DeleteReplicationTaskResponse -> TestTree+responseDeleteReplicationTask = res     "DeleteReplicationTaskResponse"     "fixture/DeleteReplicationTaskResponse.proto"     dms     (Proxy :: Proxy DeleteReplicationTask) -testTestConnectionResponse :: TestConnectionResponse -> TestTree-testTestConnectionResponse = res+responseTestConnection :: TestConnectionResponse -> TestTree+responseTestConnection = res     "TestConnectionResponse"     "fixture/TestConnectionResponse.proto"     dms     (Proxy :: Proxy TestConnection) -testDescribeConnectionsResponse :: DescribeConnectionsResponse -> TestTree-testDescribeConnectionsResponse = res+responseDescribeConnections :: DescribeConnectionsResponse -> TestTree+responseDescribeConnections = res     "DescribeConnectionsResponse"     "fixture/DescribeConnectionsResponse.proto"     dms     (Proxy :: Proxy DescribeConnections) -testRemoveTagsFromResourceResponse :: RemoveTagsFromResourceResponse -> TestTree-testRemoveTagsFromResourceResponse = res+responseRemoveTagsFromResource :: RemoveTagsFromResourceResponse -> TestTree+responseRemoveTagsFromResource = res     "RemoveTagsFromResourceResponse"     "fixture/RemoveTagsFromResourceResponse.proto"     dms     (Proxy :: Proxy RemoveTagsFromResource) -testModifyEndpointResponse :: ModifyEndpointResponse -> TestTree-testModifyEndpointResponse = res+responseModifyEndpoint :: ModifyEndpointResponse -> TestTree+responseModifyEndpoint = res     "ModifyEndpointResponse"     "fixture/ModifyEndpointResponse.proto"     dms     (Proxy :: Proxy ModifyEndpoint) -testDescribeTableStatisticsResponse :: DescribeTableStatisticsResponse -> TestTree-testDescribeTableStatisticsResponse = res+responseDescribeTableStatistics :: DescribeTableStatisticsResponse -> TestTree+responseDescribeTableStatistics = res     "DescribeTableStatisticsResponse"     "fixture/DescribeTableStatisticsResponse.proto"     dms     (Proxy :: Proxy DescribeTableStatistics) -testDescribeReplicationSubnetGroupsResponse :: DescribeReplicationSubnetGroupsResponse -> TestTree-testDescribeReplicationSubnetGroupsResponse = res+responseDescribeReplicationSubnetGroups :: DescribeReplicationSubnetGroupsResponse -> TestTree+responseDescribeReplicationSubnetGroups = res     "DescribeReplicationSubnetGroupsResponse"     "fixture/DescribeReplicationSubnetGroupsResponse.proto"     dms     (Proxy :: Proxy DescribeReplicationSubnetGroups) -testStartReplicationTaskResponse :: StartReplicationTaskResponse -> TestTree-testStartReplicationTaskResponse = res+responseStartReplicationTask :: StartReplicationTaskResponse -> TestTree+responseStartReplicationTask = res     "StartReplicationTaskResponse"     "fixture/StartReplicationTaskResponse.proto"     dms     (Proxy :: Proxy StartReplicationTask) -testAddTagsToResourceResponse :: AddTagsToResourceResponse -> TestTree-testAddTagsToResourceResponse = res+responseAddTagsToResource :: AddTagsToResourceResponse -> TestTree+responseAddTagsToResource = res     "AddTagsToResourceResponse"     "fixture/AddTagsToResourceResponse.proto"     dms     (Proxy :: Proxy AddTagsToResource) -testCreateReplicationSubnetGroupResponse :: CreateReplicationSubnetGroupResponse -> TestTree-testCreateReplicationSubnetGroupResponse = res+responseCreateReplicationSubnetGroup :: CreateReplicationSubnetGroupResponse -> TestTree+responseCreateReplicationSubnetGroup = res     "CreateReplicationSubnetGroupResponse"     "fixture/CreateReplicationSubnetGroupResponse.proto"     dms     (Proxy :: Proxy CreateReplicationSubnetGroup) -testRefreshSchemasResponse :: RefreshSchemasResponse -> TestTree-testRefreshSchemasResponse = res+responseRefreshSchemas :: RefreshSchemasResponse -> TestTree+responseRefreshSchemas = res     "RefreshSchemasResponse"     "fixture/RefreshSchemasResponse.proto"     dms     (Proxy :: Proxy RefreshSchemas) -testDescribeReplicationTasksResponse :: DescribeReplicationTasksResponse -> TestTree-testDescribeReplicationTasksResponse = res+responseDescribeReplicationTasks :: DescribeReplicationTasksResponse -> TestTree+responseDescribeReplicationTasks = res     "DescribeReplicationTasksResponse"     "fixture/DescribeReplicationTasksResponse.proto"     dms     (Proxy :: Proxy DescribeReplicationTasks) -testDescribeOrderableReplicationInstancesResponse :: DescribeOrderableReplicationInstancesResponse -> TestTree-testDescribeOrderableReplicationInstancesResponse = res+responseDescribeOrderableReplicationInstances :: DescribeOrderableReplicationInstancesResponse -> TestTree+responseDescribeOrderableReplicationInstances = res     "DescribeOrderableReplicationInstancesResponse"     "fixture/DescribeOrderableReplicationInstancesResponse.proto"     dms     (Proxy :: Proxy DescribeOrderableReplicationInstances) -testCreateReplicationTaskResponse :: CreateReplicationTaskResponse -> TestTree-testCreateReplicationTaskResponse = res+responseCreateReplicationTask :: CreateReplicationTaskResponse -> TestTree+responseCreateReplicationTask = res     "CreateReplicationTaskResponse"     "fixture/CreateReplicationTaskResponse.proto"     dms     (Proxy :: Proxy CreateReplicationTask) -testDescribeEndpointsResponse :: DescribeEndpointsResponse -> TestTree-testDescribeEndpointsResponse = res+responseDescribeEndpoints :: DescribeEndpointsResponse -> TestTree+responseDescribeEndpoints = res     "DescribeEndpointsResponse"     "fixture/DescribeEndpointsResponse.proto"     dms     (Proxy :: Proxy DescribeEndpoints) -testModifyReplicationInstanceResponse :: ModifyReplicationInstanceResponse -> TestTree-testModifyReplicationInstanceResponse = res+responseModifyReplicationInstance :: ModifyReplicationInstanceResponse -> TestTree+responseModifyReplicationInstance = res     "ModifyReplicationInstanceResponse"     "fixture/ModifyReplicationInstanceResponse.proto"     dms     (Proxy :: Proxy ModifyReplicationInstance) -testModifyReplicationSubnetGroupResponse :: ModifyReplicationSubnetGroupResponse -> TestTree-testModifyReplicationSubnetGroupResponse = res+responseModifyReplicationSubnetGroup :: ModifyReplicationSubnetGroupResponse -> TestTree+responseModifyReplicationSubnetGroup = res     "ModifyReplicationSubnetGroupResponse"     "fixture/ModifyReplicationSubnetGroupResponse.proto"     dms     (Proxy :: Proxy ModifyReplicationSubnetGroup) -testDescribeAccountAttributesResponse :: DescribeAccountAttributesResponse -> TestTree-testDescribeAccountAttributesResponse = res+responseDescribeAccountAttributes :: DescribeAccountAttributesResponse -> TestTree+responseDescribeAccountAttributes = res     "DescribeAccountAttributesResponse"     "fixture/DescribeAccountAttributesResponse.proto"     dms     (Proxy :: Proxy DescribeAccountAttributes) -testDescribeReplicationInstancesResponse :: DescribeReplicationInstancesResponse -> TestTree-testDescribeReplicationInstancesResponse = res+responseDescribeReplicationInstances :: DescribeReplicationInstancesResponse -> TestTree+responseDescribeReplicationInstances = res     "DescribeReplicationInstancesResponse"     "fixture/DescribeReplicationInstancesResponse.proto"     dms     (Proxy :: Proxy DescribeReplicationInstances) -testDescribeRefreshSchemasStatusResponse :: DescribeRefreshSchemasStatusResponse -> TestTree-testDescribeRefreshSchemasStatusResponse = res+responseDescribeRefreshSchemasStatus :: DescribeRefreshSchemasStatusResponse -> TestTree+responseDescribeRefreshSchemasStatus = res     "DescribeRefreshSchemasStatusResponse"     "fixture/DescribeRefreshSchemasStatusResponse.proto"     dms     (Proxy :: Proxy DescribeRefreshSchemasStatus) -testStopReplicationTaskResponse :: StopReplicationTaskResponse -> TestTree-testStopReplicationTaskResponse = res+responseStopReplicationTask :: StopReplicationTaskResponse -> TestTree+responseStopReplicationTask = res     "StopReplicationTaskResponse"     "fixture/StopReplicationTaskResponse.proto"     dms     (Proxy :: Proxy StopReplicationTask) -testCreateReplicationInstanceResponse :: CreateReplicationInstanceResponse -> TestTree-testCreateReplicationInstanceResponse = res+responseCreateReplicationInstance :: CreateReplicationInstanceResponse -> TestTree+responseCreateReplicationInstance = res     "CreateReplicationInstanceResponse"     "fixture/CreateReplicationInstanceResponse.proto"     dms     (Proxy :: Proxy CreateReplicationInstance) -testDeleteReplicationSubnetGroupResponse :: DeleteReplicationSubnetGroupResponse -> TestTree-testDeleteReplicationSubnetGroupResponse = res+responseDeleteReplicationSubnetGroup :: DeleteReplicationSubnetGroupResponse -> TestTree+responseDeleteReplicationSubnetGroup = res     "DeleteReplicationSubnetGroupResponse"     "fixture/DeleteReplicationSubnetGroupResponse.proto"     dms