{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.ServiceQuotas.GetServiceQuotaIncreaseRequestFromTemplate
(
GetServiceQuotaIncreaseRequestFromTemplate (..),
newGetServiceQuotaIncreaseRequestFromTemplate,
getServiceQuotaIncreaseRequestFromTemplate_serviceCode,
getServiceQuotaIncreaseRequestFromTemplate_quotaCode,
getServiceQuotaIncreaseRequestFromTemplate_awsRegion,
GetServiceQuotaIncreaseRequestFromTemplateResponse (..),
newGetServiceQuotaIncreaseRequestFromTemplateResponse,
getServiceQuotaIncreaseRequestFromTemplateResponse_serviceQuotaIncreaseRequestInTemplate,
getServiceQuotaIncreaseRequestFromTemplateResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.ServiceQuotas.Types
data GetServiceQuotaIncreaseRequestFromTemplate = GetServiceQuotaIncreaseRequestFromTemplate'
{
GetServiceQuotaIncreaseRequestFromTemplate -> Text
serviceCode :: Prelude.Text,
GetServiceQuotaIncreaseRequestFromTemplate -> Text
quotaCode :: Prelude.Text,
GetServiceQuotaIncreaseRequestFromTemplate -> Text
awsRegion :: Prelude.Text
}
deriving (GetServiceQuotaIncreaseRequestFromTemplate
-> GetServiceQuotaIncreaseRequestFromTemplate -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetServiceQuotaIncreaseRequestFromTemplate
-> GetServiceQuotaIncreaseRequestFromTemplate -> Bool
$c/= :: GetServiceQuotaIncreaseRequestFromTemplate
-> GetServiceQuotaIncreaseRequestFromTemplate -> Bool
== :: GetServiceQuotaIncreaseRequestFromTemplate
-> GetServiceQuotaIncreaseRequestFromTemplate -> Bool
$c== :: GetServiceQuotaIncreaseRequestFromTemplate
-> GetServiceQuotaIncreaseRequestFromTemplate -> Bool
Prelude.Eq, ReadPrec [GetServiceQuotaIncreaseRequestFromTemplate]
ReadPrec GetServiceQuotaIncreaseRequestFromTemplate
Int -> ReadS GetServiceQuotaIncreaseRequestFromTemplate
ReadS [GetServiceQuotaIncreaseRequestFromTemplate]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetServiceQuotaIncreaseRequestFromTemplate]
$creadListPrec :: ReadPrec [GetServiceQuotaIncreaseRequestFromTemplate]
readPrec :: ReadPrec GetServiceQuotaIncreaseRequestFromTemplate
$creadPrec :: ReadPrec GetServiceQuotaIncreaseRequestFromTemplate
readList :: ReadS [GetServiceQuotaIncreaseRequestFromTemplate]
$creadList :: ReadS [GetServiceQuotaIncreaseRequestFromTemplate]
readsPrec :: Int -> ReadS GetServiceQuotaIncreaseRequestFromTemplate
$creadsPrec :: Int -> ReadS GetServiceQuotaIncreaseRequestFromTemplate
Prelude.Read, Int -> GetServiceQuotaIncreaseRequestFromTemplate -> ShowS
[GetServiceQuotaIncreaseRequestFromTemplate] -> ShowS
GetServiceQuotaIncreaseRequestFromTemplate -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetServiceQuotaIncreaseRequestFromTemplate] -> ShowS
$cshowList :: [GetServiceQuotaIncreaseRequestFromTemplate] -> ShowS
show :: GetServiceQuotaIncreaseRequestFromTemplate -> String
$cshow :: GetServiceQuotaIncreaseRequestFromTemplate -> String
showsPrec :: Int -> GetServiceQuotaIncreaseRequestFromTemplate -> ShowS
$cshowsPrec :: Int -> GetServiceQuotaIncreaseRequestFromTemplate -> ShowS
Prelude.Show, forall x.
Rep GetServiceQuotaIncreaseRequestFromTemplate x
-> GetServiceQuotaIncreaseRequestFromTemplate
forall x.
GetServiceQuotaIncreaseRequestFromTemplate
-> Rep GetServiceQuotaIncreaseRequestFromTemplate x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetServiceQuotaIncreaseRequestFromTemplate x
-> GetServiceQuotaIncreaseRequestFromTemplate
$cfrom :: forall x.
GetServiceQuotaIncreaseRequestFromTemplate
-> Rep GetServiceQuotaIncreaseRequestFromTemplate x
Prelude.Generic)
newGetServiceQuotaIncreaseRequestFromTemplate ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
GetServiceQuotaIncreaseRequestFromTemplate
newGetServiceQuotaIncreaseRequestFromTemplate :: Text -> Text -> Text -> GetServiceQuotaIncreaseRequestFromTemplate
newGetServiceQuotaIncreaseRequestFromTemplate
Text
pServiceCode_
Text
pQuotaCode_
Text
pAwsRegion_ =
GetServiceQuotaIncreaseRequestFromTemplate'
{ $sel:serviceCode:GetServiceQuotaIncreaseRequestFromTemplate' :: Text
serviceCode =
Text
pServiceCode_,
$sel:quotaCode:GetServiceQuotaIncreaseRequestFromTemplate' :: Text
quotaCode = Text
pQuotaCode_,
$sel:awsRegion:GetServiceQuotaIncreaseRequestFromTemplate' :: Text
awsRegion = Text
pAwsRegion_
}
getServiceQuotaIncreaseRequestFromTemplate_serviceCode :: Lens.Lens' GetServiceQuotaIncreaseRequestFromTemplate Prelude.Text
getServiceQuotaIncreaseRequestFromTemplate_serviceCode :: Lens' GetServiceQuotaIncreaseRequestFromTemplate Text
getServiceQuotaIncreaseRequestFromTemplate_serviceCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetServiceQuotaIncreaseRequestFromTemplate' {Text
serviceCode :: Text
$sel:serviceCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
serviceCode} -> Text
serviceCode) (\s :: GetServiceQuotaIncreaseRequestFromTemplate
s@GetServiceQuotaIncreaseRequestFromTemplate' {} Text
a -> GetServiceQuotaIncreaseRequestFromTemplate
s {$sel:serviceCode:GetServiceQuotaIncreaseRequestFromTemplate' :: Text
serviceCode = Text
a} :: GetServiceQuotaIncreaseRequestFromTemplate)
getServiceQuotaIncreaseRequestFromTemplate_quotaCode :: Lens.Lens' GetServiceQuotaIncreaseRequestFromTemplate Prelude.Text
getServiceQuotaIncreaseRequestFromTemplate_quotaCode :: Lens' GetServiceQuotaIncreaseRequestFromTemplate Text
getServiceQuotaIncreaseRequestFromTemplate_quotaCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetServiceQuotaIncreaseRequestFromTemplate' {Text
quotaCode :: Text
$sel:quotaCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
quotaCode} -> Text
quotaCode) (\s :: GetServiceQuotaIncreaseRequestFromTemplate
s@GetServiceQuotaIncreaseRequestFromTemplate' {} Text
a -> GetServiceQuotaIncreaseRequestFromTemplate
s {$sel:quotaCode:GetServiceQuotaIncreaseRequestFromTemplate' :: Text
quotaCode = Text
a} :: GetServiceQuotaIncreaseRequestFromTemplate)
getServiceQuotaIncreaseRequestFromTemplate_awsRegion :: Lens.Lens' GetServiceQuotaIncreaseRequestFromTemplate Prelude.Text
getServiceQuotaIncreaseRequestFromTemplate_awsRegion :: Lens' GetServiceQuotaIncreaseRequestFromTemplate Text
getServiceQuotaIncreaseRequestFromTemplate_awsRegion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetServiceQuotaIncreaseRequestFromTemplate' {Text
awsRegion :: Text
$sel:awsRegion:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
awsRegion} -> Text
awsRegion) (\s :: GetServiceQuotaIncreaseRequestFromTemplate
s@GetServiceQuotaIncreaseRequestFromTemplate' {} Text
a -> GetServiceQuotaIncreaseRequestFromTemplate
s {$sel:awsRegion:GetServiceQuotaIncreaseRequestFromTemplate' :: Text
awsRegion = Text
a} :: GetServiceQuotaIncreaseRequestFromTemplate)
instance
Core.AWSRequest
GetServiceQuotaIncreaseRequestFromTemplate
where
type
AWSResponse
GetServiceQuotaIncreaseRequestFromTemplate =
GetServiceQuotaIncreaseRequestFromTemplateResponse
request :: (Service -> Service)
-> GetServiceQuotaIncreaseRequestFromTemplate
-> Request GetServiceQuotaIncreaseRequestFromTemplate
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetServiceQuotaIncreaseRequestFromTemplate
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse GetServiceQuotaIncreaseRequestFromTemplate)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe ServiceQuotaIncreaseRequestInTemplate
-> Int -> GetServiceQuotaIncreaseRequestFromTemplateResponse
GetServiceQuotaIncreaseRequestFromTemplateResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"ServiceQuotaIncreaseRequestInTemplate")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance
Prelude.Hashable
GetServiceQuotaIncreaseRequestFromTemplate
where
hashWithSalt :: Int -> GetServiceQuotaIncreaseRequestFromTemplate -> Int
hashWithSalt
Int
_salt
GetServiceQuotaIncreaseRequestFromTemplate' {Text
awsRegion :: Text
quotaCode :: Text
serviceCode :: Text
$sel:awsRegion:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
$sel:quotaCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
$sel:serviceCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
serviceCode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
quotaCode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
awsRegion
instance
Prelude.NFData
GetServiceQuotaIncreaseRequestFromTemplate
where
rnf :: GetServiceQuotaIncreaseRequestFromTemplate -> ()
rnf GetServiceQuotaIncreaseRequestFromTemplate' {Text
awsRegion :: Text
quotaCode :: Text
serviceCode :: Text
$sel:awsRegion:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
$sel:quotaCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
$sel:serviceCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
serviceCode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
quotaCode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
awsRegion
instance
Data.ToHeaders
GetServiceQuotaIncreaseRequestFromTemplate
where
toHeaders :: GetServiceQuotaIncreaseRequestFromTemplate -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"ServiceQuotasV20190624.GetServiceQuotaIncreaseRequestFromTemplate" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance
Data.ToJSON
GetServiceQuotaIncreaseRequestFromTemplate
where
toJSON :: GetServiceQuotaIncreaseRequestFromTemplate -> Value
toJSON
GetServiceQuotaIncreaseRequestFromTemplate' {Text
awsRegion :: Text
quotaCode :: Text
serviceCode :: Text
$sel:awsRegion:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
$sel:quotaCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
$sel:serviceCode:GetServiceQuotaIncreaseRequestFromTemplate' :: GetServiceQuotaIncreaseRequestFromTemplate -> Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ forall a. a -> Maybe a
Prelude.Just (Key
"ServiceCode" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
serviceCode),
forall a. a -> Maybe a
Prelude.Just (Key
"QuotaCode" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
quotaCode),
forall a. a -> Maybe a
Prelude.Just (Key
"AwsRegion" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
awsRegion)
]
)
instance
Data.ToPath
GetServiceQuotaIncreaseRequestFromTemplate
where
toPath :: GetServiceQuotaIncreaseRequestFromTemplate -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
GetServiceQuotaIncreaseRequestFromTemplate
where
toQuery :: GetServiceQuotaIncreaseRequestFromTemplate -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data GetServiceQuotaIncreaseRequestFromTemplateResponse = GetServiceQuotaIncreaseRequestFromTemplateResponse'
{
GetServiceQuotaIncreaseRequestFromTemplateResponse
-> Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate :: Prelude.Maybe ServiceQuotaIncreaseRequestInTemplate,
GetServiceQuotaIncreaseRequestFromTemplateResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetServiceQuotaIncreaseRequestFromTemplateResponse
-> GetServiceQuotaIncreaseRequestFromTemplateResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetServiceQuotaIncreaseRequestFromTemplateResponse
-> GetServiceQuotaIncreaseRequestFromTemplateResponse -> Bool
$c/= :: GetServiceQuotaIncreaseRequestFromTemplateResponse
-> GetServiceQuotaIncreaseRequestFromTemplateResponse -> Bool
== :: GetServiceQuotaIncreaseRequestFromTemplateResponse
-> GetServiceQuotaIncreaseRequestFromTemplateResponse -> Bool
$c== :: GetServiceQuotaIncreaseRequestFromTemplateResponse
-> GetServiceQuotaIncreaseRequestFromTemplateResponse -> Bool
Prelude.Eq, ReadPrec [GetServiceQuotaIncreaseRequestFromTemplateResponse]
ReadPrec GetServiceQuotaIncreaseRequestFromTemplateResponse
Int -> ReadS GetServiceQuotaIncreaseRequestFromTemplateResponse
ReadS [GetServiceQuotaIncreaseRequestFromTemplateResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetServiceQuotaIncreaseRequestFromTemplateResponse]
$creadListPrec :: ReadPrec [GetServiceQuotaIncreaseRequestFromTemplateResponse]
readPrec :: ReadPrec GetServiceQuotaIncreaseRequestFromTemplateResponse
$creadPrec :: ReadPrec GetServiceQuotaIncreaseRequestFromTemplateResponse
readList :: ReadS [GetServiceQuotaIncreaseRequestFromTemplateResponse]
$creadList :: ReadS [GetServiceQuotaIncreaseRequestFromTemplateResponse]
readsPrec :: Int -> ReadS GetServiceQuotaIncreaseRequestFromTemplateResponse
$creadsPrec :: Int -> ReadS GetServiceQuotaIncreaseRequestFromTemplateResponse
Prelude.Read, Int -> GetServiceQuotaIncreaseRequestFromTemplateResponse -> ShowS
[GetServiceQuotaIncreaseRequestFromTemplateResponse] -> ShowS
GetServiceQuotaIncreaseRequestFromTemplateResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetServiceQuotaIncreaseRequestFromTemplateResponse] -> ShowS
$cshowList :: [GetServiceQuotaIncreaseRequestFromTemplateResponse] -> ShowS
show :: GetServiceQuotaIncreaseRequestFromTemplateResponse -> String
$cshow :: GetServiceQuotaIncreaseRequestFromTemplateResponse -> String
showsPrec :: Int -> GetServiceQuotaIncreaseRequestFromTemplateResponse -> ShowS
$cshowsPrec :: Int -> GetServiceQuotaIncreaseRequestFromTemplateResponse -> ShowS
Prelude.Show, forall x.
Rep GetServiceQuotaIncreaseRequestFromTemplateResponse x
-> GetServiceQuotaIncreaseRequestFromTemplateResponse
forall x.
GetServiceQuotaIncreaseRequestFromTemplateResponse
-> Rep GetServiceQuotaIncreaseRequestFromTemplateResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetServiceQuotaIncreaseRequestFromTemplateResponse x
-> GetServiceQuotaIncreaseRequestFromTemplateResponse
$cfrom :: forall x.
GetServiceQuotaIncreaseRequestFromTemplateResponse
-> Rep GetServiceQuotaIncreaseRequestFromTemplateResponse x
Prelude.Generic)
newGetServiceQuotaIncreaseRequestFromTemplateResponse ::
Prelude.Int ->
GetServiceQuotaIncreaseRequestFromTemplateResponse
newGetServiceQuotaIncreaseRequestFromTemplateResponse :: Int -> GetServiceQuotaIncreaseRequestFromTemplateResponse
newGetServiceQuotaIncreaseRequestFromTemplateResponse
Int
pHttpStatus_ =
GetServiceQuotaIncreaseRequestFromTemplateResponse'
{ $sel:serviceQuotaIncreaseRequestInTemplate:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: Int
httpStatus =
Int
pHttpStatus_
}
getServiceQuotaIncreaseRequestFromTemplateResponse_serviceQuotaIncreaseRequestInTemplate :: Lens.Lens' GetServiceQuotaIncreaseRequestFromTemplateResponse (Prelude.Maybe ServiceQuotaIncreaseRequestInTemplate)
getServiceQuotaIncreaseRequestFromTemplateResponse_serviceQuotaIncreaseRequestInTemplate :: Lens'
GetServiceQuotaIncreaseRequestFromTemplateResponse
(Maybe ServiceQuotaIncreaseRequestInTemplate)
getServiceQuotaIncreaseRequestFromTemplateResponse_serviceQuotaIncreaseRequestInTemplate = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetServiceQuotaIncreaseRequestFromTemplateResponse' {Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate :: Maybe ServiceQuotaIncreaseRequestInTemplate
$sel:serviceQuotaIncreaseRequestInTemplate:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: GetServiceQuotaIncreaseRequestFromTemplateResponse
-> Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate} -> Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate) (\s :: GetServiceQuotaIncreaseRequestFromTemplateResponse
s@GetServiceQuotaIncreaseRequestFromTemplateResponse' {} Maybe ServiceQuotaIncreaseRequestInTemplate
a -> GetServiceQuotaIncreaseRequestFromTemplateResponse
s {$sel:serviceQuotaIncreaseRequestInTemplate:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate = Maybe ServiceQuotaIncreaseRequestInTemplate
a} :: GetServiceQuotaIncreaseRequestFromTemplateResponse)
getServiceQuotaIncreaseRequestFromTemplateResponse_httpStatus :: Lens.Lens' GetServiceQuotaIncreaseRequestFromTemplateResponse Prelude.Int
getServiceQuotaIncreaseRequestFromTemplateResponse_httpStatus :: Lens' GetServiceQuotaIncreaseRequestFromTemplateResponse Int
getServiceQuotaIncreaseRequestFromTemplateResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetServiceQuotaIncreaseRequestFromTemplateResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: GetServiceQuotaIncreaseRequestFromTemplateResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetServiceQuotaIncreaseRequestFromTemplateResponse
s@GetServiceQuotaIncreaseRequestFromTemplateResponse' {} Int
a -> GetServiceQuotaIncreaseRequestFromTemplateResponse
s {$sel:httpStatus:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: Int
httpStatus = Int
a} :: GetServiceQuotaIncreaseRequestFromTemplateResponse)
instance
Prelude.NFData
GetServiceQuotaIncreaseRequestFromTemplateResponse
where
rnf :: GetServiceQuotaIncreaseRequestFromTemplateResponse -> ()
rnf
GetServiceQuotaIncreaseRequestFromTemplateResponse' {Int
Maybe ServiceQuotaIncreaseRequestInTemplate
httpStatus :: Int
serviceQuotaIncreaseRequestInTemplate :: Maybe ServiceQuotaIncreaseRequestInTemplate
$sel:httpStatus:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: GetServiceQuotaIncreaseRequestFromTemplateResponse -> Int
$sel:serviceQuotaIncreaseRequestInTemplate:GetServiceQuotaIncreaseRequestFromTemplateResponse' :: GetServiceQuotaIncreaseRequestFromTemplateResponse
-> Maybe ServiceQuotaIncreaseRequestInTemplate
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ServiceQuotaIncreaseRequestInTemplate
serviceQuotaIncreaseRequestInTemplate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus