module Stratosphere.Proton.EnvironmentAccountConnection (
EnvironmentAccountConnection(..), mkEnvironmentAccountConnection
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data EnvironmentAccountConnection
=
EnvironmentAccountConnection {EnvironmentAccountConnection -> ()
haddock_workaround_ :: (),
EnvironmentAccountConnection -> Maybe (Value Text)
codebuildRoleArn :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: (Prelude.Maybe (Value Prelude.Text)),
EnvironmentAccountConnection -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
deriving stock (EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool
(EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool)
-> (EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool)
-> Eq EnvironmentAccountConnection
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool
== :: EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool
$c/= :: EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool
/= :: EnvironmentAccountConnection
-> EnvironmentAccountConnection -> Bool
Prelude.Eq, Int -> EnvironmentAccountConnection -> ShowS
[EnvironmentAccountConnection] -> ShowS
EnvironmentAccountConnection -> String
(Int -> EnvironmentAccountConnection -> ShowS)
-> (EnvironmentAccountConnection -> String)
-> ([EnvironmentAccountConnection] -> ShowS)
-> Show EnvironmentAccountConnection
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> EnvironmentAccountConnection -> ShowS
showsPrec :: Int -> EnvironmentAccountConnection -> ShowS
$cshow :: EnvironmentAccountConnection -> String
show :: EnvironmentAccountConnection -> String
$cshowList :: [EnvironmentAccountConnection] -> ShowS
showList :: [EnvironmentAccountConnection] -> ShowS
Prelude.Show)
mkEnvironmentAccountConnection :: EnvironmentAccountConnection
mkEnvironmentAccountConnection :: EnvironmentAccountConnection
mkEnvironmentAccountConnection
= EnvironmentAccountConnection
{haddock_workaround_ :: ()
haddock_workaround_ = (), codebuildRoleArn :: Maybe (Value Text)
codebuildRoleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
componentRoleArn :: Maybe (Value Text)
componentRoleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
environmentAccountId :: Maybe (Value Text)
environmentAccountId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
environmentName :: Maybe (Value Text)
environmentName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
managementAccountId :: Maybe (Value Text)
managementAccountId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, roleArn :: Maybe (Value Text)
roleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties EnvironmentAccountConnection where
toResourceProperties :: EnvironmentAccountConnection -> ResourceProperties
toResourceProperties EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Proton::EnvironmentAccountConnection",
supportsTags :: Bool
supportsTags = Bool
Prelude.True,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CodebuildRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
codebuildRoleArn,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ComponentRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
componentRoleArn,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentAccountId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentAccountId,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentName,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ManagementAccountId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
managementAccountId,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
roleArn,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags])}
instance JSON.ToJSON EnvironmentAccountConnection where
toJSON :: EnvironmentAccountConnection -> Value
toJSON EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CodebuildRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
codebuildRoleArn,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ComponentRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
componentRoleArn,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentAccountId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentAccountId,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentName" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
environmentName,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ManagementAccountId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
managementAccountId,
Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
roleArn,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags]))
instance Property "CodebuildRoleArn" EnvironmentAccountConnection where
type PropertyType "CodebuildRoleArn" EnvironmentAccountConnection = Value Prelude.Text
set :: PropertyType "CodebuildRoleArn" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "CodebuildRoleArn" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection
{codebuildRoleArn :: Maybe (Value Text)
codebuildRoleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CodebuildRoleArn" EnvironmentAccountConnection
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: ()
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ComponentRoleArn" EnvironmentAccountConnection where
type PropertyType "ComponentRoleArn" EnvironmentAccountConnection = Value Prelude.Text
set :: PropertyType "ComponentRoleArn" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "ComponentRoleArn" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection
{componentRoleArn :: Maybe (Value Text)
componentRoleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ComponentRoleArn" EnvironmentAccountConnection
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "EnvironmentAccountId" EnvironmentAccountConnection where
type PropertyType "EnvironmentAccountId" EnvironmentAccountConnection = Value Prelude.Text
set :: PropertyType "EnvironmentAccountId" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "EnvironmentAccountId" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection
{environmentAccountId :: Maybe (Value Text)
environmentAccountId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnvironmentAccountId" EnvironmentAccountConnection
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "EnvironmentName" EnvironmentAccountConnection where
type PropertyType "EnvironmentName" EnvironmentAccountConnection = Value Prelude.Text
set :: PropertyType "EnvironmentName" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "EnvironmentName" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection
{environmentName :: Maybe (Value Text)
environmentName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnvironmentName" EnvironmentAccountConnection
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ManagementAccountId" EnvironmentAccountConnection where
type PropertyType "ManagementAccountId" EnvironmentAccountConnection = Value Prelude.Text
set :: PropertyType "ManagementAccountId" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "ManagementAccountId" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection
{managementAccountId :: Maybe (Value Text)
managementAccountId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ManagementAccountId" EnvironmentAccountConnection
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "RoleArn" EnvironmentAccountConnection where
type PropertyType "RoleArn" EnvironmentAccountConnection = Value Prelude.Text
set :: PropertyType "RoleArn" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "RoleArn" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection
{roleArn :: Maybe (Value Text)
roleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RoleArn" EnvironmentAccountConnection
Value Text
newValue, Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "Tags" EnvironmentAccountConnection where
type PropertyType "Tags" EnvironmentAccountConnection = [Tag]
set :: PropertyType "Tags" EnvironmentAccountConnection
-> EnvironmentAccountConnection -> EnvironmentAccountConnection
set PropertyType "Tags" EnvironmentAccountConnection
newValue EnvironmentAccountConnection {Maybe [Tag]
Maybe (Value Text)
()
haddock_workaround_ :: EnvironmentAccountConnection -> ()
codebuildRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
componentRoleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
environmentName :: EnvironmentAccountConnection -> Maybe (Value Text)
managementAccountId :: EnvironmentAccountConnection -> Maybe (Value Text)
roleArn :: EnvironmentAccountConnection -> Maybe (Value Text)
tags :: EnvironmentAccountConnection -> Maybe [Tag]
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= EnvironmentAccountConnection {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" EnvironmentAccountConnection
newValue, Maybe (Value Text)
()
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
haddock_workaround_ :: ()
codebuildRoleArn :: Maybe (Value Text)
componentRoleArn :: Maybe (Value Text)
environmentAccountId :: Maybe (Value Text)
environmentName :: Maybe (Value Text)
managementAccountId :: Maybe (Value Text)
roleArn :: Maybe (Value Text)
..}