{-# 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.ApplicationAutoScaling.DescribeScheduledActions
(
DescribeScheduledActions (..),
newDescribeScheduledActions,
describeScheduledActions_maxResults,
describeScheduledActions_nextToken,
describeScheduledActions_resourceId,
describeScheduledActions_scalableDimension,
describeScheduledActions_scheduledActionNames,
describeScheduledActions_serviceNamespace,
DescribeScheduledActionsResponse (..),
newDescribeScheduledActionsResponse,
describeScheduledActionsResponse_nextToken,
describeScheduledActionsResponse_scheduledActions,
describeScheduledActionsResponse_httpStatus,
)
where
import Amazonka.ApplicationAutoScaling.Types
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
data DescribeScheduledActions = DescribeScheduledActions'
{
DescribeScheduledActions -> Maybe Int
maxResults :: Prelude.Maybe Prelude.Int,
DescribeScheduledActions -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeScheduledActions -> Maybe Text
resourceId :: Prelude.Maybe Prelude.Text,
DescribeScheduledActions -> Maybe ScalableDimension
scalableDimension :: Prelude.Maybe ScalableDimension,
DescribeScheduledActions -> Maybe [Text]
scheduledActionNames :: Prelude.Maybe [Prelude.Text],
DescribeScheduledActions -> ServiceNamespace
serviceNamespace :: ServiceNamespace
}
deriving (DescribeScheduledActions -> DescribeScheduledActions -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeScheduledActions -> DescribeScheduledActions -> Bool
$c/= :: DescribeScheduledActions -> DescribeScheduledActions -> Bool
== :: DescribeScheduledActions -> DescribeScheduledActions -> Bool
$c== :: DescribeScheduledActions -> DescribeScheduledActions -> Bool
Prelude.Eq, ReadPrec [DescribeScheduledActions]
ReadPrec DescribeScheduledActions
Int -> ReadS DescribeScheduledActions
ReadS [DescribeScheduledActions]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeScheduledActions]
$creadListPrec :: ReadPrec [DescribeScheduledActions]
readPrec :: ReadPrec DescribeScheduledActions
$creadPrec :: ReadPrec DescribeScheduledActions
readList :: ReadS [DescribeScheduledActions]
$creadList :: ReadS [DescribeScheduledActions]
readsPrec :: Int -> ReadS DescribeScheduledActions
$creadsPrec :: Int -> ReadS DescribeScheduledActions
Prelude.Read, Int -> DescribeScheduledActions -> ShowS
[DescribeScheduledActions] -> ShowS
DescribeScheduledActions -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeScheduledActions] -> ShowS
$cshowList :: [DescribeScheduledActions] -> ShowS
show :: DescribeScheduledActions -> String
$cshow :: DescribeScheduledActions -> String
showsPrec :: Int -> DescribeScheduledActions -> ShowS
$cshowsPrec :: Int -> DescribeScheduledActions -> ShowS
Prelude.Show, forall x.
Rep DescribeScheduledActions x -> DescribeScheduledActions
forall x.
DescribeScheduledActions -> Rep DescribeScheduledActions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeScheduledActions x -> DescribeScheduledActions
$cfrom :: forall x.
DescribeScheduledActions -> Rep DescribeScheduledActions x
Prelude.Generic)
newDescribeScheduledActions ::
ServiceNamespace ->
DescribeScheduledActions
newDescribeScheduledActions :: ServiceNamespace -> DescribeScheduledActions
newDescribeScheduledActions ServiceNamespace
pServiceNamespace_ =
DescribeScheduledActions'
{ $sel:maxResults:DescribeScheduledActions' :: Maybe Int
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:DescribeScheduledActions' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:resourceId:DescribeScheduledActions' :: Maybe Text
resourceId = forall a. Maybe a
Prelude.Nothing,
$sel:scalableDimension:DescribeScheduledActions' :: Maybe ScalableDimension
scalableDimension = forall a. Maybe a
Prelude.Nothing,
$sel:scheduledActionNames:DescribeScheduledActions' :: Maybe [Text]
scheduledActionNames = forall a. Maybe a
Prelude.Nothing,
$sel:serviceNamespace:DescribeScheduledActions' :: ServiceNamespace
serviceNamespace = ServiceNamespace
pServiceNamespace_
}
describeScheduledActions_maxResults :: Lens.Lens' DescribeScheduledActions (Prelude.Maybe Prelude.Int)
describeScheduledActions_maxResults :: Lens' DescribeScheduledActions (Maybe Int)
describeScheduledActions_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActions' {Maybe Int
maxResults :: Maybe Int
$sel:maxResults:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Int
maxResults} -> Maybe Int
maxResults) (\s :: DescribeScheduledActions
s@DescribeScheduledActions' {} Maybe Int
a -> DescribeScheduledActions
s {$sel:maxResults:DescribeScheduledActions' :: Maybe Int
maxResults = Maybe Int
a} :: DescribeScheduledActions)
describeScheduledActions_nextToken :: Lens.Lens' DescribeScheduledActions (Prelude.Maybe Prelude.Text)
describeScheduledActions_nextToken :: Lens' DescribeScheduledActions (Maybe Text)
describeScheduledActions_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActions' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeScheduledActions
s@DescribeScheduledActions' {} Maybe Text
a -> DescribeScheduledActions
s {$sel:nextToken:DescribeScheduledActions' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeScheduledActions)
describeScheduledActions_resourceId :: Lens.Lens' DescribeScheduledActions (Prelude.Maybe Prelude.Text)
describeScheduledActions_resourceId :: Lens' DescribeScheduledActions (Maybe Text)
describeScheduledActions_resourceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActions' {Maybe Text
resourceId :: Maybe Text
$sel:resourceId:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
resourceId} -> Maybe Text
resourceId) (\s :: DescribeScheduledActions
s@DescribeScheduledActions' {} Maybe Text
a -> DescribeScheduledActions
s {$sel:resourceId:DescribeScheduledActions' :: Maybe Text
resourceId = Maybe Text
a} :: DescribeScheduledActions)
describeScheduledActions_scalableDimension :: Lens.Lens' DescribeScheduledActions (Prelude.Maybe ScalableDimension)
describeScheduledActions_scalableDimension :: Lens' DescribeScheduledActions (Maybe ScalableDimension)
describeScheduledActions_scalableDimension = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActions' {Maybe ScalableDimension
scalableDimension :: Maybe ScalableDimension
$sel:scalableDimension:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe ScalableDimension
scalableDimension} -> Maybe ScalableDimension
scalableDimension) (\s :: DescribeScheduledActions
s@DescribeScheduledActions' {} Maybe ScalableDimension
a -> DescribeScheduledActions
s {$sel:scalableDimension:DescribeScheduledActions' :: Maybe ScalableDimension
scalableDimension = Maybe ScalableDimension
a} :: DescribeScheduledActions)
describeScheduledActions_scheduledActionNames :: Lens.Lens' DescribeScheduledActions (Prelude.Maybe [Prelude.Text])
describeScheduledActions_scheduledActionNames :: Lens' DescribeScheduledActions (Maybe [Text])
describeScheduledActions_scheduledActionNames = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActions' {Maybe [Text]
scheduledActionNames :: Maybe [Text]
$sel:scheduledActionNames:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe [Text]
scheduledActionNames} -> Maybe [Text]
scheduledActionNames) (\s :: DescribeScheduledActions
s@DescribeScheduledActions' {} Maybe [Text]
a -> DescribeScheduledActions
s {$sel:scheduledActionNames:DescribeScheduledActions' :: Maybe [Text]
scheduledActionNames = Maybe [Text]
a} :: DescribeScheduledActions) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeScheduledActions_serviceNamespace :: Lens.Lens' DescribeScheduledActions ServiceNamespace
describeScheduledActions_serviceNamespace :: Lens' DescribeScheduledActions ServiceNamespace
describeScheduledActions_serviceNamespace = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActions' {ServiceNamespace
serviceNamespace :: ServiceNamespace
$sel:serviceNamespace:DescribeScheduledActions' :: DescribeScheduledActions -> ServiceNamespace
serviceNamespace} -> ServiceNamespace
serviceNamespace) (\s :: DescribeScheduledActions
s@DescribeScheduledActions' {} ServiceNamespace
a -> DescribeScheduledActions
s {$sel:serviceNamespace:DescribeScheduledActions' :: ServiceNamespace
serviceNamespace = ServiceNamespace
a} :: DescribeScheduledActions)
instance Core.AWSPager DescribeScheduledActions where
page :: DescribeScheduledActions
-> AWSResponse DescribeScheduledActions
-> Maybe DescribeScheduledActions
page DescribeScheduledActions
rq AWSResponse DescribeScheduledActions
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeScheduledActions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeScheduledActionsResponse (Maybe Text)
describeScheduledActionsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse DescribeScheduledActions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeScheduledActionsResponse (Maybe [ScheduledAction])
describeScheduledActionsResponse_scheduledActions
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ DescribeScheduledActions
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' DescribeScheduledActions (Maybe Text)
describeScheduledActions_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse DescribeScheduledActions
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' DescribeScheduledActionsResponse (Maybe Text)
describeScheduledActionsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest DescribeScheduledActions where
type
AWSResponse DescribeScheduledActions =
DescribeScheduledActionsResponse
request :: (Service -> Service)
-> DescribeScheduledActions -> Request DescribeScheduledActions
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 DescribeScheduledActions
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeScheduledActions)))
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 Text
-> Maybe [ScheduledAction]
-> Int
-> DescribeScheduledActionsResponse
DescribeScheduledActionsResponse'
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
"NextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"ScheduledActions"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
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 DescribeScheduledActions where
hashWithSalt :: Int -> DescribeScheduledActions -> Int
hashWithSalt Int
_salt DescribeScheduledActions' {Maybe Int
Maybe [Text]
Maybe Text
Maybe ScalableDimension
ServiceNamespace
serviceNamespace :: ServiceNamespace
scheduledActionNames :: Maybe [Text]
scalableDimension :: Maybe ScalableDimension
resourceId :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:serviceNamespace:DescribeScheduledActions' :: DescribeScheduledActions -> ServiceNamespace
$sel:scheduledActionNames:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe [Text]
$sel:scalableDimension:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe ScalableDimension
$sel:resourceId:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
$sel:nextToken:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
$sel:maxResults:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Int
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
resourceId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ScalableDimension
scalableDimension
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
scheduledActionNames
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` ServiceNamespace
serviceNamespace
instance Prelude.NFData DescribeScheduledActions where
rnf :: DescribeScheduledActions -> ()
rnf DescribeScheduledActions' {Maybe Int
Maybe [Text]
Maybe Text
Maybe ScalableDimension
ServiceNamespace
serviceNamespace :: ServiceNamespace
scheduledActionNames :: Maybe [Text]
scalableDimension :: Maybe ScalableDimension
resourceId :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:serviceNamespace:DescribeScheduledActions' :: DescribeScheduledActions -> ServiceNamespace
$sel:scheduledActionNames:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe [Text]
$sel:scalableDimension:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe ScalableDimension
$sel:resourceId:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
$sel:nextToken:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
$sel:maxResults:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Int
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ScalableDimension
scalableDimension
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
scheduledActionNames
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf ServiceNamespace
serviceNamespace
instance Data.ToHeaders DescribeScheduledActions where
toHeaders :: DescribeScheduledActions -> 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
"AnyScaleFrontendService.DescribeScheduledActions" ::
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 DescribeScheduledActions where
toJSON :: DescribeScheduledActions -> Value
toJSON DescribeScheduledActions' {Maybe Int
Maybe [Text]
Maybe Text
Maybe ScalableDimension
ServiceNamespace
serviceNamespace :: ServiceNamespace
scheduledActionNames :: Maybe [Text]
scalableDimension :: Maybe ScalableDimension
resourceId :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:serviceNamespace:DescribeScheduledActions' :: DescribeScheduledActions -> ServiceNamespace
$sel:scheduledActionNames:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe [Text]
$sel:scalableDimension:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe ScalableDimension
$sel:resourceId:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
$sel:nextToken:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Text
$sel:maxResults:DescribeScheduledActions' :: DescribeScheduledActions -> Maybe Int
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"MaxResults" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Int
maxResults,
(Key
"NextToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
nextToken,
(Key
"ResourceId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
resourceId,
(Key
"ScalableDimension" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScalableDimension
scalableDimension,
(Key
"ScheduledActionNames" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Text]
scheduledActionNames,
forall a. a -> Maybe a
Prelude.Just
(Key
"ServiceNamespace" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= ServiceNamespace
serviceNamespace)
]
)
instance Data.ToPath DescribeScheduledActions where
toPath :: DescribeScheduledActions -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeScheduledActions where
toQuery :: DescribeScheduledActions -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeScheduledActionsResponse = DescribeScheduledActionsResponse'
{
DescribeScheduledActionsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
DescribeScheduledActionsResponse -> Maybe [ScheduledAction]
scheduledActions :: Prelude.Maybe [ScheduledAction],
DescribeScheduledActionsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (DescribeScheduledActionsResponse
-> DescribeScheduledActionsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeScheduledActionsResponse
-> DescribeScheduledActionsResponse -> Bool
$c/= :: DescribeScheduledActionsResponse
-> DescribeScheduledActionsResponse -> Bool
== :: DescribeScheduledActionsResponse
-> DescribeScheduledActionsResponse -> Bool
$c== :: DescribeScheduledActionsResponse
-> DescribeScheduledActionsResponse -> Bool
Prelude.Eq, ReadPrec [DescribeScheduledActionsResponse]
ReadPrec DescribeScheduledActionsResponse
Int -> ReadS DescribeScheduledActionsResponse
ReadS [DescribeScheduledActionsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeScheduledActionsResponse]
$creadListPrec :: ReadPrec [DescribeScheduledActionsResponse]
readPrec :: ReadPrec DescribeScheduledActionsResponse
$creadPrec :: ReadPrec DescribeScheduledActionsResponse
readList :: ReadS [DescribeScheduledActionsResponse]
$creadList :: ReadS [DescribeScheduledActionsResponse]
readsPrec :: Int -> ReadS DescribeScheduledActionsResponse
$creadsPrec :: Int -> ReadS DescribeScheduledActionsResponse
Prelude.Read, Int -> DescribeScheduledActionsResponse -> ShowS
[DescribeScheduledActionsResponse] -> ShowS
DescribeScheduledActionsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeScheduledActionsResponse] -> ShowS
$cshowList :: [DescribeScheduledActionsResponse] -> ShowS
show :: DescribeScheduledActionsResponse -> String
$cshow :: DescribeScheduledActionsResponse -> String
showsPrec :: Int -> DescribeScheduledActionsResponse -> ShowS
$cshowsPrec :: Int -> DescribeScheduledActionsResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeScheduledActionsResponse x
-> DescribeScheduledActionsResponse
forall x.
DescribeScheduledActionsResponse
-> Rep DescribeScheduledActionsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeScheduledActionsResponse x
-> DescribeScheduledActionsResponse
$cfrom :: forall x.
DescribeScheduledActionsResponse
-> Rep DescribeScheduledActionsResponse x
Prelude.Generic)
newDescribeScheduledActionsResponse ::
Prelude.Int ->
DescribeScheduledActionsResponse
newDescribeScheduledActionsResponse :: Int -> DescribeScheduledActionsResponse
newDescribeScheduledActionsResponse Int
pHttpStatus_ =
DescribeScheduledActionsResponse'
{ $sel:nextToken:DescribeScheduledActionsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:scheduledActions:DescribeScheduledActionsResponse' :: Maybe [ScheduledAction]
scheduledActions = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeScheduledActionsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
describeScheduledActionsResponse_nextToken :: Lens.Lens' DescribeScheduledActionsResponse (Prelude.Maybe Prelude.Text)
describeScheduledActionsResponse_nextToken :: Lens' DescribeScheduledActionsResponse (Maybe Text)
describeScheduledActionsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActionsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeScheduledActionsResponse' :: DescribeScheduledActionsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeScheduledActionsResponse
s@DescribeScheduledActionsResponse' {} Maybe Text
a -> DescribeScheduledActionsResponse
s {$sel:nextToken:DescribeScheduledActionsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeScheduledActionsResponse)
describeScheduledActionsResponse_scheduledActions :: Lens.Lens' DescribeScheduledActionsResponse (Prelude.Maybe [ScheduledAction])
describeScheduledActionsResponse_scheduledActions :: Lens' DescribeScheduledActionsResponse (Maybe [ScheduledAction])
describeScheduledActionsResponse_scheduledActions = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActionsResponse' {Maybe [ScheduledAction]
scheduledActions :: Maybe [ScheduledAction]
$sel:scheduledActions:DescribeScheduledActionsResponse' :: DescribeScheduledActionsResponse -> Maybe [ScheduledAction]
scheduledActions} -> Maybe [ScheduledAction]
scheduledActions) (\s :: DescribeScheduledActionsResponse
s@DescribeScheduledActionsResponse' {} Maybe [ScheduledAction]
a -> DescribeScheduledActionsResponse
s {$sel:scheduledActions:DescribeScheduledActionsResponse' :: Maybe [ScheduledAction]
scheduledActions = Maybe [ScheduledAction]
a} :: DescribeScheduledActionsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
describeScheduledActionsResponse_httpStatus :: Lens.Lens' DescribeScheduledActionsResponse Prelude.Int
describeScheduledActionsResponse_httpStatus :: Lens' DescribeScheduledActionsResponse Int
describeScheduledActionsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeScheduledActionsResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeScheduledActionsResponse' :: DescribeScheduledActionsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeScheduledActionsResponse
s@DescribeScheduledActionsResponse' {} Int
a -> DescribeScheduledActionsResponse
s {$sel:httpStatus:DescribeScheduledActionsResponse' :: Int
httpStatus = Int
a} :: DescribeScheduledActionsResponse)
instance
Prelude.NFData
DescribeScheduledActionsResponse
where
rnf :: DescribeScheduledActionsResponse -> ()
rnf DescribeScheduledActionsResponse' {Int
Maybe [ScheduledAction]
Maybe Text
httpStatus :: Int
scheduledActions :: Maybe [ScheduledAction]
nextToken :: Maybe Text
$sel:httpStatus:DescribeScheduledActionsResponse' :: DescribeScheduledActionsResponse -> Int
$sel:scheduledActions:DescribeScheduledActionsResponse' :: DescribeScheduledActionsResponse -> Maybe [ScheduledAction]
$sel:nextToken:DescribeScheduledActionsResponse' :: DescribeScheduledActionsResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [ScheduledAction]
scheduledActions
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus