{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.AutoScaling.Types.ScheduledUpdateGroupAction where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data ScheduledUpdateGroupAction = ScheduledUpdateGroupAction'
{
ScheduledUpdateGroupAction -> Maybe Text
scheduledActionARN :: Prelude.Maybe Prelude.Text,
ScheduledUpdateGroupAction -> Maybe ISO8601
startTime :: Prelude.Maybe Core.ISO8601,
ScheduledUpdateGroupAction -> Maybe ISO8601
time :: Prelude.Maybe Core.ISO8601,
ScheduledUpdateGroupAction -> Maybe Text
scheduledActionName :: Prelude.Maybe Prelude.Text,
ScheduledUpdateGroupAction -> Maybe Int
maxSize :: Prelude.Maybe Prelude.Int,
ScheduledUpdateGroupAction -> Maybe Text
recurrence :: Prelude.Maybe Prelude.Text,
ScheduledUpdateGroupAction -> Maybe Int
desiredCapacity :: Prelude.Maybe Prelude.Int,
ScheduledUpdateGroupAction -> Maybe Int
minSize :: Prelude.Maybe Prelude.Int,
ScheduledUpdateGroupAction -> Maybe Text
autoScalingGroupName :: Prelude.Maybe Prelude.Text,
ScheduledUpdateGroupAction -> Maybe ISO8601
endTime :: Prelude.Maybe Core.ISO8601,
ScheduledUpdateGroupAction -> Maybe Text
timeZone :: Prelude.Maybe Prelude.Text
}
deriving (ScheduledUpdateGroupAction -> ScheduledUpdateGroupAction -> Bool
(ScheduledUpdateGroupAction -> ScheduledUpdateGroupAction -> Bool)
-> (ScheduledUpdateGroupAction
-> ScheduledUpdateGroupAction -> Bool)
-> Eq ScheduledUpdateGroupAction
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScheduledUpdateGroupAction -> ScheduledUpdateGroupAction -> Bool
$c/= :: ScheduledUpdateGroupAction -> ScheduledUpdateGroupAction -> Bool
== :: ScheduledUpdateGroupAction -> ScheduledUpdateGroupAction -> Bool
$c== :: ScheduledUpdateGroupAction -> ScheduledUpdateGroupAction -> Bool
Prelude.Eq, ReadPrec [ScheduledUpdateGroupAction]
ReadPrec ScheduledUpdateGroupAction
Int -> ReadS ScheduledUpdateGroupAction
ReadS [ScheduledUpdateGroupAction]
(Int -> ReadS ScheduledUpdateGroupAction)
-> ReadS [ScheduledUpdateGroupAction]
-> ReadPrec ScheduledUpdateGroupAction
-> ReadPrec [ScheduledUpdateGroupAction]
-> Read ScheduledUpdateGroupAction
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ScheduledUpdateGroupAction]
$creadListPrec :: ReadPrec [ScheduledUpdateGroupAction]
readPrec :: ReadPrec ScheduledUpdateGroupAction
$creadPrec :: ReadPrec ScheduledUpdateGroupAction
readList :: ReadS [ScheduledUpdateGroupAction]
$creadList :: ReadS [ScheduledUpdateGroupAction]
readsPrec :: Int -> ReadS ScheduledUpdateGroupAction
$creadsPrec :: Int -> ReadS ScheduledUpdateGroupAction
Prelude.Read, Int -> ScheduledUpdateGroupAction -> ShowS
[ScheduledUpdateGroupAction] -> ShowS
ScheduledUpdateGroupAction -> String
(Int -> ScheduledUpdateGroupAction -> ShowS)
-> (ScheduledUpdateGroupAction -> String)
-> ([ScheduledUpdateGroupAction] -> ShowS)
-> Show ScheduledUpdateGroupAction
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScheduledUpdateGroupAction] -> ShowS
$cshowList :: [ScheduledUpdateGroupAction] -> ShowS
show :: ScheduledUpdateGroupAction -> String
$cshow :: ScheduledUpdateGroupAction -> String
showsPrec :: Int -> ScheduledUpdateGroupAction -> ShowS
$cshowsPrec :: Int -> ScheduledUpdateGroupAction -> ShowS
Prelude.Show, (forall x.
ScheduledUpdateGroupAction -> Rep ScheduledUpdateGroupAction x)
-> (forall x.
Rep ScheduledUpdateGroupAction x -> ScheduledUpdateGroupAction)
-> Generic ScheduledUpdateGroupAction
forall x.
Rep ScheduledUpdateGroupAction x -> ScheduledUpdateGroupAction
forall x.
ScheduledUpdateGroupAction -> Rep ScheduledUpdateGroupAction x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ScheduledUpdateGroupAction x -> ScheduledUpdateGroupAction
$cfrom :: forall x.
ScheduledUpdateGroupAction -> Rep ScheduledUpdateGroupAction x
Prelude.Generic)
newScheduledUpdateGroupAction ::
ScheduledUpdateGroupAction
newScheduledUpdateGroupAction :: ScheduledUpdateGroupAction
newScheduledUpdateGroupAction =
ScheduledUpdateGroupAction' :: Maybe Text
-> Maybe ISO8601
-> Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction
ScheduledUpdateGroupAction'
{ $sel:scheduledActionARN:ScheduledUpdateGroupAction' :: Maybe Text
scheduledActionARN =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:startTime:ScheduledUpdateGroupAction' :: Maybe ISO8601
startTime = Maybe ISO8601
forall a. Maybe a
Prelude.Nothing,
$sel:time:ScheduledUpdateGroupAction' :: Maybe ISO8601
time = Maybe ISO8601
forall a. Maybe a
Prelude.Nothing,
$sel:scheduledActionName:ScheduledUpdateGroupAction' :: Maybe Text
scheduledActionName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:maxSize:ScheduledUpdateGroupAction' :: Maybe Int
maxSize = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:recurrence:ScheduledUpdateGroupAction' :: Maybe Text
recurrence = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:desiredCapacity:ScheduledUpdateGroupAction' :: Maybe Int
desiredCapacity = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:minSize:ScheduledUpdateGroupAction' :: Maybe Int
minSize = Maybe Int
forall a. Maybe a
Prelude.Nothing,
$sel:autoScalingGroupName:ScheduledUpdateGroupAction' :: Maybe Text
autoScalingGroupName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:endTime:ScheduledUpdateGroupAction' :: Maybe ISO8601
endTime = Maybe ISO8601
forall a. Maybe a
Prelude.Nothing,
$sel:timeZone:ScheduledUpdateGroupAction' :: Maybe Text
timeZone = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
scheduledUpdateGroupAction_scheduledActionARN :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Text)
scheduledUpdateGroupAction_scheduledActionARN :: (Maybe Text -> f (Maybe Text))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_scheduledActionARN = (ScheduledUpdateGroupAction -> Maybe Text)
-> (ScheduledUpdateGroupAction
-> Maybe Text -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Text
scheduledActionARN :: Maybe Text
$sel:scheduledActionARN:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Text
scheduledActionARN} -> Maybe Text
scheduledActionARN) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Text
a -> ScheduledUpdateGroupAction
s {$sel:scheduledActionARN:ScheduledUpdateGroupAction' :: Maybe Text
scheduledActionARN = Maybe Text
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_startTime :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.UTCTime)
scheduledUpdateGroupAction_startTime :: (Maybe UTCTime -> f (Maybe UTCTime))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_startTime = (ScheduledUpdateGroupAction -> Maybe ISO8601)
-> (ScheduledUpdateGroupAction
-> Maybe ISO8601 -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe ISO8601)
(Maybe ISO8601)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe ISO8601
startTime :: Maybe ISO8601
$sel:startTime:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe ISO8601
startTime} -> Maybe ISO8601
startTime) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe ISO8601
a -> ScheduledUpdateGroupAction
s {$sel:startTime:ScheduledUpdateGroupAction' :: Maybe ISO8601
startTime = Maybe ISO8601
a} :: ScheduledUpdateGroupAction) ((Maybe ISO8601 -> f (Maybe ISO8601))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe ISO8601 -> f (Maybe ISO8601))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> ScheduledUpdateGroupAction
-> f ScheduledUpdateGroupAction
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso ISO8601 ISO8601 UTCTime UTCTime
-> Iso
(Maybe ISO8601) (Maybe ISO8601) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso ISO8601 ISO8601 UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
scheduledUpdateGroupAction_time :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.UTCTime)
scheduledUpdateGroupAction_time :: (Maybe UTCTime -> f (Maybe UTCTime))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_time = (ScheduledUpdateGroupAction -> Maybe ISO8601)
-> (ScheduledUpdateGroupAction
-> Maybe ISO8601 -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe ISO8601)
(Maybe ISO8601)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe ISO8601
time :: Maybe ISO8601
$sel:time:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe ISO8601
time} -> Maybe ISO8601
time) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe ISO8601
a -> ScheduledUpdateGroupAction
s {$sel:time:ScheduledUpdateGroupAction' :: Maybe ISO8601
time = Maybe ISO8601
a} :: ScheduledUpdateGroupAction) ((Maybe ISO8601 -> f (Maybe ISO8601))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe ISO8601 -> f (Maybe ISO8601))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> ScheduledUpdateGroupAction
-> f ScheduledUpdateGroupAction
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso ISO8601 ISO8601 UTCTime UTCTime
-> Iso
(Maybe ISO8601) (Maybe ISO8601) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso ISO8601 ISO8601 UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
scheduledUpdateGroupAction_scheduledActionName :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Text)
scheduledUpdateGroupAction_scheduledActionName :: (Maybe Text -> f (Maybe Text))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_scheduledActionName = (ScheduledUpdateGroupAction -> Maybe Text)
-> (ScheduledUpdateGroupAction
-> Maybe Text -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Text
scheduledActionName :: Maybe Text
$sel:scheduledActionName:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Text
scheduledActionName} -> Maybe Text
scheduledActionName) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Text
a -> ScheduledUpdateGroupAction
s {$sel:scheduledActionName:ScheduledUpdateGroupAction' :: Maybe Text
scheduledActionName = Maybe Text
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_maxSize :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Int)
scheduledUpdateGroupAction_maxSize :: (Maybe Int -> f (Maybe Int))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_maxSize = (ScheduledUpdateGroupAction -> Maybe Int)
-> (ScheduledUpdateGroupAction
-> Maybe Int -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Int)
(Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Int
maxSize :: Maybe Int
$sel:maxSize:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Int
maxSize} -> Maybe Int
maxSize) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Int
a -> ScheduledUpdateGroupAction
s {$sel:maxSize:ScheduledUpdateGroupAction' :: Maybe Int
maxSize = Maybe Int
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_recurrence :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Text)
scheduledUpdateGroupAction_recurrence :: (Maybe Text -> f (Maybe Text))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_recurrence = (ScheduledUpdateGroupAction -> Maybe Text)
-> (ScheduledUpdateGroupAction
-> Maybe Text -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Text
recurrence :: Maybe Text
$sel:recurrence:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Text
recurrence} -> Maybe Text
recurrence) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Text
a -> ScheduledUpdateGroupAction
s {$sel:recurrence:ScheduledUpdateGroupAction' :: Maybe Text
recurrence = Maybe Text
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_desiredCapacity :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Int)
scheduledUpdateGroupAction_desiredCapacity :: (Maybe Int -> f (Maybe Int))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_desiredCapacity = (ScheduledUpdateGroupAction -> Maybe Int)
-> (ScheduledUpdateGroupAction
-> Maybe Int -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Int)
(Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Int
desiredCapacity :: Maybe Int
$sel:desiredCapacity:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Int
desiredCapacity} -> Maybe Int
desiredCapacity) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Int
a -> ScheduledUpdateGroupAction
s {$sel:desiredCapacity:ScheduledUpdateGroupAction' :: Maybe Int
desiredCapacity = Maybe Int
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_minSize :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Int)
scheduledUpdateGroupAction_minSize :: (Maybe Int -> f (Maybe Int))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_minSize = (ScheduledUpdateGroupAction -> Maybe Int)
-> (ScheduledUpdateGroupAction
-> Maybe Int -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Int)
(Maybe Int)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Int
minSize :: Maybe Int
$sel:minSize:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Int
minSize} -> Maybe Int
minSize) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Int
a -> ScheduledUpdateGroupAction
s {$sel:minSize:ScheduledUpdateGroupAction' :: Maybe Int
minSize = Maybe Int
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_autoScalingGroupName :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Text)
scheduledUpdateGroupAction_autoScalingGroupName :: (Maybe Text -> f (Maybe Text))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_autoScalingGroupName = (ScheduledUpdateGroupAction -> Maybe Text)
-> (ScheduledUpdateGroupAction
-> Maybe Text -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Text
autoScalingGroupName :: Maybe Text
$sel:autoScalingGroupName:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Text
autoScalingGroupName} -> Maybe Text
autoScalingGroupName) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Text
a -> ScheduledUpdateGroupAction
s {$sel:autoScalingGroupName:ScheduledUpdateGroupAction' :: Maybe Text
autoScalingGroupName = Maybe Text
a} :: ScheduledUpdateGroupAction)
scheduledUpdateGroupAction_endTime :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.UTCTime)
scheduledUpdateGroupAction_endTime :: (Maybe UTCTime -> f (Maybe UTCTime))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_endTime = (ScheduledUpdateGroupAction -> Maybe ISO8601)
-> (ScheduledUpdateGroupAction
-> Maybe ISO8601 -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe ISO8601)
(Maybe ISO8601)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe ISO8601
endTime :: Maybe ISO8601
$sel:endTime:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe ISO8601
endTime} -> Maybe ISO8601
endTime) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe ISO8601
a -> ScheduledUpdateGroupAction
s {$sel:endTime:ScheduledUpdateGroupAction' :: Maybe ISO8601
endTime = Maybe ISO8601
a} :: ScheduledUpdateGroupAction) ((Maybe ISO8601 -> f (Maybe ISO8601))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe ISO8601 -> f (Maybe ISO8601))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> ScheduledUpdateGroupAction
-> f ScheduledUpdateGroupAction
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso ISO8601 ISO8601 UTCTime UTCTime
-> Iso
(Maybe ISO8601) (Maybe ISO8601) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso ISO8601 ISO8601 UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
scheduledUpdateGroupAction_timeZone :: Lens.Lens' ScheduledUpdateGroupAction (Prelude.Maybe Prelude.Text)
scheduledUpdateGroupAction_timeZone :: (Maybe Text -> f (Maybe Text))
-> ScheduledUpdateGroupAction -> f ScheduledUpdateGroupAction
scheduledUpdateGroupAction_timeZone = (ScheduledUpdateGroupAction -> Maybe Text)
-> (ScheduledUpdateGroupAction
-> Maybe Text -> ScheduledUpdateGroupAction)
-> Lens
ScheduledUpdateGroupAction
ScheduledUpdateGroupAction
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ScheduledUpdateGroupAction' {Maybe Text
timeZone :: Maybe Text
$sel:timeZone:ScheduledUpdateGroupAction' :: ScheduledUpdateGroupAction -> Maybe Text
timeZone} -> Maybe Text
timeZone) (\s :: ScheduledUpdateGroupAction
s@ScheduledUpdateGroupAction' {} Maybe Text
a -> ScheduledUpdateGroupAction
s {$sel:timeZone:ScheduledUpdateGroupAction' :: Maybe Text
timeZone = Maybe Text
a} :: ScheduledUpdateGroupAction)
instance Core.FromXML ScheduledUpdateGroupAction where
parseXML :: [Node] -> Either String ScheduledUpdateGroupAction
parseXML [Node]
x =
Maybe Text
-> Maybe ISO8601
-> Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction
ScheduledUpdateGroupAction'
(Maybe Text
-> Maybe ISO8601
-> Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe Text)
-> Either
String
(Maybe ISO8601
-> Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"ScheduledActionARN")
Either
String
(Maybe ISO8601
-> Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe ISO8601)
-> Either
String
(Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe ISO8601)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"StartTime")
Either
String
(Maybe ISO8601
-> Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe ISO8601)
-> Either
String
(Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe ISO8601)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"Time")
Either
String
(Maybe Text
-> Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe Text)
-> Either
String
(Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"ScheduledActionName")
Either
String
(Maybe Int
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe Int)
-> Either
String
(Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"MaxSize")
Either
String
(Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe Text)
-> Either
String
(Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"Recurrence")
Either
String
(Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe Int)
-> Either
String
(Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"DesiredCapacity")
Either
String
(Maybe Int
-> Maybe Text
-> Maybe ISO8601
-> Maybe Text
-> ScheduledUpdateGroupAction)
-> Either String (Maybe Int)
-> Either
String
(Maybe Text
-> Maybe ISO8601 -> Maybe Text -> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Int)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"MinSize")
Either
String
(Maybe Text
-> Maybe ISO8601 -> Maybe Text -> ScheduledUpdateGroupAction)
-> Either String (Maybe Text)
-> Either
String (Maybe ISO8601 -> Maybe Text -> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"AutoScalingGroupName")
Either
String (Maybe ISO8601 -> Maybe Text -> ScheduledUpdateGroupAction)
-> Either String (Maybe ISO8601)
-> Either String (Maybe Text -> ScheduledUpdateGroupAction)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe ISO8601)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"EndTime")
Either String (Maybe Text -> ScheduledUpdateGroupAction)
-> Either String (Maybe Text)
-> Either String ScheduledUpdateGroupAction
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ([Node]
x [Node] -> Text -> Either String (Maybe Text)
forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Core..@? Text
"TimeZone")
instance Prelude.Hashable ScheduledUpdateGroupAction
instance Prelude.NFData ScheduledUpdateGroupAction