amazonka-sqs 1.4.5 → 1.5.0

raw patch · 35 files changed

+1454/−919 lines, 35 filesdep ~amazonka-coredep ~amazonka-sqsdep ~amazonka-testPVP ok

version bump matches the API change (PVP)

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

API changes (from Hackage documentation)

Files

• README.md +1/−1
• amazonka-sqs.cabal +19/−11
• fixture/ListQueueTags.yaml +10/−0
• fixture/ListQueueTagsResponse.proto +0/−0
• fixture/TagQueue.yaml +10/−0
• fixture/TagQueueResponse.proto +0/−0
• fixture/UntagQueue.yaml +10/−0
• fixture/UntagQueueResponse.proto +0/−0
• gen/Network/AWS/SQS.hs +47/−41
• gen/Network/AWS/SQS/AddPermission.hs +38/−38
• gen/Network/AWS/SQS/ChangeMessageVisibility.hs +42/−32
• gen/Network/AWS/SQS/ChangeMessageVisibilityBatch.hs +38/−39
• gen/Network/AWS/SQS/CreateQueue.hs +33/−40
• gen/Network/AWS/SQS/DeleteMessage.hs +24/−25
• gen/Network/AWS/SQS/DeleteMessageBatch.hs +37/−40
• gen/Network/AWS/SQS/DeleteQueue.hs +26/−25
• gen/Network/AWS/SQS/GetQueueAttributes.hs +30/−35
• gen/Network/AWS/SQS/GetQueueURL.hs +31/−31
• gen/Network/AWS/SQS/ListDeadLetterSourceQueues.hs +29/−28
• gen/Network/AWS/SQS/ListQueueTags.hs +141/−0
• gen/Network/AWS/SQS/ListQueues.hs +26/−27
• gen/Network/AWS/SQS/PurgeQueue.hs +25/−24
• gen/Network/AWS/SQS/ReceiveMessage.hs +60/−58
• gen/Network/AWS/SQS/RemovePermission.hs +25/−24
• gen/Network/AWS/SQS/SendMessage.hs +67/−63
• gen/Network/AWS/SQS/SendMessageBatch.hs +43/−46
• gen/Network/AWS/SQS/SetQueueAttributes.hs +26/−25
• gen/Network/AWS/SQS/TagQueue.hs +125/−0
• gen/Network/AWS/SQS/Types.hs +80/−62
• gen/Network/AWS/SQS/Types/Product.hs +184/−165
• gen/Network/AWS/SQS/Types/Sum.hs +35/−27
• gen/Network/AWS/SQS/UntagQueue.hs +126/−0
• gen/Network/AWS/SQS/Waiters.hs +6/−6
• test/Main.hs +2/−2
• test/Test/AWS/Gen/SQS.hs +58/−4

@@ -8,7 +8,7 @@  ## Version -`1.4.5`+`1.5.0`   ## Description

@@ -1,13 +1,13 @@ name:                  amazonka-sqs-version:               1.4.5+version:               1.5.0 synopsis:              Amazon Simple Queue Service SDK. homepage:              https://github.com/brendanhay/amazonka bug-reports:           https://github.com/brendanhay/amazonka/issues-license:               OtherLicense+license:               MPL-2.0 license-file:          LICENSE author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2013-2016 Brendan Hay+maintainer:            Brendan Hay <brendan.g.hay+amazonka@gmail.com>+copyright:             Copyright (c) 2013-2017 Brendan Hay category:              Network, AWS, Cloud, Distributed Computing build-type:            Simple cabal-version:         >= 1.10@@ -29,14 +29,19 @@     to get started.  source-repository head-    type:     git-    location: git://github.com/brendanhay/amazonka.git+    type:              git+    location:          git://github.com/brendanhay/amazonka.git+    subdir:            amazonka-sqs  library     default-language:  Haskell2010     hs-source-dirs:    src gen -    ghc-options:       -Wall+    ghc-options:+        -Wall+        -fwarn-incomplete-uni-patterns+        -fwarn-incomplete-record-updates+        -funbox-strict-fields      exposed-modules:           Network.AWS.SQS@@ -50,6 +55,7 @@         , Network.AWS.SQS.GetQueueAttributes         , Network.AWS.SQS.GetQueueURL         , Network.AWS.SQS.ListDeadLetterSourceQueues+        , Network.AWS.SQS.ListQueueTags         , Network.AWS.SQS.ListQueues         , Network.AWS.SQS.PurgeQueue         , Network.AWS.SQS.ReceiveMessage@@ -57,7 +63,9 @@         , Network.AWS.SQS.SendMessage         , Network.AWS.SQS.SendMessageBatch         , Network.AWS.SQS.SetQueueAttributes+        , Network.AWS.SQS.TagQueue         , Network.AWS.SQS.Types+        , Network.AWS.SQS.UntagQueue         , Network.AWS.SQS.Waiters      other-modules:@@ -65,7 +73,7 @@         , Network.AWS.SQS.Types.Sum      build-depends:-          amazonka-core == 1.4.5.*+          amazonka-core == 1.5.0.*         , base          >= 4.7     && < 5  test-suite amazonka-sqs-test@@ -85,9 +93,9 @@         , Test.AWS.SQS.Internal      build-depends:-          amazonka-core == 1.4.5.*-        , amazonka-test == 1.4.5.*-        , amazonka-sqs == 1.4.5.*+          amazonka-core == 1.5.0.*+        , amazonka-test == 1.5.0.*+        , amazonka-sqs         , base         , bytestring         , tasty

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/sqs/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  sqs.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/sqs/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  sqs.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -0,0 +1,10 @@+---+method: POST+headers:+  Authorization:         AWS4-HMAC-SHA256 Credential=access/20091028/us-east-1/sqs/aws4_request, SignedHeaders=content-type;host;x-amz-content-sha256;x-amz-date, Signature=?+  Host:                  sqs.us-east-1.amazonaws.com+  Content-Type:          application/x-www-form-urlencoded; charset=utf-8+  X-Amz-Content-SHA256:  abcdef+  X-Amz-Date:            20091028T223200Z+body:+  ''

@@ -5,55 +5,49 @@  -- | -- Module      : Network.AWS.SQS--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Welcome to the /Amazon Simple Queue Service API Reference/ . This section describes who should read this guide, how the guide is organized, and other resources related to the Amazon Simple Queue Service (Amazon SQS).+-- Welcome to the /Amazon Simple Queue Service API Reference/ . -- ----- Amazon SQS offers reliable and scalable hosted queues for storing messages as they travel between computers. By using Amazon SQS, you can move data between distributed components of your applications that perform different tasks without losing messages or requiring each component to be always available.+-- Amazon Simple Queue Service (Amazon SQS) is a reliable, highly-scalable hosted queue for storing messages as they travel between applications or microservices. Amazon SQS moves data between distributed application components and helps you decouple these components. ----- __Topics__+-- You can use <http://aws.amazon.com/tools/#sdk AWS SDKs> to access Amazon SQS using your favorite programming language. The SDKs perform tasks such as the following automatically: -----     *+--     * Cryptographically sign your service requests -----     *+--     * Retry requests -----     * 'CommonParameters'+--     * Handle error responses -----     * 'CommonErrors' -- --+-- __Additional Information__ ----- __Helpful Links__+--     * <http://aws.amazon.com/sqs/ Amazon SQS Product Page> --+--     * /Amazon Simple Queue Service Developer Guide/+-- --     * <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/MakingRequestsArticle.html Making API Requests> -----     * <http://aws.amazon.com/sqs/ Amazon SQS product page>+--     * <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html Using Amazon SQS Message Attributes> -----     * <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html Using Amazon SQS Message Attributes>+--     * <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> -----     * <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> -----     * <http://docs.aws.amazon.com/general/latest/gr/rande.html#sqs_region Regions and Endpoints> --+--     * /Amazon Web Services General Reference/ --+--     * <http://docs.aws.amazon.com/general/latest/gr/rande.html#sqs_region Regions and Endpoints> ----- We also provide SDKs that enable you to access Amazon SQS from your preferred programming language. The SDKs contain functionality that automatically takes care of tasks such as: -----     * Cryptographically signing your service requests -----     * Retrying requests -----     * Handling error responses ----------- For a list of available SDKs, see <http://aws.amazon.com/tools/ Tools for Amazon Web Services> .--- module Network.AWS.SQS     (     -- * Service Configuration@@ -143,6 +137,9 @@     -- ** DeleteQueue     , module Network.AWS.SQS.DeleteQueue +    -- ** TagQueue+    , module Network.AWS.SQS.TagQueue+     -- ** DeleteMessageBatch     , module Network.AWS.SQS.DeleteMessageBatch @@ -158,9 +155,15 @@     -- ** DeleteMessage     , module Network.AWS.SQS.DeleteMessage +    -- ** ListQueueTags+    , module Network.AWS.SQS.ListQueueTags+     -- ** CreateQueue     , module Network.AWS.SQS.CreateQueue +    -- ** UntagQueue+    , module Network.AWS.SQS.UntagQueue+     -- ** SendMessageBatch     , module Network.AWS.SQS.SendMessageBatch @@ -246,25 +249,28 @@     , smbreMD5OfMessageBody     ) where -import           Network.AWS.SQS.AddPermission-import           Network.AWS.SQS.ChangeMessageVisibility-import           Network.AWS.SQS.ChangeMessageVisibilityBatch-import           Network.AWS.SQS.CreateQueue-import           Network.AWS.SQS.DeleteMessage-import           Network.AWS.SQS.DeleteMessageBatch-import           Network.AWS.SQS.DeleteQueue-import           Network.AWS.SQS.GetQueueAttributes-import           Network.AWS.SQS.GetQueueURL-import           Network.AWS.SQS.ListDeadLetterSourceQueues-import           Network.AWS.SQS.ListQueues-import           Network.AWS.SQS.PurgeQueue-import           Network.AWS.SQS.ReceiveMessage-import           Network.AWS.SQS.RemovePermission-import           Network.AWS.SQS.SendMessage-import           Network.AWS.SQS.SendMessageBatch-import           Network.AWS.SQS.SetQueueAttributes-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Waiters+import Network.AWS.SQS.AddPermission+import Network.AWS.SQS.ChangeMessageVisibility+import Network.AWS.SQS.ChangeMessageVisibilityBatch+import Network.AWS.SQS.CreateQueue+import Network.AWS.SQS.DeleteMessage+import Network.AWS.SQS.DeleteMessageBatch+import Network.AWS.SQS.DeleteQueue+import Network.AWS.SQS.GetQueueAttributes+import Network.AWS.SQS.GetQueueURL+import Network.AWS.SQS.ListDeadLetterSourceQueues+import Network.AWS.SQS.ListQueues+import Network.AWS.SQS.ListQueueTags+import Network.AWS.SQS.PurgeQueue+import Network.AWS.SQS.ReceiveMessage+import Network.AWS.SQS.RemovePermission+import Network.AWS.SQS.SendMessage+import Network.AWS.SQS.SendMessageBatch+import Network.AWS.SQS.SetQueueAttributes+import Network.AWS.SQS.TagQueue+import Network.AWS.SQS.Types+import Network.AWS.SQS.UntagQueue+import Network.AWS.SQS.Waiters  {- $errors Error matchers are designed for use with the functions provided by

@@ -12,20 +12,16 @@  -- | -- Module      : Network.AWS.SQS.AddPermission--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Adds a permission to a queue for a specific <http://docs.aws.amazon.com/general/latest/gr/glos-chap.html#P principal> . This allows for sharing access to the queue.+-- Adds a permission to a queue for a specific <http://docs.aws.amazon.com/general/latest/gr/glos-chap.html#P principal> . This allows sharing access to the queue. -- ----- When you create a queue, you have full control access rights for the queue. Only you (as owner of the queue) can grant or deny permissions to the queue. For more information about these permissions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html Shared Queues> in the /Amazon SQS Developer Guide/ .------ @&amp;Attribute.1=this@------ @&amp;Attribute.2=that@+-- When you create a queue, you have full control access rights for the queue. Only you, the owner of the queue, can grant or deny permissions to the queue. For more information about these permissions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html Shared Queues> in the /Amazon Simple Queue Service Developer Guide/ . -- module Network.AWS.SQS.AddPermission     (@@ -43,12 +39,12 @@     , AddPermissionResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -56,48 +52,50 @@ -- -- /See:/ 'addPermission' smart constructor. data AddPermission = AddPermission'-    { _apQueueURL      :: !Text-    , _apLabel         :: !Text-    , _apAWSAccountIds :: ![Text]-    , _apActions       :: ![Text]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _apQueueURL      :: !Text+  , _apLabel         :: !Text+  , _apAWSAccountIds :: ![Text]+  , _apActions       :: ![Text]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'AddPermission' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'apQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'apQueueURL' - The URL of the Amazon SQS queue to which permissions are added. Queue URLs are case-sensitive. ----- * 'apLabel' - The unique identification of the permission you're setting (e.g., @AliceSendMessage@ ). Constraints: Maximum 80 characters; alphanumeric characters, hyphens (-), and underscores (_) are allowed.+-- * 'apLabel' - The unique identification of the permission you're setting (for example, @AliceSendMessage@ ). Maximum 80 characters. Allowed characters include alphanumeric characters, hyphens (@-@ ), and underscores (@_@ ). ----- * 'apAWSAccountIds' - The AWS account number of the <http://docs.aws.amazon.com/general/latest/gr/glos-chap.html#P principal> who will be given permission. The principal must have an AWS account, but does not need to be signed up for Amazon SQS. For information about locating the AWS account identification, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AWSCredentials.html Your AWS Identifiers> in the /Amazon SQS Developer Guide/ .+-- * 'apAWSAccountIds' - The AWS account number of the <http://docs.aws.amazon.com/general/latest/gr/glos-chap.html#P principal> who is given permission. The principal must have an AWS account, but does not need to be signed up for Amazon SQS. For information about locating the AWS account identification, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AWSCredentials.html Your AWS Identifiers> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'apActions' - The action the client wants to allow for the specified principal. The following are valid values: @* | SendMessage | ReceiveMessage | DeleteMessage | ChangeMessageVisibility | GetQueueAttributes | GetQueueUrl@ . For more information about these actions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html#PermissionTypes Understanding Permissions> in the /Amazon SQS Developer Guide/ . Specifying @SendMessage@ , @DeleteMessage@ , or @ChangeMessageVisibility@ for the @ActionName.n@ also grants permissions for the corresponding batch versions of those actions: @SendMessageBatch@ , @DeleteMessageBatch@ , and @ChangeMessageVisibilityBatch@ .+-- * 'apActions' - The action the client wants to allow for the specified principal. The following values are valid:     * @*@      * @ChangeMessageVisibility@      * @DeleteMessage@      * @GetQueueAttributes@      * @GetQueueUrl@      * @ReceiveMessage@      * @SendMessage@  For more information about these actions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html#PermissionTypes Understanding Permissions> in the /Amazon Simple Queue Service Developer Guide/ . Specifying @SendMessage@ , @DeleteMessage@ , or @ChangeMessageVisibility@ for @ActionName.n@ also grants permissions for the corresponding batch versions of those actions: @SendMessageBatch@ , @DeleteMessageBatch@ , and @ChangeMessageVisibilityBatch@ . addPermission     :: Text -- ^ 'apQueueURL'     -> Text -- ^ 'apLabel'     -> AddPermission addPermission pQueueURL_ pLabel_ =-    AddPermission'-    { _apQueueURL = pQueueURL_-    , _apLabel = pLabel_-    , _apAWSAccountIds = mempty-    , _apActions = mempty-    }+  AddPermission'+  { _apQueueURL = pQueueURL_+  , _apLabel = pLabel_+  , _apAWSAccountIds = mempty+  , _apActions = mempty+  } --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue to which permissions are added. Queue URLs are case-sensitive. apQueueURL :: Lens' AddPermission Text apQueueURL = lens _apQueueURL (\ s a -> s{_apQueueURL = a}); --- | The unique identification of the permission you're setting (e.g., @AliceSendMessage@ ). Constraints: Maximum 80 characters; alphanumeric characters, hyphens (-), and underscores (_) are allowed.+-- | The unique identification of the permission you're setting (for example, @AliceSendMessage@ ). Maximum 80 characters. Allowed characters include alphanumeric characters, hyphens (@-@ ), and underscores (@_@ ). apLabel :: Lens' AddPermission Text apLabel = lens _apLabel (\ s a -> s{_apLabel = a}); --- | The AWS account number of the <http://docs.aws.amazon.com/general/latest/gr/glos-chap.html#P principal> who will be given permission. The principal must have an AWS account, but does not need to be signed up for Amazon SQS. For information about locating the AWS account identification, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AWSCredentials.html Your AWS Identifiers> in the /Amazon SQS Developer Guide/ .+-- | The AWS account number of the <http://docs.aws.amazon.com/general/latest/gr/glos-chap.html#P principal> who is given permission. The principal must have an AWS account, but does not need to be signed up for Amazon SQS. For information about locating the AWS account identification, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AWSCredentials.html Your AWS Identifiers> in the /Amazon Simple Queue Service Developer Guide/ . apAWSAccountIds :: Lens' AddPermission [Text] apAWSAccountIds = lens _apAWSAccountIds (\ s a -> s{_apAWSAccountIds = a}) . _Coerce; --- | The action the client wants to allow for the specified principal. The following are valid values: @* | SendMessage | ReceiveMessage | DeleteMessage | ChangeMessageVisibility | GetQueueAttributes | GetQueueUrl@ . For more information about these actions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html#PermissionTypes Understanding Permissions> in the /Amazon SQS Developer Guide/ . Specifying @SendMessage@ , @DeleteMessage@ , or @ChangeMessageVisibility@ for the @ActionName.n@ also grants permissions for the corresponding batch versions of those actions: @SendMessageBatch@ , @DeleteMessageBatch@ , and @ChangeMessageVisibilityBatch@ .+-- | The action the client wants to allow for the specified principal. The following values are valid:     * @*@      * @ChangeMessageVisibility@      * @DeleteMessage@      * @GetQueueAttributes@      * @GetQueueUrl@      * @ReceiveMessage@      * @SendMessage@  For more information about these actions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html#PermissionTypes Understanding Permissions> in the /Amazon Simple Queue Service Developer Guide/ . Specifying @SendMessage@ , @DeleteMessage@ , or @ChangeMessageVisibility@ for @ActionName.n@ also grants permissions for the corresponding batch versions of those actions: @SendMessageBatch@ , @DeleteMessageBatch@ , and @ChangeMessageVisibilityBatch@ . apActions :: Lens' AddPermission [Text] apActions = lens _apActions (\ s a -> s{_apActions = a}) . _Coerce; @@ -106,9 +104,9 @@         request = postQuery sqs         response = receiveNull AddPermissionResponse' -instance Hashable AddPermission+instance Hashable AddPermission where -instance NFData AddPermission+instance NFData AddPermission where  instance ToHeaders AddPermission where         toHeaders = const mempty@@ -127,13 +125,15 @@  -- | /See:/ 'addPermissionResponse' smart constructor. data AddPermissionResponse =-    AddPermissionResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  AddPermissionResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'AddPermissionResponse' with the minimum fields required to make a request. -- addPermissionResponse     :: AddPermissionResponse addPermissionResponse = AddPermissionResponse' -instance NFData AddPermissionResponse++instance NFData AddPermissionResponse where

@@ -12,21 +12,27 @@  -- | -- Module      : Network.AWS.SQS.ChangeMessageVisibility--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Changes the visibility timeout of a specified message in a queue to a new value. The maximum allowed timeout value you can set the value to is 12 hours. This means you can't extend the timeout of a message in an existing queue to more than a total visibility timeout of 12 hours. (For more information visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ .)+-- Changes the visibility timeout of a specified message in a queue to a new value. The maximum allowed timeout value is 12 hours. Thus, you can't extend the timeout of a message in an existing queue to more than a total visibility timeout of 12 hours. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . -- ----- For example, let's say you have a message and its default message visibility timeout is 5 minutes. After 3 minutes, you call @ChangeMessageVisiblity@ with a timeout of 10 minutes. At that time, the timeout for the message would be extended by 10 minutes beyond the time of the ChangeMessageVisibility call. This results in a total visibility timeout of 13 minutes. You can continue to call ChangeMessageVisibility to extend the visibility timeout to a maximum of 12 hours. If you try to extend beyond 12 hours, the request will be rejected.+-- For example, you have a message with a visibility timeout of 5 minutes. After 3 minutes, you call @ChangeMessageVisiblity@ with a timeout of 10 minutes. At that time, the timeout for the message is extended by 10 minutes beyond the time of the @ChangeMessageVisibility@ action. This results in a total visibility timeout of 13 minutes. You can continue to call the @ChangeMessageVisibility@ to extend the visibility timeout to a maximum of 12 hours. If you try to extend the visibility timeout beyond 12 hours, your request is rejected. ----- /Important:/ If you attempt to set the @VisibilityTimeout@ to an amount more than the maximum time left, Amazon SQS returns an error. It will not automatically recalculate and increase the timeout to the maximum time remaining.+-- A message is considered to be /in flight/ after it's received from a queue by a consumer, but not yet deleted from the queue. ----- /Important:/ Unlike with a queue, when you change the visibility timeout for a specific message, that timeout value is applied immediately but is not saved in memory for that message. If you don't delete a message after it is received, the visibility timeout for the message the next time it is received reverts to the original timeout value, not the value you set with the @ChangeMessageVisibility@ action.+-- For standard queues, there can be a maximum of 120,000 inflight messages per queue. If you reach this limit, Amazon SQS returns the @OverLimit@ error message. To avoid reaching the limit, you should delete messages from the queue after they're processed. You can also increase the number of queues you use to process your messages. --+-- For FIFO queues, there can be a maximum of 20,000 inflight messages per queue. If you reach this limit, Amazon SQS returns no error messages.+--+-- /Important:/ If you attempt to set the @VisibilityTimeout@ to a value greater than the maximum time left, Amazon SQS returns an error. Amazon SQS doesn't automatically recalculate and increase the timeout to the maximum remaining time.+--+-- Unlike with a queue, when you change the visibility timeout for a specific message the timeout value is applied immediately but isn't saved in memory for that message. If you don't delete a message after it is received, the visibility timeout for the message reverts to the original timeout value (not to the value you set using the @ChangeMessageVisibility@ action) the next time the message is received.+-- module Network.AWS.SQS.ChangeMessageVisibility     (     -- * Creating a Request@@ -42,50 +48,52 @@     , ChangeMessageVisibilityResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | /See:/ 'changeMessageVisibility' smart constructor. data ChangeMessageVisibility = ChangeMessageVisibility'-    { _cmvQueueURL          :: !Text-    , _cmvReceiptHandle     :: !Text-    , _cmvVisibilityTimeout :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cmvQueueURL          :: !Text+  , _cmvReceiptHandle     :: !Text+  , _cmvVisibilityTimeout :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ChangeMessageVisibility' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cmvQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'cmvQueueURL' - The URL of the Amazon SQS queue whose message's visibility is changed. Queue URLs are case-sensitive. ----- * 'cmvReceiptHandle' - The receipt handle associated with the message whose visibility timeout should be changed. This parameter is returned by the 'ReceiveMessage' action.+-- * 'cmvReceiptHandle' - The receipt handle associated with the message whose visibility timeout is changed. This parameter is returned by the @'ReceiveMessage' @ action. ----- * 'cmvVisibilityTimeout' - The new value (in seconds - from 0 to 43200 - maximum 12 hours) for the message's visibility timeout.+-- * 'cmvVisibilityTimeout' - The new value for the message's visibility timeout (in seconds). Values values: @0@ to @43200@ . Maximum: 12 hours. changeMessageVisibility     :: Text -- ^ 'cmvQueueURL'     -> Text -- ^ 'cmvReceiptHandle'     -> Int -- ^ 'cmvVisibilityTimeout'     -> ChangeMessageVisibility changeMessageVisibility pQueueURL_ pReceiptHandle_ pVisibilityTimeout_ =-    ChangeMessageVisibility'-    { _cmvQueueURL = pQueueURL_-    , _cmvReceiptHandle = pReceiptHandle_-    , _cmvVisibilityTimeout = pVisibilityTimeout_-    }+  ChangeMessageVisibility'+  { _cmvQueueURL = pQueueURL_+  , _cmvReceiptHandle = pReceiptHandle_+  , _cmvVisibilityTimeout = pVisibilityTimeout_+  } --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue whose message's visibility is changed. Queue URLs are case-sensitive. cmvQueueURL :: Lens' ChangeMessageVisibility Text cmvQueueURL = lens _cmvQueueURL (\ s a -> s{_cmvQueueURL = a}); --- | The receipt handle associated with the message whose visibility timeout should be changed. This parameter is returned by the 'ReceiveMessage' action.+-- | The receipt handle associated with the message whose visibility timeout is changed. This parameter is returned by the @'ReceiveMessage' @ action. cmvReceiptHandle :: Lens' ChangeMessageVisibility Text cmvReceiptHandle = lens _cmvReceiptHandle (\ s a -> s{_cmvReceiptHandle = a}); --- | The new value (in seconds - from 0 to 43200 - maximum 12 hours) for the message's visibility timeout.+-- | The new value for the message's visibility timeout (in seconds). Values values: @0@ to @43200@ . Maximum: 12 hours. cmvVisibilityTimeout :: Lens' ChangeMessageVisibility Int cmvVisibilityTimeout = lens _cmvVisibilityTimeout (\ s a -> s{_cmvVisibilityTimeout = a}); @@ -96,9 +104,9 @@         response           = receiveNull ChangeMessageVisibilityResponse' -instance Hashable ChangeMessageVisibility+instance Hashable ChangeMessageVisibility where -instance NFData ChangeMessageVisibility+instance NFData ChangeMessageVisibility where  instance ToHeaders ChangeMessageVisibility where         toHeaders = const mempty@@ -118,13 +126,15 @@  -- | /See:/ 'changeMessageVisibilityResponse' smart constructor. data ChangeMessageVisibilityResponse =-    ChangeMessageVisibilityResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  ChangeMessageVisibilityResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ChangeMessageVisibilityResponse' with the minimum fields required to make a request. -- changeMessageVisibilityResponse     :: ChangeMessageVisibilityResponse changeMessageVisibilityResponse = ChangeMessageVisibilityResponse' -instance NFData ChangeMessageVisibilityResponse++instance NFData ChangeMessageVisibilityResponse where

@@ -12,20 +12,16 @@  -- | -- Module      : Network.AWS.SQS.ChangeMessageVisibilityBatch--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Changes the visibility timeout of multiple messages. This is a batch version of 'ChangeMessageVisibility' . The result of the action on each message is reported individually in the response. You can send up to 10 'ChangeMessageVisibility' requests with each @ChangeMessageVisibilityBatch@ action.+-- Changes the visibility timeout of multiple messages. This is a batch version of @'ChangeMessageVisibility' .@ The result of the action on each message is reported individually in the response. You can send up to 10 @'ChangeMessageVisibility' @ requests with each @ChangeMessageVisibilityBatch@ action. -- ----- /Important:/ Because the batch request can result in a combination of successful and unsuccessful actions, you should check for batch errors even when the call returns an HTTP status code of 200.------ @&amp;Attribute.1=this@------ @&amp;Attribute.2=that@+-- /Important:/ Because the batch request can result in a combination of successful and unsuccessful actions, you should check for batch errors even when the call returns an HTTP status code of @200@ . -- module Network.AWS.SQS.ChangeMessageVisibilityBatch     (@@ -45,12 +41,12 @@     , cmvbrsFailed     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -58,27 +54,27 @@ -- -- /See:/ 'changeMessageVisibilityBatch' smart constructor. data ChangeMessageVisibilityBatch = ChangeMessageVisibilityBatch'-    { _cmvbQueueURL :: !Text-    , _cmvbEntries  :: ![ChangeMessageVisibilityBatchRequestEntry]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cmvbQueueURL :: !Text+  , _cmvbEntries  :: ![ChangeMessageVisibilityBatchRequestEntry]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ChangeMessageVisibilityBatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cmvbQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'cmvbQueueURL' - The URL of the Amazon SQS queue whose messages' visibility is changed. Queue URLs are case-sensitive. -- -- * 'cmvbEntries' - A list of receipt handles of the messages for which the visibility timeout must be changed. changeMessageVisibilityBatch     :: Text -- ^ 'cmvbQueueURL'     -> ChangeMessageVisibilityBatch changeMessageVisibilityBatch pQueueURL_ =-    ChangeMessageVisibilityBatch'-    { _cmvbQueueURL = pQueueURL_-    , _cmvbEntries = mempty-    }+  ChangeMessageVisibilityBatch'+  {_cmvbQueueURL = pQueueURL_, _cmvbEntries = mempty} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue whose messages' visibility is changed. Queue URLs are case-sensitive. cmvbQueueURL :: Lens' ChangeMessageVisibilityBatch Text cmvbQueueURL = lens _cmvbQueueURL (\ s a -> s{_cmvbQueueURL = a}); @@ -102,9 +98,9 @@                         x)                      <*> (parseXMLList "BatchResultErrorEntry" x)) -instance Hashable ChangeMessageVisibilityBatch+instance Hashable ChangeMessageVisibilityBatch where -instance NFData ChangeMessageVisibilityBatch+instance NFData ChangeMessageVisibilityBatch where  instance ToHeaders ChangeMessageVisibilityBatch where         toHeaders = const mempty@@ -123,46 +119,49 @@                  "ChangeMessageVisibilityBatchRequestEntry"                  _cmvbEntries] --- | For each message in the batch, the response contains a 'ChangeMessageVisibilityBatchResultEntry' tag if the message succeeds or a 'BatchResultErrorEntry' tag if the message fails.+-- | For each message in the batch, the response contains a @'ChangeMessageVisibilityBatchResultEntry' @ tag if the message succeeds or a @'BatchResultErrorEntry' @ tag if the message fails. -- -- -- -- /See:/ 'changeMessageVisibilityBatchResponse' smart constructor. data ChangeMessageVisibilityBatchResponse = ChangeMessageVisibilityBatchResponse'-    { _cmvbrsResponseStatus :: !Int-    , _cmvbrsSuccessful     :: ![ChangeMessageVisibilityBatchResultEntry]-    , _cmvbrsFailed         :: ![BatchResultErrorEntry]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cmvbrsResponseStatus :: !Int+  , _cmvbrsSuccessful     :: ![ChangeMessageVisibilityBatchResultEntry]+  , _cmvbrsFailed         :: ![BatchResultErrorEntry]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ChangeMessageVisibilityBatchResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'cmvbrsResponseStatus' - -- | The response status code. ----- * 'cmvbrsSuccessful' - A list of 'ChangeMessageVisibilityBatchResultEntry' items.+-- * 'cmvbrsSuccessful' - A list of @'ChangeMessageVisibilityBatchResultEntry' @ items. ----- * 'cmvbrsFailed' - A list of 'BatchResultErrorEntry' items.+-- * 'cmvbrsFailed' - A list of @'BatchResultErrorEntry' @ items. changeMessageVisibilityBatchResponse     :: Int -- ^ 'cmvbrsResponseStatus'     -> ChangeMessageVisibilityBatchResponse changeMessageVisibilityBatchResponse pResponseStatus_ =-    ChangeMessageVisibilityBatchResponse'-    { _cmvbrsResponseStatus = pResponseStatus_-    , _cmvbrsSuccessful = mempty-    , _cmvbrsFailed = mempty-    }+  ChangeMessageVisibilityBatchResponse'+  { _cmvbrsResponseStatus = pResponseStatus_+  , _cmvbrsSuccessful = mempty+  , _cmvbrsFailed = mempty+  } + -- | -- | The response status code. cmvbrsResponseStatus :: Lens' ChangeMessageVisibilityBatchResponse Int cmvbrsResponseStatus = lens _cmvbrsResponseStatus (\ s a -> s{_cmvbrsResponseStatus = a}); --- | A list of 'ChangeMessageVisibilityBatchResultEntry' items.+-- | A list of @'ChangeMessageVisibilityBatchResultEntry' @ items. cmvbrsSuccessful :: Lens' ChangeMessageVisibilityBatchResponse [ChangeMessageVisibilityBatchResultEntry] cmvbrsSuccessful = lens _cmvbrsSuccessful (\ s a -> s{_cmvbrsSuccessful = a}) . _Coerce; --- | A list of 'BatchResultErrorEntry' items.+-- | A list of @'BatchResultErrorEntry' @ items. cmvbrsFailed :: Lens' ChangeMessageVisibilityBatchResponse [BatchResultErrorEntry] cmvbrsFailed = lens _cmvbrsFailed (\ s a -> s{_cmvbrsFailed = a}) . _Coerce;  instance NFData ChangeMessageVisibilityBatchResponse+         where

@@ -12,13 +12,13 @@  -- | -- Module      : Network.AWS.SQS.CreateQueue--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Creates a new standard or FIFO queue or returns the URL of an existing queue. You can pass one or more attributes in the request.+-- Creates a new standard or FIFO queue. You can pass one or more attributes in the request. Keep the following caveats in mind: -- -- --     * If you don't specify the @FifoQueue@ attribute, Amazon SQS creates a standard queue.@@ -31,7 +31,7 @@ -- -- To successfully create a new queue, you must provide a queue name that adheres to the <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/limits-queues.html limits related to queues> and is unique within the scope of your queues. ----- To get the queue URL, use the 'GetQueueUrl' action. 'GetQueueUrl' requires only the @QueueName@ parameter.+-- To get the queue URL, use the @'GetQueueUrl' @ action. @'GetQueueUrl' @ requires only the @QueueName@ parameter. be aware of existing queue names: -- --     * If you provide the name of an existing queue along with the exact names and values of all the queue's attributes, @CreateQueue@ returns the queue URL for the existing queue. --@@ -39,12 +39,6 @@ -- -- ----- Some API actions take lists of parameters. Specify these lists using the @param.n@ notation. Values of @n@ are integers starting from 1. The following is an example of a parameter list with two elements:------ @&amp;Attribute.1=this@------ @&amp;Attribute.2=that@--- module Network.AWS.SQS.CreateQueue     (     -- * Creating a Request@@ -62,12 +56,12 @@     , cqrsResponseStatus     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -75,31 +69,30 @@ -- -- /See:/ 'createQueue' smart constructor. data CreateQueue = CreateQueue'-    { _cqAttributes :: !(Maybe (Map QueueAttributeName Text))-    , _cqQueueName  :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cqAttributes :: !(Maybe (Map QueueAttributeName Text))+  , _cqQueueName  :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateQueue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cqAttributes' - A map of attributes with their corresponding values. The following lists the names, descriptions, and values of the special request parameters that the @CreateQueue@ action uses:     * @DelaySeconds@ - The number of seconds for which the delivery of all messages in the queue is delayed. An integer from 0 to 900 (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. An integer from 1,024 bytes (1 KiB) up to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The number of seconds for which Amazon SQS retains a message. An integer representing seconds, from 60 (1 minute) to 120,9600 (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The number of seconds for which a 'ReceiveMessage' action will wait for a message to arrive. An integer from 0 to 20 (seconds). The default is 0.      * @RedrivePolicy@ - The parameters for the dead letter queue functionality of the source queue. For more information about the redrive policy and dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .      * @VisibilityTimeout@ - The visibility timeout for the queue. An integer from 0 to 43200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ . The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Designates a queue as FIFO. You can provide this attribute only during queue creation; you can't change it for an existing queue. When you set this attribute, you must provide a @MessageGroupId@ explicitly. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon SQS Developer Guide/ .     * @ContentBasedDeduplication@ - Enables content-based deduplication. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters that are specified (such as @ApproximateNumberOfMessages@ , @ApproximateNumberOfMessagesDelayed@ , @ApproximateNumberOfMessagesNotVisible@ , @CreatedTimestamp@ , @LastModifiedTimestamp@ , and @QueueArn@ ) will be ignored.+-- * 'cqAttributes' - A map of attributes with their corresponding values. The following lists the names, descriptions, and values of the special request parameters that the @CreateQueue@ action uses:     * @DelaySeconds@ - The length of time, in seconds, for which the delivery of all messages in the queue is delayed. Valid values: An integer from 0 to 900 seconds (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. Valid values: An integer from 1,024 bytes (1 KiB) to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The length of time, in seconds, for which Amazon SQS retains a message. Valid values: An integer from 60 seconds (1 minute) to 1,209,600 seconds (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The length of time, in seconds, for which a @'ReceiveMessage' @ action waits for a message to arrive. Valid values: An integer from 0 to 20 (seconds). The default is 0 (zero).      * @RedrivePolicy@ - The string that includes the parameters for the dead-letter queue functionality of the source queue. For more information about the redrive policy and dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ .      * @deadLetterTargetArn@ - The Amazon Resource Name (ARN) of the dead-letter queue to which Amazon SQS moves messages after the value of @maxReceiveCount@ is exceeded.     * @maxReceiveCount@ - The number of times a message is delivered to the source queue before being moved to the dead-letter queue.     * @VisibilityTimeout@ - The visibility timeout for the queue. Valid values: An integer from 0 to 43,200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html server-side-encryption> :     * @KmsMasterKeyId@ - The ID of an AWS-managed customer master key (CMK) for Amazon SQS or a custom CMK. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-sse-key-terms Key Terms> . While the alias of the AWS-managed CMK for Amazon SQS is always @alias/aws/sqs@ , the alias of a custom CMK can, for example, be @alias//MyAlias/ @ . For more examples, see <http://docs.aws.amazon.com/kms/latest/APIReference/API_DescribeKey.html#API_DescribeKey_RequestParameters KeyId> in the /AWS Key Management Service API Reference/ .      * @KmsDataKeyReusePeriodSeconds@ - The length of time, in seconds, for which Amazon SQS can reuse a <http://docs.aws.amazon.com/kms/latest/developerguide/concepts.html#data-keys data key> to encrypt or decrypt messages before calling AWS KMS again. An integer representing seconds, between 60 seconds (1 minute) and 86,400 seconds (24 hours). The default is 300 (5 minutes). A shorter time period provides better security but results in more calls to KMS which might incur charges after Free Tier. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-how-does-the-data-key-reuse-period-work How Does the Data Key Reuse Period Work?> .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Designates a queue as FIFO. Valid values: @true@ , @false@ . You can provide this attribute only during queue creation. You can't change it for an existing queue. When you set this attribute, you must also provide the @MessageGroupId@ for your messages explicitly. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon Simple Queue Service Developer Guide/ .     * @ContentBasedDeduplication@ - Enables content-based deduplication. Valid values: @true@ , @false@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters (such as the following) are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @LastModifiedTimestamp@      * @QueueArn@ ----- * 'cqQueueName' - The name of the new queue. The following limits apply to this name:     * A queue name can have up to 80 characters.     * The following are accepted: alphanumeric chatacters, hyphens (@-@ ), and underscores (@_@ ).     * A FIFO queue name must end with the @.fifo@ suffix. Queue names are case-sensitive.+-- * 'cqQueueName' - The name of the new queue. The following limits apply to this name:     * A queue name can have up to 80 characters.     * Valid values: alphanumeric characters, hyphens (@-@ ), and underscores (@_@ ).     * A FIFO queue name must end with the @.fifo@ suffix. Queue names are case-sensitive. createQueue     :: Text -- ^ 'cqQueueName'     -> CreateQueue createQueue pQueueName_ =-    CreateQueue'-    { _cqAttributes = Nothing-    , _cqQueueName = pQueueName_-    }+  CreateQueue' {_cqAttributes = Nothing, _cqQueueName = pQueueName_} --- | A map of attributes with their corresponding values. The following lists the names, descriptions, and values of the special request parameters that the @CreateQueue@ action uses:     * @DelaySeconds@ - The number of seconds for which the delivery of all messages in the queue is delayed. An integer from 0 to 900 (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. An integer from 1,024 bytes (1 KiB) up to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The number of seconds for which Amazon SQS retains a message. An integer representing seconds, from 60 (1 minute) to 120,9600 (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The number of seconds for which a 'ReceiveMessage' action will wait for a message to arrive. An integer from 0 to 20 (seconds). The default is 0.      * @RedrivePolicy@ - The parameters for the dead letter queue functionality of the source queue. For more information about the redrive policy and dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .      * @VisibilityTimeout@ - The visibility timeout for the queue. An integer from 0 to 43200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ . The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Designates a queue as FIFO. You can provide this attribute only during queue creation; you can't change it for an existing queue. When you set this attribute, you must provide a @MessageGroupId@ explicitly. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon SQS Developer Guide/ .     * @ContentBasedDeduplication@ - Enables content-based deduplication. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters that are specified (such as @ApproximateNumberOfMessages@ , @ApproximateNumberOfMessagesDelayed@ , @ApproximateNumberOfMessagesNotVisible@ , @CreatedTimestamp@ , @LastModifiedTimestamp@ , and @QueueArn@ ) will be ignored.++-- | A map of attributes with their corresponding values. The following lists the names, descriptions, and values of the special request parameters that the @CreateQueue@ action uses:     * @DelaySeconds@ - The length of time, in seconds, for which the delivery of all messages in the queue is delayed. Valid values: An integer from 0 to 900 seconds (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. Valid values: An integer from 1,024 bytes (1 KiB) to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The length of time, in seconds, for which Amazon SQS retains a message. Valid values: An integer from 60 seconds (1 minute) to 1,209,600 seconds (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The length of time, in seconds, for which a @'ReceiveMessage' @ action waits for a message to arrive. Valid values: An integer from 0 to 20 (seconds). The default is 0 (zero).      * @RedrivePolicy@ - The string that includes the parameters for the dead-letter queue functionality of the source queue. For more information about the redrive policy and dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ .      * @deadLetterTargetArn@ - The Amazon Resource Name (ARN) of the dead-letter queue to which Amazon SQS moves messages after the value of @maxReceiveCount@ is exceeded.     * @maxReceiveCount@ - The number of times a message is delivered to the source queue before being moved to the dead-letter queue.     * @VisibilityTimeout@ - The visibility timeout for the queue. Valid values: An integer from 0 to 43,200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html server-side-encryption> :     * @KmsMasterKeyId@ - The ID of an AWS-managed customer master key (CMK) for Amazon SQS or a custom CMK. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-sse-key-terms Key Terms> . While the alias of the AWS-managed CMK for Amazon SQS is always @alias/aws/sqs@ , the alias of a custom CMK can, for example, be @alias//MyAlias/ @ . For more examples, see <http://docs.aws.amazon.com/kms/latest/APIReference/API_DescribeKey.html#API_DescribeKey_RequestParameters KeyId> in the /AWS Key Management Service API Reference/ .      * @KmsDataKeyReusePeriodSeconds@ - The length of time, in seconds, for which Amazon SQS can reuse a <http://docs.aws.amazon.com/kms/latest/developerguide/concepts.html#data-keys data key> to encrypt or decrypt messages before calling AWS KMS again. An integer representing seconds, between 60 seconds (1 minute) and 86,400 seconds (24 hours). The default is 300 (5 minutes). A shorter time period provides better security but results in more calls to KMS which might incur charges after Free Tier. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-how-does-the-data-key-reuse-period-work How Does the Data Key Reuse Period Work?> .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Designates a queue as FIFO. Valid values: @true@ , @false@ . You can provide this attribute only during queue creation. You can't change it for an existing queue. When you set this attribute, you must also provide the @MessageGroupId@ for your messages explicitly. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon Simple Queue Service Developer Guide/ .     * @ContentBasedDeduplication@ - Enables content-based deduplication. Valid values: @true@ , @false@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters (such as the following) are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @LastModifiedTimestamp@      * @QueueArn@ cqAttributes :: Lens' CreateQueue (HashMap QueueAttributeName Text) cqAttributes = lens _cqAttributes (\ s a -> s{_cqAttributes = a}) . _Default . _Map; --- | The name of the new queue. The following limits apply to this name:     * A queue name can have up to 80 characters.     * The following are accepted: alphanumeric chatacters, hyphens (@-@ ), and underscores (@_@ ).     * A FIFO queue name must end with the @.fifo@ suffix. Queue names are case-sensitive.+-- | The name of the new queue. The following limits apply to this name:     * A queue name can have up to 80 characters.     * Valid values: alphanumeric characters, hyphens (@-@ ), and underscores (@_@ ).     * A FIFO queue name must end with the @.fifo@ suffix. Queue names are case-sensitive. cqQueueName :: Lens' CreateQueue Text cqQueueName = lens _cqQueueName (\ s a -> s{_cqQueueName = a}); @@ -112,9 +105,9 @@                  CreateQueueResponse' <$>                    (x .@? "QueueUrl") <*> (pure (fromEnum s))) -instance Hashable CreateQueue+instance Hashable CreateQueue where -instance NFData CreateQueue+instance NFData CreateQueue where  instance ToHeaders CreateQueue where         toHeaders = const mempty@@ -132,33 +125,33 @@                     _cqAttributes),                "QueueName" =: _cqQueueName] --- | Returns the QueueUrl element of the created queue.+-- | Returns the @QueueUrl@ attribute of the created queue. -- -- -- -- /See:/ 'createQueueResponse' smart constructor. data CreateQueueResponse = CreateQueueResponse'-    { _cqrsQueueURL       :: !(Maybe Text)-    , _cqrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cqrsQueueURL       :: !(Maybe Text)+  , _cqrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'CreateQueueResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'cqrsQueueURL' - The URL for the created Amazon SQS queue.+-- * 'cqrsQueueURL' - The URL of the created Amazon SQS queue. -- -- * 'cqrsResponseStatus' - -- | The response status code. createQueueResponse     :: Int -- ^ 'cqrsResponseStatus'     -> CreateQueueResponse createQueueResponse pResponseStatus_ =-    CreateQueueResponse'-    { _cqrsQueueURL = Nothing-    , _cqrsResponseStatus = pResponseStatus_-    }+  CreateQueueResponse'+  {_cqrsQueueURL = Nothing, _cqrsResponseStatus = pResponseStatus_} --- | The URL for the created Amazon SQS queue.++-- | The URL of the created Amazon SQS queue. cqrsQueueURL :: Lens' CreateQueueResponse (Maybe Text) cqrsQueueURL = lens _cqrsQueueURL (\ s a -> s{_cqrsQueueURL = a}); @@ -166,4 +159,4 @@ cqrsResponseStatus :: Lens' CreateQueueResponse Int cqrsResponseStatus = lens _cqrsResponseStatus (\ s a -> s{_cqrsResponseStatus = a}); -instance NFData CreateQueueResponse+instance NFData CreateQueueResponse where

@@ -12,17 +12,15 @@  -- | -- Module      : Network.AWS.SQS.DeleteMessage--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Deletes the specified message from the specified queue. You specify the message by using the message's @receipt handle@ and not the @message ID@ you received when you sent the message. Even if the message is locked by another reader due to the visibility timeout setting, it is still deleted from the queue. If you leave a message in the queue for longer than the queue's configured retention period, Amazon SQS automatically deletes it.+-- Deletes the specified message from the specified queue. You specify the message by using the message's /receipt handle/ and not the /MessageId/ you receive when you send the message. Even if the message is locked by another reader due to the visibility timeout setting, it is still deleted from the queue. If you leave a message in the queue for longer than the queue's configured retention period, Amazon SQS automatically deletes the message. -- ----- /Important:/ It is possible you will receive a message even after you have deleted it. This might happen on rare occasions if one of the servers storing a copy of the message is unavailable when you request to delete the message. The copy remains on the server and might be returned to you again on a subsequent receive request. You should create your system to be idempotent so that receiving a particular message more than once is not a problem.--- module Network.AWS.SQS.DeleteMessage     (     -- * Creating a Request@@ -37,12 +35,12 @@     , DeleteMessageResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -50,15 +48,16 @@ -- -- /See:/ 'deleteMessage' smart constructor. data DeleteMessage = DeleteMessage'-    { _dmQueueURL      :: !Text-    , _dmReceiptHandle :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dmQueueURL      :: !Text+  , _dmReceiptHandle :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMessage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'dmQueueURL' - The URL of the Amazon SQS queue from which messages are deleted. Queue URLs are case-sensitive. -- -- * 'dmReceiptHandle' - The receipt handle associated with the message to delete. deleteMessage@@ -66,12 +65,10 @@     -> Text -- ^ 'dmReceiptHandle'     -> DeleteMessage deleteMessage pQueueURL_ pReceiptHandle_ =-    DeleteMessage'-    { _dmQueueURL = pQueueURL_-    , _dmReceiptHandle = pReceiptHandle_-    }+  DeleteMessage' {_dmQueueURL = pQueueURL_, _dmReceiptHandle = pReceiptHandle_} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue from which messages are deleted. Queue URLs are case-sensitive. dmQueueURL :: Lens' DeleteMessage Text dmQueueURL = lens _dmQueueURL (\ s a -> s{_dmQueueURL = a}); @@ -84,9 +81,9 @@         request = postQuery sqs         response = receiveNull DeleteMessageResponse' -instance Hashable DeleteMessage+instance Hashable DeleteMessage where -instance NFData DeleteMessage+instance NFData DeleteMessage where  instance ToHeaders DeleteMessage where         toHeaders = const mempty@@ -104,13 +101,15 @@  -- | /See:/ 'deleteMessageResponse' smart constructor. data DeleteMessageResponse =-    DeleteMessageResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteMessageResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMessageResponse' with the minimum fields required to make a request. -- deleteMessageResponse     :: DeleteMessageResponse deleteMessageResponse = DeleteMessageResponse' -instance NFData DeleteMessageResponse++instance NFData DeleteMessageResponse where

@@ -12,20 +12,16 @@  -- | -- Module      : Network.AWS.SQS.DeleteMessageBatch--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Deletes up to ten messages from the specified queue. This is a batch version of 'DeleteMessage' . The result of the delete action on each message is reported individually in the response.+-- Deletes up to ten messages from the specified queue. This is a batch version of @'DeleteMessage' .@ The result of the action on each message is reported individually in the response. -- ----- /Important:/ Because the batch request can result in a combination of successful and unsuccessful actions, you should check for batch errors even when the call returns an HTTP status code of 200.------ @&amp;Attribute.1=this@------ @&amp;Attribute.2=that@+-- /Important:/ Because the batch request can result in a combination of successful and unsuccessful actions, you should check for batch errors even when the call returns an HTTP status code of @200@ . -- module Network.AWS.SQS.DeleteMessageBatch     (@@ -45,12 +41,12 @@     , dmbrsFailed     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -58,27 +54,26 @@ -- -- /See:/ 'deleteMessageBatch' smart constructor. data DeleteMessageBatch = DeleteMessageBatch'-    { _dmbQueueURL :: !Text-    , _dmbEntries  :: ![DeleteMessageBatchRequestEntry]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dmbQueueURL :: !Text+  , _dmbEntries  :: ![DeleteMessageBatchRequestEntry]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMessageBatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmbQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'dmbQueueURL' - The URL of the Amazon SQS queue from which messages are deleted. Queue URLs are case-sensitive. -- -- * 'dmbEntries' - A list of receipt handles for the messages to be deleted. deleteMessageBatch     :: Text -- ^ 'dmbQueueURL'     -> DeleteMessageBatch deleteMessageBatch pQueueURL_ =-    DeleteMessageBatch'-    { _dmbQueueURL = pQueueURL_-    , _dmbEntries = mempty-    }+  DeleteMessageBatch' {_dmbQueueURL = pQueueURL_, _dmbEntries = mempty} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue from which messages are deleted. Queue URLs are case-sensitive. dmbQueueURL :: Lens' DeleteMessageBatch Text dmbQueueURL = lens _dmbQueueURL (\ s a -> s{_dmbQueueURL = a}); @@ -98,9 +93,9 @@                      (parseXMLList "DeleteMessageBatchResultEntry" x)                      <*> (parseXMLList "BatchResultErrorEntry" x)) -instance Hashable DeleteMessageBatch+instance Hashable DeleteMessageBatch where -instance NFData DeleteMessageBatch+instance NFData DeleteMessageBatch where  instance ToHeaders DeleteMessageBatch where         toHeaders = const mempty@@ -117,46 +112,48 @@                toQueryList "DeleteMessageBatchRequestEntry"                  _dmbEntries] --- | For each message in the batch, the response contains a 'DeleteMessageBatchResultEntry' tag if the message is deleted or a 'BatchResultErrorEntry' tag if the message can't be deleted.+-- | For each message in the batch, the response contains a @'DeleteMessageBatchResultEntry' @ tag if the message is deleted or a @'BatchResultErrorEntry' @ tag if the message can't be deleted. -- -- -- -- /See:/ 'deleteMessageBatchResponse' smart constructor. data DeleteMessageBatchResponse = DeleteMessageBatchResponse'-    { _dmbrsResponseStatus :: !Int-    , _dmbrsSuccessful     :: ![DeleteMessageBatchResultEntry]-    , _dmbrsFailed         :: ![BatchResultErrorEntry]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dmbrsResponseStatus :: !Int+  , _dmbrsSuccessful     :: ![DeleteMessageBatchResultEntry]+  , _dmbrsFailed         :: ![BatchResultErrorEntry]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMessageBatchResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'dmbrsResponseStatus' - -- | The response status code. ----- * 'dmbrsSuccessful' - A list of 'DeleteMessageBatchResultEntry' items.+-- * 'dmbrsSuccessful' - A list of @'DeleteMessageBatchResultEntry' @ items. ----- * 'dmbrsFailed' - A list of 'BatchResultErrorEntry' items.+-- * 'dmbrsFailed' - A list of @'BatchResultErrorEntry' @ items. deleteMessageBatchResponse     :: Int -- ^ 'dmbrsResponseStatus'     -> DeleteMessageBatchResponse deleteMessageBatchResponse pResponseStatus_ =-    DeleteMessageBatchResponse'-    { _dmbrsResponseStatus = pResponseStatus_-    , _dmbrsSuccessful = mempty-    , _dmbrsFailed = mempty-    }+  DeleteMessageBatchResponse'+  { _dmbrsResponseStatus = pResponseStatus_+  , _dmbrsSuccessful = mempty+  , _dmbrsFailed = mempty+  } + -- | -- | The response status code. dmbrsResponseStatus :: Lens' DeleteMessageBatchResponse Int dmbrsResponseStatus = lens _dmbrsResponseStatus (\ s a -> s{_dmbrsResponseStatus = a}); --- | A list of 'DeleteMessageBatchResultEntry' items.+-- | A list of @'DeleteMessageBatchResultEntry' @ items. dmbrsSuccessful :: Lens' DeleteMessageBatchResponse [DeleteMessageBatchResultEntry] dmbrsSuccessful = lens _dmbrsSuccessful (\ s a -> s{_dmbrsSuccessful = a}) . _Coerce; --- | A list of 'BatchResultErrorEntry' items.+-- | A list of @'BatchResultErrorEntry' @ items. dmbrsFailed :: Lens' DeleteMessageBatchResponse [BatchResultErrorEntry] dmbrsFailed = lens _dmbrsFailed (\ s a -> s{_dmbrsFailed = a}) . _Coerce; -instance NFData DeleteMessageBatchResponse+instance NFData DeleteMessageBatchResponse where

@@ -12,20 +12,20 @@  -- | -- Module      : Network.AWS.SQS.DeleteQueue--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Deletes the queue specified by the __queue URL__ , regardless of whether the queue is empty. If the specified queue doesn't exist, Amazon SQS returns a successful response.+-- Deletes the queue specified by the @QueueUrl@ , regardless of the queue's contents. If the specified queue doesn't exist, Amazon SQS returns a successful response. -- ----- /Important:/ Use @DeleteQueue@ with care; once you delete your queue, any messages in the queue are no longer available.+-- /Important:/ Be careful with the @DeleteQueue@ action: When you delete a queue, any messages in the queue are no longer available. ----- When you delete a queue, the deletion process takes up to 60 seconds. Requests you send involving that queue during the 60 seconds might succeed. For example, a 'SendMessage' request might succeed, but after the 60 seconds, the queue and that message you sent no longer exist. Also, when you delete a queue, you must wait at least 60 seconds before creating a queue with the same name.+-- When you delete a queue, the deletion process takes up to 60 seconds. Requests you send involving that queue during the 60 seconds might succeed. For example, a @'SendMessage' @ request might succeed, but after 60 seconds the queue and the message you sent no longer exist. ----- We reserve the right to delete queues that have had no activity for more than 30 days. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSConcepts.html How Amazon SQS Queues Work> in the /Amazon SQS Developer Guide/ .+-- When you delete a queue, you must wait at least 60 seconds before creating a queue with the same name. -- module Network.AWS.SQS.DeleteQueue     (@@ -40,12 +40,12 @@     , DeleteQueueResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -53,23 +53,22 @@ -- -- /See:/ 'deleteQueue' smart constructor. newtype DeleteQueue = DeleteQueue'-    { _dqQueueURL :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dqQueueURL :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteQueue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dqQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'dqQueueURL' - The URL of the Amazon SQS queue to delete. Queue URLs are case-sensitive. deleteQueue     :: Text -- ^ 'dqQueueURL'     -> DeleteQueue-deleteQueue pQueueURL_ =-    DeleteQueue'-    { _dqQueueURL = pQueueURL_-    }+deleteQueue pQueueURL_ = DeleteQueue' {_dqQueueURL = pQueueURL_} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue to delete. Queue URLs are case-sensitive. dqQueueURL :: Lens' DeleteQueue Text dqQueueURL = lens _dqQueueURL (\ s a -> s{_dqQueueURL = a}); @@ -78,9 +77,9 @@         request = postQuery sqs         response = receiveNull DeleteQueueResponse' -instance Hashable DeleteQueue+instance Hashable DeleteQueue where -instance NFData DeleteQueue+instance NFData DeleteQueue where  instance ToHeaders DeleteQueue where         toHeaders = const mempty@@ -97,13 +96,15 @@  -- | /See:/ 'deleteQueueResponse' smart constructor. data DeleteQueueResponse =-    DeleteQueueResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  DeleteQueueResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteQueueResponse' with the minimum fields required to make a request. -- deleteQueueResponse     :: DeleteQueueResponse deleteQueueResponse = DeleteQueueResponse' -instance NFData DeleteQueueResponse++instance NFData DeleteQueueResponse where

@@ -12,19 +12,15 @@  -- | -- Module      : Network.AWS.SQS.GetQueueAttributes--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- -- Gets attributes for the specified queue. -- ----- @&amp;Attribute.1=this@------ @&amp;Attribute.2=that@--- module Network.AWS.SQS.GetQueueAttributes     (     -- * Creating a Request@@ -42,12 +38,12 @@     , gqarsResponseStatus     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -55,31 +51,30 @@ -- -- /See:/ 'getQueueAttributes' smart constructor. data GetQueueAttributes = GetQueueAttributes'-    { _gqaAttributeNames :: !(Maybe [QueueAttributeName])-    , _gqaQueueURL       :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gqaAttributeNames :: !(Maybe [QueueAttributeName])+  , _gqaQueueURL       :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetQueueAttributes' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gqaAttributeNames' - A list of attributes for which to retrieve information. The following attributes are supported:     * @All@ - Returns all values.      * @ApproximateNumberOfMessages@ - Returns the approximate number of visible messages in a queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ApproximateNumber.html Resources Required to Process Messages> in the /Amazon SQS Developer Guide/ .      * @ApproximateNumberOfMessagesDelayed@ - Returns the approximate number of messages that are waiting to be added to the queue.      * @ApproximateNumberOfMessagesNotVisible@ - Returns the approximate number of messages that have not timed-out and are not deleted. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ApproximateNumber.html Resources Required to Process Messages> in the /Amazon SQS Developer Guide/ .      * @CreatedTimestamp@ - Returns the time when the queue was created in seconds (epoch time).     * @DelaySeconds@ - Returns the default delay on the queue in seconds.     * @LastModifiedTimestamp@ - Returns the time when the queue was last changed in seconds (epoch time).     * @MaximumMessageSize@ - Returns the limit of how many bytes a message can contain before Amazon SQS rejects it.     * @MessageRetentionPeriod@ - Returns the number of seconds for which Amazon SQS retains a message.     * @Policy@ - Returns the policy of the queue.     * @QueueArn@ - Returns the Amazon resource name (ARN) of the queue.     * @ReceiveMessageWaitTimeSeconds@ - Returns the number of seconds for which ReceiveMessage call will wait for a message to arrive.      * @RedrivePolicy@ - Returns the parameters for dead letter queue functionality of the source queue. For more information about the redrive policy and dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .      * @VisibilityTimeout@ - Returns the visibility timeout for the queue. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Returns whether the queue is FIFO. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon SQS Developer Guide/ .     * @ContentBasedDeduplication@ - Returns whether content-based deduplication is enabled for the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .+-- * 'gqaAttributeNames' - A list of attributes for which to retrieve information. The following attributes are supported:     * @All@ - Returns all values.      * @ApproximateNumberOfMessages@ - Returns the approximate number of visible messages in a queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-resources-required-process-messages.html Resources Required to Process Messages> in the /Amazon Simple Queue Service Developer Guide/ .      * @ApproximateNumberOfMessagesDelayed@ - Returns the approximate number of messages that are waiting to be added to the queue.      * @ApproximateNumberOfMessagesNotVisible@ - Returns the approximate number of messages that have not timed-out and aren't deleted. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-resources-required-process-messages.html Resources Required to Process Messages> in the /Amazon Simple Queue Service Developer Guide/ .      * @CreatedTimestamp@ - Returns the time when the queue was created in seconds (<http://en.wikipedia.org/wiki/Unix_time epoch time> ).     * @DelaySeconds@ - Returns the default delay on the queue in seconds.     * @LastModifiedTimestamp@ - Returns the time when the queue was last changed in seconds (<http://en.wikipedia.org/wiki/Unix_time epoch time> ).     * @MaximumMessageSize@ - Returns the limit of how many bytes a message can contain before Amazon SQS rejects it.     * @MessageRetentionPeriod@ - Returns the length of time, in seconds, for which Amazon SQS retains a message.     * @Policy@ - Returns the policy of the queue.     * @QueueArn@ - Returns the Amazon resource name (ARN) of the queue.     * @ReceiveMessageWaitTimeSeconds@ - Returns the length of time, in seconds, for which the @ReceiveMessage@ action waits for a message to arrive.      * @RedrivePolicy@ - Returns the string that includes the parameters for dead-letter queue functionality of the source queue. For more information about the redrive policy and dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ .      * @deadLetterTargetArn@ - The Amazon Resource Name (ARN) of the dead-letter queue to which Amazon SQS moves messages after the value of @maxReceiveCount@ is exceeded.     * @maxReceiveCount@ - The number of times a message is delivered to the source queue before being moved to the dead-letter queue.     * @VisibilityTimeout@ - Returns the visibility timeout for the queue. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html server-side-encryption> :     * @KmsMasterKeyId@ - Returns the ID of an AWS-managed customer master key (CMK) for Amazon SQS or a custom CMK. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-sse-key-terms Key Terms> .      * @KmsDataKeyReusePeriodSeconds@ - Returns the length of time, in seconds, for which Amazon SQS can reuse a data key to encrypt or decrypt messages before calling AWS KMS again. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-how-does-the-data-key-reuse-period-work How Does the Data Key Reuse Period Work?> .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Returns whether the queue is FIFO. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon Simple Queue Service Developer Guide/ .     * @ContentBasedDeduplication@ - Returns whether content-based deduplication is enabled for the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'gqaQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'gqaQueueURL' - The URL of the Amazon SQS queue whose attribute information is retrieved. Queue URLs are case-sensitive. getQueueAttributes     :: Text -- ^ 'gqaQueueURL'     -> GetQueueAttributes getQueueAttributes pQueueURL_ =-    GetQueueAttributes'-    { _gqaAttributeNames = Nothing-    , _gqaQueueURL = pQueueURL_-    }+  GetQueueAttributes' {_gqaAttributeNames = Nothing, _gqaQueueURL = pQueueURL_} --- | A list of attributes for which to retrieve information. The following attributes are supported:     * @All@ - Returns all values.      * @ApproximateNumberOfMessages@ - Returns the approximate number of visible messages in a queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ApproximateNumber.html Resources Required to Process Messages> in the /Amazon SQS Developer Guide/ .      * @ApproximateNumberOfMessagesDelayed@ - Returns the approximate number of messages that are waiting to be added to the queue.      * @ApproximateNumberOfMessagesNotVisible@ - Returns the approximate number of messages that have not timed-out and are not deleted. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ApproximateNumber.html Resources Required to Process Messages> in the /Amazon SQS Developer Guide/ .      * @CreatedTimestamp@ - Returns the time when the queue was created in seconds (epoch time).     * @DelaySeconds@ - Returns the default delay on the queue in seconds.     * @LastModifiedTimestamp@ - Returns the time when the queue was last changed in seconds (epoch time).     * @MaximumMessageSize@ - Returns the limit of how many bytes a message can contain before Amazon SQS rejects it.     * @MessageRetentionPeriod@ - Returns the number of seconds for which Amazon SQS retains a message.     * @Policy@ - Returns the policy of the queue.     * @QueueArn@ - Returns the Amazon resource name (ARN) of the queue.     * @ReceiveMessageWaitTimeSeconds@ - Returns the number of seconds for which ReceiveMessage call will wait for a message to arrive.      * @RedrivePolicy@ - Returns the parameters for dead letter queue functionality of the source queue. For more information about the redrive policy and dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .      * @VisibilityTimeout@ - Returns the visibility timeout for the queue. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Returns whether the queue is FIFO. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon SQS Developer Guide/ .     * @ContentBasedDeduplication@ - Returns whether content-based deduplication is enabled for the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .++-- | A list of attributes for which to retrieve information. The following attributes are supported:     * @All@ - Returns all values.      * @ApproximateNumberOfMessages@ - Returns the approximate number of visible messages in a queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-resources-required-process-messages.html Resources Required to Process Messages> in the /Amazon Simple Queue Service Developer Guide/ .      * @ApproximateNumberOfMessagesDelayed@ - Returns the approximate number of messages that are waiting to be added to the queue.      * @ApproximateNumberOfMessagesNotVisible@ - Returns the approximate number of messages that have not timed-out and aren't deleted. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-resources-required-process-messages.html Resources Required to Process Messages> in the /Amazon Simple Queue Service Developer Guide/ .      * @CreatedTimestamp@ - Returns the time when the queue was created in seconds (<http://en.wikipedia.org/wiki/Unix_time epoch time> ).     * @DelaySeconds@ - Returns the default delay on the queue in seconds.     * @LastModifiedTimestamp@ - Returns the time when the queue was last changed in seconds (<http://en.wikipedia.org/wiki/Unix_time epoch time> ).     * @MaximumMessageSize@ - Returns the limit of how many bytes a message can contain before Amazon SQS rejects it.     * @MessageRetentionPeriod@ - Returns the length of time, in seconds, for which Amazon SQS retains a message.     * @Policy@ - Returns the policy of the queue.     * @QueueArn@ - Returns the Amazon resource name (ARN) of the queue.     * @ReceiveMessageWaitTimeSeconds@ - Returns the length of time, in seconds, for which the @ReceiveMessage@ action waits for a message to arrive.      * @RedrivePolicy@ - Returns the string that includes the parameters for dead-letter queue functionality of the source queue. For more information about the redrive policy and dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ .      * @deadLetterTargetArn@ - The Amazon Resource Name (ARN) of the dead-letter queue to which Amazon SQS moves messages after the value of @maxReceiveCount@ is exceeded.     * @maxReceiveCount@ - The number of times a message is delivered to the source queue before being moved to the dead-letter queue.     * @VisibilityTimeout@ - Returns the visibility timeout for the queue. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html server-side-encryption> :     * @KmsMasterKeyId@ - Returns the ID of an AWS-managed customer master key (CMK) for Amazon SQS or a custom CMK. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-sse-key-terms Key Terms> .      * @KmsDataKeyReusePeriodSeconds@ - Returns the length of time, in seconds, for which Amazon SQS can reuse a data key to encrypt or decrypt messages before calling AWS KMS again. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-how-does-the-data-key-reuse-period-work How Does the Data Key Reuse Period Work?> .  The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @FifoQueue@ - Returns whether the queue is FIFO. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-understanding-logic FIFO Queue Logic> in the /Amazon Simple Queue Service Developer Guide/ .     * @ContentBasedDeduplication@ - Returns whether content-based deduplication is enabled for the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ . gqaAttributeNames :: Lens' GetQueueAttributes [QueueAttributeName] gqaAttributeNames = lens _gqaAttributeNames (\ s a -> s{_gqaAttributeNames = a}) . _Default . _Coerce; --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- | The URL of the Amazon SQS queue whose attribute information is retrieved. Queue URLs are case-sensitive. gqaQueueURL :: Lens' GetQueueAttributes Text gqaQueueURL = lens _gqaQueueURL (\ s a -> s{_gqaQueueURL = a}); @@ -94,9 +89,9 @@                    (may (parseXMLMap "Attribute" "Name" "Value") x) <*>                      (pure (fromEnum s))) -instance Hashable GetQueueAttributes+instance Hashable GetQueueAttributes where -instance NFData GetQueueAttributes+instance NFData GetQueueAttributes where  instance ToHeaders GetQueueAttributes where         toHeaders = const mempty@@ -119,27 +114,27 @@ -- -- /See:/ 'getQueueAttributesResponse' smart constructor. data GetQueueAttributesResponse = GetQueueAttributesResponse'-    { _gqarsAttributes     :: !(Maybe (Map QueueAttributeName Text))-    , _gqarsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gqarsAttributes     :: !(Maybe (Map QueueAttributeName Text))+  , _gqarsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetQueueAttributesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'gqarsAttributes' - A map of attributes to the respective values.+-- * 'gqarsAttributes' - A map of attributes to their respective values. -- -- * 'gqarsResponseStatus' - -- | The response status code. getQueueAttributesResponse     :: Int -- ^ 'gqarsResponseStatus'     -> GetQueueAttributesResponse getQueueAttributesResponse pResponseStatus_ =-    GetQueueAttributesResponse'-    { _gqarsAttributes = Nothing-    , _gqarsResponseStatus = pResponseStatus_-    }+  GetQueueAttributesResponse'+  {_gqarsAttributes = Nothing, _gqarsResponseStatus = pResponseStatus_} --- | A map of attributes to the respective values.++-- | A map of attributes to their respective values. gqarsAttributes :: Lens' GetQueueAttributesResponse (HashMap QueueAttributeName Text) gqarsAttributes = lens _gqarsAttributes (\ s a -> s{_gqarsAttributes = a}) . _Default . _Map; @@ -147,4 +142,4 @@ gqarsResponseStatus :: Lens' GetQueueAttributesResponse Int gqarsResponseStatus = lens _gqarsResponseStatus (\ s a -> s{_gqarsResponseStatus = a}); -instance NFData GetQueueAttributesResponse+instance NFData GetQueueAttributesResponse where

@@ -12,16 +12,16 @@  -- | -- Module      : Network.AWS.SQS.GetQueueURL--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- -- Returns the URL of an existing queue. This action provides a simple way to retrieve the URL of an Amazon SQS queue. -- ----- To access a queue that belongs to another AWS account, use the @QueueOwnerAWSAccountId@ parameter to specify the account ID of the queue's owner. The queue's owner must grant you permission to access the queue. For more information about shared queue access, see 'AddPermission' or see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html Shared Queues> in the /Amazon SQS Developer Guide/ .+-- To access a queue that belongs to another AWS account, use the @QueueOwnerAWSAccountId@ parameter to specify the account ID of the queue's owner. The queue's owner must grant you permission to access the queue. For more information about shared queue access, see @'AddPermission' @ or see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/acp-overview.html Shared Queues> in the /Amazon Simple Queue Service Developer Guide/ . -- module Network.AWS.SQS.GetQueueURL     (@@ -40,12 +40,12 @@     , gqursQueueURL     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -53,31 +53,31 @@ -- -- /See:/ 'getQueueURL' smart constructor. data GetQueueURL = GetQueueURL'-    { _gquQueueOwnerAWSAccountId :: !(Maybe Text)-    , _gquQueueName              :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gquQueueOwnerAWSAccountId :: !(Maybe Text)+  , _gquQueueName              :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetQueueURL' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'gquQueueOwnerAWSAccountId' - The AWS account ID of the account that created the queue. ----- * 'gquQueueName' - The name of the queue whose URL must be fetched. Maximum 80 characters; alphanumeric characters, hyphens (-), and underscores (_) are allowed. Queue names are case-sensitive.+-- * 'gquQueueName' - The name of the queue whose URL must be fetched. Maximum 80 characters. Valid values: alphanumeric characters, hyphens (@-@ ), and underscores (@_@ ). Queue names are case-sensitive. getQueueURL     :: Text -- ^ 'gquQueueName'     -> GetQueueURL getQueueURL pQueueName_ =-    GetQueueURL'-    { _gquQueueOwnerAWSAccountId = Nothing-    , _gquQueueName = pQueueName_-    }+  GetQueueURL'+  {_gquQueueOwnerAWSAccountId = Nothing, _gquQueueName = pQueueName_} + -- | The AWS account ID of the account that created the queue. gquQueueOwnerAWSAccountId :: Lens' GetQueueURL (Maybe Text) gquQueueOwnerAWSAccountId = lens _gquQueueOwnerAWSAccountId (\ s a -> s{_gquQueueOwnerAWSAccountId = a}); --- | The name of the queue whose URL must be fetched. Maximum 80 characters; alphanumeric characters, hyphens (-), and underscores (_) are allowed. Queue names are case-sensitive.+-- | The name of the queue whose URL must be fetched. Maximum 80 characters. Valid values: alphanumeric characters, hyphens (@-@ ), and underscores (@_@ ). Queue names are case-sensitive. gquQueueName :: Lens' GetQueueURL Text gquQueueName = lens _gquQueueName (\ s a -> s{_gquQueueName = a}); @@ -90,9 +90,9 @@                  GetQueueURLResponse' <$>                    (pure (fromEnum s)) <*> (x .@ "QueueUrl")) -instance Hashable GetQueueURL+instance Hashable GetQueueURL where -instance NFData GetQueueURL+instance NFData GetQueueURL where  instance ToHeaders GetQueueURL where         toHeaders = const mempty@@ -109,39 +109,39 @@                  _gquQueueOwnerAWSAccountId,                "QueueName" =: _gquQueueName] --- | For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/UnderstandingResponses.html Responses> in the /Amazon SQS Developer Guide/ .+-- | For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/UnderstandingResponses.html Responses> in the /Amazon Simple Queue Service Developer Guide/ . -- -- -- -- /See:/ 'getQueueURLResponse' smart constructor. data GetQueueURLResponse = GetQueueURLResponse'-    { _gqursResponseStatus :: !Int-    , _gqursQueueURL       :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _gqursResponseStatus :: !Int+  , _gqursQueueURL       :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'GetQueueURLResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'gqursResponseStatus' - -- | The response status code. ----- * 'gqursQueueURL' - The URL for the queue.+-- * 'gqursQueueURL' - The URL of the queue. getQueueURLResponse     :: Int -- ^ 'gqursResponseStatus'     -> Text -- ^ 'gqursQueueURL'     -> GetQueueURLResponse getQueueURLResponse pResponseStatus_ pQueueURL_ =-    GetQueueURLResponse'-    { _gqursResponseStatus = pResponseStatus_-    , _gqursQueueURL = pQueueURL_-    }+  GetQueueURLResponse'+  {_gqursResponseStatus = pResponseStatus_, _gqursQueueURL = pQueueURL_} + -- | -- | The response status code. gqursResponseStatus :: Lens' GetQueueURLResponse Int gqursResponseStatus = lens _gqursResponseStatus (\ s a -> s{_gqursResponseStatus = a}); --- | The URL for the queue.+-- | The URL of the queue. gqursQueueURL :: Lens' GetQueueURLResponse Text gqursQueueURL = lens _gqursQueueURL (\ s a -> s{_gqursQueueURL = a}); -instance NFData GetQueueURLResponse+instance NFData GetQueueURLResponse where

@@ -12,16 +12,16 @@  -- | -- Module      : Network.AWS.SQS.ListDeadLetterSourceQueues--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns a list of your queues that have the RedrivePolicy queue attribute configured with a dead letter queue.+-- Returns a list of your queues that have the @RedrivePolicy@ queue attribute configured with a dead-letter queue. -- ----- For more information about using dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .+-- For more information about using dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ . -- module Network.AWS.SQS.ListDeadLetterSourceQueues     (@@ -39,12 +39,12 @@     , ldlsqrsQueueURLs     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -52,23 +52,23 @@ -- -- /See:/ 'listDeadLetterSourceQueues' smart constructor. newtype ListDeadLetterSourceQueues = ListDeadLetterSourceQueues'-    { _ldlsqQueueURL :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _ldlsqQueueURL :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListDeadLetterSourceQueues' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'ldlsqQueueURL' - The queue URL of a dead letter queue. Queue URLs are case-sensitive.+-- * 'ldlsqQueueURL' - The URL of a dead-letter queue. Queue URLs are case-sensitive. listDeadLetterSourceQueues     :: Text -- ^ 'ldlsqQueueURL'     -> ListDeadLetterSourceQueues listDeadLetterSourceQueues pQueueURL_ =-    ListDeadLetterSourceQueues'-    { _ldlsqQueueURL = pQueueURL_-    }+  ListDeadLetterSourceQueues' {_ldlsqQueueURL = pQueueURL_} --- | The queue URL of a dead letter queue. Queue URLs are case-sensitive.++-- | The URL of a dead-letter queue. Queue URLs are case-sensitive. ldlsqQueueURL :: Lens' ListDeadLetterSourceQueues Text ldlsqQueueURL = lens _ldlsqQueueURL (\ s a -> s{_ldlsqQueueURL = a}); @@ -83,9 +83,9 @@                  ListDeadLetterSourceQueuesResponse' <$>                    (pure (fromEnum s)) <*> (parseXMLList "QueueUrl" x)) -instance Hashable ListDeadLetterSourceQueues+instance Hashable ListDeadLetterSourceQueues where -instance NFData ListDeadLetterSourceQueues+instance NFData ListDeadLetterSourceQueues where  instance ToHeaders ListDeadLetterSourceQueues where         toHeaders = const mempty@@ -107,32 +107,33 @@ -- -- /See:/ 'listDeadLetterSourceQueuesResponse' smart constructor. data ListDeadLetterSourceQueuesResponse = ListDeadLetterSourceQueuesResponse'-    { _ldlsqrsResponseStatus :: !Int-    , _ldlsqrsQueueURLs      :: ![Text]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _ldlsqrsResponseStatus :: !Int+  , _ldlsqrsQueueURLs      :: ![Text]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListDeadLetterSourceQueuesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'ldlsqrsResponseStatus' - -- | The response status code. ----- * 'ldlsqrsQueueURLs' - A list of source queue URLs that have the RedrivePolicy queue attribute configured with a dead letter queue.+-- * 'ldlsqrsQueueURLs' - A list of source queue URLs that have the @RedrivePolicy@ queue attribute configured with a dead-letter queue. listDeadLetterSourceQueuesResponse     :: Int -- ^ 'ldlsqrsResponseStatus'     -> ListDeadLetterSourceQueuesResponse listDeadLetterSourceQueuesResponse pResponseStatus_ =-    ListDeadLetterSourceQueuesResponse'-    { _ldlsqrsResponseStatus = pResponseStatus_-    , _ldlsqrsQueueURLs = mempty-    }+  ListDeadLetterSourceQueuesResponse'+  {_ldlsqrsResponseStatus = pResponseStatus_, _ldlsqrsQueueURLs = mempty} + -- | -- | The response status code. ldlsqrsResponseStatus :: Lens' ListDeadLetterSourceQueuesResponse Int ldlsqrsResponseStatus = lens _ldlsqrsResponseStatus (\ s a -> s{_ldlsqrsResponseStatus = a}); --- | A list of source queue URLs that have the RedrivePolicy queue attribute configured with a dead letter queue.+-- | A list of source queue URLs that have the @RedrivePolicy@ queue attribute configured with a dead-letter queue. ldlsqrsQueueURLs :: Lens' ListDeadLetterSourceQueuesResponse [Text] ldlsqrsQueueURLs = lens _ldlsqrsQueueURLs (\ s a -> s{_ldlsqrsQueueURLs = a}) . _Coerce;  instance NFData ListDeadLetterSourceQueuesResponse+         where

@@ -0,0 +1,141 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.SQS.ListQueueTags+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- List all cost allocation tags added to the specified Amazon SQS queue. For an overview, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-tagging-queues.html Tagging Amazon SQS Queues> in the /Amazon Simple Queue Service Developer Guide/ .+--+--+-- When you use queue tags, keep the following guidelines in mind:+--+--     * Adding more than 50 tags to a queue isn't recommended.+--+--     * Tags don't have any semantic meaning. Amazon SQS interprets tags as character strings.+--+--     * Tags are case-sensitive.+--+--     * A new tag with a key identical to that of an existing tag overwrites the existing tag.+--+--     * Tagging API actions are limited to 5 TPS per AWS account. If your application requires a higher throughput, file a <https://console.aws.amazon.com/support/home#/case/create?issueType=technical technical support request> .+--+--+--+-- For a full list of tag restrictions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/limits-queues.html Limits Related to Queues> in the /Amazon Simple Queue Service Developer Guide/ .+--+module Network.AWS.SQS.ListQueueTags+    (+    -- * Creating a Request+      listQueueTags+    , ListQueueTags+    -- * Request Lenses+    , lqtQueueURL++    -- * Destructuring the Response+    , listQueueTagsResponse+    , ListQueueTagsResponse+    -- * Response Lenses+    , lqtrsTags+    , lqtrsResponseStatus+    ) where++import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product++-- | /See:/ 'listQueueTags' smart constructor.+newtype ListQueueTags = ListQueueTags'+  { _lqtQueueURL :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ListQueueTags' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lqtQueueURL' - The URL of the queue.+listQueueTags+    :: Text -- ^ 'lqtQueueURL'+    -> ListQueueTags+listQueueTags pQueueURL_ = ListQueueTags' {_lqtQueueURL = pQueueURL_}+++-- | The URL of the queue.+lqtQueueURL :: Lens' ListQueueTags Text+lqtQueueURL = lens _lqtQueueURL (\ s a -> s{_lqtQueueURL = a});++instance AWSRequest ListQueueTags where+        type Rs ListQueueTags = ListQueueTagsResponse+        request = postQuery sqs+        response+          = receiveXMLWrapper "ListQueueTagsResult"+              (\ s h x ->+                 ListQueueTagsResponse' <$>+                   (may (parseXMLMap "Tag" "Key" "Value") x) <*>+                     (pure (fromEnum s)))++instance Hashable ListQueueTags where++instance NFData ListQueueTags where++instance ToHeaders ListQueueTags where+        toHeaders = const mempty++instance ToPath ListQueueTags where+        toPath = const "/"++instance ToQuery ListQueueTags where+        toQuery ListQueueTags'{..}+          = mconcat+              ["Action" =: ("ListQueueTags" :: ByteString),+               "Version" =: ("2012-11-05" :: ByteString),+               "QueueUrl" =: _lqtQueueURL]++-- | /See:/ 'listQueueTagsResponse' smart constructor.+data ListQueueTagsResponse = ListQueueTagsResponse'+  { _lqtrsTags           :: !(Maybe (Map Text Text))+  , _lqtrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'ListQueueTagsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'lqtrsTags' - The list of all tags added to the specified queue.+--+-- * 'lqtrsResponseStatus' - -- | The response status code.+listQueueTagsResponse+    :: Int -- ^ 'lqtrsResponseStatus'+    -> ListQueueTagsResponse+listQueueTagsResponse pResponseStatus_ =+  ListQueueTagsResponse'+  {_lqtrsTags = Nothing, _lqtrsResponseStatus = pResponseStatus_}+++-- | The list of all tags added to the specified queue.+lqtrsTags :: Lens' ListQueueTagsResponse (HashMap Text Text)+lqtrsTags = lens _lqtrsTags (\ s a -> s{_lqtrsTags = a}) . _Default . _Map;++-- | -- | The response status code.+lqtrsResponseStatus :: Lens' ListQueueTagsResponse Int+lqtrsResponseStatus = lens _lqtrsResponseStatus (\ s a -> s{_lqtrsResponseStatus = a});++instance NFData ListQueueTagsResponse where

@@ -12,13 +12,13 @@  -- | -- Module      : Network.AWS.SQS.ListQueues--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Returns a list of your queues. The maximum number of queues that can be returned is 1000. If you specify a value for the optional @QueueNamePrefix@ parameter, only queues with a name beginning with the specified value are returned.+-- Returns a list of your queues. The maximum number of queues that can be returned is 1,000. If you specify a value for the optional @QueueNamePrefix@ parameter, only queues with a name that begins with the specified value are returned. -- -- module Network.AWS.SQS.ListQueues@@ -37,12 +37,12 @@     , lqrsResponseStatus     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -50,9 +50,10 @@ -- -- /See:/ 'listQueues' smart constructor. newtype ListQueues = ListQueues'-    { _lqQueueNamePrefix :: Maybe Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _lqQueueNamePrefix :: Maybe Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListQueues' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -60,11 +61,9 @@ -- * 'lqQueueNamePrefix' - A string to use for filtering the list results. Only those queues whose name begins with the specified string are returned. Queue names are case-sensitive. listQueues     :: ListQueues-listQueues =-    ListQueues'-    { _lqQueueNamePrefix = Nothing-    }+listQueues = ListQueues' {_lqQueueNamePrefix = Nothing} + -- | A string to use for filtering the list results. Only those queues whose name begins with the specified string are returned. Queue names are case-sensitive. lqQueueNamePrefix :: Lens' ListQueues (Maybe Text) lqQueueNamePrefix = lens _lqQueueNamePrefix (\ s a -> s{_lqQueueNamePrefix = a});@@ -79,9 +78,9 @@                    (may (parseXMLList "QueueUrl") x) <*>                      (pure (fromEnum s))) -instance Hashable ListQueues+instance Hashable ListQueues where -instance NFData ListQueues+instance NFData ListQueues where  instance ToHeaders ListQueues where         toHeaders = const mempty@@ -102,27 +101,27 @@ -- -- /See:/ 'listQueuesResponse' smart constructor. data ListQueuesResponse = ListQueuesResponse'-    { _lqrsQueueURLs      :: !(Maybe [Text])-    , _lqrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _lqrsQueueURLs      :: !(Maybe [Text])+  , _lqrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListQueuesResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'lqrsQueueURLs' - A list of queue URLs, up to 1000 entries.+-- * 'lqrsQueueURLs' - A list of queue URLs, up to 1,000 entries. -- -- * 'lqrsResponseStatus' - -- | The response status code. listQueuesResponse     :: Int -- ^ 'lqrsResponseStatus'     -> ListQueuesResponse listQueuesResponse pResponseStatus_ =-    ListQueuesResponse'-    { _lqrsQueueURLs = Nothing-    , _lqrsResponseStatus = pResponseStatus_-    }+  ListQueuesResponse'+  {_lqrsQueueURLs = Nothing, _lqrsResponseStatus = pResponseStatus_} --- | A list of queue URLs, up to 1000 entries.++-- | A list of queue URLs, up to 1,000 entries. lqrsQueueURLs :: Lens' ListQueuesResponse [Text] lqrsQueueURLs = lens _lqrsQueueURLs (\ s a -> s{_lqrsQueueURLs = a}) . _Default . _Coerce; @@ -130,4 +129,4 @@ lqrsResponseStatus :: Lens' ListQueuesResponse Int lqrsResponseStatus = lens _lqrsResponseStatus (\ s a -> s{_lqrsResponseStatus = a}); -instance NFData ListQueuesResponse+instance NFData ListQueuesResponse where

@@ -12,18 +12,18 @@  -- | -- Module      : Network.AWS.SQS.PurgeQueue--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Deletes the messages in a queue specified by the __queue URL__ .+-- Deletes the messages in a queue specified by the @QueueURL@ parameter. -- ----- /Important:/ When you use the @PurgeQueue@ API, the deleted messages in the queue can't be retrieved.+-- /Important:/ When you use the @PurgeQueue@ action, you can't retrieve a message deleted from a queue. ----- When you purge a queue, the message deletion process takes up to 60 seconds. All messages sent to the queue before calling @PurgeQueue@ will be deleted; messages sent to the queue while it is being purged might be deleted. While the queue is being purged, messages sent to the queue before @PurgeQueue@ was called might be received, but will be deleted within the next minute.+-- When you purge a queue, the message deletion process takes up to 60 seconds. All messages sent to the queue before calling the @PurgeQueue@ action are deleted. Messages sent to the queue while it is being purged might be deleted. While the queue is being purged, messages sent to the queue before @PurgeQueue@ is called might be received, but are deleted within the next minute. -- module Network.AWS.SQS.PurgeQueue     (@@ -38,12 +38,12 @@     , PurgeQueueResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -51,23 +51,22 @@ -- -- /See:/ 'purgeQueue' smart constructor. newtype PurgeQueue = PurgeQueue'-    { _pqQueueURL :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _pqQueueURL :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'PurgeQueue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'pqQueueURL' - The queue URL of the queue to delete the messages from when using the @PurgeQueue@ API. Queue URLs are case-sensitive.+-- * 'pqQueueURL' - The URL of the queue from which the @PurgeQueue@ action deletes messages. Queue URLs are case-sensitive. purgeQueue     :: Text -- ^ 'pqQueueURL'     -> PurgeQueue-purgeQueue pQueueURL_ =-    PurgeQueue'-    { _pqQueueURL = pQueueURL_-    }+purgeQueue pQueueURL_ = PurgeQueue' {_pqQueueURL = pQueueURL_} --- | The queue URL of the queue to delete the messages from when using the @PurgeQueue@ API. Queue URLs are case-sensitive.++-- | The URL of the queue from which the @PurgeQueue@ action deletes messages. Queue URLs are case-sensitive. pqQueueURL :: Lens' PurgeQueue Text pqQueueURL = lens _pqQueueURL (\ s a -> s{_pqQueueURL = a}); @@ -76,9 +75,9 @@         request = postQuery sqs         response = receiveNull PurgeQueueResponse' -instance Hashable PurgeQueue+instance Hashable PurgeQueue where -instance NFData PurgeQueue+instance NFData PurgeQueue where  instance ToHeaders PurgeQueue where         toHeaders = const mempty@@ -95,13 +94,15 @@  -- | /See:/ 'purgeQueueResponse' smart constructor. data PurgeQueueResponse =-    PurgeQueueResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  PurgeQueueResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'PurgeQueueResponse' with the minimum fields required to make a request. -- purgeQueueResponse     :: PurgeQueueResponse purgeQueueResponse = PurgeQueueResponse' -instance NFData PurgeQueueResponse++instance NFData PurgeQueueResponse where

@@ -12,38 +12,38 @@  -- | -- Module      : Network.AWS.SQS.ReceiveMessage--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Retrieves one or more messages, with a maximum limit of 10 messages, from the specified queue. Long poll support is enabled by using the @WaitTimeSeconds@ parameter. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-long-polling.html Amazon SQS Long Poll> in the /Amazon SQS Developer Guide/ .+-- Retrieves one or more messages (up to 10), from the specified queue. Using the @WaitTimeSeconds@ parameter enables long-poll support. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-long-polling.html Amazon SQS Long Polling> in the /Amazon Simple Queue Service Developer Guide/ . -- ----- Short poll is the default behavior where a weighted random set of machines is sampled on a @ReceiveMessage@ call. This means only the messages on the sampled machines are returned. If the number of messages in the queue is small (less than 1000), it is likely you will get fewer messages than you requested per @ReceiveMessage@ call. If the number of messages in the queue is extremely small, you might not receive any messages in a particular @ReceiveMessage@ response; in which case you should repeat the request.+-- Short poll is the default behavior where a weighted random set of machines is sampled on a @ReceiveMessage@ call. Thus, only the messages on the sampled machines are returned. If the number of messages in the queue is small (fewer than 1,000), you most likely get fewer messages than you requested per @ReceiveMessage@ call. If the number of messages in the queue is extremely small, you might not receive any messages in a particular @ReceiveMessage@ response. If this happens, repeat the request. -- -- For each message returned, the response includes the following: -----     * Message body+--     * The message body. -----     * MD5 digest of the message body. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+--     * An MD5 digest of the message body. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . -----     * Message ID you received when you sent the message to the queue.+--     * The @MessageId@ you received when you sent the message to the queue. -----     * Receipt handle.+--     * The receipt handle. -----     * Message attributes.+--     * The message attributes. -----     * MD5 digest of the message attributes.+--     * An MD5 digest of the message attributes. -- -- ----- The receipt handle is the identifier you must provide when deleting the message. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ImportantIdentifiers.html Queue and Message Identifiers> in the /Amazon SQS Developer Guide/ .+-- The receipt handle is the identifier you must provide when deleting the message. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-queue-message-identifiers.html Queue and Message Identifiers> in the /Amazon Simple Queue Service Developer Guide/ . ----- You can provide the @VisibilityTimeout@ parameter in your request, which will be applied to the messages that Amazon SQS returns in the response. If you don't include the parameter, the overall visibility timeout for the queue is used for the returned messages. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ .+-- You can provide the @VisibilityTimeout@ parameter in your request. The parameter is applied to the messages that Amazon SQS returns in the response. If you don't include the parameter, the overall visibility timeout for the queue is used for the returned messages. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . ----- A message that is not deleted or a message whose visibility is not extended before the visibility timeout expires counts as a failed receive. Depending on the configuration of the queue, the message might be sent to the dead letter queue.+-- A message that isn't deleted or a message whose visibility isn't extended before the visibility timeout expires counts as a failed receive. Depending on the configuration of the queue, the message might be sent to the dead-letter queue. -- module Network.AWS.SQS.ReceiveMessage     (@@ -67,12 +67,12 @@     , rmrsResponseStatus     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -80,47 +80,49 @@ -- -- /See:/ 'receiveMessage' smart constructor. data ReceiveMessage = ReceiveMessage'-    { _rmReceiveRequestAttemptId :: !(Maybe Text)-    , _rmVisibilityTimeout       :: !(Maybe Int)-    , _rmMessageAttributeNames   :: !(Maybe [Text])-    , _rmWaitTimeSeconds         :: !(Maybe Int)-    , _rmAttributeNames          :: !(Maybe [MessageAttribute])-    , _rmMaxNumberOfMessages     :: !(Maybe Int)-    , _rmQueueURL                :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _rmReceiveRequestAttemptId :: !(Maybe Text)+  , _rmVisibilityTimeout       :: !(Maybe Int)+  , _rmMessageAttributeNames   :: !(Maybe [Text])+  , _rmWaitTimeSeconds         :: !(Maybe Int)+  , _rmAttributeNames          :: !(Maybe [MessageAttribute])+  , _rmMaxNumberOfMessages     :: !(Maybe Int)+  , _rmQueueURL                :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReceiveMessage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'rmReceiveRequestAttemptId' - This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of @ReceiveMessage@ calls. If a networking issue occurs after a @ReceiveMessage@ action, and instead of a response you receive a generic error, you can retry the same action with an identical @ReceiveRequestAttemptId@ to retrieve the same set of messages, even if their visibility timeout has not yet expired.     * You can use @ReceiveRequestAttemptId@ only for 5 minutes after a @ReceiveMessage@ action.     * When you set @FifoQueue@ , a caller of the @ReceiveMessage@ action can provide a @ReceiveRequestAttemptId@ explicitly.     * If a caller of the @ReceiveMessage@ action doesn't provide a @ReceiveRequestAttemptId@ , Amazon SQS generates a @ReceiveRequestAttemptId@ .     * You can retry the @ReceiveMessage@ action with the same @ReceiveRequestAttemptId@ if none of the messages have been modified (deleted or had their visibility changes).     * During a visibility timeout, subsequent calls with the same @ReceiveRequestAttemptId@ return the same messages and receipt handles. If a retry occurs within the deduplication interval, it resets the visibility timeout. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ If a caller of the @ReceiveMessage@ action is still processing messages when the visibility timeout expires and messages become visible, another worker reading from the same queue can receive the same messages and therefore process duplicates. Also, if a reader whose message processing time is longer than the visibility timeout tries to delete the processed messages, the action fails with an error. To mitigate this effect, ensure that your application observes a safe threshold before the visibility timeout expires and extend the visibility timeout as necessary.     * While messages with a particular @MessageGroupId@ are invisible, no more messages belonging to the same @MessageGroupId@ are returned until the visibility timeout expires. You can still receive messages with another @MessageGroupId@ as long as it is also visible.     * If a caller of @ReceiveMessage@ can't track the @ReceiveRequestAttemptId@ , no retries will work until the original visibility timeout expires. As a result, delays might occur but the messages in the queue will remain in a strict order. The length of @ReceiveRequestAttemptId@ is 128 characters. @ReceiveRequestAttemptId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @ReceiveRequestAttemptId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-receiverequestattemptid-request-parameter Using the ReceiveRequestAttemptId Request Parameter> in the /Amazon Simple Queue Service Developer Guide/ .+-- * 'rmReceiveRequestAttemptId' - This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of @ReceiveMessage@ calls. If a networking issue occurs after a @ReceiveMessage@ action, and instead of a response you receive a generic error, you can retry the same action with an identical @ReceiveRequestAttemptId@ to retrieve the same set of messages, even if their visibility timeout has not yet expired.     * You can use @ReceiveRequestAttemptId@ only for 5 minutes after a @ReceiveMessage@ action.     * When you set @FifoQueue@ , a caller of the @ReceiveMessage@ action can provide a @ReceiveRequestAttemptId@ explicitly.     * If a caller of the @ReceiveMessage@ action doesn't provide a @ReceiveRequestAttemptId@ , Amazon SQS generates a @ReceiveRequestAttemptId@ .     * You can retry the @ReceiveMessage@ action with the same @ReceiveRequestAttemptId@ if none of the messages have been modified (deleted or had their visibility changes).     * During a visibility timeout, subsequent calls with the same @ReceiveRequestAttemptId@ return the same messages and receipt handles. If a retry occurs within the deduplication interval, it resets the visibility timeout. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ If a caller of the @ReceiveMessage@ action is still processing messages when the visibility timeout expires and messages become visible, another worker reading from the same queue can receive the same messages and therefore process duplicates. Also, if a reader whose message processing time is longer than the visibility timeout tries to delete the processed messages, the action fails with an error. To mitigate this effect, ensure that your application observes a safe threshold before the visibility timeout expires and extend the visibility timeout as necessary.     * While messages with a particular @MessageGroupId@ are invisible, no more messages belonging to the same @MessageGroupId@ are returned until the visibility timeout expires. You can still receive messages with another @MessageGroupId@ as long as it is also visible.     * If a caller of @ReceiveMessage@ can't track the @ReceiveRequestAttemptId@ , no retries work until the original visibility timeout expires. As a result, delays might occur but the messages in the queue remain in a strict order. The length of @ReceiveRequestAttemptId@ is 128 characters. @ReceiveRequestAttemptId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @ReceiveRequestAttemptId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-receiverequestattemptid-request-parameter Using the ReceiveRequestAttemptId Request Parameter> in the /Amazon Simple Queue Service Developer Guide/ . -- -- * 'rmVisibilityTimeout' - The duration (in seconds) that the received messages are hidden from subsequent retrieve requests after being retrieved by a @ReceiveMessage@ request. ----- * 'rmMessageAttributeNames' - The name of the message attribute, where /N/ is the index. The message attribute name can contain the following characters: A-Z, a-z, 0-9, underscore (_), hyphen (-), and period (.). The name must not start or end with a period, and it should not have successive periods. The name is case sensitive and must be unique among all attribute names for the message. The name can be up to 256 characters long. The name can't start with "AWS." or "Amazon." (or any variations in casing), because these prefixes are reserved for use by Amazon Web Services. When using @ReceiveMessage@ , you can send a list of attribute names to receive, or you can return all of the attributes by specifying "All" or ".*" in your request. You can also use "bar.*" to return all message attributes starting with the "bar" prefix.+-- * 'rmMessageAttributeNames' - The name of the message attribute, where /N/ is the index.     * The name can contain alphanumeric characters and the underscore (@_@ ), hyphen (@-@ ), and period (@.@ ).     * The name is case-sensitive and must be unique among all attribute names for the message.     * The name must not start with AWS-reserved prefixes such as @AWS.@ or @Amazon.@ (or any casing variants).     * The name must not start or end with a period (@.@ ), and it should not have periods in succession (@..@ ).     * The name can be up to 256 characters long. When using @ReceiveMessage@ , you can send a list of attribute names to receive, or you can return all of the attributes by specifying @All@ or @.*@ in your request. You can also use all message attributes starting with a prefix, for example @bar.*@ . ----- * 'rmWaitTimeSeconds' - The duration (in seconds) for which the call will wait for a message to arrive in the queue before returning. If a message is available, the call will return sooner than WaitTimeSeconds.+-- * 'rmWaitTimeSeconds' - The duration (in seconds) for which the call waits for a message to arrive in the queue before returning. If a message is available, the call returns sooner than @WaitTimeSeconds@ . If no messages are available and the wait time expires, the call returns successfully with an empty list of messages. ----- * 'rmAttributeNames' - A list of attributes that need to be returned along with each message. These attributes include:     * @All@ - Returns all values.     * @ApproximateFirstReceiveTimestamp@ - Returns the time the message was first received from the queue (epoch time in milliseconds).     * @ApproximateReceiveCount@ - Returns the number of times a message has been received from the queue but not deleted.     * @SenderId@      * For an IAM user, returns the IAM user ID, for example @ABCDEFGHI1JKLMNOPQ23R@ .     * For an IAM role, returns the IAM role ID, for example @ABCDE1F2GH3I4JK5LMNOP:i-a123b456@ .     * @SentTimestamp@ - Returns the time the message was sent to the queue (epoch time in milliseconds).     * @MessageDeduplicationId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action.     * @MessageGroupId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action. Messages with the same @MessageGroupId@ are returned in sequence.     * @SequenceNumber@ - Returns the value provided by Amazon SQS. Any other valid special request parameters (such as the following) that are specified are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @ContentBasedDeduplication@      * @DelaySeconds@      * @LastModifiedTimestamp@      * @MaximumMessageSize@      * @MessageRetentionPeriod@      * @Policy@      * @QueueArn@ ,      * @ReceiveMessageWaitTimeSeconds@      * @RedrivePolicy@      * @FifoQueue@      * @VisibilityTimeout@+-- * 'rmAttributeNames' - A list of attributes that need to be returned along with each message. These attributes include:     * @All@ - Returns all values.     * @ApproximateFirstReceiveTimestamp@ - Returns the time the message was first received from the queue (<http://en.wikipedia.org/wiki/Unix_time epoch time> in milliseconds).     * @ApproximateReceiveCount@ - Returns the number of times a message has been received from the queue but not deleted.     * @SenderId@      * For an IAM user, returns the IAM user ID, for example @ABCDEFGHI1JKLMNOPQ23R@ .     * For an IAM role, returns the IAM role ID, for example @ABCDE1F2GH3I4JK5LMNOP:i-a123b456@ .     * @SentTimestamp@ - Returns the time the message was sent to the queue (<http://en.wikipedia.org/wiki/Unix_time epoch time> in milliseconds).     * @MessageDeduplicationId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action.     * @MessageGroupId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action. Messages with the same @MessageGroupId@ are returned in sequence.     * @SequenceNumber@ - Returns the value provided by Amazon SQS. Any other valid special request parameters (such as the following) are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @ContentBasedDeduplication@      * @DelaySeconds@      * @FifoQueue@      * @LastModifiedTimestamp@      * @MaximumMessageSize@      * @MessageRetentionPeriod@      * @Policy@      * @QueueArn@ ,      * @ReceiveMessageWaitTimeSeconds@      * @RedrivePolicy@      * @VisibilityTimeout@ ----- * 'rmMaxNumberOfMessages' - The maximum number of messages to return. Amazon SQS never returns more messages than this value but might return fewer. Values can be from 1 to 10. Default is 1. All of the messages are not necessarily returned.+-- * 'rmMaxNumberOfMessages' - The maximum number of messages to return. Amazon SQS never returns more messages than this value (however, fewer messages might be returned). Valid values are 1 to 10. Default is 1. ----- * 'rmQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'rmQueueURL' - The URL of the Amazon SQS queue from which messages are received. Queue URLs are case-sensitive. receiveMessage     :: Text -- ^ 'rmQueueURL'     -> ReceiveMessage receiveMessage pQueueURL_ =-    ReceiveMessage'-    { _rmReceiveRequestAttemptId = Nothing-    , _rmVisibilityTimeout = Nothing-    , _rmMessageAttributeNames = Nothing-    , _rmWaitTimeSeconds = Nothing-    , _rmAttributeNames = Nothing-    , _rmMaxNumberOfMessages = Nothing-    , _rmQueueURL = pQueueURL_-    }+  ReceiveMessage'+  { _rmReceiveRequestAttemptId = Nothing+  , _rmVisibilityTimeout = Nothing+  , _rmMessageAttributeNames = Nothing+  , _rmWaitTimeSeconds = Nothing+  , _rmAttributeNames = Nothing+  , _rmMaxNumberOfMessages = Nothing+  , _rmQueueURL = pQueueURL_+  } --- | This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of @ReceiveMessage@ calls. If a networking issue occurs after a @ReceiveMessage@ action, and instead of a response you receive a generic error, you can retry the same action with an identical @ReceiveRequestAttemptId@ to retrieve the same set of messages, even if their visibility timeout has not yet expired.     * You can use @ReceiveRequestAttemptId@ only for 5 minutes after a @ReceiveMessage@ action.     * When you set @FifoQueue@ , a caller of the @ReceiveMessage@ action can provide a @ReceiveRequestAttemptId@ explicitly.     * If a caller of the @ReceiveMessage@ action doesn't provide a @ReceiveRequestAttemptId@ , Amazon SQS generates a @ReceiveRequestAttemptId@ .     * You can retry the @ReceiveMessage@ action with the same @ReceiveRequestAttemptId@ if none of the messages have been modified (deleted or had their visibility changes).     * During a visibility timeout, subsequent calls with the same @ReceiveRequestAttemptId@ return the same messages and receipt handles. If a retry occurs within the deduplication interval, it resets the visibility timeout. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ If a caller of the @ReceiveMessage@ action is still processing messages when the visibility timeout expires and messages become visible, another worker reading from the same queue can receive the same messages and therefore process duplicates. Also, if a reader whose message processing time is longer than the visibility timeout tries to delete the processed messages, the action fails with an error. To mitigate this effect, ensure that your application observes a safe threshold before the visibility timeout expires and extend the visibility timeout as necessary.     * While messages with a particular @MessageGroupId@ are invisible, no more messages belonging to the same @MessageGroupId@ are returned until the visibility timeout expires. You can still receive messages with another @MessageGroupId@ as long as it is also visible.     * If a caller of @ReceiveMessage@ can't track the @ReceiveRequestAttemptId@ , no retries will work until the original visibility timeout expires. As a result, delays might occur but the messages in the queue will remain in a strict order. The length of @ReceiveRequestAttemptId@ is 128 characters. @ReceiveRequestAttemptId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @ReceiveRequestAttemptId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-receiverequestattemptid-request-parameter Using the ReceiveRequestAttemptId Request Parameter> in the /Amazon Simple Queue Service Developer Guide/ .++-- | This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of @ReceiveMessage@ calls. If a networking issue occurs after a @ReceiveMessage@ action, and instead of a response you receive a generic error, you can retry the same action with an identical @ReceiveRequestAttemptId@ to retrieve the same set of messages, even if their visibility timeout has not yet expired.     * You can use @ReceiveRequestAttemptId@ only for 5 minutes after a @ReceiveMessage@ action.     * When you set @FifoQueue@ , a caller of the @ReceiveMessage@ action can provide a @ReceiveRequestAttemptId@ explicitly.     * If a caller of the @ReceiveMessage@ action doesn't provide a @ReceiveRequestAttemptId@ , Amazon SQS generates a @ReceiveRequestAttemptId@ .     * You can retry the @ReceiveMessage@ action with the same @ReceiveRequestAttemptId@ if none of the messages have been modified (deleted or had their visibility changes).     * During a visibility timeout, subsequent calls with the same @ReceiveRequestAttemptId@ return the same messages and receipt handles. If a retry occurs within the deduplication interval, it resets the visibility timeout. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ If a caller of the @ReceiveMessage@ action is still processing messages when the visibility timeout expires and messages become visible, another worker reading from the same queue can receive the same messages and therefore process duplicates. Also, if a reader whose message processing time is longer than the visibility timeout tries to delete the processed messages, the action fails with an error. To mitigate this effect, ensure that your application observes a safe threshold before the visibility timeout expires and extend the visibility timeout as necessary.     * While messages with a particular @MessageGroupId@ are invisible, no more messages belonging to the same @MessageGroupId@ are returned until the visibility timeout expires. You can still receive messages with another @MessageGroupId@ as long as it is also visible.     * If a caller of @ReceiveMessage@ can't track the @ReceiveRequestAttemptId@ , no retries work until the original visibility timeout expires. As a result, delays might occur but the messages in the queue remain in a strict order. The length of @ReceiveRequestAttemptId@ is 128 characters. @ReceiveRequestAttemptId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @ReceiveRequestAttemptId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-receiverequestattemptid-request-parameter Using the ReceiveRequestAttemptId Request Parameter> in the /Amazon Simple Queue Service Developer Guide/ . rmReceiveRequestAttemptId :: Lens' ReceiveMessage (Maybe Text) rmReceiveRequestAttemptId = lens _rmReceiveRequestAttemptId (\ s a -> s{_rmReceiveRequestAttemptId = a}); @@ -128,23 +130,23 @@ rmVisibilityTimeout :: Lens' ReceiveMessage (Maybe Int) rmVisibilityTimeout = lens _rmVisibilityTimeout (\ s a -> s{_rmVisibilityTimeout = a}); --- | The name of the message attribute, where /N/ is the index. The message attribute name can contain the following characters: A-Z, a-z, 0-9, underscore (_), hyphen (-), and period (.). The name must not start or end with a period, and it should not have successive periods. The name is case sensitive and must be unique among all attribute names for the message. The name can be up to 256 characters long. The name can't start with "AWS." or "Amazon." (or any variations in casing), because these prefixes are reserved for use by Amazon Web Services. When using @ReceiveMessage@ , you can send a list of attribute names to receive, or you can return all of the attributes by specifying "All" or ".*" in your request. You can also use "bar.*" to return all message attributes starting with the "bar" prefix.+-- | The name of the message attribute, where /N/ is the index.     * The name can contain alphanumeric characters and the underscore (@_@ ), hyphen (@-@ ), and period (@.@ ).     * The name is case-sensitive and must be unique among all attribute names for the message.     * The name must not start with AWS-reserved prefixes such as @AWS.@ or @Amazon.@ (or any casing variants).     * The name must not start or end with a period (@.@ ), and it should not have periods in succession (@..@ ).     * The name can be up to 256 characters long. When using @ReceiveMessage@ , you can send a list of attribute names to receive, or you can return all of the attributes by specifying @All@ or @.*@ in your request. You can also use all message attributes starting with a prefix, for example @bar.*@ . rmMessageAttributeNames :: Lens' ReceiveMessage [Text] rmMessageAttributeNames = lens _rmMessageAttributeNames (\ s a -> s{_rmMessageAttributeNames = a}) . _Default . _Coerce; --- | The duration (in seconds) for which the call will wait for a message to arrive in the queue before returning. If a message is available, the call will return sooner than WaitTimeSeconds.+-- | The duration (in seconds) for which the call waits for a message to arrive in the queue before returning. If a message is available, the call returns sooner than @WaitTimeSeconds@ . If no messages are available and the wait time expires, the call returns successfully with an empty list of messages. rmWaitTimeSeconds :: Lens' ReceiveMessage (Maybe Int) rmWaitTimeSeconds = lens _rmWaitTimeSeconds (\ s a -> s{_rmWaitTimeSeconds = a}); --- | A list of attributes that need to be returned along with each message. These attributes include:     * @All@ - Returns all values.     * @ApproximateFirstReceiveTimestamp@ - Returns the time the message was first received from the queue (epoch time in milliseconds).     * @ApproximateReceiveCount@ - Returns the number of times a message has been received from the queue but not deleted.     * @SenderId@      * For an IAM user, returns the IAM user ID, for example @ABCDEFGHI1JKLMNOPQ23R@ .     * For an IAM role, returns the IAM role ID, for example @ABCDE1F2GH3I4JK5LMNOP:i-a123b456@ .     * @SentTimestamp@ - Returns the time the message was sent to the queue (epoch time in milliseconds).     * @MessageDeduplicationId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action.     * @MessageGroupId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action. Messages with the same @MessageGroupId@ are returned in sequence.     * @SequenceNumber@ - Returns the value provided by Amazon SQS. Any other valid special request parameters (such as the following) that are specified are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @ContentBasedDeduplication@      * @DelaySeconds@      * @LastModifiedTimestamp@      * @MaximumMessageSize@      * @MessageRetentionPeriod@      * @Policy@      * @QueueArn@ ,      * @ReceiveMessageWaitTimeSeconds@      * @RedrivePolicy@      * @FifoQueue@      * @VisibilityTimeout@+-- | A list of attributes that need to be returned along with each message. These attributes include:     * @All@ - Returns all values.     * @ApproximateFirstReceiveTimestamp@ - Returns the time the message was first received from the queue (<http://en.wikipedia.org/wiki/Unix_time epoch time> in milliseconds).     * @ApproximateReceiveCount@ - Returns the number of times a message has been received from the queue but not deleted.     * @SenderId@      * For an IAM user, returns the IAM user ID, for example @ABCDEFGHI1JKLMNOPQ23R@ .     * For an IAM role, returns the IAM role ID, for example @ABCDE1F2GH3I4JK5LMNOP:i-a123b456@ .     * @SentTimestamp@ - Returns the time the message was sent to the queue (<http://en.wikipedia.org/wiki/Unix_time epoch time> in milliseconds).     * @MessageDeduplicationId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action.     * @MessageGroupId@ - Returns the value provided by the sender that calls the @'SendMessage' @ action. Messages with the same @MessageGroupId@ are returned in sequence.     * @SequenceNumber@ - Returns the value provided by Amazon SQS. Any other valid special request parameters (such as the following) are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @ContentBasedDeduplication@      * @DelaySeconds@      * @FifoQueue@      * @LastModifiedTimestamp@      * @MaximumMessageSize@      * @MessageRetentionPeriod@      * @Policy@      * @QueueArn@ ,      * @ReceiveMessageWaitTimeSeconds@      * @RedrivePolicy@      * @VisibilityTimeout@ rmAttributeNames :: Lens' ReceiveMessage [MessageAttribute] rmAttributeNames = lens _rmAttributeNames (\ s a -> s{_rmAttributeNames = a}) . _Default . _Coerce; --- | The maximum number of messages to return. Amazon SQS never returns more messages than this value but might return fewer. Values can be from 1 to 10. Default is 1. All of the messages are not necessarily returned.+-- | The maximum number of messages to return. Amazon SQS never returns more messages than this value (however, fewer messages might be returned). Valid values are 1 to 10. Default is 1. rmMaxNumberOfMessages :: Lens' ReceiveMessage (Maybe Int) rmMaxNumberOfMessages = lens _rmMaxNumberOfMessages (\ s a -> s{_rmMaxNumberOfMessages = a}); --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- | The URL of the Amazon SQS queue from which messages are received. Queue URLs are case-sensitive. rmQueueURL :: Lens' ReceiveMessage Text rmQueueURL = lens _rmQueueURL (\ s a -> s{_rmQueueURL = a}); @@ -158,9 +160,9 @@                    (may (parseXMLList "Message") x) <*>                      (pure (fromEnum s))) -instance Hashable ReceiveMessage+instance Hashable ReceiveMessage where -instance NFData ReceiveMessage+instance NFData ReceiveMessage where  instance ToHeaders ReceiveMessage where         toHeaders = const mempty@@ -191,10 +193,11 @@ -- -- /See:/ 'receiveMessageResponse' smart constructor. data ReceiveMessageResponse = ReceiveMessageResponse'-    { _rmrsMessages       :: !(Maybe [Message])-    , _rmrsResponseStatus :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _rmrsMessages       :: !(Maybe [Message])+  , _rmrsResponseStatus :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ReceiveMessageResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -206,11 +209,10 @@     :: Int -- ^ 'rmrsResponseStatus'     -> ReceiveMessageResponse receiveMessageResponse pResponseStatus_ =-    ReceiveMessageResponse'-    { _rmrsMessages = Nothing-    , _rmrsResponseStatus = pResponseStatus_-    }+  ReceiveMessageResponse'+  {_rmrsMessages = Nothing, _rmrsResponseStatus = pResponseStatus_} + -- | A list of messages. rmrsMessages :: Lens' ReceiveMessageResponse [Message] rmrsMessages = lens _rmrsMessages (\ s a -> s{_rmrsMessages = a}) . _Default . _Coerce;@@ -219,4 +221,4 @@ rmrsResponseStatus :: Lens' ReceiveMessageResponse Int rmrsResponseStatus = lens _rmrsResponseStatus (\ s a -> s{_rmrsResponseStatus = a}); -instance NFData ReceiveMessageResponse+instance NFData ReceiveMessageResponse where

@@ -12,9 +12,9 @@  -- | -- Module      : Network.AWS.SQS.RemovePermission--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -35,12 +35,12 @@     , RemovePermissionResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -48,32 +48,31 @@ -- -- /See:/ 'removePermission' smart constructor. data RemovePermission = RemovePermission'-    { _rpQueueURL :: !Text-    , _rpLabel    :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _rpQueueURL :: !Text+  , _rpLabel    :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'RemovePermission' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'rpQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'rpQueueURL' - The URL of the Amazon SQS queue from which permissions are removed. Queue URLs are case-sensitive. ----- * 'rpLabel' - The identification of the permission to remove. This is the label added with the 'AddPermission' action.+-- * 'rpLabel' - The identification of the permission to remove. This is the label added using the @'AddPermission' @ action. removePermission     :: Text -- ^ 'rpQueueURL'     -> Text -- ^ 'rpLabel'     -> RemovePermission removePermission pQueueURL_ pLabel_ =-    RemovePermission'-    { _rpQueueURL = pQueueURL_-    , _rpLabel = pLabel_-    }+  RemovePermission' {_rpQueueURL = pQueueURL_, _rpLabel = pLabel_} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue from which permissions are removed. Queue URLs are case-sensitive. rpQueueURL :: Lens' RemovePermission Text rpQueueURL = lens _rpQueueURL (\ s a -> s{_rpQueueURL = a}); --- | The identification of the permission to remove. This is the label added with the 'AddPermission' action.+-- | The identification of the permission to remove. This is the label added using the @'AddPermission' @ action. rpLabel :: Lens' RemovePermission Text rpLabel = lens _rpLabel (\ s a -> s{_rpLabel = a}); @@ -82,9 +81,9 @@         request = postQuery sqs         response = receiveNull RemovePermissionResponse' -instance Hashable RemovePermission+instance Hashable RemovePermission where -instance NFData RemovePermission+instance NFData RemovePermission where  instance ToHeaders RemovePermission where         toHeaders = const mempty@@ -101,13 +100,15 @@  -- | /See:/ 'removePermissionResponse' smart constructor. data RemovePermissionResponse =-    RemovePermissionResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  RemovePermissionResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'RemovePermissionResponse' with the minimum fields required to make a request. -- removePermissionResponse     :: RemovePermissionResponse removePermissionResponse = RemovePermissionResponse' -instance NFData RemovePermissionResponse++instance NFData RemovePermissionResponse where

@@ -12,20 +12,20 @@  -- | -- Module      : Network.AWS.SQS.SendMessage--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- -- Delivers a message to the specified queue. -- ----- /Important:/ The following list shows the characters (in Unicode) that are allowed in your message, according to the W3C XML specification:+-- /Important:/ A message can include only XML, JSON, and unformatted text. The following Unicode characters are allowed: ----- @#x9@ | @#xA@ | @#xD@ | [@#x20@ to @#xD7FF@ ] | [@#xE000@ to @#xFFFD@ ] | [@#x10000@ to @#x10FFFF@ ]+-- @#x9@ | @#xA@ | @#xD@ | @#x20@ to @#xD7FF@ | @#xE000@ to @#xFFFD@ | @#x10000@ to @#x10FFFF@ ----- For more information, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . If you send any characters that aren't included in this list, your request will be rejected.+-- Any characters not included in this list will be rejected. For more information, see the <http://www.w3.org/TR/REC-xml/#charsets W3C specification for characters> . -- module Network.AWS.SQS.SendMessage     (@@ -51,12 +51,12 @@     , smrsResponseStatus     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -64,64 +64,66 @@ -- -- /See:/ 'sendMessage' smart constructor. data SendMessage = SendMessage'-    { _smMessageAttributes      :: !(Maybe (Map Text MessageAttributeValue))-    , _smDelaySeconds           :: !(Maybe Int)-    , _smMessageDeduplicationId :: !(Maybe Text)-    , _smMessageGroupId         :: !(Maybe Text)-    , _smQueueURL               :: !Text-    , _smMessageBody            :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _smMessageAttributes      :: !(Maybe (Map Text MessageAttributeValue))+  , _smDelaySeconds           :: !(Maybe Int)+  , _smMessageDeduplicationId :: !(Maybe Text)+  , _smMessageGroupId         :: !(Maybe Text)+  , _smQueueURL               :: !Text+  , _smMessageBody            :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SendMessage' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'smMessageAttributes' - Each message attribute consists of a Name, Type, and Value. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributesNTV Message Attribute Items> in the /Amazon SQS Developer Guide/ .+-- * 'smMessageAttributes' - Each message attribute consists of a @Name@ , @Type@ , and @Value@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-items-validation Message Attribute Items and Validation> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'smDelaySeconds' - The number of seconds (0 to 900 - 15 minutes) to delay a specific message. Messages with a positive @DelaySeconds@ value become available for processing after the delay time is finished. If you don't specify a value, the default value for the queue applies.+-- * 'smDelaySeconds' - The length of time, in seconds, for which to delay a specific message. Valid values: 0 to 900. Maximum: 15 minutes. Messages with a positive @DelaySeconds@ value become available for processing after the delay period is finished. If you don't specify a value, the default value for the queue applies. ----- * 'smMessageDeduplicationId' - This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of sent messages. If a message with a particular @MessageDeduplicationId@ is sent successfully, any messages sent with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered during the 5-minute deduplication interval. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- * 'smMessageDeduplicationId' - This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of sent messages. If a message with a particular @MessageDeduplicationId@ is sent successfully, any messages sent with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered during the 5-minute deduplication interval. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'smMessageGroupId' - This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- * 'smMessageGroupId' - This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ @MessageGroupId@ is required for FIFO queues. You can't use it for Standard queues. ----- * 'smQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'smQueueURL' - The URL of the Amazon SQS queue to which a message is sent. Queue URLs are case-sensitive. ----- * 'smMessageBody' - The message to send. String maximum 256 KB in size. For a list of allowed characters, see the preceding note.+-- * 'smMessageBody' - The message to send. The maximum string size is 256 KB. /Important:/ A message can include only XML, JSON, and unformatted text. The following Unicode characters are allowed: @#x9@ | @#xA@ | @#xD@ | @#x20@ to @#xD7FF@ | @#xE000@ to @#xFFFD@ | @#x10000@ to @#x10FFFF@  Any characters not included in this list will be rejected. For more information, see the <http://www.w3.org/TR/REC-xml/#charsets W3C specification for characters> . sendMessage     :: Text -- ^ 'smQueueURL'     -> Text -- ^ 'smMessageBody'     -> SendMessage sendMessage pQueueURL_ pMessageBody_ =-    SendMessage'-    { _smMessageAttributes = Nothing-    , _smDelaySeconds = Nothing-    , _smMessageDeduplicationId = Nothing-    , _smMessageGroupId = Nothing-    , _smQueueURL = pQueueURL_-    , _smMessageBody = pMessageBody_-    }+  SendMessage'+  { _smMessageAttributes = Nothing+  , _smDelaySeconds = Nothing+  , _smMessageDeduplicationId = Nothing+  , _smMessageGroupId = Nothing+  , _smQueueURL = pQueueURL_+  , _smMessageBody = pMessageBody_+  } --- | Each message attribute consists of a Name, Type, and Value. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributesNTV Message Attribute Items> in the /Amazon SQS Developer Guide/ .++-- | Each message attribute consists of a @Name@ , @Type@ , and @Value@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-items-validation Message Attribute Items and Validation> in the /Amazon Simple Queue Service Developer Guide/ . smMessageAttributes :: Lens' SendMessage (HashMap Text MessageAttributeValue) smMessageAttributes = lens _smMessageAttributes (\ s a -> s{_smMessageAttributes = a}) . _Default . _Map; --- | The number of seconds (0 to 900 - 15 minutes) to delay a specific message. Messages with a positive @DelaySeconds@ value become available for processing after the delay time is finished. If you don't specify a value, the default value for the queue applies.+-- | The length of time, in seconds, for which to delay a specific message. Valid values: 0 to 900. Maximum: 15 minutes. Messages with a positive @DelaySeconds@ value become available for processing after the delay period is finished. If you don't specify a value, the default value for the queue applies. smDelaySeconds :: Lens' SendMessage (Maybe Int) smDelaySeconds = lens _smDelaySeconds (\ s a -> s{_smDelaySeconds = a}); --- | This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of sent messages. If a message with a particular @MessageDeduplicationId@ is sent successfully, any messages sent with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered during the 5-minute deduplication interval. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- | This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of sent messages. If a message with a particular @MessageDeduplicationId@ is sent successfully, any messages sent with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered during the 5-minute deduplication interval. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ . smMessageDeduplicationId :: Lens' SendMessage (Maybe Text) smMessageDeduplicationId = lens _smMessageDeduplicationId (\ s a -> s{_smMessageDeduplicationId = a}); --- | This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- | This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ @MessageGroupId@ is required for FIFO queues. You can't use it for Standard queues. smMessageGroupId :: Lens' SendMessage (Maybe Text) smMessageGroupId = lens _smMessageGroupId (\ s a -> s{_smMessageGroupId = a}); --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- | The URL of the Amazon SQS queue to which a message is sent. Queue URLs are case-sensitive. smQueueURL :: Lens' SendMessage Text smQueueURL = lens _smQueueURL (\ s a -> s{_smQueueURL = a}); --- | The message to send. String maximum 256 KB in size. For a list of allowed characters, see the preceding note.+-- | The message to send. The maximum string size is 256 KB. /Important:/ A message can include only XML, JSON, and unformatted text. The following Unicode characters are allowed: @#x9@ | @#xA@ | @#xD@ | @#x20@ to @#xD7FF@ | @#xE000@ to @#xFFFD@ | @#x10000@ to @#x10FFFF@  Any characters not included in this list will be rejected. For more information, see the <http://www.w3.org/TR/REC-xml/#charsets W3C specification for characters> . smMessageBody :: Lens' SendMessage Text smMessageBody = lens _smMessageBody (\ s a -> s{_smMessageBody = a}); @@ -137,9 +139,9 @@                      <*> (x .@? "MD5OfMessageAttributes")                      <*> (pure (fromEnum s))) -instance Hashable SendMessage+instance Hashable SendMessage where -instance NFData SendMessage+instance NFData SendMessage where  instance ToHeaders SendMessage where         toHeaders = const mempty@@ -162,57 +164,59 @@                "QueueUrl" =: _smQueueURL,                "MessageBody" =: _smMessageBody] --- | The MD5OfMessageBody and MessageId elements.+-- | The @MD5OfMessageBody@ and @MessageId@ elements. -- -- -- -- /See:/ 'sendMessageResponse' smart constructor. data SendMessageResponse = SendMessageResponse'-    { _smrsSequenceNumber         :: !(Maybe Text)-    , _smrsMessageId              :: !(Maybe Text)-    , _smrsMD5OfMessageBody       :: !(Maybe Text)-    , _smrsMD5OfMessageAttributes :: !(Maybe Text)-    , _smrsResponseStatus         :: !Int-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _smrsSequenceNumber         :: !(Maybe Text)+  , _smrsMessageId              :: !(Maybe Text)+  , _smrsMD5OfMessageBody       :: !(Maybe Text)+  , _smrsMD5OfMessageAttributes :: !(Maybe Text)+  , _smrsResponseStatus         :: !Int+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SendMessageResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'smrsSequenceNumber' - /This element applies only to FIFO (first-in-first-out) queues./  A large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. @SequenceNumber@ continues to increase for a particular @MessageGroupId@ .+-- * 'smrsSequenceNumber' - This parameter applies only to FIFO (first-in-first-out) queues. The large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. @SequenceNumber@ continues to increase for a particular @MessageGroupId@ . ----- * 'smrsMessageId' - An element containing the message ID of the message sent to the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ImportantIdentifiers.html Queue and Message Identifiers> in the /Amazon SQS Developer Guide/ .+-- * 'smrsMessageId' - An attribute containing the @MessageId@ of the message sent to the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-queue-message-identifiers.html Queue and Message Identifiers> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'smrsMD5OfMessageBody' - An MD5 digest of the non-URL-encoded message body string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- * 'smrsMD5OfMessageBody' - An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . ----- * 'smrsMD5OfMessageAttributes' - An MD5 digest of the non-URL-encoded message attribute string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- * 'smrsMD5OfMessageAttributes' - An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . -- -- * 'smrsResponseStatus' - -- | The response status code. sendMessageResponse     :: Int -- ^ 'smrsResponseStatus'     -> SendMessageResponse sendMessageResponse pResponseStatus_ =-    SendMessageResponse'-    { _smrsSequenceNumber = Nothing-    , _smrsMessageId = Nothing-    , _smrsMD5OfMessageBody = Nothing-    , _smrsMD5OfMessageAttributes = Nothing-    , _smrsResponseStatus = pResponseStatus_-    }+  SendMessageResponse'+  { _smrsSequenceNumber = Nothing+  , _smrsMessageId = Nothing+  , _smrsMD5OfMessageBody = Nothing+  , _smrsMD5OfMessageAttributes = Nothing+  , _smrsResponseStatus = pResponseStatus_+  } --- | /This element applies only to FIFO (first-in-first-out) queues./  A large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. @SequenceNumber@ continues to increase for a particular @MessageGroupId@ .++-- | This parameter applies only to FIFO (first-in-first-out) queues. The large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. @SequenceNumber@ continues to increase for a particular @MessageGroupId@ . smrsSequenceNumber :: Lens' SendMessageResponse (Maybe Text) smrsSequenceNumber = lens _smrsSequenceNumber (\ s a -> s{_smrsSequenceNumber = a}); --- | An element containing the message ID of the message sent to the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/ImportantIdentifiers.html Queue and Message Identifiers> in the /Amazon SQS Developer Guide/ .+-- | An attribute containing the @MessageId@ of the message sent to the queue. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-queue-message-identifiers.html Queue and Message Identifiers> in the /Amazon Simple Queue Service Developer Guide/ . smrsMessageId :: Lens' SendMessageResponse (Maybe Text) smrsMessageId = lens _smrsMessageId (\ s a -> s{_smrsMessageId = a}); --- | An MD5 digest of the non-URL-encoded message body string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- | An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . smrsMD5OfMessageBody :: Lens' SendMessageResponse (Maybe Text) smrsMD5OfMessageBody = lens _smrsMD5OfMessageBody (\ s a -> s{_smrsMD5OfMessageBody = a}); --- | An MD5 digest of the non-URL-encoded message attribute string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- | An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . smrsMD5OfMessageAttributes :: Lens' SendMessageResponse (Maybe Text) smrsMD5OfMessageAttributes = lens _smrsMD5OfMessageAttributes (\ s a -> s{_smrsMD5OfMessageAttributes = a}); @@ -220,4 +224,4 @@ smrsResponseStatus :: Lens' SendMessageResponse Int smrsResponseStatus = lens _smrsResponseStatus (\ s a -> s{_smrsResponseStatus = a}); -instance NFData SendMessageResponse+instance NFData SendMessageResponse where

@@ -12,30 +12,26 @@  -- | -- Module      : Network.AWS.SQS.SendMessageBatch--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Delivers up to ten messages to the specified queue. This is a batch version of @'SendMessage' @ . For a FIFO queue, multiple messages within a single batch are enqueued in the order they are sent.+-- Delivers up to ten messages to the specified queue. This is a batch version of @'SendMessage' .@ For a FIFO queue, multiple messages within a single batch are enqueued in the order they are sent. -- ----- The result of sending each message is reported individually in the response. Because the batch request can result in a combination of successful and unsuccessful actions, you should check for batch errors even when the call returns an HTTP status code of 200.+-- The result of sending each message is reported individually in the response. Because the batch request can result in a combination of successful and unsuccessful actions, you should check for batch errors even when the call returns an HTTP status code of @200@ . -- -- The maximum allowed individual message size and the maximum total payload size (the sum of the individual lengths of all of the batched messages) are both 256 KB (262,144 bytes). ----- /Important:/ The following list shows the characters (in Unicode) that are allowed in your message, according to the W3C XML specification:------ @#x9@ | @#xA@ | @#xD@ | [@#x20@ to @#xD7FF@ ] | [@#xE000@ to @#xFFFD@ ] | [@#x10000@ to @#x10FFFF@ ]------ For more information, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . If you send any characters that aren't included in this list, your request will be rejected.+-- /Important:/ A message can include only XML, JSON, and unformatted text. The following Unicode characters are allowed: ----- If you don't specify the @DelaySeconds@ parameter for an entry, Amazon SQS uses the default for the queue.+-- @#x9@ | @#xA@ | @#xD@ | @#x20@ to @#xD7FF@ | @#xE000@ to @#xFFFD@ | @#x10000@ to @#x10FFFF@ ----- @&amp;Attribute.1=this@+-- Any characters not included in this list will be rejected. For more information, see the <http://www.w3.org/TR/REC-xml/#charsets W3C specification for characters> . ----- @&amp;Attribute.2=that@+-- If you don't specify the @DelaySeconds@ parameter for an entry, Amazon SQS uses the default value for the queue. -- module Network.AWS.SQS.SendMessageBatch     (@@ -55,12 +51,12 @@     , smbrsFailed     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -68,31 +64,30 @@ -- -- /See:/ 'sendMessageBatch' smart constructor. data SendMessageBatch = SendMessageBatch'-    { _smbQueueURL :: !Text-    , _smbEntries  :: ![SendMessageBatchRequestEntry]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _smbQueueURL :: !Text+  , _smbEntries  :: ![SendMessageBatchRequestEntry]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SendMessageBatch' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'smbQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'smbQueueURL' - The URL of the Amazon SQS queue to which batched messages are sent. Queue URLs are case-sensitive. ----- * 'smbEntries' - A list of 'SendMessageBatchRequestEntry' items.+-- * 'smbEntries' - A list of @'SendMessageBatchRequestEntry' @ items. sendMessageBatch     :: Text -- ^ 'smbQueueURL'     -> SendMessageBatch sendMessageBatch pQueueURL_ =-    SendMessageBatch'-    { _smbQueueURL = pQueueURL_-    , _smbEntries = mempty-    }+  SendMessageBatch' {_smbQueueURL = pQueueURL_, _smbEntries = mempty} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue to which batched messages are sent. Queue URLs are case-sensitive. smbQueueURL :: Lens' SendMessageBatch Text smbQueueURL = lens _smbQueueURL (\ s a -> s{_smbQueueURL = a}); --- | A list of 'SendMessageBatchRequestEntry' items.+-- | A list of @'SendMessageBatchRequestEntry' @ items. smbEntries :: Lens' SendMessageBatch [SendMessageBatchRequestEntry] smbEntries = lens _smbEntries (\ s a -> s{_smbEntries = a}) . _Coerce; @@ -107,9 +102,9 @@                      (parseXMLList "SendMessageBatchResultEntry" x)                      <*> (parseXMLList "BatchResultErrorEntry" x)) -instance Hashable SendMessageBatch+instance Hashable SendMessageBatch where -instance NFData SendMessageBatch+instance NFData SendMessageBatch where  instance ToHeaders SendMessageBatch where         toHeaders = const mempty@@ -126,46 +121,48 @@                toQueryList "SendMessageBatchRequestEntry"                  _smbEntries] --- | For each message in the batch, the response contains a 'SendMessageBatchResultEntry' tag if the message succeeds or a 'BatchResultErrorEntry' tag if the message fails.+-- | For each message in the batch, the response contains a @'SendMessageBatchResultEntry' @ tag if the message succeeds or a @'BatchResultErrorEntry' @ tag if the message fails. -- -- -- -- /See:/ 'sendMessageBatchResponse' smart constructor. data SendMessageBatchResponse = SendMessageBatchResponse'-    { _smbrsResponseStatus :: !Int-    , _smbrsSuccessful     :: ![SendMessageBatchResultEntry]-    , _smbrsFailed         :: ![BatchResultErrorEntry]-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _smbrsResponseStatus :: !Int+  , _smbrsSuccessful     :: ![SendMessageBatchResultEntry]+  , _smbrsFailed         :: ![BatchResultErrorEntry]+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SendMessageBatchResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'smbrsResponseStatus' - -- | The response status code. ----- * 'smbrsSuccessful' - A list of 'SendMessageBatchResultEntry' items.+-- * 'smbrsSuccessful' - A list of @'SendMessageBatchResultEntry' @ items. ----- * 'smbrsFailed' - A list of 'BatchResultErrorEntry' items with the error detail about each message that could not be enqueued.+-- * 'smbrsFailed' - A list of @'BatchResultErrorEntry' @ items with error details about each message that can't be enqueued. sendMessageBatchResponse     :: Int -- ^ 'smbrsResponseStatus'     -> SendMessageBatchResponse sendMessageBatchResponse pResponseStatus_ =-    SendMessageBatchResponse'-    { _smbrsResponseStatus = pResponseStatus_-    , _smbrsSuccessful = mempty-    , _smbrsFailed = mempty-    }+  SendMessageBatchResponse'+  { _smbrsResponseStatus = pResponseStatus_+  , _smbrsSuccessful = mempty+  , _smbrsFailed = mempty+  } + -- | -- | The response status code. smbrsResponseStatus :: Lens' SendMessageBatchResponse Int smbrsResponseStatus = lens _smbrsResponseStatus (\ s a -> s{_smbrsResponseStatus = a}); --- | A list of 'SendMessageBatchResultEntry' items.+-- | A list of @'SendMessageBatchResultEntry' @ items. smbrsSuccessful :: Lens' SendMessageBatchResponse [SendMessageBatchResultEntry] smbrsSuccessful = lens _smbrsSuccessful (\ s a -> s{_smbrsSuccessful = a}) . _Coerce; --- | A list of 'BatchResultErrorEntry' items with the error detail about each message that could not be enqueued.+-- | A list of @'BatchResultErrorEntry' @ items with error details about each message that can't be enqueued. smbrsFailed :: Lens' SendMessageBatchResponse [BatchResultErrorEntry] smbrsFailed = lens _smbrsFailed (\ s a -> s{_smbrsFailed = a}) . _Coerce; -instance NFData SendMessageBatchResponse+instance NFData SendMessageBatchResponse where

@@ -12,13 +12,13 @@  -- | -- Module      : Network.AWS.SQS.SetQueueAttributes--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) ----- Sets the value of one or more queue attributes. When you change a queue's attributes, the change can take up to 60 seconds for most of the attributes to propagate throughout the SQS system. Changes made to the @MessageRetentionPeriod@ attribute can take up to 15 minutes.+-- Sets the value of one or more queue attributes. When you change a queue's attributes, the change can take up to 60 seconds for most of the attributes to propagate throughout the Amazon SQS system. Changes made to the @MessageRetentionPeriod@ attribute can take up to 15 minutes. -- -- module Network.AWS.SQS.SetQueueAttributes@@ -35,12 +35,12 @@     , SetQueueAttributesResponse     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Request-import           Network.AWS.Response-import           Network.AWS.SQS.Types-import           Network.AWS.SQS.Types.Product+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product  -- | --@@ -48,31 +48,30 @@ -- -- /See:/ 'setQueueAttributes' smart constructor. data SetQueueAttributes = SetQueueAttributes'-    { _sqaQueueURL   :: !Text-    , _sqaAttributes :: !(Map QueueAttributeName Text)-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _sqaQueueURL   :: !Text+  , _sqaAttributes :: !(Map QueueAttributeName Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SetQueueAttributes' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'sqaQueueURL' - The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.+-- * 'sqaQueueURL' - The URL of the Amazon SQS queue whose attributes are set. Queue URLs are case-sensitive. ----- * 'sqaAttributes' - A map of attributes to set. The following lists the names, descriptions, and values of the special request parameters that the @SetQueueAttributes@ action uses:     * @DelaySeconds@ - The number of seconds for which the delivery of all messages in the queue is delayed. An integer from 0 to 900 (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. An integer from 1,024 bytes (1 KiB) up to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The number of seconds for which Amazon SQS retains a message. An integer representing seconds, from 60 (1 minute) to 120,9600 (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The number of seconds for which a 'ReceiveMessage' action will wait for a message to arrive. An integer from 0 to 20 (seconds). The default is 0.      * @RedrivePolicy@ - The parameters for the dead letter queue functionality of the source queue. For more information about the redrive policy and dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .      * @VisibilityTimeout@ - The visibility timeout for the queue. An integer from 0 to 43200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ . The following attribute applies only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @ContentBasedDeduplication@ - Enables content-based deduplication. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters that are specified (such as @ApproximateNumberOfMessages@ , @ApproximateNumberOfMessagesDelayed@ , @ApproximateNumberOfMessagesNotVisible@ , @CreatedTimestamp@ , @LastModifiedTimestamp@ , and @QueueArn@ ) will be ignored.+-- * 'sqaAttributes' - A map of attributes to set. The following lists the names, descriptions, and values of the special request parameters that the @SetQueueAttributes@ action uses:     * @DelaySeconds@ - The length of time, in seconds, for which the delivery of all messages in the queue is delayed. Valid values: An integer from 0 to 900 (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. Valid values: An integer from 1,024 bytes (1 KiB) up to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The length of time, in seconds, for which Amazon SQS retains a message. Valid values: An integer representing seconds, from 60 (1 minute) to 1,209,600 (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The length of time, in seconds, for which a @'ReceiveMessage' @ action waits for a message to arrive. Valid values: an integer from 0 to 20 (seconds). The default is 0.      * @RedrivePolicy@ - The string that includes the parameters for the dead-letter queue functionality of the source queue. For more information about the redrive policy and dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ .      * @deadLetterTargetArn@ - The Amazon Resource Name (ARN) of the dead-letter queue to which Amazon SQS moves messages after the value of @maxReceiveCount@ is exceeded.     * @maxReceiveCount@ - The number of times a message is delivered to the source queue before being moved to the dead-letter queue.     * @VisibilityTimeout@ - The visibility timeout for the queue. Valid values: an integer from 0 to 43,200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html server-side-encryption> :     * @KmsMasterKeyId@ - The ID of an AWS-managed customer master key (CMK) for Amazon SQS or a custom CMK. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-sse-key-terms Key Terms> . While the alias of the AWS-managed CMK for Amazon SQS is always @alias/aws/sqs@ , the alias of a custom CMK can, for example, be @alias//MyAlias/ @ . For more examples, see <http://docs.aws.amazon.com/kms/latest/APIReference/API_DescribeKey.html#API_DescribeKey_RequestParameters KeyId> in the /AWS Key Management Service API Reference/ .      * @KmsDataKeyReusePeriodSeconds@ - The length of time, in seconds, for which Amazon SQS can reuse a <http://docs.aws.amazon.com/kms/latest/developerguide/concepts.html#data-keys data key> to encrypt or decrypt messages before calling AWS KMS again. An integer representing seconds, between 60 seconds (1 minute) and 86,400 seconds (24 hours). The default is 300 (5 minutes). A shorter time period provides better security but results in more calls to KMS which might incur charges after Free Tier. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-how-does-the-data-key-reuse-period-work How Does the Data Key Reuse Period Work?> .  The following attribute applies only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @ContentBasedDeduplication@ - Enables content-based deduplication. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters (such as the following) are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @LastModifiedTimestamp@      * @QueueArn@ setQueueAttributes     :: Text -- ^ 'sqaQueueURL'     -> SetQueueAttributes setQueueAttributes pQueueURL_ =-    SetQueueAttributes'-    { _sqaQueueURL = pQueueURL_-    , _sqaAttributes = mempty-    }+  SetQueueAttributes' {_sqaQueueURL = pQueueURL_, _sqaAttributes = mempty} --- | The URL of the Amazon SQS queue to take action on. Queue URLs are case-sensitive.++-- | The URL of the Amazon SQS queue whose attributes are set. Queue URLs are case-sensitive. sqaQueueURL :: Lens' SetQueueAttributes Text sqaQueueURL = lens _sqaQueueURL (\ s a -> s{_sqaQueueURL = a}); --- | A map of attributes to set. The following lists the names, descriptions, and values of the special request parameters that the @SetQueueAttributes@ action uses:     * @DelaySeconds@ - The number of seconds for which the delivery of all messages in the queue is delayed. An integer from 0 to 900 (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. An integer from 1,024 bytes (1 KiB) up to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The number of seconds for which Amazon SQS retains a message. An integer representing seconds, from 60 (1 minute) to 120,9600 (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The number of seconds for which a 'ReceiveMessage' action will wait for a message to arrive. An integer from 0 to 20 (seconds). The default is 0.      * @RedrivePolicy@ - The parameters for the dead letter queue functionality of the source queue. For more information about the redrive policy and dead letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSDeadLetterQueue.html Using Amazon SQS Dead Letter Queues> in the /Amazon SQS Developer Guide/ .      * @VisibilityTimeout@ - The visibility timeout for the queue. An integer from 0 to 43200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/AboutVT.html Visibility Timeout> in the /Amazon SQS Developer Guide/ . The following attribute applies only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @ContentBasedDeduplication@ - Enables content-based deduplication. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters that are specified (such as @ApproximateNumberOfMessages@ , @ApproximateNumberOfMessagesDelayed@ , @ApproximateNumberOfMessagesNotVisible@ , @CreatedTimestamp@ , @LastModifiedTimestamp@ , and @QueueArn@ ) will be ignored.+-- | A map of attributes to set. The following lists the names, descriptions, and values of the special request parameters that the @SetQueueAttributes@ action uses:     * @DelaySeconds@ - The length of time, in seconds, for which the delivery of all messages in the queue is delayed. Valid values: An integer from 0 to 900 (15 minutes). The default is 0 (zero).      * @MaximumMessageSize@ - The limit of how many bytes a message can contain before Amazon SQS rejects it. Valid values: An integer from 1,024 bytes (1 KiB) up to 262,144 bytes (256 KiB). The default is 262,144 (256 KiB).      * @MessageRetentionPeriod@ - The length of time, in seconds, for which Amazon SQS retains a message. Valid values: An integer representing seconds, from 60 (1 minute) to 1,209,600 (14 days). The default is 345,600 (4 days).      * @Policy@ - The queue's policy. A valid AWS policy. For more information about policy structure, see <http://docs.aws.amazon.com/IAM/latest/UserGuide/PoliciesOverview.html Overview of AWS IAM Policies> in the /Amazon IAM User Guide/ .      * @ReceiveMessageWaitTimeSeconds@ - The length of time, in seconds, for which a @'ReceiveMessage' @ action waits for a message to arrive. Valid values: an integer from 0 to 20 (seconds). The default is 0.      * @RedrivePolicy@ - The string that includes the parameters for the dead-letter queue functionality of the source queue. For more information about the redrive policy and dead-letter queues, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-dead-letter-queues.html Using Amazon SQS Dead-Letter Queues> in the /Amazon Simple Queue Service Developer Guide/ .      * @deadLetterTargetArn@ - The Amazon Resource Name (ARN) of the dead-letter queue to which Amazon SQS moves messages after the value of @maxReceiveCount@ is exceeded.     * @maxReceiveCount@ - The number of times a message is delivered to the source queue before being moved to the dead-letter queue.     * @VisibilityTimeout@ - The visibility timeout for the queue. Valid values: an integer from 0 to 43,200 (12 hours). The default is 30. For more information about the visibility timeout, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-visibility-timeout.html Visibility Timeout> in the /Amazon Simple Queue Service Developer Guide/ . The following attributes apply only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html server-side-encryption> :     * @KmsMasterKeyId@ - The ID of an AWS-managed customer master key (CMK) for Amazon SQS or a custom CMK. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-sse-key-terms Key Terms> . While the alias of the AWS-managed CMK for Amazon SQS is always @alias/aws/sqs@ , the alias of a custom CMK can, for example, be @alias//MyAlias/ @ . For more examples, see <http://docs.aws.amazon.com/kms/latest/APIReference/API_DescribeKey.html#API_DescribeKey_RequestParameters KeyId> in the /AWS Key Management Service API Reference/ .      * @KmsDataKeyReusePeriodSeconds@ - The length of time, in seconds, for which Amazon SQS can reuse a <http://docs.aws.amazon.com/kms/latest/developerguide/concepts.html#data-keys data key> to encrypt or decrypt messages before calling AWS KMS again. An integer representing seconds, between 60 seconds (1 minute) and 86,400 seconds (24 hours). The default is 300 (5 minutes). A shorter time period provides better security but results in more calls to KMS which might incur charges after Free Tier. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-server-side-encryption.html#sqs-how-does-the-data-key-reuse-period-work How Does the Data Key Reuse Period Work?> .  The following attribute applies only to <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html FIFO (first-in-first-out) queues> :     * @ContentBasedDeduplication@ - Enables content-based deduplication. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .      * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  Any other valid special request parameters (such as the following) are ignored:     * @ApproximateNumberOfMessages@      * @ApproximateNumberOfMessagesDelayed@      * @ApproximateNumberOfMessagesNotVisible@      * @CreatedTimestamp@      * @LastModifiedTimestamp@      * @QueueArn@ sqaAttributes :: Lens' SetQueueAttributes (HashMap QueueAttributeName Text) sqaAttributes = lens _sqaAttributes (\ s a -> s{_sqaAttributes = a}) . _Map; @@ -82,9 +81,9 @@         request = postQuery sqs         response = receiveNull SetQueueAttributesResponse' -instance Hashable SetQueueAttributes+instance Hashable SetQueueAttributes where -instance NFData SetQueueAttributes+instance NFData SetQueueAttributes where  instance ToHeaders SetQueueAttributes where         toHeaders = const mempty@@ -102,13 +101,15 @@  -- | /See:/ 'setQueueAttributesResponse' smart constructor. data SetQueueAttributesResponse =-    SetQueueAttributesResponse'-    deriving (Eq,Read,Show,Data,Typeable,Generic)+  SetQueueAttributesResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SetQueueAttributesResponse' with the minimum fields required to make a request. -- setQueueAttributesResponse     :: SetQueueAttributesResponse setQueueAttributesResponse = SetQueueAttributesResponse' -instance NFData SetQueueAttributesResponse++instance NFData SetQueueAttributesResponse where

@@ -0,0 +1,125 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.SQS.TagQueue+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Add cost allocation tags to the specified Amazon SQS queue. For an overview, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-tagging-queues.html Tagging Amazon SQS Queues> in the /Amazon Simple Queue Service Developer Guide/ .+--+--+-- When you use queue tags, keep the following guidelines in mind:+--+--     * Adding more than 50 tags to a queue isn't recommended.+--+--     * Tags don't have any semantic meaning. Amazon SQS interprets tags as character strings.+--+--     * Tags are case-sensitive.+--+--     * A new tag with a key identical to that of an existing tag overwrites the existing tag.+--+--     * Tagging API actions are limited to 5 TPS per AWS account. If your application requires a higher throughput, file a <https://console.aws.amazon.com/support/home#/case/create?issueType=technical technical support request> .+--+--+--+-- For a full list of tag restrictions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/limits-queues.html Limits Related to Queues> in the /Amazon Simple Queue Service Developer Guide/ .+--+module Network.AWS.SQS.TagQueue+    (+    -- * Creating a Request+      tagQueue+    , TagQueue+    -- * Request Lenses+    , tqQueueURL+    , tqTags++    -- * Destructuring the Response+    , tagQueueResponse+    , TagQueueResponse+    ) where++import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product++-- | /See:/ 'tagQueue' smart constructor.+data TagQueue = TagQueue'+  { _tqQueueURL :: !Text+  , _tqTags     :: !(Map Text Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'TagQueue' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'tqQueueURL' - The URL of the queue.+--+-- * 'tqTags' - The list of tags to be added to the specified queue.+tagQueue+    :: Text -- ^ 'tqQueueURL'+    -> TagQueue+tagQueue pQueueURL_ = TagQueue' {_tqQueueURL = pQueueURL_, _tqTags = mempty}+++-- | The URL of the queue.+tqQueueURL :: Lens' TagQueue Text+tqQueueURL = lens _tqQueueURL (\ s a -> s{_tqQueueURL = a});++-- | The list of tags to be added to the specified queue.+tqTags :: Lens' TagQueue (HashMap Text Text)+tqTags = lens _tqTags (\ s a -> s{_tqTags = a}) . _Map;++instance AWSRequest TagQueue where+        type Rs TagQueue = TagQueueResponse+        request = postQuery sqs+        response = receiveNull TagQueueResponse'++instance Hashable TagQueue where++instance NFData TagQueue where++instance ToHeaders TagQueue where+        toHeaders = const mempty++instance ToPath TagQueue where+        toPath = const "/"++instance ToQuery TagQueue where+        toQuery TagQueue'{..}+          = mconcat+              ["Action" =: ("TagQueue" :: ByteString),+               "Version" =: ("2012-11-05" :: ByteString),+               "QueueUrl" =: _tqQueueURL,+               toQueryMap "Tags" "Key" "Value" _tqTags]++-- | /See:/ 'tagQueueResponse' smart constructor.+data TagQueueResponse =+  TagQueueResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'TagQueueResponse' with the minimum fields required to make a request.+--+tagQueueResponse+    :: TagQueueResponse+tagQueueResponse = TagQueueResponse'+++instance NFData TagQueueResponse where

@@ -4,9 +4,9 @@  -- | -- Module      : Network.AWS.SQS.Types--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --@@ -110,40 +110,42 @@     , smbreMD5OfMessageBody     ) where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.Sign.V4-import           Network.AWS.SQS.Types.Product-import           Network.AWS.SQS.Types.Sum+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Sign.V4+import Network.AWS.SQS.Types.Product+import Network.AWS.SQS.Types.Sum  -- | API version @2012-11-05@ of the Amazon Simple Queue Service SDK configuration. sqs :: Service sqs =-    Service-    { _svcAbbrev = "SQS"-    , _svcSigner = v4-    , _svcPrefix = "sqs"-    , _svcVersion = "2012-11-05"-    , _svcEndpoint = defaultEndpoint sqs-    , _svcTimeout = Just 70-    , _svcCheck = statusSuccess-    , _svcError = parseXMLError "SQS"-    , _svcRetry = retry-    }+  Service+  { _svcAbbrev = "SQS"+  , _svcSigner = v4+  , _svcPrefix = "sqs"+  , _svcVersion = "2012-11-05"+  , _svcEndpoint = defaultEndpoint sqs+  , _svcTimeout = Just 70+  , _svcCheck = statusSuccess+  , _svcError = parseXMLError "SQS"+  , _svcRetry = retry+  }   where     retry =-        Exponential-        { _retryBase = 5.0e-2-        , _retryGrowth = 2-        , _retryAttempts = 5-        , _retryCheck = check-        }+      Exponential+      { _retryBase = 5.0e-2+      , _retryGrowth = 2+      , _retryAttempts = 5+      , _retryCheck = check+      }     check e+      | has (hasCode "ThrottledException" . hasStatus 400) e =+        Just "throttled_exception"       | has (hasCode "RequestThrottled" . hasStatus 403) e =-          Just "request_limit_exceeded"+        Just "request_limit_exceeded"       | has (hasStatus 429) e = Just "too_many_requests"       | has (hasCode "ThrottlingException" . hasStatus 400) e =-          Just "throttling_exception"+        Just "throttling_exception"       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"       | has (hasStatus 504) e = Just "gateway_timeout"       | has (hasStatus 502) e = Just "bad_gateway"@@ -152,119 +154,135 @@       | has (hasStatus 509) e = Just "limit_exceeded"       | otherwise = Nothing + -- | The @Id@ of a batch entry in a batch request doesn't abide by the specification. -- -- _InvalidBatchEntryId :: AsError a => Getting (First ServiceError) a ServiceError _InvalidBatchEntryId =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.InvalidBatchEntryId"+  _MatchServiceError sqs "AWS.SimpleQueueService.InvalidBatchEntryId" .+  hasStatus 400 --- | Batch request contains more number of entries than permissible.++-- | The batch request contains more entries than permissible. -- -- _TooManyEntriesInBatchRequest :: AsError a => Getting (First ServiceError) a ServiceError _TooManyEntriesInBatchRequest =-    _ServiceError .-    hasStatus 400 .-    hasCode "AWS.SimpleQueueService.TooManyEntriesInBatchRequest"+  _MatchServiceError sqs "AWS.SimpleQueueService.TooManyEntriesInBatchRequest" .+  hasStatus 400 --- | You must wait 60 seconds after deleting a queue before you can create another with the same name.++-- | You must wait 60 seconds after deleting a queue before you can create another one with the same name. -- -- _QueueDeletedRecently :: AsError a => Getting (First ServiceError) a ServiceError _QueueDeletedRecently =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.QueueDeletedRecently"+  _MatchServiceError sqs "AWS.SimpleQueueService.QueueDeletedRecently" .+  hasStatus 400 + -- | The queue referred to doesn't exist. -- -- _QueueDoesNotExist :: AsError a => Getting (First ServiceError) a ServiceError _QueueDoesNotExist =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.NonExistentQueue"+  _MatchServiceError sqs "AWS.SimpleQueueService.NonExistentQueue" .+  hasStatus 400 + -- | The attribute referred to doesn't exist. -- -- _InvalidAttributeName :: AsError a => Getting (First ServiceError) a ServiceError-_InvalidAttributeName = _ServiceError . hasCode "InvalidAttributeName"+_InvalidAttributeName = _MatchServiceError sqs "InvalidAttributeName" + -- | Error code 400. Unsupported operation. -- -- _UnsupportedOperation :: AsError a => Getting (First ServiceError) a ServiceError _UnsupportedOperation =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.UnsupportedOperation"+  _MatchServiceError sqs "AWS.SimpleQueueService.UnsupportedOperation" .+  hasStatus 400 + -- | The message contains characters outside the allowed set. -- -- _InvalidMessageContents :: AsError a => Getting (First ServiceError) a ServiceError-_InvalidMessageContents = _ServiceError . hasCode "InvalidMessageContents"+_InvalidMessageContents = _MatchServiceError sqs "InvalidMessageContents" + -- | The length of all the messages put together is more than the limit. -- -- _BatchRequestTooLong :: AsError a => Getting (First ServiceError) a ServiceError _BatchRequestTooLong =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.BatchRequestTooLong"+  _MatchServiceError sqs "AWS.SimpleQueueService.BatchRequestTooLong" .+  hasStatus 400 --- | The action that you requested would violate a limit. For example, ReceiveMessage returns this error if the maximum number of messages inflight has already been reached. 'AddPermission' returns this error if the maximum number of permissions for the queue has already been reached.++-- | The action that you requested would violate a limit. For example, @ReceiveMessage@ returns this error if the maximum number of inflight messages is reached. @'AddPermission' @ returns this error if the maximum number of permissions for the queue is reached. -- -- _OverLimit :: AsError a => Getting (First ServiceError) a ServiceError-_OverLimit = _ServiceError . hasStatus 403 . hasCode "OverLimit"+_OverLimit = _MatchServiceError sqs "OverLimit" . hasStatus 403 + -- | A queue already exists with this name. Amazon SQS returns this error only if the request includes attributes whose values differ from those of the existing queue. -- -- _QueueNameExists :: AsError a => Getting (First ServiceError) a ServiceError-_QueueNameExists = _ServiceError . hasStatus 400 . hasCode "QueueAlreadyExists"+_QueueNameExists = _MatchServiceError sqs "QueueAlreadyExists" . hasStatus 400 --- | Indicates that the specified queue previously received a @PurgeQueue@ request within the last 60 seconds, the time it can take to delete the messages in the queue.++-- | Indicates that the specified queue previously received a @PurgeQueue@ request within the last 60 seconds (the time it can take to delete the messages in the queue). -- -- _PurgeQueueInProgress :: AsError a => Getting (First ServiceError) a ServiceError _PurgeQueueInProgress =-    _ServiceError .-    hasStatus 403 . hasCode "AWS.SimpleQueueService.PurgeQueueInProgress"+  _MatchServiceError sqs "AWS.SimpleQueueService.PurgeQueueInProgress" .+  hasStatus 403 --- | The receipt handle is not valid for the current version.++-- | The receipt handle isn't valid for the current version. -- -- _InvalidIdFormat :: AsError a => Getting (First ServiceError) a ServiceError-_InvalidIdFormat = _ServiceError . hasCode "InvalidIdFormat"+_InvalidIdFormat = _MatchServiceError sqs "InvalidIdFormat" --- | The receipt handle provided is not valid.++-- | The receipt handle provided isn't valid. -- -- _ReceiptHandleIsInvalid :: AsError a => Getting (First ServiceError) a ServiceError-_ReceiptHandleIsInvalid = _ServiceError . hasCode "ReceiptHandleIsInvalid"+_ReceiptHandleIsInvalid = _MatchServiceError sqs "ReceiptHandleIsInvalid" --- | Batch request doesn't contain an entry.++-- | The batch request doesn't contain any entries. -- -- _EmptyBatchRequest :: AsError a => Getting (First ServiceError) a ServiceError _EmptyBatchRequest =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.EmptyBatchRequest"+  _MatchServiceError sqs "AWS.SimpleQueueService.EmptyBatchRequest" .+  hasStatus 400 --- | Two or more batch entries have the same @Id@ in the request.++-- | Two or more batch entries in the request have the same @Id@ . -- -- _BatchEntryIdsNotDistinct :: AsError a => Getting (First ServiceError) a ServiceError _BatchEntryIdsNotDistinct =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.BatchEntryIdsNotDistinct"+  _MatchServiceError sqs "AWS.SimpleQueueService.BatchEntryIdsNotDistinct" .+  hasStatus 400 --- | The message referred to is not in flight.++-- | The message referred to isn't in flight. -- -- _MessageNotInflight :: AsError a => Getting (First ServiceError) a ServiceError _MessageNotInflight =-    _ServiceError .-    hasStatus 400 . hasCode "AWS.SimpleQueueService.MessageNotInflight"+  _MatchServiceError sqs "AWS.SimpleQueueService.MessageNotInflight" .+  hasStatus 400+

@@ -9,17 +9,17 @@  -- | -- Module      : Network.AWS.SQS.Types.Product--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- module Network.AWS.SQS.Types.Product where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.SQS.Types.Sum+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.SQS.Types.Sum  -- | This is used in the responses of batch API to give a detailed description of the result of an action on each entry in the request. --@@ -27,21 +27,22 @@ -- -- /See:/ 'batchResultErrorEntry' smart constructor. data BatchResultErrorEntry = BatchResultErrorEntry'-    { _breeMessage     :: !(Maybe Text)-    , _breeId          :: !Text-    , _breeSenderFault :: !Bool-    , _breeCode        :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _breeMessage     :: !(Maybe Text)+  , _breeId          :: !Text+  , _breeSenderFault :: !Bool+  , _breeCode        :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'BatchResultErrorEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'breeMessage' - A message explaining why the action failed on this entry. ----- * 'breeId' - The id of an entry in a batch request.+-- * 'breeId' - The @Id@ of an entry in a batch request. ----- * 'breeSenderFault' - Whether the error happened due to the sender's fault.+-- * 'breeSenderFault' - Specifies whether the error happened due to the sender's fault. -- -- * 'breeCode' - An error code representing why the action failed on this entry. batchResultErrorEntry@@ -50,22 +51,23 @@     -> Text -- ^ 'breeCode'     -> BatchResultErrorEntry batchResultErrorEntry pId_ pSenderFault_ pCode_ =-    BatchResultErrorEntry'-    { _breeMessage = Nothing-    , _breeId = pId_-    , _breeSenderFault = pSenderFault_-    , _breeCode = pCode_-    }+  BatchResultErrorEntry'+  { _breeMessage = Nothing+  , _breeId = pId_+  , _breeSenderFault = pSenderFault_+  , _breeCode = pCode_+  } + -- | A message explaining why the action failed on this entry. breeMessage :: Lens' BatchResultErrorEntry (Maybe Text) breeMessage = lens _breeMessage (\ s a -> s{_breeMessage = a}); --- | The id of an entry in a batch request.+-- | The @Id@ of an entry in a batch request. breeId :: Lens' BatchResultErrorEntry Text breeId = lens _breeId (\ s a -> s{_breeId = a}); --- | Whether the error happened due to the sender's fault.+-- | Specifies whether the error happened due to the sender's fault. breeSenderFault :: Lens' BatchResultErrorEntry Bool breeSenderFault = lens _breeSenderFault (\ s a -> s{_breeSenderFault = a}); @@ -80,14 +82,14 @@                 (x .@ "SenderFault")                 <*> (x .@ "Code") -instance Hashable BatchResultErrorEntry+instance Hashable BatchResultErrorEntry where -instance NFData BatchResultErrorEntry+instance NFData BatchResultErrorEntry where --- | Encloses a receipt handle and an entry id for each message in 'ChangeMessageVisibilityBatch' .+-- | Encloses a receipt handle and an entry id for each message in @'ChangeMessageVisibilityBatch' .@ -- ----- /Important:/ All of the following parameters are list parameters that must be prefixed with @ChangeMessageVisibilityBatchRequestEntry.n@ , where @n@ is an integer value starting with 1. For example, a parameter list for this action might look like this:+-- /Important:/ All of the following list parameters must be prefixed with @ChangeMessageVisibilityBatchRequestEntry.n@ , where @n@ is an integer value starting with @1@ . For example, a parameter list for this action might look like this: -- -- @&amp;ChangeMessageVisibilityBatchRequestEntry.1.Id=change_visibility_msg_2@ --@@ -98,18 +100,19 @@ -- -- /See:/ 'changeMessageVisibilityBatchRequestEntry' smart constructor. data ChangeMessageVisibilityBatchRequestEntry = ChangeMessageVisibilityBatchRequestEntry'-    { _cVisibilityTimeout :: !(Maybe Int)-    , _cId                :: !Text-    , _cReceiptHandle     :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cVisibilityTimeout :: !(Maybe Int)+  , _cId                :: !Text+  , _cReceiptHandle     :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ChangeMessageVisibilityBatchRequestEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'cVisibilityTimeout' - The new value (in seconds) for the message's visibility timeout. ----- * 'cId' - An identifier for this particular receipt handle. This is used to communicate the result. Note that the @Id@ s of a batch request need to be unique within the request.+-- * 'cId' - An identifier for this particular receipt handle used to communicate the result. -- -- * 'cReceiptHandle' - A receipt handle. changeMessageVisibilityBatchRequestEntry@@ -117,17 +120,18 @@     -> Text -- ^ 'cReceiptHandle'     -> ChangeMessageVisibilityBatchRequestEntry changeMessageVisibilityBatchRequestEntry pId_ pReceiptHandle_ =-    ChangeMessageVisibilityBatchRequestEntry'-    { _cVisibilityTimeout = Nothing-    , _cId = pId_-    , _cReceiptHandle = pReceiptHandle_-    }+  ChangeMessageVisibilityBatchRequestEntry'+  { _cVisibilityTimeout = Nothing+  , _cId = pId_+  , _cReceiptHandle = pReceiptHandle_+  } + -- | The new value (in seconds) for the message's visibility timeout. cVisibilityTimeout :: Lens' ChangeMessageVisibilityBatchRequestEntry (Maybe Int) cVisibilityTimeout = lens _cVisibilityTimeout (\ s a -> s{_cVisibilityTimeout = a}); --- | An identifier for this particular receipt handle. This is used to communicate the result. Note that the @Id@ s of a batch request need to be unique within the request.+-- | An identifier for this particular receipt handle used to communicate the result. cId :: Lens' ChangeMessageVisibilityBatchRequestEntry Text cId = lens _cId (\ s a -> s{_cId = a}); @@ -136,27 +140,31 @@ cReceiptHandle = lens _cReceiptHandle (\ s a -> s{_cReceiptHandle = a});  instance Hashable-         ChangeMessageVisibilityBatchRequestEntry+           ChangeMessageVisibilityBatchRequestEntry+         where  instance NFData-         ChangeMessageVisibilityBatchRequestEntry+           ChangeMessageVisibilityBatchRequestEntry+         where  instance ToQuery-         ChangeMessageVisibilityBatchRequestEntry where+           ChangeMessageVisibilityBatchRequestEntry+         where         toQuery ChangeMessageVisibilityBatchRequestEntry'{..}           = mconcat               ["VisibilityTimeout" =: _cVisibilityTimeout,                "Id" =: _cId, "ReceiptHandle" =: _cReceiptHandle] --- | Encloses the id of an entry in 'ChangeMessageVisibilityBatch' .+-- | Encloses the @Id@ of an entry in @'ChangeMessageVisibilityBatch' .@ -- -- -- -- /See:/ 'changeMessageVisibilityBatchResultEntry' smart constructor. newtype ChangeMessageVisibilityBatchResultEntry = ChangeMessageVisibilityBatchResultEntry'-    { _cmvbreId :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _cmvbreId :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'ChangeMessageVisibilityBatchResultEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -166,25 +174,27 @@     :: Text -- ^ 'cmvbreId'     -> ChangeMessageVisibilityBatchResultEntry changeMessageVisibilityBatchResultEntry pId_ =-    ChangeMessageVisibilityBatchResultEntry'-    { _cmvbreId = pId_-    }+  ChangeMessageVisibilityBatchResultEntry' {_cmvbreId = pId_} + -- | Represents a message whose visibility timeout has been changed successfully. cmvbreId :: Lens' ChangeMessageVisibilityBatchResultEntry Text cmvbreId = lens _cmvbreId (\ s a -> s{_cmvbreId = a});  instance FromXML-         ChangeMessageVisibilityBatchResultEntry where+           ChangeMessageVisibilityBatchResultEntry+         where         parseXML x           = ChangeMessageVisibilityBatchResultEntry' <$>               (x .@ "Id")  instance Hashable-         ChangeMessageVisibilityBatchResultEntry+           ChangeMessageVisibilityBatchResultEntry+         where  instance NFData-         ChangeMessageVisibilityBatchResultEntry+           ChangeMessageVisibilityBatchResultEntry+         where  -- | Encloses a receipt handle and an identifier for it. --@@ -192,15 +202,16 @@ -- -- /See:/ 'deleteMessageBatchRequestEntry' smart constructor. data DeleteMessageBatchRequestEntry = DeleteMessageBatchRequestEntry'-    { _dmbreId            :: !Text-    , _dmbreReceiptHandle :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dmbreId            :: !Text+  , _dmbreReceiptHandle :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMessageBatchRequestEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'dmbreId' - An identifier for this particular receipt handle. This is used to communicate the result. Note that the @Id@ s of a batch request need to be unique within the request.+-- * 'dmbreId' - An identifier for this particular receipt handle. This is used to communicate the result. -- -- * 'dmbreReceiptHandle' - A receipt handle. deleteMessageBatchRequestEntry@@ -208,12 +219,11 @@     -> Text -- ^ 'dmbreReceiptHandle'     -> DeleteMessageBatchRequestEntry deleteMessageBatchRequestEntry pId_ pReceiptHandle_ =-    DeleteMessageBatchRequestEntry'-    { _dmbreId = pId_-    , _dmbreReceiptHandle = pReceiptHandle_-    }+  DeleteMessageBatchRequestEntry'+  {_dmbreId = pId_, _dmbreReceiptHandle = pReceiptHandle_} --- | An identifier for this particular receipt handle. This is used to communicate the result. Note that the @Id@ s of a batch request need to be unique within the request.++-- | An identifier for this particular receipt handle. This is used to communicate the result. dmbreId :: Lens' DeleteMessageBatchRequestEntry Text dmbreId = lens _dmbreId (\ s a -> s{_dmbreId = a}); @@ -222,8 +232,9 @@ dmbreReceiptHandle = lens _dmbreReceiptHandle (\ s a -> s{_dmbreReceiptHandle = a});  instance Hashable DeleteMessageBatchRequestEntry+         where -instance NFData DeleteMessageBatchRequestEntry+instance NFData DeleteMessageBatchRequestEntry where  instance ToQuery DeleteMessageBatchRequestEntry where         toQuery DeleteMessageBatchRequestEntry'{..}@@ -231,15 +242,16 @@               ["Id" =: _dmbreId,                "ReceiptHandle" =: _dmbreReceiptHandle] --- | Encloses the id an entry in 'DeleteMessageBatch' .+-- | Encloses the @Id@ of an entry in @'DeleteMessageBatch' .@ -- -- -- -- /See:/ 'deleteMessageBatchResultEntry' smart constructor. newtype DeleteMessageBatchResultEntry = DeleteMessageBatchResultEntry'-    { _dId :: Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _dId :: Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'DeleteMessageBatchResultEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired:@@ -249,10 +261,9 @@     :: Text -- ^ 'dId'     -> DeleteMessageBatchResultEntry deleteMessageBatchResultEntry pId_ =-    DeleteMessageBatchResultEntry'-    { _dId = pId_-    }+  DeleteMessageBatchResultEntry' {_dId = pId_} + -- | Represents a successfully deleted message. dId :: Lens' DeleteMessageBatchResultEntry Text dId = lens _dId (\ s a -> s{_dId = a});@@ -261,9 +272,9 @@         parseXML x           = DeleteMessageBatchResultEntry' <$> (x .@ "Id") -instance Hashable DeleteMessageBatchResultEntry+instance Hashable DeleteMessageBatchResultEntry where -instance NFData DeleteMessageBatchResultEntry+instance NFData DeleteMessageBatchResultEntry where  -- | An Amazon SQS message. --@@ -271,20 +282,21 @@ -- -- /See:/ 'message' smart constructor. data Message = Message'-    { _mMessageAttributes      :: !(Maybe (Map Text MessageAttributeValue))-    , _mMD5OfBody              :: !(Maybe Text)-    , _mBody                   :: !(Maybe Text)-    , _mAttributes             :: !(Maybe (Map MessageAttribute Text))-    , _mReceiptHandle          :: !(Maybe Text)-    , _mMessageId              :: !(Maybe Text)-    , _mMD5OfMessageAttributes :: !(Maybe Text)-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _mMessageAttributes      :: !(Maybe (Map Text MessageAttributeValue))+  , _mMD5OfBody              :: !(Maybe Text)+  , _mBody                   :: !(Maybe Text)+  , _mAttributes             :: !(Maybe (Map MessageAttribute Text))+  , _mReceiptHandle          :: !(Maybe Text)+  , _mMessageId              :: !(Maybe Text)+  , _mMD5OfMessageAttributes :: !(Maybe Text)+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'Message' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'mMessageAttributes' - Each message attribute consists of a Name, Type, and Value. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributesNTV Message Attribute Items> in the /Amazon SQS Developer Guide/ .+-- * 'mMessageAttributes' - Each message attribute consists of a @Name@ , @Type@ , and @Value@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-items-validation Message Attribute Items and Validation> in the /Amazon Simple Queue Service Developer Guide/ . -- -- * 'mMD5OfBody' - An MD5 digest of the non-URL-encoded message body string. --@@ -294,23 +306,24 @@ -- -- * 'mReceiptHandle' - An identifier associated with the act of receiving the message. A new receipt handle is returned every time you receive a message. When deleting a message, you provide the last received receipt handle to delete the message. ----- * 'mMessageId' - A unique identifier for the message. Message IDs are considered unique across all AWS accounts for an extended period of time.+-- * 'mMessageId' - A unique identifier for the message. A @MessageId@ is considered unique across all AWS accounts for an extended period of time. ----- * 'mMD5OfMessageAttributes' - An MD5 digest of the non-URL-encoded message attribute string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- * 'mMD5OfMessageAttributes' - An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . message     :: Message message =-    Message'-    { _mMessageAttributes = Nothing-    , _mMD5OfBody = Nothing-    , _mBody = Nothing-    , _mAttributes = Nothing-    , _mReceiptHandle = Nothing-    , _mMessageId = Nothing-    , _mMD5OfMessageAttributes = Nothing-    }+  Message'+  { _mMessageAttributes = Nothing+  , _mMD5OfBody = Nothing+  , _mBody = Nothing+  , _mAttributes = Nothing+  , _mReceiptHandle = Nothing+  , _mMessageId = Nothing+  , _mMD5OfMessageAttributes = Nothing+  } --- | Each message attribute consists of a Name, Type, and Value. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributesNTV Message Attribute Items> in the /Amazon SQS Developer Guide/ .++-- | Each message attribute consists of a @Name@ , @Type@ , and @Value@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-items-validation Message Attribute Items and Validation> in the /Amazon Simple Queue Service Developer Guide/ . mMessageAttributes :: Lens' Message (HashMap Text MessageAttributeValue) mMessageAttributes = lens _mMessageAttributes (\ s a -> s{_mMessageAttributes = a}) . _Default . _Map; @@ -330,11 +343,11 @@ mReceiptHandle :: Lens' Message (Maybe Text) mReceiptHandle = lens _mReceiptHandle (\ s a -> s{_mReceiptHandle = a}); --- | A unique identifier for the message. Message IDs are considered unique across all AWS accounts for an extended period of time.+-- | A unique identifier for the message. A @MessageId@ is considered unique across all AWS accounts for an extended period of time. mMessageId :: Lens' Message (Maybe Text) mMessageId = lens _mMessageId (\ s a -> s{_mMessageId = a}); --- | An MD5 digest of the non-URL-encoded message attribute string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- | An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . mMD5OfMessageAttributes :: Lens' Message (Maybe Text) mMD5OfMessageAttributes = lens _mMD5OfMessageAttributes (\ s a -> s{_mMD5OfMessageAttributes = a}); @@ -350,51 +363,53 @@                 <*> (x .@? "MessageId")                 <*> (x .@? "MD5OfMessageAttributes") -instance Hashable Message+instance Hashable Message where -instance NFData Message+instance NFData Message where --- | The user-specified message attribute value. For string data types, the value attribute has the same restrictions on the content as the message body. For more information, see 'SendMessage' .+-- | The user-specified message attribute value. For string data types, the @Value@ attribute has the same restrictions on the content as the message body. For more information, see @'SendMessage' .@ -- ----- Name, type, and value must not be empty or null. In addition, the message body should not be empty or null. All parts of the message attribute, including name, type, and value, are included in the message size restriction, which is currently 256 KB (262,144 bytes).+-- @Name@ , @type@ , @value@ and the message body must not be empty or null. All parts of the message attribute, including @Name@ , @Type@ , and @Value@ , are part of the message size restriction (256 KB or 262,144 bytes). -- -- -- /See:/ 'messageAttributeValue' smart constructor. data MessageAttributeValue = MessageAttributeValue'-    { _mavBinaryValue      :: !(Maybe Base64)-    , _mavStringListValues :: !(Maybe [Text])-    , _mavStringValue      :: !(Maybe Text)-    , _mavBinaryListValues :: !(Maybe [Base64])-    , _mavDataType         :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _mavBinaryValue      :: !(Maybe Base64)+  , _mavStringListValues :: !(Maybe [Text])+  , _mavStringValue      :: !(Maybe Text)+  , _mavBinaryListValues :: !(Maybe [Base64])+  , _mavDataType         :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'MessageAttributeValue' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'mavBinaryValue' - Binary type attributes can store any binary data, for example, compressed data, encrypted data, or images.-- /Note:/ This 'Lens' automatically encodes and decodes Base64 data. The underlying isomorphism will encode to Base64 representation during serialisation, and decode from Base64 representation during deserialisation. This 'Lens' accepts and returns only raw unencoded data.+-- * 'mavBinaryValue' - Binary type attributes can store any binary data, such as compressed data, encrypted data, or images.-- /Note:/ This 'Lens' automatically encodes and decodes Base64 data. The underlying isomorphism will encode to Base64 representation during serialisation, and decode from Base64 representation during deserialisation. This 'Lens' accepts and returns only raw unencoded data. -- -- * 'mavStringListValues' - Not implemented. Reserved for future use. ----- * 'mavStringValue' - Strings are Unicode with UTF8 binary encoding. For a list of code values, see <http://en.wikipedia.org/wiki/ASCII#ASCII_printable_characters ASCII Printable Characters> .+-- * 'mavStringValue' - Strings are Unicode with UTF-8 binary encoding. For a list of code values, see <http://en.wikipedia.org/wiki/ASCII#ASCII_printable_characters ASCII Printable Characters> . -- -- * 'mavBinaryListValues' - Not implemented. Reserved for future use. ----- * 'mavDataType' - Amazon SQS supports the following logical data types: String, Number, and Binary. For the Number data type, you must use StringValue. You can also append custom labels. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributes.DataTypes Message Attribute Data Types> in the /Amazon SQS Developer Guide/ .+-- * 'mavDataType' - Amazon SQS supports the following logical data types: @String@ , @Number@ , and @Binary@ . For the @Number@ data type, you must use @StringValue@ . You can also append custom labels. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-data-types-validation Message Attribute Data Types and Validation> in the /Amazon Simple Queue Service Developer Guide/ . messageAttributeValue     :: Text -- ^ 'mavDataType'     -> MessageAttributeValue messageAttributeValue pDataType_ =-    MessageAttributeValue'-    { _mavBinaryValue = Nothing-    , _mavStringListValues = Nothing-    , _mavStringValue = Nothing-    , _mavBinaryListValues = Nothing-    , _mavDataType = pDataType_-    }+  MessageAttributeValue'+  { _mavBinaryValue = Nothing+  , _mavStringListValues = Nothing+  , _mavStringValue = Nothing+  , _mavBinaryListValues = Nothing+  , _mavDataType = pDataType_+  } --- | Binary type attributes can store any binary data, for example, compressed data, encrypted data, or images.-- /Note:/ This 'Lens' automatically encodes and decodes Base64 data. The underlying isomorphism will encode to Base64 representation during serialisation, and decode from Base64 representation during deserialisation. This 'Lens' accepts and returns only raw unencoded data.++-- | Binary type attributes can store any binary data, such as compressed data, encrypted data, or images.-- /Note:/ This 'Lens' automatically encodes and decodes Base64 data. The underlying isomorphism will encode to Base64 representation during serialisation, and decode from Base64 representation during deserialisation. This 'Lens' accepts and returns only raw unencoded data. mavBinaryValue :: Lens' MessageAttributeValue (Maybe ByteString) mavBinaryValue = lens _mavBinaryValue (\ s a -> s{_mavBinaryValue = a}) . mapping _Base64; @@ -402,7 +417,7 @@ mavStringListValues :: Lens' MessageAttributeValue [Text] mavStringListValues = lens _mavStringListValues (\ s a -> s{_mavStringListValues = a}) . _Default . _Coerce; --- | Strings are Unicode with UTF8 binary encoding. For a list of code values, see <http://en.wikipedia.org/wiki/ASCII#ASCII_printable_characters ASCII Printable Characters> .+-- | Strings are Unicode with UTF-8 binary encoding. For a list of code values, see <http://en.wikipedia.org/wiki/ASCII#ASCII_printable_characters ASCII Printable Characters> . mavStringValue :: Lens' MessageAttributeValue (Maybe Text) mavStringValue = lens _mavStringValue (\ s a -> s{_mavStringValue = a}); @@ -410,7 +425,7 @@ mavBinaryListValues :: Lens' MessageAttributeValue [ByteString] mavBinaryListValues = lens _mavBinaryListValues (\ s a -> s{_mavBinaryListValues = a}) . _Default . _Coerce; --- | Amazon SQS supports the following logical data types: String, Number, and Binary. For the Number data type, you must use StringValue. You can also append custom labels. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributes.DataTypes Message Attribute Data Types> in the /Amazon SQS Developer Guide/ .+-- | Amazon SQS supports the following logical data types: @String@ , @Number@ , and @Binary@ . For the @Number@ data type, you must use @StringValue@ . You can also append custom labels. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-data-types-validation Message Attribute Data Types and Validation> in the /Amazon Simple Queue Service Developer Guide/ . mavDataType :: Lens' MessageAttributeValue Text mavDataType = lens _mavDataType (\ s a -> s{_mavDataType = a}); @@ -426,9 +441,9 @@                    may (parseXMLList "BinaryListValue"))                 <*> (x .@ "DataType") -instance Hashable MessageAttributeValue+instance Hashable MessageAttributeValue where -instance NFData MessageAttributeValue+instance NFData MessageAttributeValue where  instance ToQuery MessageAttributeValue where         toQuery MessageAttributeValue'{..}@@ -445,76 +460,78 @@                       _mavBinaryListValues),                "DataType" =: _mavDataType] --- | Contains the details of a single Amazon SQS message along with a @Id@ .+-- | Contains the details of a single Amazon SQS message along with an @Id@ . -- -- -- -- /See:/ 'sendMessageBatchRequestEntry' smart constructor. data SendMessageBatchRequestEntry = SendMessageBatchRequestEntry'-    { _sMessageAttributes      :: !(Maybe (Map Text MessageAttributeValue))-    , _sDelaySeconds           :: !(Maybe Int)-    , _sMessageDeduplicationId :: !(Maybe Text)-    , _sMessageGroupId         :: !(Maybe Text)-    , _sId                     :: !Text-    , _sMessageBody            :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _sMessageAttributes      :: !(Maybe (Map Text MessageAttributeValue))+  , _sDelaySeconds           :: !(Maybe Int)+  , _sMessageDeduplicationId :: !(Maybe Text)+  , _sMessageGroupId         :: !(Maybe Text)+  , _sId                     :: !Text+  , _sMessageBody            :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SendMessageBatchRequestEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'sMessageAttributes' - Each message attribute consists of a Name, Type, and Value. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributesNTV Message Attribute Items> in the /Amazon SQS Developer Guide/ .+-- * 'sMessageAttributes' - Each message attribute consists of a @Name@ , @Type@ , and @Value@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-items-validation Message Attribute Items and Validation> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'sDelaySeconds' - The number of seconds (0 to 900 - 15 minutes) to delay a specific message. Messages with a positive @DelaySeconds@ value become available for processing after the delay time is finished. If you don't specify a value, the default value for the queue applies.+-- * 'sDelaySeconds' - The length of time, in seconds, for which a specific message is delayed. Valid values: 0 to 900. Maximum: 15 minutes. Messages with a positive @DelaySeconds@ value become available for processing after the delay period is finished. If you don't specify a value, the default value for the queue is applied. ----- * 'sMessageDeduplicationId' - This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of messages within a 5-minute minimum deduplication interval. If a message with a particular @MessageDeduplicationId@ is sent successfully, subsequent messages with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- * 'sMessageDeduplicationId' - This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of messages within a 5-minute minimum deduplication interval. If a message with a particular @MessageDeduplicationId@ is sent successfully, subsequent messages with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ . ----- * 'sMessageGroupId' - This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- * 'sMessageGroupId' - This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ @MessageGroupId@ is required for FIFO queues. You can't use it for Standard queues. ----- * 'sId' - An identifier for the message in this batch. This is used to communicate the result. Note that the @Id@ s of a batch request need to be unique within the request.+-- * 'sId' - An identifier for a message in this batch used to communicate the result. ----- * 'sMessageBody' - Body of the message.+-- * 'sMessageBody' - The body of the message. sendMessageBatchRequestEntry     :: Text -- ^ 'sId'     -> Text -- ^ 'sMessageBody'     -> SendMessageBatchRequestEntry sendMessageBatchRequestEntry pId_ pMessageBody_ =-    SendMessageBatchRequestEntry'-    { _sMessageAttributes = Nothing-    , _sDelaySeconds = Nothing-    , _sMessageDeduplicationId = Nothing-    , _sMessageGroupId = Nothing-    , _sId = pId_-    , _sMessageBody = pMessageBody_-    }+  SendMessageBatchRequestEntry'+  { _sMessageAttributes = Nothing+  , _sDelaySeconds = Nothing+  , _sMessageDeduplicationId = Nothing+  , _sMessageGroupId = Nothing+  , _sId = pId_+  , _sMessageBody = pMessageBody_+  } --- | Each message attribute consists of a Name, Type, and Value. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/SQSMessageAttributes.html#SQSMessageAttributesNTV Message Attribute Items> in the /Amazon SQS Developer Guide/ .++-- | Each message attribute consists of a @Name@ , @Type@ , and @Value@ . For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-message-attributes.html#message-attributes-items-validation Message Attribute Items and Validation> in the /Amazon Simple Queue Service Developer Guide/ . sMessageAttributes :: Lens' SendMessageBatchRequestEntry (HashMap Text MessageAttributeValue) sMessageAttributes = lens _sMessageAttributes (\ s a -> s{_sMessageAttributes = a}) . _Default . _Map; --- | The number of seconds (0 to 900 - 15 minutes) to delay a specific message. Messages with a positive @DelaySeconds@ value become available for processing after the delay time is finished. If you don't specify a value, the default value for the queue applies.+-- | The length of time, in seconds, for which a specific message is delayed. Valid values: 0 to 900. Maximum: 15 minutes. Messages with a positive @DelaySeconds@ value become available for processing after the delay period is finished. If you don't specify a value, the default value for the queue is applied. sDelaySeconds :: Lens' SendMessageBatchRequestEntry (Maybe Int) sDelaySeconds = lens _sDelaySeconds (\ s a -> s{_sDelaySeconds = a}); --- | This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of messages within a 5-minute minimum deduplication interval. If a message with a particular @MessageDeduplicationId@ is sent successfully, subsequent messages with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon SQS Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * You can also use @ContentBasedDeduplication@ for messages with identical content to be treated as duplicates.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- | This parameter applies only to FIFO (first-in-first-out) queues. The token used for deduplication of messages within a 5-minute minimum deduplication interval. If a message with a particular @MessageDeduplicationId@ is sent successfully, subsequent messages with the same @MessageDeduplicationId@ are accepted successfully but aren't delivered. For more information, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queues.html#FIFO-queues-exactly-once-processing Exactly-Once Processing> in the /Amazon Simple Queue Service Developer Guide/ .     * Every message must have a unique @MessageDeduplicationId@ ,     * You may provide a @MessageDeduplicationId@ explicitly.     * If you aren't able to provide a @MessageDeduplicationId@ and you enable @ContentBasedDeduplication@ for your queue, Amazon SQS uses a SHA-256 hash to generate the @MessageDeduplicationId@ using the body of the message (but not the attributes of the message).      * If you don't provide a @MessageDeduplicationId@ and the queue doesn't have @ContentBasedDeduplication@ set, the action fails with an error.     * If the queue has @ContentBasedDeduplication@ set, your @MessageDeduplicationId@ overrides the generated one.     * When @ContentBasedDeduplication@ is in effect, messages with identical content sent within the deduplication interval are treated as duplicates and only one copy of the message is delivered.     * If you send one message with @ContentBasedDeduplication@ enabled and then another message with a @MessageDeduplicationId@ that is the same as the one generated for the first @MessageDeduplicationId@ , the two messages are treated as duplicates and only one copy of the message is delivered.  The length of @MessageDeduplicationId@ is 128 characters. @MessageDeduplicationId@ can contain alphanumeric characters (@a-z@ , @A-Z@ , @0-9@ ) and punctuation (@!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~@ ). For best practices of using @MessageDeduplicationId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagededuplicationid-property Using the MessageDeduplicationId Property> in the /Amazon Simple Queue Service Developer Guide/ . sMessageDeduplicationId :: Lens' SendMessageBatchRequestEntry (Maybe Text) sMessageDeduplicationId = lens _sMessageDeduplicationId (\ s a -> s{_sMessageDeduplicationId = a}); --- | This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ .+-- | This parameter applies only to FIFO (first-in-first-out) queues. The tag that specifies that a message belongs to a specific message group. Messages that belong to the same message group are processed in a FIFO manner (however, messages in different message groups might be processed out of order). To interleave multiple ordered streams within a single queue, use @MessageGroupId@ values (for example, session data for multiple users). In this scenario, multiple readers can process the queue, but the session data of each user is processed in a FIFO fashion.     * You must associate a non-empty @MessageGroupId@ with a message. If you don't provide a @MessageGroupId@ , the action fails.     * @ReceiveMessage@ might return messages with multiple @MessageGroupId@ values. For each @MessageGroupId@ , the messages are sorted by time sent. The caller can't specify a @MessageGroupId@ . The length of @MessageGroupId@ is 128 characters. Valid values are alphanumeric characters and punctuation @(!"#$%&'()*+,-./:;<=>?@[\]^_`{|}~)@ . For best practices of using @MessageGroupId@ , see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/FIFO-queue-recommendations.html#using-messagegroupid-property Using the MessageGroupId Property> in the /Amazon Simple Queue Service Developer Guide/ . /Important:/ @MessageGroupId@ is required for FIFO queues. You can't use it for Standard queues. sMessageGroupId :: Lens' SendMessageBatchRequestEntry (Maybe Text) sMessageGroupId = lens _sMessageGroupId (\ s a -> s{_sMessageGroupId = a}); --- | An identifier for the message in this batch. This is used to communicate the result. Note that the @Id@ s of a batch request need to be unique within the request.+-- | An identifier for a message in this batch used to communicate the result. sId :: Lens' SendMessageBatchRequestEntry Text sId = lens _sId (\ s a -> s{_sId = a}); --- | Body of the message.+-- | The body of the message. sMessageBody :: Lens' SendMessageBatchRequestEntry Text sMessageBody = lens _sMessageBody (\ s a -> s{_sMessageBody = a}); -instance Hashable SendMessageBatchRequestEntry+instance Hashable SendMessageBatchRequestEntry where -instance NFData SendMessageBatchRequestEntry+instance NFData SendMessageBatchRequestEntry where  instance ToQuery SendMessageBatchRequestEntry where         toQuery SendMessageBatchRequestEntry'{..}@@ -527,51 +544,53 @@                "MessageGroupId" =: _sMessageGroupId, "Id" =: _sId,                "MessageBody" =: _sMessageBody] --- | Encloses a message ID for successfully enqueued message of a 'SendMessageBatch' .+-- | Encloses a @MessageId@ for a successfully-enqueued message in a @'SendMessageBatch' .@ -- -- -- -- /See:/ 'sendMessageBatchResultEntry' smart constructor. data SendMessageBatchResultEntry = SendMessageBatchResultEntry'-    { _smbreSequenceNumber         :: !(Maybe Text)-    , _smbreMD5OfMessageAttributes :: !(Maybe Text)-    , _smbreId                     :: !Text-    , _smbreMessageId              :: !Text-    , _smbreMD5OfMessageBody       :: !Text-    } deriving (Eq,Read,Show,Data,Typeable,Generic)+  { _smbreSequenceNumber         :: !(Maybe Text)+  , _smbreMD5OfMessageAttributes :: !(Maybe Text)+  , _smbreId                     :: !Text+  , _smbreMessageId              :: !Text+  , _smbreMD5OfMessageBody       :: !Text+  } deriving (Eq, Read, Show, Data, Typeable, Generic) + -- | Creates a value of 'SendMessageBatchResultEntry' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: ----- * 'smbreSequenceNumber' - /This element applies only to FIFO (first-in-first-out) queues./  A large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. As @SequenceNumber@ continues to increase for a particular @MessageGroupId@ .+-- * 'smbreSequenceNumber' - This parameter applies only to FIFO (first-in-first-out) queues. The large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. As @SequenceNumber@ continues to increase for a particular @MessageGroupId@ . ----- * 'smbreMD5OfMessageAttributes' - An MD5 digest of the non-URL-encoded message attribute string. This can be used to verify that Amazon SQS received the message batch correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- * 'smbreMD5OfMessageAttributes' - An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . -- -- * 'smbreId' - An identifier for the message in this batch. -- -- * 'smbreMessageId' - An identifier for the message. ----- * 'smbreMD5OfMessageBody' - An MD5 digest of the non-URL-encoded message body string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- * 'smbreMD5OfMessageBody' - An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . sendMessageBatchResultEntry     :: Text -- ^ 'smbreId'     -> Text -- ^ 'smbreMessageId'     -> Text -- ^ 'smbreMD5OfMessageBody'     -> SendMessageBatchResultEntry sendMessageBatchResultEntry pId_ pMessageId_ pMD5OfMessageBody_ =-    SendMessageBatchResultEntry'-    { _smbreSequenceNumber = Nothing-    , _smbreMD5OfMessageAttributes = Nothing-    , _smbreId = pId_-    , _smbreMessageId = pMessageId_-    , _smbreMD5OfMessageBody = pMD5OfMessageBody_-    }+  SendMessageBatchResultEntry'+  { _smbreSequenceNumber = Nothing+  , _smbreMD5OfMessageAttributes = Nothing+  , _smbreId = pId_+  , _smbreMessageId = pMessageId_+  , _smbreMD5OfMessageBody = pMD5OfMessageBody_+  } --- | /This element applies only to FIFO (first-in-first-out) queues./  A large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. As @SequenceNumber@ continues to increase for a particular @MessageGroupId@ .++-- | This parameter applies only to FIFO (first-in-first-out) queues. The large, non-consecutive number that Amazon SQS assigns to each message. The length of @SequenceNumber@ is 128 bits. As @SequenceNumber@ continues to increase for a particular @MessageGroupId@ . smbreSequenceNumber :: Lens' SendMessageBatchResultEntry (Maybe Text) smbreSequenceNumber = lens _smbreSequenceNumber (\ s a -> s{_smbreSequenceNumber = a}); --- | An MD5 digest of the non-URL-encoded message attribute string. This can be used to verify that Amazon SQS received the message batch correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- | An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . smbreMD5OfMessageAttributes :: Lens' SendMessageBatchResultEntry (Maybe Text) smbreMD5OfMessageAttributes = lens _smbreMD5OfMessageAttributes (\ s a -> s{_smbreMD5OfMessageAttributes = a}); @@ -583,7 +602,7 @@ smbreMessageId :: Lens' SendMessageBatchResultEntry Text smbreMessageId = lens _smbreMessageId (\ s a -> s{_smbreMessageId = a}); --- | An MD5 digest of the non-URL-encoded message body string. This can be used to verify that Amazon SQS received the message correctly. Amazon SQS first URL decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> .+-- | An MD5 digest of the non-URL-encoded message attribute string. You can use this attribute to verify that Amazon SQS received the message correctly. Amazon SQS URL-decodes the message before creating the MD5 digest. For information about MD5, see <https://www.ietf.org/rfc/rfc1321.txt RFC1321> . smbreMD5OfMessageBody :: Lens' SendMessageBatchResultEntry Text smbreMD5OfMessageBody = lens _smbreMD5OfMessageBody (\ s a -> s{_smbreMD5OfMessageBody = a}); @@ -596,6 +615,6 @@                 <*> (x .@ "MessageId")                 <*> (x .@ "MD5OfMessageBody") -instance Hashable SendMessageBatchResultEntry+instance Hashable SendMessageBatchResultEntry where -instance NFData SendMessageBatchResultEntry+instance NFData SendMessageBatchResultEntry where

@@ -9,24 +9,25 @@  -- | -- Module      : Network.AWS.SQS.Types.Sum--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- module Network.AWS.SQS.Types.Sum where -import           Network.AWS.Prelude+import Network.AWS.Prelude  data MessageAttribute-    = All-    | ApproximateFirstReceiveTimestamp-    | ApproximateReceiveCount-    | SenderId-    | SentTimestamp-    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)+  = All+  | ApproximateFirstReceiveTimestamp+  | ApproximateReceiveCount+  | SenderId+  | SentTimestamp+  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic) + instance FromText MessageAttribute where     parser = takeLowerText >>= \case         "all" -> pure All@@ -55,24 +56,27 @@     parseXML = parseXMLText "MessageAttribute"  data QueueAttributeName-    = QANAll-    | QANApproximateNumberOfMessages-    | QANApproximateNumberOfMessagesDelayed-    | QANApproximateNumberOfMessagesNotVisible-    | QANContentBasedDeduplication-    | QANCreatedTimestamp-    | QANDelaySeconds-    | QANFifoQueue-    | QANLastModifiedTimestamp-    | QANMaximumMessageSize-    | QANMessageRetentionPeriod-    | QANPolicy-    | QANQueueARN-    | QANReceiveMessageWaitTimeSeconds-    | QANRedrivePolicy-    | QANVisibilityTimeout-    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)+  = QANAll+  | QANApproximateNumberOfMessages+  | QANApproximateNumberOfMessagesDelayed+  | QANApproximateNumberOfMessagesNotVisible+  | QANContentBasedDeduplication+  | QANCreatedTimestamp+  | QANDelaySeconds+  | QANFifoQueue+  | QANKMSDataKeyReusePeriodSeconds+  | QANKMSMasterKeyId+  | QANLastModifiedTimestamp+  | QANMaximumMessageSize+  | QANMessageRetentionPeriod+  | QANPolicy+  | QANQueueARN+  | QANReceiveMessageWaitTimeSeconds+  | QANRedrivePolicy+  | QANVisibilityTimeout+  deriving (Eq, Ord, Read, Show, Enum, Bounded, Data, Typeable, Generic) + instance FromText QueueAttributeName where     parser = takeLowerText >>= \case         "all" -> pure QANAll@@ -83,6 +87,8 @@         "createdtimestamp" -> pure QANCreatedTimestamp         "delayseconds" -> pure QANDelaySeconds         "fifoqueue" -> pure QANFifoQueue+        "kmsdatakeyreuseperiodseconds" -> pure QANKMSDataKeyReusePeriodSeconds+        "kmsmasterkeyid" -> pure QANKMSMasterKeyId         "lastmodifiedtimestamp" -> pure QANLastModifiedTimestamp         "maximummessagesize" -> pure QANMaximumMessageSize         "messageretentionperiod" -> pure QANMessageRetentionPeriod@@ -92,7 +98,7 @@         "redrivepolicy" -> pure QANRedrivePolicy         "visibilitytimeout" -> pure QANVisibilityTimeout         e -> fromTextError $ "Failure parsing QueueAttributeName from value: '" <> e-           <> "'. Accepted values: all, approximatenumberofmessages, approximatenumberofmessagesdelayed, approximatenumberofmessagesnotvisible, contentbaseddeduplication, createdtimestamp, delayseconds, fifoqueue, lastmodifiedtimestamp, maximummessagesize, messageretentionperiod, policy, queuearn, receivemessagewaittimeseconds, redrivepolicy, visibilitytimeout"+           <> "'. Accepted values: all, approximatenumberofmessages, approximatenumberofmessagesdelayed, approximatenumberofmessagesnotvisible, contentbaseddeduplication, createdtimestamp, delayseconds, fifoqueue, kmsdatakeyreuseperiodseconds, kmsmasterkeyid, lastmodifiedtimestamp, maximummessagesize, messageretentionperiod, policy, queuearn, receivemessagewaittimeseconds, redrivepolicy, visibilitytimeout"  instance ToText QueueAttributeName where     toText = \case@@ -104,6 +110,8 @@         QANCreatedTimestamp -> "CreatedTimestamp"         QANDelaySeconds -> "DelaySeconds"         QANFifoQueue -> "FifoQueue"+        QANKMSDataKeyReusePeriodSeconds -> "KmsDataKeyReusePeriodSeconds"+        QANKMSMasterKeyId -> "KmsMasterKeyId"         QANLastModifiedTimestamp -> "LastModifiedTimestamp"         QANMaximumMessageSize -> "MaximumMessageSize"         QANMessageRetentionPeriod -> "MessageRetentionPeriod"

@@ -0,0 +1,126 @@+{-# LANGUAGE DeriveDataTypeable #-}+{-# LANGUAGE DeriveGeneric      #-}+{-# LANGUAGE OverloadedStrings  #-}+{-# LANGUAGE RecordWildCards    #-}+{-# LANGUAGE TypeFamilies       #-}++{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-binds   #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- Derived from AWS service descriptions, licensed under Apache 2.0.++-- |+-- Module      : Network.AWS.SQS.UntagQueue+-- Copyright   : (c) 2013-2017 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Remove cost allocation tags from the specified Amazon SQS queue. For an overview, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/sqs-tagging-queues.html Tagging Amazon SQS Queues> in the /Amazon Simple Queue Service Developer Guide/ .+--+--+-- When you use queue tags, keep the following guidelines in mind:+--+--     * Adding more than 50 tags to a queue isn't recommended.+--+--     * Tags don't have any semantic meaning. Amazon SQS interprets tags as character strings.+--+--     * Tags are case-sensitive.+--+--     * A new tag with a key identical to that of an existing tag overwrites the existing tag.+--+--     * Tagging API actions are limited to 5 TPS per AWS account. If your application requires a higher throughput, file a <https://console.aws.amazon.com/support/home#/case/create?issueType=technical technical support request> .+--+--+--+-- For a full list of tag restrictions, see <http://docs.aws.amazon.com/AWSSimpleQueueService/latest/SQSDeveloperGuide/limits-queues.html Limits Related to Queues> in the /Amazon Simple Queue Service Developer Guide/ .+--+module Network.AWS.SQS.UntagQueue+    (+    -- * Creating a Request+      untagQueue+    , UntagQueue+    -- * Request Lenses+    , uqQueueURL+    , uqTagKeys++    -- * Destructuring the Response+    , untagQueueResponse+    , UntagQueueResponse+    ) where++import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.Request+import Network.AWS.Response+import Network.AWS.SQS.Types+import Network.AWS.SQS.Types.Product++-- | /See:/ 'untagQueue' smart constructor.+data UntagQueue = UntagQueue'+  { _uqQueueURL :: !Text+  , _uqTagKeys  :: ![Text]+  } deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'UntagQueue' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'uqQueueURL' - The URL of the queue.+--+-- * 'uqTagKeys' - The list of tags to be removed from the specified queue.+untagQueue+    :: Text -- ^ 'uqQueueURL'+    -> UntagQueue+untagQueue pQueueURL_ =+  UntagQueue' {_uqQueueURL = pQueueURL_, _uqTagKeys = mempty}+++-- | The URL of the queue.+uqQueueURL :: Lens' UntagQueue Text+uqQueueURL = lens _uqQueueURL (\ s a -> s{_uqQueueURL = a});++-- | The list of tags to be removed from the specified queue.+uqTagKeys :: Lens' UntagQueue [Text]+uqTagKeys = lens _uqTagKeys (\ s a -> s{_uqTagKeys = a}) . _Coerce;++instance AWSRequest UntagQueue where+        type Rs UntagQueue = UntagQueueResponse+        request = postQuery sqs+        response = receiveNull UntagQueueResponse'++instance Hashable UntagQueue where++instance NFData UntagQueue where++instance ToHeaders UntagQueue where+        toHeaders = const mempty++instance ToPath UntagQueue where+        toPath = const "/"++instance ToQuery UntagQueue where+        toQuery UntagQueue'{..}+          = mconcat+              ["Action" =: ("UntagQueue" :: ByteString),+               "Version" =: ("2012-11-05" :: ByteString),+               "QueueUrl" =: _uqQueueURL,+               toQueryList "TagKey" _uqTagKeys]++-- | /See:/ 'untagQueueResponse' smart constructor.+data UntagQueueResponse =+  UntagQueueResponse'+  deriving (Eq, Read, Show, Data, Typeable, Generic)+++-- | Creates a value of 'UntagQueueResponse' with the minimum fields required to make a request.+--+untagQueueResponse+    :: UntagQueueResponse+untagQueueResponse = UntagQueueResponse'+++instance NFData UntagQueueResponse where

@@ -7,15 +7,15 @@  -- | -- Module      : Network.AWS.SQS.Waiters--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- module Network.AWS.SQS.Waiters where -import           Network.AWS.Lens-import           Network.AWS.Prelude-import           Network.AWS.SQS.Types-import           Network.AWS.Waiter+import Network.AWS.Lens+import Network.AWS.Prelude+import Network.AWS.SQS.Types+import Network.AWS.Waiter

@@ -2,9 +2,9 @@  -- | -- Module      : Main--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) --

@@ -5,20 +5,20 @@  -- | -- Module      : Test.AWS.Gen.SQS--- Copyright   : (c) 2013-2016 Brendan Hay+-- Copyright   : (c) 2013-2017 Brendan Hay -- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>+-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com> -- Stability   : auto-generated -- Portability : non-portable (GHC extensions) -- module Test.AWS.Gen.SQS where  import Data.Proxy+import Network.AWS.SQS import Test.AWS.Fixture import Test.AWS.Prelude-import Test.Tasty-import Network.AWS.SQS import Test.AWS.SQS.Internal+import Test.Tasty  -- Auto-generated: the actual test selection needs to be manually placed into -- the top-level so that real test data can be incrementally added.@@ -55,6 +55,9 @@ --         , requestDeleteQueue $ --             deleteQueue --+--         , requestTagQueue $+--             tagQueue+-- --         , requestDeleteMessageBatch $ --             deleteMessageBatch --@@ -70,9 +73,15 @@ --         , requestDeleteMessage $ --             deleteMessage --+--         , requestListQueueTags $+--             listQueueTags+-- --         , requestCreateQueue $ --             createQueue --+--         , requestUntagQueue $+--             untagQueue+-- --         , requestSendMessageBatch $ --             sendMessageBatch --@@ -109,6 +118,9 @@ --         , responseDeleteQueue $ --             deleteQueueResponse --+--         , responseTagQueue $+--             tagQueueResponse+-- --         , responseDeleteMessageBatch $ --             deleteMessageBatchResponse --@@ -124,9 +136,15 @@ --         , responseDeleteMessage $ --             deleteMessageResponse --+--         , responseListQueueTags $+--             listQueueTagsResponse+-- --         , responseCreateQueue $ --             createQueueResponse --+--         , responseUntagQueue $+--             untagQueueResponse+-- --         , responseSendMessageBatch $ --             sendMessageBatchResponse --@@ -183,6 +201,11 @@     "DeleteQueue"     "fixture/DeleteQueue.yaml" +requestTagQueue :: TagQueue -> TestTree+requestTagQueue = req+    "TagQueue"+    "fixture/TagQueue.yaml"+ requestDeleteMessageBatch :: DeleteMessageBatch -> TestTree requestDeleteMessageBatch = req     "DeleteMessageBatch"@@ -208,11 +231,21 @@     "DeleteMessage"     "fixture/DeleteMessage.yaml" +requestListQueueTags :: ListQueueTags -> TestTree+requestListQueueTags = req+    "ListQueueTags"+    "fixture/ListQueueTags.yaml"+ requestCreateQueue :: CreateQueue -> TestTree requestCreateQueue = req     "CreateQueue"     "fixture/CreateQueue.yaml" +requestUntagQueue :: UntagQueue -> TestTree+requestUntagQueue = req+    "UntagQueue"+    "fixture/UntagQueue.yaml"+ requestSendMessageBatch :: SendMessageBatch -> TestTree requestSendMessageBatch = req     "SendMessageBatch"@@ -288,6 +321,13 @@     sqs     (Proxy :: Proxy DeleteQueue) +responseTagQueue :: TagQueueResponse -> TestTree+responseTagQueue = res+    "TagQueueResponse"+    "fixture/TagQueueResponse.proto"+    sqs+    (Proxy :: Proxy TagQueue)+ responseDeleteMessageBatch :: DeleteMessageBatchResponse -> TestTree responseDeleteMessageBatch = res     "DeleteMessageBatchResponse"@@ -323,12 +363,26 @@     sqs     (Proxy :: Proxy DeleteMessage) +responseListQueueTags :: ListQueueTagsResponse -> TestTree+responseListQueueTags = res+    "ListQueueTagsResponse"+    "fixture/ListQueueTagsResponse.proto"+    sqs+    (Proxy :: Proxy ListQueueTags)+ responseCreateQueue :: CreateQueueResponse -> TestTree responseCreateQueue = res     "CreateQueueResponse"     "fixture/CreateQueueResponse.proto"     sqs     (Proxy :: Proxy CreateQueue)++responseUntagQueue :: UntagQueueResponse -> TestTree+responseUntagQueue = res+    "UntagQueueResponse"+    "fixture/UntagQueueResponse.proto"+    sqs+    (Proxy :: Proxy UntagQueue)  responseSendMessageBatch :: SendMessageBatchResponse -> TestTree responseSendMessageBatch = res