module Stratosphere.MediaConnect.FlowEntitlement (
        module Exports, FlowEntitlement(..), mkFlowEntitlement
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MediaConnect.FlowEntitlement.EncryptionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data FlowEntitlement
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html>
    FlowEntitlement {FlowEntitlement -> ()
haddock_workaround_ :: (),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-datatransfersubscriberfeepercent>
                     FlowEntitlement -> Maybe (Value Integer)
dataTransferSubscriberFeePercent :: (Prelude.Maybe (Value Prelude.Integer)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-description>
                     FlowEntitlement -> Value Text
description :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-encryption>
                     FlowEntitlement -> Maybe EncryptionProperty
encryption :: (Prelude.Maybe EncryptionProperty),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-entitlementstatus>
                     FlowEntitlement -> Maybe (Value Text)
entitlementStatus :: (Prelude.Maybe (Value Prelude.Text)),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-flowarn>
                     FlowEntitlement -> Value Text
flowArn :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-name>
                     FlowEntitlement -> Value Text
name :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowentitlement.html#cfn-mediaconnect-flowentitlement-subscribers>
                     FlowEntitlement -> ValueList Text
subscribers :: (ValueList Prelude.Text)}
  deriving stock (FlowEntitlement -> FlowEntitlement -> Bool
(FlowEntitlement -> FlowEntitlement -> Bool)
-> (FlowEntitlement -> FlowEntitlement -> Bool)
-> Eq FlowEntitlement
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FlowEntitlement -> FlowEntitlement -> Bool
== :: FlowEntitlement -> FlowEntitlement -> Bool
$c/= :: FlowEntitlement -> FlowEntitlement -> Bool
/= :: FlowEntitlement -> FlowEntitlement -> Bool
Prelude.Eq, Int -> FlowEntitlement -> ShowS
[FlowEntitlement] -> ShowS
FlowEntitlement -> String
(Int -> FlowEntitlement -> ShowS)
-> (FlowEntitlement -> String)
-> ([FlowEntitlement] -> ShowS)
-> Show FlowEntitlement
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> FlowEntitlement -> ShowS
showsPrec :: Int -> FlowEntitlement -> ShowS
$cshow :: FlowEntitlement -> String
show :: FlowEntitlement -> String
$cshowList :: [FlowEntitlement] -> ShowS
showList :: [FlowEntitlement] -> ShowS
Prelude.Show)
mkFlowEntitlement ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text -> ValueList Prelude.Text -> FlowEntitlement
mkFlowEntitlement :: Value Text
-> Value Text -> Value Text -> ValueList Text -> FlowEntitlement
mkFlowEntitlement Value Text
description Value Text
flowArn Value Text
name ValueList Text
subscribers
  = FlowEntitlement
      {haddock_workaround_ :: ()
haddock_workaround_ = (), description :: Value Text
description = Value Text
description,
       flowArn :: Value Text
flowArn = Value Text
flowArn, name :: Value Text
name = Value Text
name, subscribers :: ValueList Text
subscribers = ValueList Text
subscribers,
       dataTransferSubscriberFeePercent :: Maybe (Value Integer)
dataTransferSubscriberFeePercent = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       encryption :: Maybe EncryptionProperty
encryption = Maybe EncryptionProperty
forall a. Maybe a
Prelude.Nothing, entitlementStatus :: Maybe (Value Text)
entitlementStatus = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties FlowEntitlement where
  toResourceProperties :: FlowEntitlement -> ResourceProperties
toResourceProperties FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaConnect::FlowEntitlement",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"Description" 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..= Value Text
description, Key
"FlowArn" 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..= Value Text
flowArn,
                            Key
"Name" 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..= Value Text
name, Key
"Subscribers" Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ValueList Text
subscribers]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DataTransferSubscriberFeePercent"
                                 (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
dataTransferSubscriberFeePercent,
                               Key -> EncryptionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Encryption" (EncryptionProperty -> (Key, Value))
-> Maybe EncryptionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EncryptionProperty
encryption,
                               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
"EntitlementStatus" (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)
entitlementStatus]))}
instance JSON.ToJSON FlowEntitlement where
  toJSON :: FlowEntitlement -> Value
toJSON FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"Description" 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..= Value Text
description, Key
"FlowArn" 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..= Value Text
flowArn,
               Key
"Name" 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..= Value Text
name, Key
"Subscribers" Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= ValueList Text
subscribers]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DataTransferSubscriberFeePercent"
                    (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
dataTransferSubscriberFeePercent,
                  Key -> EncryptionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Encryption" (EncryptionProperty -> (Key, Value))
-> Maybe EncryptionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EncryptionProperty
encryption,
                  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
"EntitlementStatus" (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)
entitlementStatus])))
instance Property "DataTransferSubscriberFeePercent" FlowEntitlement where
  type PropertyType "DataTransferSubscriberFeePercent" FlowEntitlement = Value Prelude.Integer
  set :: PropertyType "DataTransferSubscriberFeePercent" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "DataTransferSubscriberFeePercent" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement
        {dataTransferSubscriberFeePercent :: Maybe (Value Integer)
dataTransferSubscriberFeePercent = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DataTransferSubscriberFeePercent" FlowEntitlement
Value Integer
newValue, Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: ()
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
haddock_workaround_ :: ()
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
instance Property "Description" FlowEntitlement where
  type PropertyType "Description" FlowEntitlement = Value Prelude.Text
  set :: PropertyType "Description" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "Description" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement {description :: Value Text
description = PropertyType "Description" FlowEntitlement
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
instance Property "Encryption" FlowEntitlement where
  type PropertyType "Encryption" FlowEntitlement = EncryptionProperty
  set :: PropertyType "Encryption" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "Encryption" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement {encryption :: Maybe EncryptionProperty
encryption = EncryptionProperty -> Maybe EncryptionProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Encryption" FlowEntitlement
EncryptionProperty
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
ValueList Text
Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
instance Property "EntitlementStatus" FlowEntitlement where
  type PropertyType "EntitlementStatus" FlowEntitlement = Value Prelude.Text
  set :: PropertyType "EntitlementStatus" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "EntitlementStatus" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement {entitlementStatus :: Maybe (Value Text)
entitlementStatus = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EntitlementStatus" FlowEntitlement
Value Text
newValue, Maybe (Value Integer)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
instance Property "FlowArn" FlowEntitlement where
  type PropertyType "FlowArn" FlowEntitlement = Value Prelude.Text
  set :: PropertyType "FlowArn" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "FlowArn" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement {flowArn :: Value Text
flowArn = PropertyType "FlowArn" FlowEntitlement
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
name :: Value Text
subscribers :: ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
name :: Value Text
subscribers :: ValueList Text
..}
instance Property "Name" FlowEntitlement where
  type PropertyType "Name" FlowEntitlement = Value Prelude.Text
  set :: PropertyType "Name" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "Name" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement {name :: Value Text
name = PropertyType "Name" FlowEntitlement
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
subscribers :: ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
subscribers :: ValueList Text
..}
instance Property "Subscribers" FlowEntitlement where
  type PropertyType "Subscribers" FlowEntitlement = ValueList Prelude.Text
  set :: PropertyType "Subscribers" FlowEntitlement
-> FlowEntitlement -> FlowEntitlement
set PropertyType "Subscribers" FlowEntitlement
newValue FlowEntitlement {Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
ValueList Text
Value Text
haddock_workaround_ :: FlowEntitlement -> ()
dataTransferSubscriberFeePercent :: FlowEntitlement -> Maybe (Value Integer)
description :: FlowEntitlement -> Value Text
encryption :: FlowEntitlement -> Maybe EncryptionProperty
entitlementStatus :: FlowEntitlement -> Maybe (Value Text)
flowArn :: FlowEntitlement -> Value Text
name :: FlowEntitlement -> Value Text
subscribers :: FlowEntitlement -> ValueList Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
subscribers :: ValueList Text
..}
    = FlowEntitlement {subscribers :: ValueList Text
subscribers = PropertyType "Subscribers" FlowEntitlement
ValueList Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
Maybe EncryptionProperty
()
Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
haddock_workaround_ :: ()
dataTransferSubscriberFeePercent :: Maybe (Value Integer)
description :: Value Text
encryption :: Maybe EncryptionProperty
entitlementStatus :: Maybe (Value Text)
flowArn :: Value Text
name :: Value Text
..}