module Stratosphere.B2BI.Partnership.X12OutboundEdiHeadersProperty (
        module Exports, X12OutboundEdiHeadersProperty(..),
        mkX12OutboundEdiHeadersProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.B2BI.Partnership.X12ControlNumbersProperty as Exports
import {-# SOURCE #-} Stratosphere.B2BI.Partnership.X12DelimitersProperty as Exports
import {-# SOURCE #-} Stratosphere.B2BI.Partnership.X12FunctionalGroupHeadersProperty as Exports
import {-# SOURCE #-} Stratosphere.B2BI.Partnership.X12InterchangeControlHeadersProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data X12OutboundEdiHeadersProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html>
    X12OutboundEdiHeadersProperty {X12OutboundEdiHeadersProperty -> ()
haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html#cfn-b2bi-partnership-x12outboundediheaders-controlnumbers>
                                   X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
controlNumbers :: (Prelude.Maybe X12ControlNumbersProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html#cfn-b2bi-partnership-x12outboundediheaders-delimiters>
                                   X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
delimiters :: (Prelude.Maybe X12DelimitersProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html#cfn-b2bi-partnership-x12outboundediheaders-functionalgroupheaders>
                                   X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
functionalGroupHeaders :: (Prelude.Maybe X12FunctionalGroupHeadersProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html#cfn-b2bi-partnership-x12outboundediheaders-gs05timeformat>
                                   X12OutboundEdiHeadersProperty -> Maybe (Value Text)
gs05TimeFormat :: (Prelude.Maybe (Value Prelude.Text)),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html#cfn-b2bi-partnership-x12outboundediheaders-interchangecontrolheaders>
                                   X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
interchangeControlHeaders :: (Prelude.Maybe X12InterchangeControlHeadersProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-partnership-x12outboundediheaders.html#cfn-b2bi-partnership-x12outboundediheaders-validateedi>
                                   X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
validateEdi :: (Prelude.Maybe (Value Prelude.Bool))}
  deriving stock (X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> Bool
(X12OutboundEdiHeadersProperty
 -> X12OutboundEdiHeadersProperty -> Bool)
-> (X12OutboundEdiHeadersProperty
    -> X12OutboundEdiHeadersProperty -> Bool)
-> Eq X12OutboundEdiHeadersProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> Bool
== :: X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> Bool
$c/= :: X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> Bool
/= :: X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> Bool
Prelude.Eq, Int -> X12OutboundEdiHeadersProperty -> ShowS
[X12OutboundEdiHeadersProperty] -> ShowS
X12OutboundEdiHeadersProperty -> String
(Int -> X12OutboundEdiHeadersProperty -> ShowS)
-> (X12OutboundEdiHeadersProperty -> String)
-> ([X12OutboundEdiHeadersProperty] -> ShowS)
-> Show X12OutboundEdiHeadersProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> X12OutboundEdiHeadersProperty -> ShowS
showsPrec :: Int -> X12OutboundEdiHeadersProperty -> ShowS
$cshow :: X12OutboundEdiHeadersProperty -> String
show :: X12OutboundEdiHeadersProperty -> String
$cshowList :: [X12OutboundEdiHeadersProperty] -> ShowS
showList :: [X12OutboundEdiHeadersProperty] -> ShowS
Prelude.Show)
mkX12OutboundEdiHeadersProperty :: X12OutboundEdiHeadersProperty
mkX12OutboundEdiHeadersProperty :: X12OutboundEdiHeadersProperty
mkX12OutboundEdiHeadersProperty
  = X12OutboundEdiHeadersProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), controlNumbers :: Maybe X12ControlNumbersProperty
controlNumbers = Maybe X12ControlNumbersProperty
forall a. Maybe a
Prelude.Nothing,
       delimiters :: Maybe X12DelimitersProperty
delimiters = Maybe X12DelimitersProperty
forall a. Maybe a
Prelude.Nothing,
       functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
functionalGroupHeaders = Maybe X12FunctionalGroupHeadersProperty
forall a. Maybe a
Prelude.Nothing,
       gs05TimeFormat :: Maybe (Value Text)
gs05TimeFormat = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
interchangeControlHeaders = Maybe X12InterchangeControlHeadersProperty
forall a. Maybe a
Prelude.Nothing,
       validateEdi :: Maybe (Value Bool)
validateEdi = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties X12OutboundEdiHeadersProperty where
  toResourceProperties :: X12OutboundEdiHeadersProperty -> ResourceProperties
toResourceProperties X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::B2BI::Partnership.X12OutboundEdiHeaders",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         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 -> X12ControlNumbersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ControlNumbers" (X12ControlNumbersProperty -> (Key, Value))
-> Maybe X12ControlNumbersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12ControlNumbersProperty
controlNumbers,
                            Key -> X12DelimitersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Delimiters" (X12DelimitersProperty -> (Key, Value))
-> Maybe X12DelimitersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12DelimitersProperty
delimiters,
                            Key -> X12FunctionalGroupHeadersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FunctionalGroupHeaders"
                              (X12FunctionalGroupHeadersProperty -> (Key, Value))
-> Maybe X12FunctionalGroupHeadersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12FunctionalGroupHeadersProperty
functionalGroupHeaders,
                            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
"Gs05TimeFormat" (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)
gs05TimeFormat,
                            Key -> X12InterchangeControlHeadersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InterchangeControlHeaders"
                              (X12InterchangeControlHeadersProperty -> (Key, Value))
-> Maybe X12InterchangeControlHeadersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12InterchangeControlHeadersProperty
interchangeControlHeaders,
                            Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ValidateEdi" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
validateEdi])}
instance JSON.ToJSON X12OutboundEdiHeadersProperty where
  toJSON :: X12OutboundEdiHeadersProperty -> Value
toJSON X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = [(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 -> X12ControlNumbersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ControlNumbers" (X12ControlNumbersProperty -> (Key, Value))
-> Maybe X12ControlNumbersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12ControlNumbersProperty
controlNumbers,
               Key -> X12DelimitersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Delimiters" (X12DelimitersProperty -> (Key, Value))
-> Maybe X12DelimitersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12DelimitersProperty
delimiters,
               Key -> X12FunctionalGroupHeadersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FunctionalGroupHeaders"
                 (X12FunctionalGroupHeadersProperty -> (Key, Value))
-> Maybe X12FunctionalGroupHeadersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12FunctionalGroupHeadersProperty
functionalGroupHeaders,
               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
"Gs05TimeFormat" (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)
gs05TimeFormat,
               Key -> X12InterchangeControlHeadersProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InterchangeControlHeaders"
                 (X12InterchangeControlHeadersProperty -> (Key, Value))
-> Maybe X12InterchangeControlHeadersProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe X12InterchangeControlHeadersProperty
interchangeControlHeaders,
               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ValidateEdi" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
validateEdi]))
instance Property "ControlNumbers" X12OutboundEdiHeadersProperty where
  type PropertyType "ControlNumbers" X12OutboundEdiHeadersProperty = X12ControlNumbersProperty
  set :: PropertyType "ControlNumbers" X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> X12OutboundEdiHeadersProperty
set PropertyType "ControlNumbers" X12OutboundEdiHeadersProperty
newValue X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = X12OutboundEdiHeadersProperty
        {controlNumbers :: Maybe X12ControlNumbersProperty
controlNumbers = X12ControlNumbersProperty -> Maybe X12ControlNumbersProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ControlNumbers" X12OutboundEdiHeadersProperty
X12ControlNumbersProperty
newValue, Maybe (Value Bool)
Maybe (Value Text)
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: ()
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
haddock_workaround_ :: ()
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
instance Property "Delimiters" X12OutboundEdiHeadersProperty where
  type PropertyType "Delimiters" X12OutboundEdiHeadersProperty = X12DelimitersProperty
  set :: PropertyType "Delimiters" X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> X12OutboundEdiHeadersProperty
set PropertyType "Delimiters" X12OutboundEdiHeadersProperty
newValue X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = X12OutboundEdiHeadersProperty
        {delimiters :: Maybe X12DelimitersProperty
delimiters = X12DelimitersProperty -> Maybe X12DelimitersProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Delimiters" X12OutboundEdiHeadersProperty
X12DelimitersProperty
newValue, Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
instance Property "FunctionalGroupHeaders" X12OutboundEdiHeadersProperty where
  type PropertyType "FunctionalGroupHeaders" X12OutboundEdiHeadersProperty = X12FunctionalGroupHeadersProperty
  set :: PropertyType "FunctionalGroupHeaders" X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> X12OutboundEdiHeadersProperty
set PropertyType "FunctionalGroupHeaders" X12OutboundEdiHeadersProperty
newValue X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = X12OutboundEdiHeadersProperty
        {functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
functionalGroupHeaders = X12FunctionalGroupHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FunctionalGroupHeaders" X12OutboundEdiHeadersProperty
X12FunctionalGroupHeadersProperty
newValue, Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
instance Property "Gs05TimeFormat" X12OutboundEdiHeadersProperty where
  type PropertyType "Gs05TimeFormat" X12OutboundEdiHeadersProperty = Value Prelude.Text
  set :: PropertyType "Gs05TimeFormat" X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> X12OutboundEdiHeadersProperty
set PropertyType "Gs05TimeFormat" X12OutboundEdiHeadersProperty
newValue X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = X12OutboundEdiHeadersProperty
        {gs05TimeFormat :: Maybe (Value Text)
gs05TimeFormat = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Gs05TimeFormat" X12OutboundEdiHeadersProperty
Value Text
newValue, Maybe (Value Bool)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
instance Property "InterchangeControlHeaders" X12OutboundEdiHeadersProperty where
  type PropertyType "InterchangeControlHeaders" X12OutboundEdiHeadersProperty = X12InterchangeControlHeadersProperty
  set :: PropertyType
  "InterchangeControlHeaders" X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> X12OutboundEdiHeadersProperty
set PropertyType
  "InterchangeControlHeaders" X12OutboundEdiHeadersProperty
newValue X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = X12OutboundEdiHeadersProperty
        {interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
interchangeControlHeaders = X12InterchangeControlHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "InterchangeControlHeaders" X12OutboundEdiHeadersProperty
X12InterchangeControlHeadersProperty
newValue, Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
()
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
validateEdi :: Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
validateEdi :: Maybe (Value Bool)
..}
instance Property "ValidateEdi" X12OutboundEdiHeadersProperty where
  type PropertyType "ValidateEdi" X12OutboundEdiHeadersProperty = Value Prelude.Bool
  set :: PropertyType "ValidateEdi" X12OutboundEdiHeadersProperty
-> X12OutboundEdiHeadersProperty -> X12OutboundEdiHeadersProperty
set PropertyType "ValidateEdi" X12OutboundEdiHeadersProperty
newValue X12OutboundEdiHeadersProperty {Maybe (Value Bool)
Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: X12OutboundEdiHeadersProperty -> ()
controlNumbers :: X12OutboundEdiHeadersProperty -> Maybe X12ControlNumbersProperty
delimiters :: X12OutboundEdiHeadersProperty -> Maybe X12DelimitersProperty
functionalGroupHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: X12OutboundEdiHeadersProperty -> Maybe (Value Text)
interchangeControlHeaders :: X12OutboundEdiHeadersProperty
-> Maybe X12InterchangeControlHeadersProperty
validateEdi :: X12OutboundEdiHeadersProperty -> Maybe (Value Bool)
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
validateEdi :: Maybe (Value Bool)
..}
    = X12OutboundEdiHeadersProperty
        {validateEdi :: Maybe (Value Bool)
validateEdi = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ValidateEdi" X12OutboundEdiHeadersProperty
Value Bool
newValue, Maybe (Value Text)
Maybe X12ControlNumbersProperty
Maybe X12DelimitersProperty
Maybe X12FunctionalGroupHeadersProperty
Maybe X12InterchangeControlHeadersProperty
()
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
haddock_workaround_ :: ()
controlNumbers :: Maybe X12ControlNumbersProperty
delimiters :: Maybe X12DelimitersProperty
functionalGroupHeaders :: Maybe X12FunctionalGroupHeadersProperty
gs05TimeFormat :: Maybe (Value Text)
interchangeControlHeaders :: Maybe X12InterchangeControlHeadersProperty
..}