packages feed

amazonka-marketplace-metering 1.5.0 → 1.6.0

raw patch · 14 files changed

+82/−80 lines, 14 filesdep ~amazonka-coredep ~amazonka-testPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: amazonka-core, amazonka-test

API changes (from Hackage documentation)

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`1.5.0`+`1.6.0`   ## Description
amazonka-marketplace-metering.cabal view
@@ -1,5 +1,5 @@ name:                  amazonka-marketplace-metering-version:               1.5.0+version:               1.6.0 synopsis:              Amazon Marketplace Metering SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues@@ -7,7 +7,7 @@ license-file:          LICENSE author:                Brendan Hay maintainer:            Brendan Hay <brendan.g.hay+amazonka@gmail.com>-copyright:             Copyright (c) 2013-2017 Brendan Hay+copyright:             Copyright (c) 2013-2018 Brendan Hay category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10@@ -56,7 +56,7 @@         , Network.AWS.MarketplaceMetering.Types.Sum      build-depends:-          amazonka-core == 1.5.0.*+          amazonka-core == 1.6.0.*         , base          >= 4.7     && < 5  test-suite amazonka-marketplace-metering-test@@ -76,8 +76,8 @@         , Test.AWS.MarketplaceMetering.Internal      build-depends:-          amazonka-core == 1.5.0.*-        , amazonka-test == 1.5.0.*+          amazonka-core == 1.6.0.*+        , amazonka-test == 1.6.0.*         , amazonka-marketplace-metering         , base         , bytestring
gen/Network/AWS/MarketplaceMetering.hs view
@@ -5,7 +5,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
gen/Network/AWS/MarketplaceMetering/BatchMeterUsage.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.BatchMeterUsage--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -79,11 +79,11 @@  -- | The set of UsageRecords to submit. BatchMeterUsage accepts up to 25 UsageRecords at a time. bmuUsageRecords :: Lens' BatchMeterUsage [UsageRecord]-bmuUsageRecords = lens _bmuUsageRecords (\ s a -> s{_bmuUsageRecords = a}) . _Coerce;+bmuUsageRecords = lens _bmuUsageRecords (\ s a -> s{_bmuUsageRecords = a}) . _Coerce  -- | Product code is used to uniquely identify a product in AWS Marketplace. The product code should be the same as the one used during the publishing of a new product. bmuProductCode :: Lens' BatchMeterUsage Text-bmuProductCode = lens _bmuProductCode (\ s a -> s{_bmuProductCode = a});+bmuProductCode = lens _bmuProductCode (\ s a -> s{_bmuProductCode = a})  instance AWSRequest BatchMeterUsage where         type Rs BatchMeterUsage = BatchMeterUsageResponse@@ -149,22 +149,22 @@     -> BatchMeterUsageResponse batchMeterUsageResponse pResponseStatus_ =   BatchMeterUsageResponse'-  { _bmursResults = Nothing-  , _bmursUnprocessedRecords = Nothing-  , _bmursResponseStatus = pResponseStatus_-  }+    { _bmursResults = Nothing+    , _bmursUnprocessedRecords = Nothing+    , _bmursResponseStatus = pResponseStatus_+    }   -- | Contains all UsageRecords processed by BatchMeterUsage. These records were either honored by AWS Marketplace Metering Service or were invalid. bmursResults :: Lens' BatchMeterUsageResponse [UsageRecordResult]-bmursResults = lens _bmursResults (\ s a -> s{_bmursResults = a}) . _Default . _Coerce;+bmursResults = lens _bmursResults (\ s a -> s{_bmursResults = a}) . _Default . _Coerce  -- | Contains all UsageRecords that were not processed by BatchMeterUsage. This is a list of UsageRecords. You can retry the failed request by making another BatchMeterUsage call with this list as input in the BatchMeterUsageRequest. bmursUnprocessedRecords :: Lens' BatchMeterUsageResponse [UsageRecord]-bmursUnprocessedRecords = lens _bmursUnprocessedRecords (\ s a -> s{_bmursUnprocessedRecords = a}) . _Default . _Coerce;+bmursUnprocessedRecords = lens _bmursUnprocessedRecords (\ s a -> s{_bmursUnprocessedRecords = a}) . _Default . _Coerce  -- | -- | The response status code. bmursResponseStatus :: Lens' BatchMeterUsageResponse Int-bmursResponseStatus = lens _bmursResponseStatus (\ s a -> s{_bmursResponseStatus = a});+bmursResponseStatus = lens _bmursResponseStatus (\ s a -> s{_bmursResponseStatus = a})  instance NFData BatchMeterUsageResponse where
gen/Network/AWS/MarketplaceMetering/MeterUsage.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.MeterUsage--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -82,33 +82,33 @@     -> MeterUsage meterUsage pProductCode_ pTimestamp_ pUsageDimension_ pUsageQuantity_ pDryRun_ =   MeterUsage'-  { _muProductCode = pProductCode_-  , _muTimestamp = _Time # pTimestamp_-  , _muUsageDimension = pUsageDimension_-  , _muUsageQuantity = _Nat # pUsageQuantity_-  , _muDryRun = pDryRun_-  }+    { _muProductCode = pProductCode_+    , _muTimestamp = _Time # pTimestamp_+    , _muUsageDimension = pUsageDimension_+    , _muUsageQuantity = _Nat # pUsageQuantity_+    , _muDryRun = pDryRun_+    }   -- | Product code is used to uniquely identify a product in AWS Marketplace. The product code should be the same as the one used during the publishing of a new product. muProductCode :: Lens' MeterUsage Text-muProductCode = lens _muProductCode (\ s a -> s{_muProductCode = a});+muProductCode = lens _muProductCode (\ s a -> s{_muProductCode = a})  -- | Timestamp of the hour, recorded in UTC. The seconds and milliseconds portions of the timestamp will be ignored. muTimestamp :: Lens' MeterUsage UTCTime-muTimestamp = lens _muTimestamp (\ s a -> s{_muTimestamp = a}) . _Time;+muTimestamp = lens _muTimestamp (\ s a -> s{_muTimestamp = a}) . _Time  -- | It will be one of the fcp dimension name provided during the publishing of the product. muUsageDimension :: Lens' MeterUsage Text-muUsageDimension = lens _muUsageDimension (\ s a -> s{_muUsageDimension = a});+muUsageDimension = lens _muUsageDimension (\ s a -> s{_muUsageDimension = a})  -- | Consumption value for the hour. muUsageQuantity :: Lens' MeterUsage Natural-muUsageQuantity = lens _muUsageQuantity (\ s a -> s{_muUsageQuantity = a}) . _Nat;+muUsageQuantity = lens _muUsageQuantity (\ s a -> s{_muUsageQuantity = a}) . _Nat  -- | Checks whether you have the permissions required for the action, but does not make the request. If you have the permissions, the request returns DryRunOperation; otherwise, it returns UnauthorizedException. muDryRun :: Lens' MeterUsage Bool-muDryRun = lens _muDryRun (\ s a -> s{_muDryRun = a});+muDryRun = lens _muDryRun (\ s a -> s{_muDryRun = a})  instance AWSRequest MeterUsage where         type Rs MeterUsage = MeterUsageResponse@@ -167,15 +167,15 @@     -> MeterUsageResponse meterUsageResponse pResponseStatus_ =   MeterUsageResponse'-  {_mursMeteringRecordId = Nothing, _mursResponseStatus = pResponseStatus_}+    {_mursMeteringRecordId = Nothing, _mursResponseStatus = pResponseStatus_}   -- | Undocumented member. mursMeteringRecordId :: Lens' MeterUsageResponse (Maybe Text)-mursMeteringRecordId = lens _mursMeteringRecordId (\ s a -> s{_mursMeteringRecordId = a});+mursMeteringRecordId = lens _mursMeteringRecordId (\ s a -> s{_mursMeteringRecordId = a})  -- | -- | The response status code. mursResponseStatus :: Lens' MeterUsageResponse Int-mursResponseStatus = lens _mursResponseStatus (\ s a -> s{_mursResponseStatus = a});+mursResponseStatus = lens _mursResponseStatus (\ s a -> s{_mursResponseStatus = a})  instance NFData MeterUsageResponse where
gen/Network/AWS/MarketplaceMetering/ResolveCustomer.hs view
@@ -12,7 +12,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.ResolveCustomer--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -69,7 +69,7 @@  -- | When a buyer visits your website during the registration process, the buyer submits a registration token through the browser. The registration token is resolved to obtain a CustomerIdentifier and product code. rcRegistrationToken :: Lens' ResolveCustomer Text-rcRegistrationToken = lens _rcRegistrationToken (\ s a -> s{_rcRegistrationToken = a});+rcRegistrationToken = lens _rcRegistrationToken (\ s a -> s{_rcRegistrationToken = a})  instance AWSRequest ResolveCustomer where         type Rs ResolveCustomer = ResolveCustomerResponse@@ -134,22 +134,22 @@     -> ResolveCustomerResponse resolveCustomerResponse pResponseStatus_ =   ResolveCustomerResponse'-  { _rcrsCustomerIdentifier = Nothing-  , _rcrsProductCode = Nothing-  , _rcrsResponseStatus = pResponseStatus_-  }+    { _rcrsCustomerIdentifier = Nothing+    , _rcrsProductCode = Nothing+    , _rcrsResponseStatus = pResponseStatus_+    }   -- | The CustomerIdentifier is used to identify an individual customer in your application. Calls to BatchMeterUsage require CustomerIdentifiers for each UsageRecord. rcrsCustomerIdentifier :: Lens' ResolveCustomerResponse (Maybe Text)-rcrsCustomerIdentifier = lens _rcrsCustomerIdentifier (\ s a -> s{_rcrsCustomerIdentifier = a});+rcrsCustomerIdentifier = lens _rcrsCustomerIdentifier (\ s a -> s{_rcrsCustomerIdentifier = a})  -- | The product code is returned to confirm that the buyer is registering for your product. Subsequent BatchMeterUsage calls should be made using this product code. rcrsProductCode :: Lens' ResolveCustomerResponse (Maybe Text)-rcrsProductCode = lens _rcrsProductCode (\ s a -> s{_rcrsProductCode = a});+rcrsProductCode = lens _rcrsProductCode (\ s a -> s{_rcrsProductCode = a})  -- | -- | The response status code. rcrsResponseStatus :: Lens' ResolveCustomerResponse Int-rcrsResponseStatus = lens _rcrsResponseStatus (\ s a -> s{_rcrsResponseStatus = a});+rcrsResponseStatus = lens _rcrsResponseStatus (\ s a -> s{_rcrsResponseStatus = a})  instance NFData ResolveCustomerResponse where
gen/Network/AWS/MarketplaceMetering/Types.hs view
@@ -4,7 +4,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.Types--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -56,24 +56,24 @@ marketplaceMetering :: Service marketplaceMetering =   Service-  { _svcAbbrev = "MarketplaceMetering"-  , _svcSigner = v4-  , _svcPrefix = "metering.marketplace"-  , _svcVersion = "2016-01-14"-  , _svcEndpoint = defaultEndpoint marketplaceMetering-  , _svcTimeout = Just 70-  , _svcCheck = statusSuccess-  , _svcError = parseJSONError "MarketplaceMetering"-  , _svcRetry = retry-  }+    { _svcAbbrev = "MarketplaceMetering"+    , _svcSigner = v4+    , _svcPrefix = "metering.marketplace"+    , _svcVersion = "2016-01-14"+    , _svcEndpoint = defaultEndpoint marketplaceMetering+    , _svcTimeout = Just 70+    , _svcCheck = statusSuccess+    , _svcError = parseJSONError "MarketplaceMetering"+    , _svcRetry = retry+    }   where     retry =       Exponential-      { _retryBase = 5.0e-2-      , _retryGrowth = 2-      , _retryAttempts = 5-      , _retryCheck = check-      }+        { _retryBase = 5.0e-2+        , _retryGrowth = 2+        , _retryAttempts = 5+        , _retryCheck = check+        }     check e       | has (hasCode "ThrottledException" . hasStatus 400) e =         Just "throttled_exception"@@ -82,6 +82,8 @@         Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"       | has (hasStatus 504) e = Just "gateway_timeout"+      | has (hasCode "RequestThrottledException" . hasStatus 400) e =+        Just "request_throttled_exception"       | has (hasStatus 502) e = Just "bad_gateway"       | has (hasStatus 503) e = Just "service_unavailable"       | has (hasStatus 500) e = Just "general_server_error"
gen/Network/AWS/MarketplaceMetering/Types/Product.hs view
@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.Types.Product--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated@@ -55,28 +55,28 @@     -> UsageRecord usageRecord pTimestamp_ pCustomerIdentifier_ pDimension_ pQuantity_ =   UsageRecord'-  { _urTimestamp = _Time # pTimestamp_-  , _urCustomerIdentifier = pCustomerIdentifier_-  , _urDimension = pDimension_-  , _urQuantity = _Nat # pQuantity_-  }+    { _urTimestamp = _Time # pTimestamp_+    , _urCustomerIdentifier = pCustomerIdentifier_+    , _urDimension = pDimension_+    , _urQuantity = _Nat # pQuantity_+    }   -- | Timestamp of the hour, recorded in UTC. The seconds and milliseconds portions of the timestamp will be ignored. Your application can meter usage for up to one hour in the past. urTimestamp :: Lens' UsageRecord UTCTime-urTimestamp = lens _urTimestamp (\ s a -> s{_urTimestamp = a}) . _Time;+urTimestamp = lens _urTimestamp (\ s a -> s{_urTimestamp = a}) . _Time  -- | The CustomerIdentifier is obtained through the ResolveCustomer operation and represents an individual buyer in your application. urCustomerIdentifier :: Lens' UsageRecord Text-urCustomerIdentifier = lens _urCustomerIdentifier (\ s a -> s{_urCustomerIdentifier = a});+urCustomerIdentifier = lens _urCustomerIdentifier (\ s a -> s{_urCustomerIdentifier = a})  -- | During the process of registering a product on AWS Marketplace, up to eight dimensions are specified. These represent different units of value in your application. urDimension :: Lens' UsageRecord Text-urDimension = lens _urDimension (\ s a -> s{_urDimension = a});+urDimension = lens _urDimension (\ s a -> s{_urDimension = a})  -- | The quantity of usage consumed by the customer for the given dimension and time. urQuantity :: Lens' UsageRecord Natural-urQuantity = lens _urQuantity (\ s a -> s{_urQuantity = a}) . _Nat;+urQuantity = lens _urQuantity (\ s a -> s{_urQuantity = a}) . _Nat  instance FromJSON UsageRecord where         parseJSON@@ -125,23 +125,23 @@     :: UsageRecordResult usageRecordResult =   UsageRecordResult'-  { _urrStatus = Nothing-  , _urrUsageRecord = Nothing-  , _urrMeteringRecordId = Nothing-  }+    { _urrStatus = Nothing+    , _urrUsageRecord = Nothing+    , _urrMeteringRecordId = Nothing+    }   -- | The UsageRecordResult Status indicates the status of an individual UsageRecord processed by BatchMeterUsage.     * /Success/ - The UsageRecord was accepted and honored by BatchMeterUsage.     * /CustomerNotSubscribed/ - The CustomerIdentifier specified is not subscribed to your product. The UsageRecord was not honored. Future UsageRecords for this customer will fail until the customer subscribes to your product.     * /DuplicateRecord/ - Indicates that the UsageRecord was invalid and not honored. A previously metered UsageRecord had the same customer, dimension, and time, but a different quantity. urrStatus :: Lens' UsageRecordResult (Maybe UsageRecordResultStatus)-urrStatus = lens _urrStatus (\ s a -> s{_urrStatus = a});+urrStatus = lens _urrStatus (\ s a -> s{_urrStatus = a})  -- | The UsageRecord that was part of the BatchMeterUsage request. urrUsageRecord :: Lens' UsageRecordResult (Maybe UsageRecord)-urrUsageRecord = lens _urrUsageRecord (\ s a -> s{_urrUsageRecord = a});+urrUsageRecord = lens _urrUsageRecord (\ s a -> s{_urrUsageRecord = a})  -- | The MeteringRecordId is a unique identifier for this metering event. urrMeteringRecordId :: Lens' UsageRecordResult (Maybe Text)-urrMeteringRecordId = lens _urrMeteringRecordId (\ s a -> s{_urrMeteringRecordId = a});+urrMeteringRecordId = lens _urrMeteringRecordId (\ s a -> s{_urrMeteringRecordId = a})  instance FromJSON UsageRecordResult where         parseJSON
gen/Network/AWS/MarketplaceMetering/Types/Sum.hs view
@@ -9,7 +9,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.Types.Sum--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
gen/Network/AWS/MarketplaceMetering/Waiters.hs view
@@ -7,7 +7,7 @@  -- | -- Module      : Network.AWS.MarketplaceMetering.Waiters--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
test/Main.hs view
@@ -2,7 +2,7 @@  -- | -- Module      : Main--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
test/Test/AWS/Gen/MarketplaceMetering.hs view
@@ -5,7 +5,7 @@  -- | -- Module      : Test.AWS.Gen.MarketplaceMetering--- Copyright   : (c) 2013-2017 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated
test/Test/AWS/MarketplaceMetering.hs view
@@ -3,7 +3,7 @@  -- | -- Module      : Test.AWS.MarketplaceMetering--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : experimental
test/Test/AWS/MarketplaceMetering/Internal.hs view
@@ -3,7 +3,7 @@  -- | -- Module      : Test.AWS.MarketplaceMetering.Internal--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2018 Brendan Hay -- License     : Mozilla Public License, v. 2.0. -- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com> -- Stability   : experimental