module Stratosphere.B2BI.Transformer.FormatOptionsProperty (
        module Exports, FormatOptionsProperty(..), mkFormatOptionsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.B2BI.Transformer.X12DetailsProperty as Exports
import Stratosphere.ResourceProperties
data FormatOptionsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-transformer-formatoptions.html>
    FormatOptionsProperty {FormatOptionsProperty -> ()
haddock_workaround_ :: (),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-transformer-formatoptions.html#cfn-b2bi-transformer-formatoptions-x12>
                           FormatOptionsProperty -> X12DetailsProperty
x12 :: X12DetailsProperty}
  deriving stock (FormatOptionsProperty -> FormatOptionsProperty -> Bool
(FormatOptionsProperty -> FormatOptionsProperty -> Bool)
-> (FormatOptionsProperty -> FormatOptionsProperty -> Bool)
-> Eq FormatOptionsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FormatOptionsProperty -> FormatOptionsProperty -> Bool
== :: FormatOptionsProperty -> FormatOptionsProperty -> Bool
$c/= :: FormatOptionsProperty -> FormatOptionsProperty -> Bool
/= :: FormatOptionsProperty -> FormatOptionsProperty -> Bool
Prelude.Eq, Int -> FormatOptionsProperty -> ShowS
[FormatOptionsProperty] -> ShowS
FormatOptionsProperty -> String
(Int -> FormatOptionsProperty -> ShowS)
-> (FormatOptionsProperty -> String)
-> ([FormatOptionsProperty] -> ShowS)
-> Show FormatOptionsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> FormatOptionsProperty -> ShowS
showsPrec :: Int -> FormatOptionsProperty -> ShowS
$cshow :: FormatOptionsProperty -> String
show :: FormatOptionsProperty -> String
$cshowList :: [FormatOptionsProperty] -> ShowS
showList :: [FormatOptionsProperty] -> ShowS
Prelude.Show)
mkFormatOptionsProperty ::
  X12DetailsProperty -> FormatOptionsProperty
mkFormatOptionsProperty :: X12DetailsProperty -> FormatOptionsProperty
mkFormatOptionsProperty X12DetailsProperty
x12
  = FormatOptionsProperty {haddock_workaround_ :: ()
haddock_workaround_ = (), x12 :: X12DetailsProperty
x12 = X12DetailsProperty
x12}
instance ToResourceProperties FormatOptionsProperty where
  toResourceProperties :: FormatOptionsProperty -> ResourceProperties
toResourceProperties FormatOptionsProperty {()
X12DetailsProperty
haddock_workaround_ :: FormatOptionsProperty -> ()
x12 :: FormatOptionsProperty -> X12DetailsProperty
haddock_workaround_ :: ()
x12 :: X12DetailsProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::B2BI::Transformer.FormatOptions",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False, properties :: Object
properties = [Key
"X12" Key -> X12DetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= X12DetailsProperty
x12]}
instance JSON.ToJSON FormatOptionsProperty where
  toJSON :: FormatOptionsProperty -> Value
toJSON FormatOptionsProperty {()
X12DetailsProperty
haddock_workaround_ :: FormatOptionsProperty -> ()
x12 :: FormatOptionsProperty -> X12DetailsProperty
haddock_workaround_ :: ()
x12 :: X12DetailsProperty
..} = [(Key, Value)] -> Value
JSON.object [Key
"X12" Key -> X12DetailsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= X12DetailsProperty
x12]
instance Property "X12" FormatOptionsProperty where
  type PropertyType "X12" FormatOptionsProperty = X12DetailsProperty
  set :: PropertyType "X12" FormatOptionsProperty
-> FormatOptionsProperty -> FormatOptionsProperty
set PropertyType "X12" FormatOptionsProperty
newValue FormatOptionsProperty {()
X12DetailsProperty
haddock_workaround_ :: FormatOptionsProperty -> ()
x12 :: FormatOptionsProperty -> X12DetailsProperty
haddock_workaround_ :: ()
x12 :: X12DetailsProperty
..}
    = FormatOptionsProperty {x12 :: X12DetailsProperty
x12 = PropertyType "X12" FormatOptionsProperty
X12DetailsProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}