343 files changed, 25340 insertions, 0 deletions

diff --git a/specification/src/Text/Edifact/D96A/Composites.hs b/specification/src/Text/Edifact/D96A/Composites.hs
new file mode 100644
index 0000000..3d3e895
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites.hs
@@ -0,0 +1,78 @@
+module Text.Edifact.D96A.Composites
+  ( module C
+  ) where
+
+import           Text.Edifact.D96A.Composites.C002 as C
+import           Text.Edifact.D96A.Composites.C040 as C
+import           Text.Edifact.D96A.Composites.C056 as C
+import           Text.Edifact.D96A.Composites.C058 as C
+import           Text.Edifact.D96A.Composites.C059 as C
+import           Text.Edifact.D96A.Composites.C076 as C
+import           Text.Edifact.D96A.Composites.C080 as C
+import           Text.Edifact.D96A.Composites.C082 as C
+import           Text.Edifact.D96A.Composites.C100 as C
+import           Text.Edifact.D96A.Composites.C107 as C
+import           Text.Edifact.D96A.Composites.C108 as C
+import           Text.Edifact.D96A.Composites.C174 as C
+import           Text.Edifact.D96A.Composites.C186 as C
+import           Text.Edifact.D96A.Composites.C200 as C
+import           Text.Edifact.D96A.Composites.C202 as C
+import           Text.Edifact.D96A.Composites.C203 as C
+import           Text.Edifact.D96A.Composites.C205 as C
+import           Text.Edifact.D96A.Composites.C206 as C
+import           Text.Edifact.D96A.Composites.C208 as C
+import           Text.Edifact.D96A.Composites.C210 as C
+import           Text.Edifact.D96A.Composites.C211 as C
+import           Text.Edifact.D96A.Composites.C212 as C
+import           Text.Edifact.D96A.Composites.C213 as C
+import           Text.Edifact.D96A.Composites.C214 as C
+import           Text.Edifact.D96A.Composites.C215 as C
+import           Text.Edifact.D96A.Composites.C218 as C
+import           Text.Edifact.D96A.Composites.C219 as C
+import           Text.Edifact.D96A.Composites.C220 as C
+import           Text.Edifact.D96A.Composites.C222 as C
+import           Text.Edifact.D96A.Composites.C223 as C
+import           Text.Edifact.D96A.Composites.C224 as C
+import           Text.Edifact.D96A.Composites.C228 as C
+import           Text.Edifact.D96A.Composites.C229 as C
+import           Text.Edifact.D96A.Composites.C231 as C
+import           Text.Edifact.D96A.Composites.C232 as C
+import           Text.Edifact.D96A.Composites.C233 as C
+import           Text.Edifact.D96A.Composites.C234 as C
+import           Text.Edifact.D96A.Composites.C235 as C
+import           Text.Edifact.D96A.Composites.C236 as C
+import           Text.Edifact.D96A.Composites.C237 as C
+import           Text.Edifact.D96A.Composites.C239 as C
+import           Text.Edifact.D96A.Composites.C270 as C
+import           Text.Edifact.D96A.Composites.C273 as C
+import           Text.Edifact.D96A.Composites.C279 as C
+import           Text.Edifact.D96A.Composites.C280 as C
+import           Text.Edifact.D96A.Composites.C401 as C
+import           Text.Edifact.D96A.Composites.C402 as C
+import           Text.Edifact.D96A.Composites.C501 as C
+import           Text.Edifact.D96A.Composites.C502 as C
+import           Text.Edifact.D96A.Composites.C503 as C
+import           Text.Edifact.D96A.Composites.C504 as C
+import           Text.Edifact.D96A.Composites.C506 as C
+import           Text.Edifact.D96A.Composites.C507 as C
+import           Text.Edifact.D96A.Composites.C509 as C
+import           Text.Edifact.D96A.Composites.C516 as C
+import           Text.Edifact.D96A.Composites.C517 as C
+import           Text.Edifact.D96A.Composites.C519 as C
+import           Text.Edifact.D96A.Composites.C522 as C
+import           Text.Edifact.D96A.Composites.C523 as C
+import           Text.Edifact.D96A.Composites.C524 as C
+import           Text.Edifact.D96A.Composites.C528 as C
+import           Text.Edifact.D96A.Composites.C531 as C
+import           Text.Edifact.D96A.Composites.C532 as C
+import           Text.Edifact.D96A.Composites.C536 as C
+import           Text.Edifact.D96A.Composites.C537 as C
+import           Text.Edifact.D96A.Composites.C553 as C
+import           Text.Edifact.D96A.Composites.C554 as C
+import           Text.Edifact.D96A.Composites.C555 as C
+import           Text.Edifact.D96A.Composites.C556 as C
+import           Text.Edifact.D96A.Composites.C601 as C
+import           Text.Edifact.D96A.Composites.C703 as C
+import           Text.Edifact.D96A.Composites.C827 as C
+import           Text.Edifact.D96A.Composites.C829 as C
+import           Text.Edifact.D96A.Composites.C960 as C
diff --git a/specification/src/Text/Edifact/D96A/Composites/C002.hs b/specification/src/Text/Edifact/D96A/Composites/C002.hs
new file mode 100644
index 0000000..6581f16
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C002.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C002
+  ( -- * Definition
+    compositeC002
+    -- * Dependencies
+  , simple1000
+  , simple1001
+  , simple1131
+  , simple3055
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1000, simple1001, simple1131,
+                                            simple3055)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C002  DOCUMENT/MESSAGE NAME
+-- >
+-- >       Desc: Identification of a type of document/message by code or
+-- >             name. Code preferred.
+-- >
+-- > 010   1001   Document/message name, coded                  C  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   1000   Document/message name                         C  an..35
+--
+-- Dependencies: 'simple1000', 'simple1001', 'simple1131', 'simple3055'.
+compositeC002 :: Parser Value
+compositeC002 =
+  composite "C002"
+    [ "010" .@ optional  simple1001
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple1000
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C040.hs b/specification/src/Text/Edifact/D96A/Composites/C040.hs
new file mode 100644
index 0000000..cb5ba61
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C040.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C040
+  ( -- * Definition
+    compositeC040
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple3127
+  , simple3128
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple3127,
+                                            simple3128)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C040  CARRIER
+-- >
+-- >       Desc: Identification of a carrier by code and/or by name. Code
+-- >             preferred.
+-- >
+-- > 010   3127   Carrier identification                        C  an..17
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   3128   Carrier name                                  C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple3127', 'simple3128'.
+compositeC040 :: Parser Value
+compositeC040 =
+  composite "C040"
+    [ "010" .@ optional  simple3127
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple3128
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C056.hs b/specification/src/Text/Edifact/D96A/Composites/C056.hs
new file mode 100644
index 0000000..9bd5a02
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C056.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C056
+  ( -- * Definition
+    compositeC056
+    -- * Dependencies
+  , simple3412
+  , simple3413
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple3412, simple3413)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C056  DEPARTMENT OR EMPLOYEE DETAILS
+-- >
+-- >       Desc: Code and/or name of a department or employee. Code
+-- >             preferred.
+-- >
+-- > 010   3413   Department or employee identification         C  an..17
+-- > 020   3412   Department or employee                        C  an..35
+--
+-- Dependencies: 'simple3412', 'simple3413'.
+compositeC056 :: Parser Value
+compositeC056 =
+  composite "C056"
+    [ "010" .@ optional  simple3413
+    , "020" .@ optional  simple3412
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C058.hs b/specification/src/Text/Edifact/D96A/Composites/C058.hs
new file mode 100644
index 0000000..1c10294
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C058.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C058
+  ( -- * Definition
+    compositeC058
+    -- * Dependencies
+  , simple3124
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple3124)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C058  NAME AND ADDRESS
+-- >
+-- >       Desc: Unstructured name and address: one to five lines.
+-- >
+-- > 010   3124   Name and address line                         M  an..35
+-- > 020   3124   Name and address line                         C  an..35
+-- > 030   3124   Name and address line                         C  an..35
+-- > 040   3124   Name and address line                         C  an..35
+-- > 050   3124   Name and address line                         C  an..35
+--
+-- Dependencies: 'simple3124'.
+compositeC058 :: Parser Value
+compositeC058 =
+  composite "C058"
+    [ "010" .@ mandatory simple3124
+    , "020" .@ optional  simple3124
+    , "030" .@ optional  simple3124
+    , "040" .@ optional  simple3124
+    , "050" .@ optional  simple3124
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C059.hs b/specification/src/Text/Edifact/D96A/Composites/C059.hs
new file mode 100644
index 0000000..fa4e744
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C059.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C059
+  ( -- * Definition
+    compositeC059
+    -- * Dependencies
+  , simple3042
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple3042)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >     * C059  STREET
+-- >
+-- >       Desc: Street address and/or PO Box number in a structured
+-- >             address: one to three lines.
+-- >
+-- > 010   3042   Street and number/p.o. box                    M  an..35
+-- > 020   3042   Street and number/p.o. box                    C  an..35
+-- > 030   3042   Street and number/p.o. box                    C  an..35
+-- > 040 + 3042   Street and number/p.o. box                    C  an..35
+--
+-- Dependencies: 'simple3042'.
+compositeC059 :: Parser Value
+compositeC059 =
+  composite "C059"
+    [ "010" .@ mandatory simple3042
+    , "020" .@ optional  simple3042
+    , "030" .@ optional  simple3042
+    , "040" .@ optional  simple3042
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C076.hs b/specification/src/Text/Edifact/D96A/Composites/C076.hs
new file mode 100644
index 0000000..6c9771c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C076.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C076
+  ( -- * Definition
+    compositeC076
+    -- * Dependencies
+  , simple3148
+  , simple3155
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple3148, simple3155)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C076  COMMUNICATION CONTACT
+-- >
+-- >       Desc: Communication number of a department or employee in a
+-- >             specified channel.
+-- >
+-- > 010   3148   Communication number                          M  an..512
+-- > 020   3155   Communication channel qualifier               M  an..3
+--
+-- Dependencies: 'simple3148', 'simple3155'.
+compositeC076 :: Parser Value
+compositeC076 =
+  composite "C076"
+    [ "010" .@ mandatory simple3148
+    , "020" .@ mandatory simple3155
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C080.hs b/specification/src/Text/Edifact/D96A/Composites/C080.hs
new file mode 100644
index 0000000..fbeb348
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C080.hs
@@ -0,0 +1,43 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C080
+  ( -- * Definition
+    compositeC080
+    -- * Dependencies
+  , simple3036
+  , simple3045
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple3036, simple3045)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C080  PARTY NAME
+-- >
+-- >       Desc: Identification of a transaction party by name, one to five
+-- >             lines. Party name may be formatted.
+-- >
+-- > 010   3036   Party name                                    M  an..35
+-- > 020   3036   Party name                                    C  an..35
+-- > 030   3036   Party name                                    C  an..35
+-- > 040   3036   Party name                                    C  an..35
+-- > 050   3036   Party name                                    C  an..35
+-- > 060   3045   Party name format, coded                      C  an..3
+--
+-- Dependencies: 'simple3036', 'simple3045'.
+compositeC080 :: Parser Value
+compositeC080 =
+  composite "C080"
+    [ "010" .@ mandatory simple3036
+    , "020" .@ optional  simple3036
+    , "030" .@ optional  simple3036
+    , "040" .@ optional  simple3036
+    , "050" .@ optional  simple3036
+    , "060" .@ optional  simple3045
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C082.hs b/specification/src/Text/Edifact/D96A/Composites/C082.hs
new file mode 100644
index 0000000..c891099
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C082.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C082
+  ( -- * Definition
+    compositeC082
+    -- * Dependencies
+  , simple1131
+  , simple3039
+  , simple3055
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3039, simple3055)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C082  PARTY IDENTIFICATION DETAILS
+-- >
+-- >       Desc: Identification of a transaction party by code.
+-- >
+-- > 010   3039   Party id. identification                      M  an..35
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3039', 'simple3055'.
+compositeC082 :: Parser Value
+compositeC082 =
+  composite "C082"
+    [ "010" .@ mandatory simple3039
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C100.hs b/specification/src/Text/Edifact/D96A/Composites/C100.hs
new file mode 100644
index 0000000..2b45e00
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C100.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C100
+  ( -- * Definition
+    compositeC100
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4052
+  , simple4053
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4052,
+                                            simple4053)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C100  TERMS OF DELIVERY OR TRANSPORT
+-- >
+-- >       Desc: Terms of delivery or transport code from a specified
+-- >             source.
+-- >
+-- > 010   4053   Terms of delivery or transport, coded         C  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   4052   Terms of delivery or transport                C  an..70
+-- > 050   4052   Terms of delivery or transport                C  an..70
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4052', 'simple4053'.
+compositeC100 :: Parser Value
+compositeC100 =
+  composite "C100"
+    [ "010" .@ optional  simple4053
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple4052
+    , "050" .@ optional  simple4052
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C107.hs b/specification/src/Text/Edifact/D96A/Composites/C107.hs
new file mode 100644
index 0000000..4a62e80
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C107.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C107
+  ( -- * Definition
+    compositeC107
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4441
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4441)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C107  TEXT REFERENCE
+-- >
+-- >       Desc: Coded reference to a standard text and its source.
+-- >
+-- > 010   4441   Free text, coded                              M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4441'.
+compositeC107 :: Parser Value
+compositeC107 =
+  composite "C107"
+    [ "010" .@ mandatory simple4441
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C108.hs b/specification/src/Text/Edifact/D96A/Composites/C108.hs
new file mode 100644
index 0000000..47ae303
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C108.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C108
+  ( -- * Definition
+    compositeC108
+    -- * Dependencies
+  , simple4440
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple4440)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C108  TEXT LITERAL
+-- >
+-- >       Desc: Free text; one to five lines.
+-- >
+-- > 010   4440   Free text                                     M  an..70
+-- > 020   4440   Free text                                     C  an..70
+-- > 030   4440   Free text                                     C  an..70
+-- > 040   4440   Free text                                     C  an..70
+-- > 050   4440   Free text                                     C  an..70
+--
+-- Dependencies: 'simple4440'.
+compositeC108 :: Parser Value
+compositeC108 =
+  composite "C108"
+    [ "010" .@ mandatory simple4440
+    , "020" .@ optional  simple4440
+    , "030" .@ optional  simple4440
+    , "040" .@ optional  simple4440
+    , "050" .@ optional  simple4440
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C174.hs b/specification/src/Text/Edifact/D96A/Composites/C174.hs
new file mode 100644
index 0000000..69ad7d6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C174.hs
@@ -0,0 +1,45 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C174
+  ( -- * Definition
+    compositeC174
+    -- * Dependencies
+  , simple6152
+  , simple6162
+  , simple6314
+  , simple6411
+  , simple6432
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6152, simple6162, simple6314,
+                                            simple6411, simple6432)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C174  VALUE/RANGE
+-- >
+-- >       Desc: Measurement value and relevant minimum and maximum
+-- >             tolerances in that order.
+-- >
+-- > 010   6411   Measure unit qualifier                        M  an..3
+-- > 020   6314   Measurement value                             C  n..18
+-- > 030   6162   Range minimum                                 C  n..18
+-- > 040   6152   Range maximum                                 C  n..18
+-- > 050   6432   Significant digits                            C  n..2
+--
+-- Dependencies: 'simple6152', 'simple6162', 'simple6314', 'simple6411', 'simple6432'.
+compositeC174 :: Parser Value
+compositeC174 =
+  composite "C174"
+    [ "010" .@ mandatory simple6411
+    , "020" .@ optional  simple6314
+    , "030" .@ optional  simple6162
+    , "040" .@ optional  simple6152
+    , "050" .@ optional  simple6432
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C186.hs b/specification/src/Text/Edifact/D96A/Composites/C186.hs
new file mode 100644
index 0000000..065d2d7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C186.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C186
+  ( -- * Definition
+    compositeC186
+    -- * Dependencies
+  , simple6060
+  , simple6063
+  , simple6411
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6060, simple6063, simple6411)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C186  QUANTITY DETAILS
+-- >
+-- >       Desc: Quantity information in a transaction, qualified when
+-- >             relevant.
+-- >
+-- > 010   6063   Quantity qualifier                            M  an..3
+-- > 020   6060   Quantity                                      M  n..15
+-- > 030   6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'simple6060', 'simple6063', 'simple6411'.
+compositeC186 :: Parser Value
+compositeC186 =
+  composite "C186"
+    [ "010" .@ mandatory simple6063
+    , "020" .@ mandatory simple6060
+    , "030" .@ optional  simple6411
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C200.hs b/specification/src/Text/Edifact/D96A/Composites/C200.hs
new file mode 100644
index 0000000..b5183b8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C200.hs
@@ -0,0 +1,47 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C200
+  ( -- * Definition
+    compositeC200
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4237
+  , simple7140
+  , simple8022
+  , simple8023
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4237,
+                                            simple7140, simple8022, simple8023)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >     * C200  CHARGE
+-- >
+-- >       Desc: Identification of a charge by code and/or by name.
+-- >
+-- > 010   8023   Freight and charges identification            C  an..17
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   8022   Freight and charges                           C  an..26
+-- > 050   4237   Prepaid/collect indicator, coded              C  an..3
+-- > 060 + 7140   Item number                                   C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4237', 'simple7140', 'simple8022', 'simple8023'.
+compositeC200 :: Parser Value
+compositeC200 =
+  composite "C200"
+    [ "010" .@ optional  simple8023
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple8022
+    , "050" .@ optional  simple4237
+    , "060" .@ optional  simple7140
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C202.hs b/specification/src/Text/Edifact/D96A/Composites/C202.hs
new file mode 100644
index 0000000..0ec5279
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C202.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C202
+  ( -- * Definition
+    compositeC202
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7064
+  , simple7065
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7064,
+                                            simple7065)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C202  PACKAGE TYPE
+-- >
+-- >       Desc: Type of package by name or by code from a specified
+-- >             source.
+-- >
+-- > 010   7065   Type of packages identification               C  an..17
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   7064   Type of packages                              C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7064', 'simple7065'.
+compositeC202 :: Parser Value
+compositeC202 =
+  composite "C202"
+    [ "010" .@ optional  simple7065
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple7064
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C203.hs b/specification/src/Text/Edifact/D96A/Composites/C203.hs
new file mode 100644
index 0000000..d188bf1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C203.hs
@@ -0,0 +1,56 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C203
+  ( -- * Definition
+    compositeC203
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple5242
+  , simple5243
+  , simple5275
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple5242,
+                                            simple5243, simple5275)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C203  RATE/TARIFF CLASS
+-- >
+-- >       Desc: Identification of the applicable rate/tariff class.
+-- >
+-- > 010   5243   Rate/tariff class identification              M  an..9
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   5242   Rate/tariff class                             C  an..35
+-- > 050   5275   Supplementary rate/tariff basis               C  an..6
+-- >              identification
+-- > 060   1131   Code list qualifier                           C  an..3
+-- > 070   3055   Code list responsible agency, coded           C  an..3
+-- > 080   5275   Supplementary rate/tariff basis               C  an..6
+-- >              identification
+-- > 090   1131   Code list qualifier                           C  an..3
+-- > 100   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple5242', 'simple5243', 'simple5275'.
+compositeC203 :: Parser Value
+compositeC203 =
+  composite "C203"
+    [ "010" .@ mandatory simple5243
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple5242
+    , "050" .@ optional  simple5275
+    , "060" .@ optional  simple1131
+    , "070" .@ optional  simple3055
+    , "080" .@ optional  simple5275
+    , "090" .@ optional  simple1131
+    , "100" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C205.hs b/specification/src/Text/Edifact/D96A/Composites/C205.hs
new file mode 100644
index 0000000..c83dac3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C205.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C205
+  ( -- * Definition
+    compositeC205
+    -- * Dependencies
+  , simple8078
+  , simple8092
+  , simple8351
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8078, simple8092, simple8351)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C205  HAZARD CODE
+-- >
+-- >       Desc: The identification of the dangerous goods in code.
+-- >
+-- > 010   8351   Hazard code identification                    M  an..7
+-- > 020   8078   Hazard substance/item/page number             C  an..7
+-- > 030   8092   Hazard code version number                    C  an..10
+--
+-- Dependencies: 'simple8078', 'simple8092', 'simple8351'.
+compositeC205 :: Parser Value
+compositeC205 =
+  composite "C205"
+    [ "010" .@ mandatory simple8351
+    , "020" .@ optional  simple8078
+    , "030" .@ optional  simple8092
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C206.hs b/specification/src/Text/Edifact/D96A/Composites/C206.hs
new file mode 100644
index 0000000..2af9360
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C206.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C206
+  ( -- * Definition
+    compositeC206
+    -- * Dependencies
+  , simple4405
+  , simple7402
+  , simple7405
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple4405, simple7402, simple7405)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C206  IDENTIFICATION NUMBER
+-- >
+-- >       Desc: The identification of an object.
+-- >
+-- > 010   7402   Identity number                               M  an..35
+-- > 020   7405   Identity number qualifier                     C  an..3
+-- > 030   4405   Status, coded                                 C  an..3
+--
+-- Dependencies: 'simple4405', 'simple7402', 'simple7405'.
+compositeC206 :: Parser Value
+compositeC206 =
+  composite "C206"
+    [ "010" .@ mandatory simple7402
+    , "020" .@ optional  simple7405
+    , "030" .@ optional  simple4405
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C208.hs b/specification/src/Text/Edifact/D96A/Composites/C208.hs
new file mode 100644
index 0000000..c9652cc
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C208.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C208
+  ( -- * Definition
+    compositeC208
+    -- * Dependencies
+  , simple7402
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7402)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C208  IDENTITY NUMBER RANGE
+-- >
+-- >       Desc: Goods item identification numbers, start and end of
+-- >             consecutively numbered range.
+-- >
+-- > 010   7402   Identity number                               M  an..35
+-- > 020   7402   Identity number                               C  an..35
+--
+-- Dependencies: 'simple7402'.
+compositeC208 :: Parser Value
+compositeC208 =
+  composite "C208"
+    [ "010" .@ mandatory simple7402
+    , "020" .@ optional  simple7402
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C210.hs b/specification/src/Text/Edifact/D96A/Composites/C210.hs
new file mode 100644
index 0000000..f1732ba
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C210.hs
@@ -0,0 +1,49 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C210
+  ( -- * Definition
+    compositeC210
+    -- * Dependencies
+  , simple7102
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7102)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >     | C210  MARKS & LABELS
+-- >
+-- >     | Desc: Shipping marks on packages in free text; one to ten lines.
+-- >
+-- > 010   7102   Shipping marks                                M  an..35
+-- > 020   7102   Shipping marks                                C  an..35
+-- > 030   7102   Shipping marks                                C  an..35
+-- > 040   7102   Shipping marks                                C  an..35
+-- > 050   7102   Shipping marks                                C  an..35
+-- > 060   7102   Shipping marks                                C  an..35
+-- > 070   7102   Shipping marks                                C  an..35
+-- > 080   7102   Shipping marks                                C  an..35
+-- > 090   7102   Shipping marks                                C  an..35
+-- > 100   7102   Shipping marks                                C  an..35
+--
+-- Dependencies: 'simple7102'.
+compositeC210 :: Parser Value
+compositeC210 =
+  composite "C210"
+    [ "010" .@ mandatory simple7102
+    , "020" .@ optional  simple7102
+    , "030" .@ optional  simple7102
+    , "040" .@ optional  simple7102
+    , "050" .@ optional  simple7102
+    , "060" .@ optional  simple7102
+    , "070" .@ optional  simple7102
+    , "080" .@ optional  simple7102
+    , "090" .@ optional  simple7102
+    , "100" .@ optional  simple7102
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C211.hs b/specification/src/Text/Edifact/D96A/Composites/C211.hs
new file mode 100644
index 0000000..cd54f20
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C211.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C211
+  ( -- * Definition
+    compositeC211
+    -- * Dependencies
+  , simple6008
+  , simple6140
+  , simple6168
+  , simple6411
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6008, simple6140, simple6168,
+                                            simple6411)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C211  DIMENSIONS
+-- >
+-- >       Desc: Specification of the dimensions of a transportable unit.
+-- >
+-- > 010   6411   Measure unit qualifier                        M  an..3
+-- > 020   6168   Length dimension                              C  n..15
+-- > 030   6140   Width dimension                               C  n..15
+-- > 040   6008   Height dimension                              C  n..15
+--
+-- Dependencies: 'simple6008', 'simple6140', 'simple6168', 'simple6411'.
+compositeC211 :: Parser Value
+compositeC211 =
+  composite "C211"
+    [ "010" .@ mandatory simple6411
+    , "020" .@ optional  simple6168
+    , "030" .@ optional  simple6140
+    , "040" .@ optional  simple6008
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C212.hs b/specification/src/Text/Edifact/D96A/Composites/C212.hs
new file mode 100644
index 0000000..c6faaae
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C212.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C212
+  ( -- * Definition
+    compositeC212
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7140
+  , simple7143
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7140,
+                                            simple7143)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C212  ITEM NUMBER IDENTIFICATION
+-- >
+-- >       Desc: Goods identification for a specified source.
+-- >
+-- > 010   7140   Item number                                   C  an..35
+-- > 020   7143   Item number type, coded                       C  an..3
+-- > 030   1131   Code list qualifier                           C  an..3
+-- > 040   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7140', 'simple7143'.
+compositeC212 :: Parser Value
+compositeC212 =
+  composite "C212"
+    [ "010" .@ optional  simple7140
+    , "020" .@ optional  simple7143
+    , "030" .@ optional  simple1131
+    , "040" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C213.hs b/specification/src/Text/Edifact/D96A/Composites/C213.hs
new file mode 100644
index 0000000..cf3fc36
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C213.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C213
+  ( -- * Definition
+    compositeC213
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7064
+  , simple7065
+  , simple7224
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7064,
+                                            simple7065, simple7224)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C213  NUMBER AND TYPE OF PACKAGES
+-- >
+-- >       Desc: Number and type of individual parts of a shipment.
+-- >
+-- > 010   7224   Number of packages                            C  n..8
+-- > 020   7065   Type of packages identification               C  an..17
+-- > 030   1131   Code list qualifier                           C  an..3
+-- > 040   3055   Code list responsible agency, coded           C  an..3
+-- > 050   7064   Type of packages                              C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7064', 'simple7065', 'simple7224'.
+compositeC213 :: Parser Value
+compositeC213 =
+  composite "C213"
+    [ "010" .@ optional  simple7224
+    , "020" .@ optional  simple7065
+    , "030" .@ optional  simple1131
+    , "040" .@ optional  simple3055
+    , "050" .@ optional  simple7064
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C214.hs b/specification/src/Text/Edifact/D96A/Composites/C214.hs
new file mode 100644
index 0000000..2f7180c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C214.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C214
+  ( -- * Definition
+    compositeC214
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7160
+  , simple7161
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7160,
+                                            simple7161)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >     * C214  SPECIAL SERVICES IDENTIFICATION
+-- >
+-- >       Desc: Identification of a special service by a code from a
+-- >             specified source or by description.
+-- >
+-- > 010   7161   Special services, coded                       C  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   7160   Special service                               C  an..35
+-- > 050 + 7160   Special service                               C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7160', 'simple7161'.
+compositeC214 :: Parser Value
+compositeC214 =
+  composite "C214"
+    [ "010" .@ optional  simple7161
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple7160
+    , "050" .@ optional  simple7160
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C215.hs b/specification/src/Text/Edifact/D96A/Composites/C215.hs
new file mode 100644
index 0000000..ae355b2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C215.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C215
+  ( -- * Definition
+    compositeC215
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple9302
+  , simple9303
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple9302,
+                                            simple9303)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C215  SEAL ISSUER
+-- >
+-- >       Desc: Identification of the issuer of a seal on equipment either
+-- >             by code or by name.
+-- >
+-- > 010   9303   Sealing party, coded                          C  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   9302   Sealing party                                 C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple9302', 'simple9303'.
+compositeC215 :: Parser Value
+compositeC215 =
+  composite "C215"
+    [ "010" .@ optional  simple9303
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple9302
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C218.hs b/specification/src/Text/Edifact/D96A/Composites/C218.hs
new file mode 100644
index 0000000..80f5a8d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C218.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C218
+  ( -- * Definition
+    compositeC218
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7419
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7419)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C218  HAZARDOUS MATERIAL
+-- >
+-- >       Desc: Hazardous material code from a specified source.
+-- >
+-- > 010   7419   Hazardous material class code, identification C  an..4
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7419'.
+compositeC218 :: Parser Value
+compositeC218 =
+  composite "C218"
+    [ "010" .@ optional  simple7419
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C219.hs b/specification/src/Text/Edifact/D96A/Composites/C219.hs
new file mode 100644
index 0000000..df98581
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C219.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C219
+  ( -- * Definition
+    compositeC219
+    -- * Dependencies
+  , simple8334
+  , simple8335
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8334, simple8335)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C219  MOVEMENT TYPE
+-- >
+-- >       Desc: Description of type of service for movement of cargo.
+-- >
+-- > 010   8335   Movement type, coded                          C  an..3
+-- > 020   8334   Movement type                                 C  an..35
+--
+-- Dependencies: 'simple8334', 'simple8335'.
+compositeC219 :: Parser Value
+compositeC219 =
+  composite "C219"
+    [ "010" .@ optional  simple8335
+    , "020" .@ optional  simple8334
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C220.hs b/specification/src/Text/Edifact/D96A/Composites/C220.hs
new file mode 100644
index 0000000..480c86d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C220.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C220
+  ( -- * Definition
+    compositeC220
+    -- * Dependencies
+  , simple8066
+  , simple8067
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8066, simple8067)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C220  MODE OF TRANSPORT
+-- >
+-- >       Desc: Method of transport code or name. Code preferred.
+-- >
+-- > 010   8067   Mode of transport, coded                      C  an..3
+-- > 020   8066   Mode of transport                             C  an..17
+--
+-- Dependencies: 'simple8066', 'simple8067'.
+compositeC220 :: Parser Value
+compositeC220 =
+  composite "C220"
+    [ "010" .@ optional  simple8067
+    , "020" .@ optional  simple8066
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C222.hs b/specification/src/Text/Edifact/D96A/Composites/C222.hs
new file mode 100644
index 0000000..5f5b116
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C222.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C222
+  ( -- * Definition
+    compositeC222
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple8212
+  , simple8213
+  , simple8453
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple8212,
+                                            simple8213, simple8453)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C222  TRANSPORT IDENTIFICATION
+-- >
+-- >       Desc: Code and/or name identifying the means of transport.
+-- >
+-- > 010   8213   Id. of means of transport identification      C  an..9
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   8212   Id. of the means of transport                 C  an..35
+-- > 050   8453   Nationality of means of transport, coded      C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple8212', 'simple8213', 'simple8453'.
+compositeC222 :: Parser Value
+compositeC222 =
+  composite "C222"
+    [ "010" .@ optional  simple8213
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple8212
+    , "050" .@ optional  simple8453
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C223.hs b/specification/src/Text/Edifact/D96A/Composites/C223.hs
new file mode 100644
index 0000000..9f39949
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C223.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C223
+  ( -- * Definition
+    compositeC223
+    -- * Dependencies
+  , simple6411
+  , simple7106
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6411, simple7106)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C223  DANGEROUS GOODS SHIPMENT FLASHPOINT
+-- >
+-- >       Desc: Temperature at which a vapor according to ISO 1523/73 can
+-- >             be ignited.
+-- >
+-- > 010   7106   Shipment flashpoint                           C  n3
+-- > 020   6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'simple6411', 'simple7106'.
+compositeC223 :: Parser Value
+compositeC223 =
+  composite "C223"
+    [ "010" .@ optional  simple7106
+    , "020" .@ optional  simple6411
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C224.hs b/specification/src/Text/Edifact/D96A/Composites/C224.hs
new file mode 100644
index 0000000..a352d7e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C224.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C224
+  ( -- * Definition
+    compositeC224
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple8154
+  , simple8155
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple8154,
+                                            simple8155)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C224  EQUIPMENT SIZE AND TYPE
+-- >
+-- >       Desc: Code and/or name identifying size and type of equipment
+-- >             used in transport. Code preferred.
+-- >
+-- > 010   8155   Equipment size and type identification        C  an..10
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   8154   Equipment size and type                       C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple8154', 'simple8155'.
+compositeC224 :: Parser Value
+compositeC224 =
+  composite "C224"
+    [ "010" .@ optional  simple8155
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple8154
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C228.hs b/specification/src/Text/Edifact/D96A/Composites/C228.hs
new file mode 100644
index 0000000..a44ac07
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C228.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C228
+  ( -- * Definition
+    compositeC228
+    -- * Dependencies
+  , simple8178
+  , simple8179
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8178, simple8179)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C228  TRANSPORT MEANS
+-- >
+-- >       Desc: Code and/or name identifying the type of means of
+-- >             transport.
+-- >
+-- > 010   8179   Type of means of transport identification     C  an..8
+-- > 020   8178   Type of means of transport                    C  an..17
+--
+-- Dependencies: 'simple8178', 'simple8179'.
+compositeC228 :: Parser Value
+compositeC228 =
+  composite "C228"
+    [ "010" .@ optional  simple8179
+    , "020" .@ optional  simple8178
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C229.hs b/specification/src/Text/Edifact/D96A/Composites/C229.hs
new file mode 100644
index 0000000..bb865d8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C229.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C229
+  ( -- * Definition
+    compositeC229
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple5237
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple5237)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C229  CHARGE CATEGORY
+-- >
+-- >       Desc: Identification of a category or a zone of charges.
+-- >
+-- > 010   5237   Charge category, coded                        M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple5237'.
+compositeC229 :: Parser Value
+compositeC229 =
+  composite "C229"
+    [ "010" .@ mandatory simple5237
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C231.hs b/specification/src/Text/Edifact/D96A/Composites/C231.hs
new file mode 100644
index 0000000..707fb5e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C231.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C231
+  ( -- * Definition
+    compositeC231
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4215
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4215)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C231  METHOD OF PAYMENT
+-- >
+-- >       Desc: Code identifying the method of payment.
+-- >
+-- > 010   4215   Transport charges method of payment, coded    M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4215'.
+compositeC231 :: Parser Value
+compositeC231 =
+  composite "C231"
+    [ "010" .@ mandatory simple4215
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C232.hs b/specification/src/Text/Edifact/D96A/Composites/C232.hs
new file mode 100644
index 0000000..d7d1b4b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C232.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C232
+  ( -- * Definition
+    compositeC232
+    -- * Dependencies
+  , simple9353
+  , simple9411
+  , simple9415
+  , simple9417
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple9353, simple9411, simple9415,
+                                            simple9417)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C232  GOVERNMENT ACTION
+-- >
+-- >       Desc: Code indicating a type of government action.
+-- >
+-- > 010   9415   Government agency, coded                      C  an..3
+-- > 020   9411   Government involvement, coded                 C  an..3
+-- > 030   9417   Government action, coded                      C  an..3
+-- > 040   9353   Government procedure, coded                   C  an..3
+--
+-- Dependencies: 'simple9353', 'simple9411', 'simple9415', 'simple9417'.
+compositeC232 :: Parser Value
+compositeC232 =
+  composite "C232"
+    [ "010" .@ optional  simple9415
+    , "020" .@ optional  simple9411
+    , "030" .@ optional  simple9417
+    , "040" .@ optional  simple9353
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C233.hs b/specification/src/Text/Edifact/D96A/Composites/C233.hs
new file mode 100644
index 0000000..de37b8f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C233.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C233
+  ( -- * Definition
+    compositeC233
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7273
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7273)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >     | C233  SERVICE
+-- >
+-- >     | Desc: To identify a service (which may constitute an additional
+-- >             component to a basic contract).
+-- >
+-- > 010   7273   Service requirement, coded                    M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   7273   Service requirement, coded                    C  an..3
+-- > 050   1131   Code list qualifier                           C  an..3
+-- > 060   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7273'.
+compositeC233 :: Parser Value
+compositeC233 =
+  composite "C233"
+    [ "010" .@ mandatory simple7273
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple7273
+    , "050" .@ optional  simple1131
+    , "060" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C234.hs b/specification/src/Text/Edifact/D96A/Composites/C234.hs
new file mode 100644
index 0000000..38ef543
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C234.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C234
+  ( -- * Definition
+    compositeC234
+    -- * Dependencies
+  , simple7088
+  , simple7124
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7088, simple7124)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C234  UNDG INFORMATION
+-- >
+-- >       Desc: Information on United Nations Dangerous Goods
+-- >             classification.
+-- >
+-- > 010   7124   UNDG number                                   C  n4
+-- > 020   7088   Dangerous goods flashpoint                    C  an..8
+--
+-- Dependencies: 'simple7088', 'simple7124'.
+compositeC234 :: Parser Value
+compositeC234 =
+  composite "C234"
+    [ "010" .@ optional  simple7124
+    , "020" .@ optional  simple7088
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C235.hs b/specification/src/Text/Edifact/D96A/Composites/C235.hs
new file mode 100644
index 0000000..966f312
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C235.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C235
+  ( -- * Definition
+    compositeC235
+    -- * Dependencies
+  , simple8158
+  , simple8186
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8158, simple8186)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C235  HAZARD IDENTIFICATION
+-- >
+-- >       Desc: Identification of the Orange placard required on the means
+-- >             of transport.
+-- >
+-- > 010   8158   Hazard identification number, upper part      C  an..4
+-- > 020   8186   Substance identification number, lower part   C  an4
+--
+-- Dependencies: 'simple8158', 'simple8186'.
+compositeC235 :: Parser Value
+compositeC235 =
+  composite "C235"
+    [ "010" .@ optional  simple8158
+    , "020" .@ optional  simple8186
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C236.hs b/specification/src/Text/Edifact/D96A/Composites/C236.hs
new file mode 100644
index 0000000..5e1455f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C236.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C236
+  ( -- * Definition
+    compositeC236
+    -- * Dependencies
+  , simple8246
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8246)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C236  DANGEROUS GOODS LABEL
+-- >
+-- >       Desc: Markings identifying the type of hazardous goods and
+-- >             similar information.
+-- >
+-- > 010   8246   Dangerous goods label marking                 C  an..4
+-- > 020   8246   Dangerous goods label marking                 C  an..4
+-- > 030   8246   Dangerous goods label marking                 C  an..4
+--
+-- Dependencies: 'simple8246'.
+compositeC236 :: Parser Value
+compositeC236 =
+  composite "C236"
+    [ "010" .@ optional  simple8246
+    , "020" .@ optional  simple8246
+    , "030" .@ optional  simple8246
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C237.hs b/specification/src/Text/Edifact/D96A/Composites/C237.hs
new file mode 100644
index 0000000..d8136b6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C237.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C237
+  ( -- * Definition
+    compositeC237
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple3207
+  , simple8260
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple3207,
+                                            simple8260)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C237  EQUIPMENT IDENTIFICATION
+-- >
+-- >       Desc: Marks (letters and/or numbers) identifying equipment used
+-- >             for transport such as a container.
+-- >
+-- > 010   8260   Equipment identification number               C  an..17
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   3207   Country, coded                                C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple3207', 'simple8260'.
+compositeC237 :: Parser Value
+compositeC237 =
+  composite "C237"
+    [ "010" .@ optional  simple8260
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple3207
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C239.hs b/specification/src/Text/Edifact/D96A/Composites/C239.hs
new file mode 100644
index 0000000..940362e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C239.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C239
+  ( -- * Definition
+    compositeC239
+    -- * Dependencies
+  , simple6246
+  , simple6411
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6246, simple6411)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C239  TEMPERATURE SETTING
+-- >
+-- >       Desc: The temperature under which the goods are (to be) stored
+-- >             or shipped.
+-- >
+-- > 010   6246   Temperature setting                           C  n3
+-- > 020   6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'simple6246', 'simple6411'.
+compositeC239 :: Parser Value
+compositeC239 =
+  composite "C239"
+    [ "010" .@ optional  simple6246
+    , "020" .@ optional  simple6411
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C270.hs b/specification/src/Text/Edifact/D96A/Composites/C270.hs
new file mode 100644
index 0000000..c6f0dd5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C270.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C270
+  ( -- * Definition
+    compositeC270
+    -- * Dependencies
+  , simple6066
+  , simple6069
+  , simple6411
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6066, simple6069, simple6411)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C270  CONTROL
+-- >
+-- >       Desc: Control total for checking integrity of a message or part
+-- >             of a message.
+-- >
+-- > 010   6069   Control qualifier                             M  an..3
+-- > 020   6066   Control value                                 M  n..18
+-- > 030   6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'simple6066', 'simple6069', 'simple6411'.
+compositeC270 :: Parser Value
+compositeC270 =
+  composite "C270"
+    [ "010" .@ mandatory simple6069
+    , "020" .@ mandatory simple6066
+    , "030" .@ optional  simple6411
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C273.hs b/specification/src/Text/Edifact/D96A/Composites/C273.hs
new file mode 100644
index 0000000..a15df97
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C273.hs
@@ -0,0 +1,46 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C273
+  ( -- * Definition
+    compositeC273
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple3453
+  , simple7008
+  , simple7009
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple3453,
+                                            simple7008, simple7009)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >    *| C273  ITEM DESCRIPTION
+-- >
+-- >     | Desc: Description of an item.
+-- >
+-- > 010   7009   Item description identification               C  an..17
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   7008   Item description                              C  an..35
+-- > 050   7008   Item description                              C  an..35
+-- > 060 + 3453   Language, coded                               C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple3453', 'simple7008', 'simple7009'.
+compositeC273 :: Parser Value
+compositeC273 =
+  composite "C273"
+    [ "010" .@ optional  simple7009
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple7008
+    , "050" .@ optional  simple7008
+    , "060" .@ optional  simple3453
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C279.hs b/specification/src/Text/Edifact/D96A/Composites/C279.hs
new file mode 100644
index 0000000..03ada5a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C279.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C279
+  ( -- * Definition
+    compositeC279
+    -- * Dependencies
+  , simple6063
+  , simple6064
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6063, simple6064)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C279  QUANTITY DIFFERENCE INFORMATION
+-- >
+-- >       Desc: Information on quantity difference.
+-- >
+-- > 010   6064   Quantity difference                           M  n..15
+-- > 020   6063   Quantity qualifier                            C  an..3
+--
+-- Dependencies: 'simple6063', 'simple6064'.
+compositeC279 :: Parser Value
+compositeC279 =
+  composite "C279"
+    [ "010" .@ mandatory simple6064
+    , "020" .@ optional  simple6063
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C280.hs b/specification/src/Text/Edifact/D96A/Composites/C280.hs
new file mode 100644
index 0000000..254ba92
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C280.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C280
+  ( -- * Definition
+    compositeC280
+    -- * Dependencies
+  , simple6152
+  , simple6162
+  , simple6411
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6152, simple6162, simple6411)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C280  RANGE
+-- >
+-- >       Desc: Range minimum and maximum limits.
+-- >
+-- > 010   6411   Measure unit qualifier                        M  an..3
+-- > 020   6162   Range minimum                                 C  n..18
+-- > 030   6152   Range maximum                                 C  n..18
+--
+-- Dependencies: 'simple6152', 'simple6162', 'simple6411'.
+compositeC280 :: Parser Value
+compositeC280 =
+  composite "C280"
+    [ "010" .@ mandatory simple6411
+    , "020" .@ optional  simple6162
+    , "030" .@ optional  simple6152
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C401.hs b/specification/src/Text/Edifact/D96A/Composites/C401.hs
new file mode 100644
index 0000000..3a07949
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C401.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C401
+  ( -- * Definition
+    compositeC401
+    -- * Dependencies
+  , simple7130
+  , simple8457
+  , simple8459
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7130, simple8457, simple8459)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C401  EXCESS TRANSPORTATION INFORMATION
+-- >
+-- >       Desc: To provide details of reason for, and responsibility for,
+-- >             use of transportation other than normally utilized.
+-- >
+-- > 010   8457   Excess transportation reason, coded           M  an..3
+-- > 020   8459   Excess transportation responsibility, coded   M  an..3
+-- > 030   7130   Customer authorization number                 C  an..17
+--
+-- Dependencies: 'simple7130', 'simple8457', 'simple8459'.
+compositeC401 :: Parser Value
+compositeC401 =
+  composite "C401"
+    [ "010" .@ mandatory simple8457
+    , "020" .@ mandatory simple8459
+    , "030" .@ optional  simple7130
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C402.hs b/specification/src/Text/Edifact/D96A/Composites/C402.hs
new file mode 100644
index 0000000..3c9e8e4
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C402.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C402
+  ( -- * Definition
+    compositeC402
+    -- * Dependencies
+  , simple7064
+  , simple7077
+  , simple7143
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7064, simple7077, simple7143)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C402  PACKAGE TYPE IDENTIFICATION
+-- >
+-- >       Desc: Identification of the form in which goods are described.
+-- >
+-- > 010   7077   Item description type, coded                  M  an..3
+-- > 020   7064   Type of packages                              M  an..35
+-- > 030   7143   Item number type, coded                       C  an..3
+-- > 040   7064   Type of packages                              C  an..35
+-- > 050   7143   Item number type, coded                       C  an..3
+--
+-- Dependencies: 'simple7064', 'simple7077', 'simple7143'.
+compositeC402 :: Parser Value
+compositeC402 =
+  composite "C402"
+    [ "010" .@ mandatory simple7077
+    , "020" .@ mandatory simple7064
+    , "030" .@ optional  simple7143
+    , "040" .@ optional  simple7064
+    , "050" .@ optional  simple7143
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C501.hs b/specification/src/Text/Edifact/D96A/Composites/C501.hs
new file mode 100644
index 0000000..910660a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C501.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C501
+  ( -- * Definition
+    compositeC501
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple5245
+  , simple5249
+  , simple5482
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple5245,
+                                            simple5249, simple5482)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C501  PERCENTAGE DETAILS
+-- >
+-- >       Desc: Percentage relating to a specified basis.
+-- >
+-- > 010   5245   Percentage qualifier                          M  an..3
+-- > 020   5482   Percentage                                    C  n..10
+-- > 030   5249   Percentage basis, coded                       C  an..3
+-- > 040   1131   Code list qualifier                           C  an..3
+-- > 050   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple5245', 'simple5249', 'simple5482'.
+compositeC501 :: Parser Value
+compositeC501 =
+  composite "C501"
+    [ "010" .@ mandatory simple5245
+    , "020" .@ optional  simple5482
+    , "030" .@ optional  simple5249
+    , "040" .@ optional  simple1131
+    , "050" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C502.hs b/specification/src/Text/Edifact/D96A/Composites/C502.hs
new file mode 100644
index 0000000..6f33aef
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C502.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C502
+  ( -- * Definition
+    compositeC502
+    -- * Dependencies
+  , simple6154
+  , simple6155
+  , simple6313
+  , simple6321
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6154, simple6155, simple6313,
+                                            simple6321)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C502  MEASUREMENT DETAILS
+-- >
+-- >       Desc: Identification of measurement type.
+-- >
+-- > 010   6313   Measurement dimension, coded                  C  an..3
+-- > 020   6321   Measurement significance, coded               C  an..3
+-- > 030   6155   Measurement attribute, coded                  C  an..3
+-- > 040   6154   Measurement attribute                         C  an..70
+--
+-- Dependencies: 'simple6154', 'simple6155', 'simple6313', 'simple6321'.
+compositeC502 :: Parser Value
+compositeC502 =
+  composite "C502"
+    [ "010" .@ optional  simple6313
+    , "020" .@ optional  simple6321
+    , "030" .@ optional  simple6155
+    , "040" .@ optional  simple6154
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C503.hs b/specification/src/Text/Edifact/D96A/Composites/C503.hs
new file mode 100644
index 0000000..059b89b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C503.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C503
+  ( -- * Definition
+    compositeC503
+    -- * Dependencies
+  , simple1004
+  , simple1366
+  , simple1373
+  , simple3453
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1004, simple1366, simple1373,
+                                            simple3453)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C503  DOCUMENT/MESSAGE DETAILS
+-- >
+-- >       Desc: Identification of document/message by number, status,
+-- >             source and/or language.
+-- >
+-- > 010   1004   Document/message number                       C  an..35
+-- > 020   1373   Document/message status, coded                C  an..3
+-- > 030   1366   Document/message source                       C  an..35
+-- > 040   3453   Language, coded                               C  an..3
+--
+-- Dependencies: 'simple1004', 'simple1366', 'simple1373', 'simple3453'.
+compositeC503 :: Parser Value
+compositeC503 =
+  composite "C503"
+    [ "010" .@ optional  simple1004
+    , "020" .@ optional  simple1373
+    , "030" .@ optional  simple1366
+    , "040" .@ optional  simple3453
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C504.hs b/specification/src/Text/Edifact/D96A/Composites/C504.hs
new file mode 100644
index 0000000..3567f4b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C504.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C504
+  ( -- * Definition
+    compositeC504
+    -- * Dependencies
+  , simple6343
+  , simple6345
+  , simple6347
+  , simple6348
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6343, simple6345, simple6347,
+                                            simple6348)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C504  CURRENCY DETAILS
+-- >
+-- >       Desc: The usage to which a currency relates.
+-- >
+-- > 010   6347   Currency details qualifier                    M  an..3
+-- > 020   6345   Currency, coded                               C  an..3
+-- > 030   6343   Currency qualifier                            C  an..3
+-- > 040   6348   Currency rate base                            C  n..4
+--
+-- Dependencies: 'simple6343', 'simple6345', 'simple6347', 'simple6348'.
+compositeC504 :: Parser Value
+compositeC504 =
+  composite "C504"
+    [ "010" .@ mandatory simple6347
+    , "020" .@ optional  simple6345
+    , "030" .@ optional  simple6343
+    , "040" .@ optional  simple6348
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C506.hs b/specification/src/Text/Edifact/D96A/Composites/C506.hs
new file mode 100644
index 0000000..dc579e6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C506.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C506
+  ( -- * Definition
+    compositeC506
+    -- * Dependencies
+  , simple1153
+  , simple1154
+  , simple1156
+  , simple4000
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1153, simple1154, simple1156,
+                                            simple4000)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C506  REFERENCE
+-- >
+-- >       Desc: Identification of a reference.
+-- >
+-- > 010   1153   Reference qualifier                           M  an..3
+-- > 020   1154   Reference number                              C  an..35
+-- > 030   1156   Line number                                   C  an..6
+-- > 040   4000   Reference version number                      C  an..35
+--
+-- Dependencies: 'simple1153', 'simple1154', 'simple1156', 'simple4000'.
+compositeC506 :: Parser Value
+compositeC506 =
+  composite "C506"
+    [ "010" .@ mandatory simple1153
+    , "020" .@ optional  simple1154
+    , "030" .@ optional  simple1156
+    , "040" .@ optional  simple4000
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C507.hs b/specification/src/Text/Edifact/D96A/Composites/C507.hs
new file mode 100644
index 0000000..3a59df0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C507.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C507
+  ( -- * Definition
+    compositeC507
+    -- * Dependencies
+  , simple2005
+  , simple2379
+  , simple2380
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple2005, simple2379, simple2380)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C507  DATE/TIME/PERIOD
+-- >
+-- >       Desc: Date and/or time, or period relevant to the specified
+-- >             date/time/period type.
+-- >
+-- > 010   2005   Date/time/period qualifier                    M  an..3
+-- > 020   2380   Date/time/period                              C  an..35
+-- > 030   2379   Date/time/period format qualifier             C  an..3
+--
+-- Dependencies: 'simple2005', 'simple2379', 'simple2380'.
+compositeC507 :: Parser Value
+compositeC507 =
+  composite "C507"
+    [ "010" .@ mandatory simple2005
+    , "020" .@ optional  simple2380
+    , "030" .@ optional  simple2379
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C509.hs b/specification/src/Text/Edifact/D96A/Composites/C509.hs
new file mode 100644
index 0000000..1903b5e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C509.hs
@@ -0,0 +1,47 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C509
+  ( -- * Definition
+    compositeC509
+    -- * Dependencies
+  , simple5118
+  , simple5125
+  , simple5284
+  , simple5375
+  , simple5387
+  , simple6411
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple5118, simple5125, simple5284,
+                                            simple5375, simple5387, simple6411)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C509  PRICE INFORMATION
+-- >
+-- >       Desc: Identification of price type, price and related details.
+-- >
+-- > 010   5125   Price qualifier                               M  an..3
+-- > 020   5118   Price                                         C  n..15
+-- > 030   5375   Price type, coded                             C  an..3
+-- > 040   5387   Price type qualifier                          C  an..3
+-- > 050   5284   Unit price basis                              C  n..9
+-- > 060   6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'simple5118', 'simple5125', 'simple5284', 'simple5375', 'simple5387', 'simple6411'.
+compositeC509 :: Parser Value
+compositeC509 =
+  composite "C509"
+    [ "010" .@ mandatory simple5125
+    , "020" .@ optional  simple5118
+    , "030" .@ optional  simple5375
+    , "040" .@ optional  simple5387
+    , "050" .@ optional  simple5284
+    , "060" .@ optional  simple6411
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C516.hs b/specification/src/Text/Edifact/D96A/Composites/C516.hs
new file mode 100644
index 0000000..d850263
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C516.hs
@@ -0,0 +1,45 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C516
+  ( -- * Definition
+    compositeC516
+    -- * Dependencies
+  , simple4405
+  , simple5004
+  , simple5025
+  , simple6343
+  , simple6345
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple4405, simple5004, simple5025,
+                                            simple6343, simple6345)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C516  MONETARY AMOUNT
+-- >
+-- >       Desc: Amount of goods or services stated as a monetary amount in
+-- >             a specified currency.
+-- >
+-- > 010   5025   Monetary amount type qualifier                M  an..3
+-- > 020   5004   Monetary amount                               C  n..18
+-- > 030   6345   Currency, coded                               C  an..3
+-- > 040   6343   Currency qualifier                            C  an..3
+-- > 050   4405   Status, coded                                 C  an..3
+--
+-- Dependencies: 'simple4405', 'simple5004', 'simple5025', 'simple6343', 'simple6345'.
+compositeC516 :: Parser Value
+compositeC516 =
+  composite "C516"
+    [ "010" .@ mandatory simple5025
+    , "020" .@ optional  simple5004
+    , "030" .@ optional  simple6345
+    , "040" .@ optional  simple6343
+    , "050" .@ optional  simple4405
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C517.hs b/specification/src/Text/Edifact/D96A/Composites/C517.hs
new file mode 100644
index 0000000..a108195
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C517.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C517
+  ( -- * Definition
+    compositeC517
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple3224
+  , simple3225
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple3224,
+                                            simple3225)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C517  LOCATION IDENTIFICATION
+-- >
+-- >       Desc: Identification of a location by code or name.
+-- >
+-- > 010   3225   Place/location identification                 C  an..25
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   3224   Place/location                                C  an..70
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple3224', 'simple3225'.
+compositeC517 :: Parser Value
+compositeC517 =
+  composite "C517"
+    [ "010" .@ optional  simple3225
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple3224
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C519.hs b/specification/src/Text/Edifact/D96A/Composites/C519.hs
new file mode 100644
index 0000000..3cf59e6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C519.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C519
+  ( -- * Definition
+    compositeC519
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple3222
+  , simple3223
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple3222,
+                                            simple3223)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C519  RELATED LOCATION ONE IDENTIFICATION
+-- >
+-- >       Desc: Identification the first related location by code or name.
+-- >
+-- > 010   3223   Related place/location one identification     C  an..25
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   3222   Related place/location one                    C  an..70
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple3222', 'simple3223'.
+compositeC519 :: Parser Value
+compositeC519 =
+  composite "C519"
+    [ "010" .@ optional  simple3223
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple3222
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C522.hs b/specification/src/Text/Edifact/D96A/Composites/C522.hs
new file mode 100644
index 0000000..43af74f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C522.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C522
+  ( -- * Definition
+    compositeC522
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4400
+  , simple4401
+  , simple4403
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4400,
+                                            simple4401, simple4403)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C522  INSTRUCTION
+-- >
+-- >       Desc: To specify an instruction.
+-- >
+-- > 010   4403   Instruction qualifier                         M  an..3
+-- > 020   4401   Instruction, coded                            C  an..3
+-- > 030   1131   Code list qualifier                           C  an..3
+-- > 040   3055   Code list responsible agency, coded           C  an..3
+-- > 050   4400   Instruction                                   C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4400', 'simple4401', 'simple4403'.
+compositeC522 :: Parser Value
+compositeC522 =
+  composite "C522"
+    [ "010" .@ mandatory simple4403
+    , "020" .@ optional  simple4401
+    , "030" .@ optional  simple1131
+    , "040" .@ optional  simple3055
+    , "050" .@ optional  simple4400
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C523.hs b/specification/src/Text/Edifact/D96A/Composites/C523.hs
new file mode 100644
index 0000000..f45b6a3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C523.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C523
+  ( -- * Definition
+    compositeC523
+    -- * Dependencies
+  , simple6350
+  , simple6353
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple6350, simple6353)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C523  NUMBER OF UNIT DETAILS
+-- >
+-- >       Desc: Identification of number of units and its purpose.
+-- >
+-- > 010   6350   Number of units                               C  n..15
+-- > 020   6353   Number of units qualifier                     C  an..3
+--
+-- Dependencies: 'simple6350', 'simple6353'.
+compositeC523 :: Parser Value
+compositeC523 =
+  composite "C523"
+    [ "010" .@ optional  simple6350
+    , "020" .@ optional  simple6353
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C524.hs b/specification/src/Text/Edifact/D96A/Composites/C524.hs
new file mode 100644
index 0000000..f3a0239
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C524.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C524
+  ( -- * Definition
+    compositeC524
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4078
+  , simple4079
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4078,
+                                            simple4079)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C524  HANDLING INSTRUCTIONS
+-- >
+-- >       Desc: Instruction for the handling of goods, products or
+-- >             articles in shipment, storage etc.
+-- >
+-- > 010   4079   Handling instructions, coded                  C  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   4078   Handling instructions                         C  an..70
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4078', 'simple4079'.
+compositeC524 :: Parser Value
+compositeC524 =
+  composite "C524"
+    [ "010" .@ optional  simple4079
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple4078
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C528.hs b/specification/src/Text/Edifact/D96A/Composites/C528.hs
new file mode 100644
index 0000000..e675186
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C528.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C528
+  ( -- * Definition
+    compositeC528
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7357
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7357)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C528  COMMODITY/RATE DETAIL
+-- >
+-- >       Desc: Identification of commodity/rates.
+-- >
+-- > 010   7357   Commodity/rate identification                 C  an..18
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7357'.
+compositeC528 :: Parser Value
+compositeC528 =
+  composite "C528"
+    [ "010" .@ optional  simple7357
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C531.hs b/specification/src/Text/Edifact/D96A/Composites/C531.hs
new file mode 100644
index 0000000..735787d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C531.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C531
+  ( -- * Definition
+    compositeC531
+    -- * Dependencies
+  , simple7073
+  , simple7075
+  , simple7233
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7073, simple7075, simple7233)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C531  PACKAGING DETAILS
+-- >
+-- >       Desc: Packaging level and details, terms and conditions.
+-- >
+-- > 010   7075   Packaging level, coded                        C  an..3
+-- > 020   7233   Packaging related information, coded          C  an..3
+-- > 030   7073   Packaging terms and conditions, coded         C  an..3
+--
+-- Dependencies: 'simple7073', 'simple7075', 'simple7233'.
+compositeC531 :: Parser Value
+compositeC531 =
+  composite "C531"
+    [ "010" .@ optional  simple7075
+    , "020" .@ optional  simple7233
+    , "030" .@ optional  simple7073
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C532.hs b/specification/src/Text/Edifact/D96A/Composites/C532.hs
new file mode 100644
index 0000000..79ef7e2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C532.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C532
+  ( -- * Definition
+    compositeC532
+    -- * Dependencies
+  , simple8393
+  , simple8395
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple8393, simple8395)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C532  RETURNABLE PACKAGE DETAILS
+-- >
+-- >       Desc: Indication of responsibility for payment and load contents
+-- >             of returnable packages.
+-- >
+-- > 010   8395   Returnable package freight payment            C  an..3
+-- >              responsibility, coded
+-- > 020   8393   Returnable package load contents, coded       C  an..3
+--
+-- Dependencies: 'simple8393', 'simple8395'.
+compositeC532 :: Parser Value
+compositeC532 =
+  composite "C532"
+    [ "010" .@ optional  simple8395
+    , "020" .@ optional  simple8393
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C536.hs b/specification/src/Text/Edifact/D96A/Composites/C536.hs
new file mode 100644
index 0000000..bd1e75c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C536.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C536
+  ( -- * Definition
+    compositeC536
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4065
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4065)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C536  CONTRACT AND CARRIAGE CONDITION
+-- >
+-- >       Desc: To identify a contract and carriage condition.
+-- >
+-- > 010   4065   Contract and carriage condition, coded        M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4065'.
+compositeC536 :: Parser Value
+compositeC536 =
+  composite "C536"
+    [ "010" .@ mandatory simple4065
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C537.hs b/specification/src/Text/Edifact/D96A/Composites/C537.hs
new file mode 100644
index 0000000..a3f56a3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C537.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C537
+  ( -- * Definition
+    compositeC537
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4219
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4219)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C537  TRANSPORT PRIORITY
+-- >
+-- >       Desc: To indicate the priority of requested transport service.
+-- >
+-- > 010   4219   Transport priority, coded                     M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4219'.
+compositeC537 :: Parser Value
+compositeC537 =
+  composite "C537"
+    [ "010" .@ mandatory simple4219
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C553.hs b/specification/src/Text/Edifact/D96A/Composites/C553.hs
new file mode 100644
index 0000000..091f5e1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C553.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C553
+  ( -- * Definition
+    compositeC553
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple3232
+  , simple3233
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple3232,
+                                            simple3233)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C553  RELATED LOCATION TWO IDENTIFICATION
+-- >
+-- >       Desc: Identification of second related location by code or name.
+-- >
+-- > 010   3233   Related place/location two identification     C  an..25
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   3232   Related place/location two                    C  an..70
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple3232', 'simple3233'.
+compositeC553 :: Parser Value
+compositeC553 =
+  composite "C553"
+    [ "010" .@ optional  simple3233
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple3232
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C554.hs b/specification/src/Text/Edifact/D96A/Composites/C554.hs
new file mode 100644
index 0000000..f6b0c6d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C554.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C554
+  ( -- * Definition
+    compositeC554
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple5243
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple5243)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C554  RATE/TARIFF CLASS DETAIL
+-- >
+-- >       Desc: Identification of the applicable rate/tariff class.
+-- >
+-- > 010   5243   Rate/tariff class identification              C  an..9
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple5243'.
+compositeC554 :: Parser Value
+compositeC554 =
+  composite "C554"
+    [ "010" .@ optional  simple5243
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C555.hs b/specification/src/Text/Edifact/D96A/Composites/C555.hs
new file mode 100644
index 0000000..313cd6f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C555.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C555
+  ( -- * Definition
+    compositeC555
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple9010
+  , simple9011
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple9010,
+                                            simple9011)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C555  STATUS EVENT
+-- >
+-- >       Desc: To specify a status event.
+-- >
+-- > 010   9011   Status event, coded                           M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   9010   Status event                                  C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple9010', 'simple9011'.
+compositeC555 :: Parser Value
+compositeC555 =
+  composite "C555"
+    [ "010" .@ mandatory simple9011
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple9010
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C556.hs b/specification/src/Text/Edifact/D96A/Composites/C556.hs
new file mode 100644
index 0000000..be62b60
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C556.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C556
+  ( -- * Definition
+    compositeC556
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple9012
+  , simple9013
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple9012,
+                                            simple9013)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C556  STATUS REASON
+-- >
+-- >       Desc: To specify the reason behind a status event.
+-- >
+-- > 010   9013   Status reason, coded                          M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   9012   Status reason                                 C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple9012', 'simple9013'.
+compositeC556 :: Parser Value
+compositeC556 =
+  composite "C556"
+    [ "010" .@ mandatory simple9013
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple9012
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C601.hs b/specification/src/Text/Edifact/D96A/Composites/C601.hs
new file mode 100644
index 0000000..dc9dcf2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C601.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C601
+  ( -- * Definition
+    compositeC601
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple9015
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple9015)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C601  STATUS TYPE
+-- >
+-- >       Desc: To specify the type of status in relation to an industry
+-- >             sector or business function.
+-- >
+-- > 010   9015   Status type, coded                            M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple9015'.
+compositeC601 :: Parser Value
+compositeC601 =
+  composite "C601"
+    [ "010" .@ mandatory simple9015
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C703.hs b/specification/src/Text/Edifact/D96A/Composites/C703.hs
new file mode 100644
index 0000000..10948c9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C703.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C703
+  ( -- * Definition
+    compositeC703
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7085
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7085)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C703  NATURE OF CARGO
+-- >
+-- >       Desc: Rough classification of a type of cargo.
+-- >
+-- > 010   7085   Nature of cargo, coded                        M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7085'.
+compositeC703 :: Parser Value
+compositeC703 =
+  composite "C703"
+    [ "010" .@ mandatory simple7085
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C827.hs b/specification/src/Text/Edifact/D96A/Composites/C827.hs
new file mode 100644
index 0000000..87739c9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C827.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C827
+  ( -- * Definition
+    compositeC827
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple7511
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple7511)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C827  TYPE OF MARKING
+-- >
+-- >       Desc: Specification of the type of marking that reflects the
+-- >             method that was used and the conventions adhered to for
+-- >             marking (e.g. of packages).
+-- >
+-- > 010   7511   Type of marking, coded                        M  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple7511'.
+compositeC827 :: Parser Value
+compositeC827 =
+  composite "C827"
+    [ "010" .@ mandatory simple7511
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C829.hs b/specification/src/Text/Edifact/D96A/Composites/C829.hs
new file mode 100644
index 0000000..70a3b05
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C829.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C829
+  ( -- * Definition
+    compositeC829
+    -- * Dependencies
+  , simple1082
+  , simple5495
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1082, simple5495)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C829  SUB-LINE INFORMATION
+-- >
+-- >       Desc: To provide an indication that a segment or segment group
+-- >             is used to contain sub-line or sub-line item information
+-- >             and to optionally enable the sub-line to be identified.
+-- >
+-- > 010   5495   Sub-line indicator, coded                     C  an..3
+-- > 020   1082   Line item number                              C  n..6
+--
+-- Dependencies: 'simple1082', 'simple5495'.
+compositeC829 :: Parser Value
+compositeC829 =
+  composite "C829"
+    [ "010" .@ optional  simple5495
+    , "020" .@ optional  simple1082
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Composites/C960.hs b/specification/src/Text/Edifact/D96A/Composites/C960.hs
new file mode 100644
index 0000000..f399f9e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Composites/C960.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Composites.C960
+  ( -- * Definition
+    compositeC960
+    -- * Dependencies
+  , simple1131
+  , simple3055
+  , simple4294
+  , simple4295
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple1131, simple3055, simple4294,
+                                            simple4295)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       C960  REASON FOR CHANGE
+-- >
+-- >       Desc: Code and/or description of the reason for a change.
+-- >
+-- >       Note: This composite data element replaces composite C262 (which
+-- >             has been deleted in this directory).
+-- >
+-- > 010   4295   Change reason, coded                          C  an..3
+-- > 020   1131   Code list qualifier                           C  an..3
+-- > 030   3055   Code list responsible agency, coded           C  an..3
+-- > 040   4294   Change reason                                 C  an..35
+--
+-- Dependencies: 'simple1131', 'simple3055', 'simple4294', 'simple4295'.
+compositeC960 :: Parser Value
+compositeC960 =
+  composite "C960"
+    [ "010" .@ optional  simple4295
+    , "020" .@ optional  simple1131
+    , "030" .@ optional  simple3055
+    , "040" .@ optional  simple4294
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Messages.hs b/specification/src/Text/Edifact/D96A/Messages.hs
new file mode 100644
index 0000000..1f8ebd7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Messages.hs
@@ -0,0 +1,8 @@
+module Text.Edifact.D96A.Messages
+  ( module M
+  ) where
+
+import           Text.Edifact.D96A.Messages.DESADV as M
+import           Text.Edifact.D96A.Messages.IFCSUM as M
+import           Text.Edifact.D96A.Messages.IFTSAI as M
+import           Text.Edifact.D96A.Messages.IFTSTA as M
diff --git a/specification/src/Text/Edifact/D96A/Messages/DESADV.hs b/specification/src/Text/Edifact/D96A/Messages/DESADV.hs
new file mode 100644
index 0000000..9bc400b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Messages/DESADV.hs
@@ -0,0 +1,376 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Messages.DESADV
+  ( -- * Definition
+    messageDESADV
+    -- * Dependencies
+  , segmentALI
+  , segmentBGM
+  , segmentCNT
+  , segmentCOM
+  , segmentCPS
+  , segmentCTA
+  , segmentDGS
+  , segmentDLM
+  , segmentDTM
+  , segmentEQA
+  , segmentEQD
+  , segmentFTX
+  , segmentGIN
+  , segmentGIR
+  , segmentHAN
+  , segmentIMD
+  , segmentLIN
+  , segmentLOC
+  , segmentMEA
+  , segmentMOA
+  , segmentNAD
+  , segmentPAC
+  , segmentPCD
+  , segmentPCI
+  , segmentPIA
+  , segmentQTY
+  , segmentQVR
+  , segmentRFF
+  , segmentSEL
+  , segmentSGP
+  , segmentTDT
+  , segmentTOD
+  ) where
+
+import           Text.Edifact.Common.Segments
+
+import           Text.Edifact.D96A.Segments   (segmentALI, segmentBGM,
+                                               segmentCNT, segmentCOM,
+                                               segmentCPS, segmentCTA,
+                                               segmentDGS, segmentDLM,
+                                               segmentDTM, segmentEQA,
+                                               segmentEQD, segmentFTX,
+                                               segmentGIN, segmentGIR,
+                                               segmentHAN, segmentIMD,
+                                               segmentLIN, segmentLOC,
+                                               segmentMEA, segmentMOA,
+                                               segmentNAD, segmentPAC,
+                                               segmentPCD, segmentPCI,
+                                               segmentPIA, segmentQTY,
+                                               segmentQVR, segmentRFF,
+                                               segmentSEL, segmentSGP,
+                                               segmentTDT, segmentTOD)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- > 4.3    Message structure
+-- >
+-- > 4.3.1  Segment table
+-- >
+-- > Pos    Tag Name                                      S   R
+-- >
+-- >            HEADER SECTION
+-- >
+-- > 0010   UNH Message header                            M   1
+-- > 0020   BGM Beginning of message                      M   1
+-- > 0030   DTM Date/time/period                          C   10
+-- > 0040   ALI Additional information                    C   5
+-- > 0050   MEA Measurements                              C   5
+-- > 0060   MOA Monetary amount                           C   5
+-- >
+-- > 0070       ----- Segment group 1  ------------------ C   10----------+
+-- > 0080   RFF Reference                                 M   1           |
+-- > 0090   DTM Date/time/period                          C   1-----------+
+-- >
+-- > 0100       ----- Segment group 2  ------------------ C   10----------+
+-- > 0110   NAD Name and address                          M   1           |
+-- > 0120   LOC Place/location identification             C   10          |
+-- >                                                                      |
+-- > 0130       ----- Segment group 3  ------------------ C   10---------+|
+-- > 0140   RFF Reference                                 M   1          ||
+-- > 0150   DTM Date/time/period                          C   1----------+|
+-- >                                                                      |
+-- > 0160       ----- Segment group 4  ------------------ C   10---------+|
+-- > 0170   CTA Contact information                       M   1          ||
+-- > 0180   COM Communication contact                     C   5----------++
+-- >
+-- > 0190       ----- Segment group 5  ------------------ C   10----------+
+-- > 0200   TOD Terms of delivery or transport            M   1           |
+-- > 0210   LOC Place/location identification             C   5           |
+-- > 0220   FTX Free text                                 C   5-----------+
+-- >
+-- > 0230       ----- Segment group 6  ------------------ C   10----------+
+-- > 0240   TDT Details of transport                      M   1           |
+-- > 0250   PCD Percentage details                        C   6           |
+-- >                                                                      |
+-- > 0260       ----- Segment group 7  ------------------ C   10---------+|
+-- > 0270   LOC Place/location identification             M   1          ||
+-- > 0280   DTM Date/time/period                          C   10---------++
+-- >
+-- > 0290       ----- Segment group 8  ------------------ C   10----------+
+-- > 0300   EQD Equipment details                         M   1           |
+-- > 0310   MEA Measurements                              C   5           |
+-- > 0320   SEL Seal number                               C   25          |
+-- > 0330   EQA Attached equipment                        C   5           |
+-- >                                                                      |
+-- > 0340       ----- Segment group 9  ------------------ C   10---------+|
+-- > 0350   HAN Handling instructions                     M   1          ||
+-- > 0360   FTX Free text                                 C   10---------++
+-- >
+-- >            DETAIL SECTION
+-- >
+-- > 0370       ----- Segment group 10 ------------------ C   9999--------+
+-- > 0380   CPS Consignment packing sequence              M   1           |
+-- > 0390   FTX Free text                                 C   5           |
+-- >                                                                      |
+-- > 0400       ----- Segment group 11 ------------------ C   9999-------+|
+-- > 0410   PAC Package                                   M   1          ||
+-- > 0420   MEA Measurements                              C   10         ||
+-- > 0430   QTY Quantity                                  C   10         ||
+-- >                                                                     ||
+-- > 0440       ----- Segment group 12 ------------------ C   10--------+||
+-- > 0450   HAN Handling instructions                     M   1         |||
+-- > 0460   FTX Free text                                 C   10--------+||
+-- >                                                                     ||
+-- > 0470 *     ----- Segment group 13 ------------------ C   1000------+||
+-- > 0480   PCI Package identification                    M   1         |||
+-- > 0490   RFF Reference                                 C   1         |||
+-- > 0500   DTM Date/time/period                          C   5         |||
+-- > 0510 * GIR Related identification numbers            C   99        |||
+-- >                                                                    |||
+-- > 0520       ----- Segment group 14 ------------------ C   99-------+|||
+-- > 0530   GIN Goods identity number                     M   1        ||||
+-- > 0540   DLM Delivery limitations                      C   10-------+++|
+-- >                                                                      |
+-- > 0550       ----- Segment group 15 ------------------ C   9999-------+|
+-- > 0560   LIN Line item                                 M   1          ||
+-- > 0570   PIA Additional product id                     C   10         ||
+-- > 0580   IMD Item description                          C   25         ||
+-- > 0590   MEA Measurements                              C   10         ||
+-- > 0600   QTY Quantity                                  C   10         ||
+-- > 0610   ALI Additional information                    C   10         ||
+-- > 0620   GIN Goods identity number                     C   100        ||
+-- > 0630   GIR Related identification numbers            C   100        ||
+-- > 0640   DLM Delivery limitations                      C   100        ||
+-- > 0650   DTM Date/time/period                          C   5          ||
+-- > 0660   FTX Free text                                 C   5          ||
+-- > 0670   MOA Monetary amount                           C   5          ||
+-- >                                                                     ||
+-- > 0680       ----- Segment group 16 ------------------ C   10--------+||
+-- > 0690   RFF Reference                                 M   1         |||
+-- > 0700   DTM Date/time/period                          C   1---------+||
+-- >                                                                     ||
+-- > 0710       ----- Segment group 17 ------------------ C   10--------+||
+-- > 0720   DGS Dangerous goods                           M   1         |||
+-- > 0730   QTY Quantity                                  C   1         |||
+-- > 0740   FTX Free text                                 C   5---------+||
+-- >                                                                     ||
+-- > 0750       ----- Segment group 18 ------------------ C   100-------+||
+-- > 0760   LOC Place/location identification             M   1         |||
+-- > 0770   NAD Name and address                          C   1         |||
+-- > 0780   DTM Date/time/period                          C   1         |||
+-- > 0790   QTY Quantity                                  C   10--------+||
+-- >                                                                     ||
+-- > 0800       ----- Segment group 19 ------------------ C   1000------+||
+-- > 0810   SGP Split goods placement                     M   1         |||
+-- > 0820   QTY Quantity                                  C   10--------+||
+-- >                                                                     ||
+-- > 0830       ----- Segment group 20 ------------------ C   9999------+||
+-- > 0840   PCI Package identification                    M   1         |||
+-- > 0850   DTM Date/time/period                          C   5         |||
+-- > 0860   MEA Measurements                              C   10        |||
+-- > 0870   QTY Quantity                                  C   1         |||
+-- >                                                                    |||
+-- > 0880       ----- Segment group 21 ------------------ C   10-------+|||
+-- > 0890   GIN Goods identity number                     M   1        ||||
+-- > 0900   DLM Delivery limitations                      C   100------+|||
+-- >                                                                    |||
+-- > 0910       ----- Segment group 22 ------------------ C   10-------+|||
+-- > 0920   HAN Handling instructions                     M   1        ||||
+-- > 0930   FTX Free text                                 C   5        ||||
+-- > 0940   GIN Goods identity number                     C   1000-----++||
+-- >                                                                     ||
+-- > 0950       ----- Segment group 23 ------------------ C   10--------+||
+-- > 0960   QVR Quantity variances                        M   1         |||
+-- > 0970   DTM Date/time/period                          C   5---------+++
+-- >
+-- >            SUMMARY SECTION
+-- >
+-- > 0980   CNT Control total                             C   5
+-- > 0990   UNT Message trailer                           M   1
+--
+-- Dependencies: 'segmentALI', 'segmentBGM', 'segmentCNT', 'segmentCOM', 'segmentCPS', 'segmentCTA', 'segmentDGS', 'segmentDLM', 'segmentDTM', 'segmentEQA', 'segmentEQD', 'segmentFTX', 'segmentGIN', 'segmentGIR', 'segmentHAN', 'segmentIMD', 'segmentLIN', 'segmentLOC', 'segmentMEA', 'segmentMOA', 'segmentNAD', 'segmentPAC', 'segmentPCD', 'segmentPCI', 'segmentPIA', 'segmentQTY', 'segmentQVR', 'segmentRFF', 'segmentSEL', 'segmentSGP', 'segmentTDT', 'segmentTOD'.
+messageDESADV :: Parser Value
+messageDESADV =
+  message "DESADV"
+    [ "0010" .@ once segmentUNH
+    , "0020" .@ once segmentBGM
+    , "0030" .@ repeated 10 segmentDTM
+    , "0040" .@ repeated 5 segmentALI
+    , "0050" .@ repeated 5 segmentMEA
+    , "0060" .@ repeated 5 segmentMOA
+    , "0070" .@ repeated 10 (
+      segmentGroup "1"
+        [ "0080" .@ once segmentRFF
+        , "0090" .@ maybeOnce segmentDTM
+        ]
+      )
+    , "0100" .@ repeated 10 (
+      segmentGroup "2"
+        [ "0110" .@ once segmentNAD
+        , "0120" .@ repeated 10 segmentLOC
+        , "0130" .@ repeated 10 (
+          segmentGroup "3"
+            [ "0140" .@ once segmentRFF
+            , "0150" .@ maybeOnce segmentDTM
+            ]
+          )
+        , "0160" .@ repeated 10 (
+          segmentGroup "4"
+            [ "0170" .@ once segmentCTA
+            , "0180" .@ repeated 5 segmentCOM
+            ]
+          )
+        ]
+      )
+    , "0190" .@ repeated 10 (
+      segmentGroup "5"
+        [ "0200" .@ once segmentTOD
+        , "0210" .@ repeated 5 segmentLOC
+        , "0220" .@ repeated 5 segmentFTX
+        ]
+      )
+    , "0230" .@ repeated 10 (
+      segmentGroup "6"
+        [ "0240" .@ once segmentTDT
+        , "0250" .@ repeated 6 segmentPCD
+        , "0260" .@ repeated 10 (
+          segmentGroup "7"
+            [ "0270" .@ once segmentLOC
+            , "0280" .@ repeated 10 segmentDTM
+            ]
+          )
+        ]
+      )
+    , "0290" .@ repeated 10 (
+      segmentGroup "8"
+        [ "0300" .@ once segmentEQD
+        , "0310" .@ repeated 5 segmentMEA
+        , "0320" .@ repeated 25 segmentSEL
+        , "0330" .@ repeated 5 segmentEQA
+        , "0340" .@ repeated 10 (
+          segmentGroup "9"
+            [ "0350" .@ once segmentHAN
+            , "0360" .@ repeated 10 segmentFTX
+            ]
+          )
+        ]
+      )
+    , "0370" .@ repeated 9999 (
+      segmentGroup "10"
+        [ "0380" .@ once segmentCPS
+        , "0390" .@ repeated 5 segmentFTX
+        , "0400" .@ repeated 9999 (
+          segmentGroup "11"
+            [ "0410" .@ once segmentPAC
+            , "0420" .@ repeated 10 segmentMEA
+            , "0430" .@ repeated 10 segmentQTY
+            , "0440" .@ repeated 10 (
+              segmentGroup "12"
+                [ "0450" .@ once segmentHAN
+                , "0460" .@ repeated 10 segmentFTX
+                ]
+              )
+            , "0470" .@ repeated 1000 (
+              segmentGroup "13"
+                [ "0480" .@ once segmentPCI
+                , "0490" .@ maybeOnce segmentRFF
+                , "0500" .@ repeated 5 segmentDTM
+                , "0510" .@ repeated 99 segmentGIR
+                , "0520" .@ repeated 99 (
+                  segmentGroup "14"
+                    [ "0530" .@ once segmentGIN
+                    , "0540" .@ repeated 10 segmentDLM
+                    ]
+                  )
+                ]
+              )
+            ]
+          )
+        , "0550" .@ repeated 9999 (
+          segmentGroup "15"
+            [ "0560" .@ once segmentLIN
+            , "0570" .@ repeated 10 segmentPIA
+            , "0580" .@ repeated 25 segmentIMD
+            , "0590" .@ repeated 10 segmentMEA
+            , "0600" .@ repeated 10 segmentQTY
+            , "0610" .@ repeated 10 segmentALI
+            , "0620" .@ repeated 100 segmentGIN
+            , "0630" .@ repeated 100 segmentGIR
+            , "0640" .@ repeated 100 segmentDLM
+            , "0650" .@ repeated 5 segmentDTM
+            , "0660" .@ repeated 5 segmentFTX
+            , "0670" .@ repeated 5 segmentMOA
+            , "0680" .@ repeated 10 (
+              segmentGroup "16"
+                [ "0690" .@ once segmentRFF
+                , "0700" .@ maybeOnce segmentDTM
+                ]
+              )
+            , "0710" .@ repeated 10 (
+              segmentGroup "17"
+                [ "0720" .@ once segmentDGS
+                , "0730" .@ maybeOnce segmentQTY
+                , "0740" .@ repeated 5 segmentFTX
+                ]
+              )
+            , "0750" .@ repeated 100 (
+              segmentGroup "18"
+                [ "0760" .@ once segmentLOC
+                , "0770" .@ maybeOnce segmentNAD
+                , "0780" .@ maybeOnce segmentDTM
+                , "0790" .@ repeated 10 segmentQTY
+                ]
+              )
+            , "0800" .@ repeated 1000 (
+              segmentGroup "19"
+                [ "0810" .@ once segmentSGP
+                , "0820" .@ repeated 10 segmentQTY
+                ]
+              )
+            , "0830" .@ repeated 9999 (
+              segmentGroup "20"
+                [ "0840" .@ once segmentPCI
+                , "0850" .@ repeated 5 segmentDTM
+                , "0860" .@ repeated 10 segmentMEA
+                , "0870" .@ maybeOnce segmentQTY
+                , "0880" .@ repeated 10 (
+                  segmentGroup "21"
+                    [ "0890" .@ once segmentGIN
+                    , "0900" .@ repeated 100 segmentDLM
+                    ]
+                  )
+                , "0910" .@ repeated 10 (
+                  segmentGroup "22"
+                    [ "0920" .@ once segmentHAN
+                    , "0930" .@ repeated 5 segmentFTX
+                    , "0940" .@ repeated 1000 segmentGIN
+                    ]
+                  )
+                ]
+              )
+            , "0950" .@ repeated 10 (
+              segmentGroup "23"
+                [ "0960" .@ once segmentQVR
+                , "0970" .@ repeated 5 segmentDTM
+                ]
+              )
+            ]
+          )
+        ]
+      )
+    , "0980" .@ repeated 5 segmentCNT
+    , "0990" .@ once segmentUNT
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Messages/IFCSUM.hs b/specification/src/Text/Edifact/D96A/Messages/IFCSUM.hs
new file mode 100644
index 0000000..5f2e883
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Messages/IFCSUM.hs
@@ -0,0 +1,861 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Messages.IFCSUM
+  ( -- * Definition
+    messageIFCSUM
+    -- * Dependencies
+  , segmentBGM
+  , segmentCNI
+  , segmentCNT
+  , segmentCOM
+  , segmentCPI
+  , segmentCTA
+  , segmentCUX
+  , segmentDGS
+  , segmentDIM
+  , segmentDOC
+  , segmentDTM
+  , segmentEQA
+  , segmentEQD
+  , segmentEQN
+  , segmentFTX
+  , segmentGDS
+  , segmentGID
+  , segmentGIN
+  , segmentGOR
+  , segmentHAN
+  , segmentLOC
+  , segmentMEA
+  , segmentMOA
+  , segmentNAD
+  , segmentPCD
+  , segmentPCI
+  , segmentPIA
+  , segmentPRI
+  , segmentQTY
+  , segmentRFF
+  , segmentRNG
+  , segmentSEL
+  , segmentSGP
+  , segmentTCC
+  , segmentTDT
+  , segmentTMD
+  , segmentTMP
+  , segmentTOD
+  , segmentTPL
+  , segmentTSR
+  ) where
+
+import           Text.Edifact.Common.Segments
+
+import           Text.Edifact.D96A.Segments   (segmentBGM, segmentCNI,
+                                               segmentCNT, segmentCOM,
+                                               segmentCPI, segmentCTA,
+                                               segmentCUX, segmentDGS,
+                                               segmentDIM, segmentDOC,
+                                               segmentDTM, segmentEQA,
+                                               segmentEQD, segmentEQN,
+                                               segmentFTX, segmentGDS,
+                                               segmentGID, segmentGIN,
+                                               segmentGOR, segmentHAN,
+                                               segmentLOC, segmentMEA,
+                                               segmentMOA, segmentNAD,
+                                               segmentPCD, segmentPCI,
+                                               segmentPIA, segmentPRI,
+                                               segmentQTY, segmentRFF,
+                                               segmentRNG, segmentSEL,
+                                               segmentSGP, segmentTCC,
+                                               segmentTDT, segmentTMD,
+                                               segmentTMP, segmentTOD,
+                                               segmentTPL, segmentTSR)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- > 4.3    Message structure
+-- >
+-- > 4.3.1  Segment table
+-- >
+-- > Pos    Tag Name                                      S   R
+-- >
+-- > 0010   UNH Message header                            M   1
+-- > 0020   BGM Beginning of message                      M   1
+-- > 0030   DTM Date/time/period                          C   9
+-- > 0040   MOA Monetary amount                           C   99
+-- > 0050   FTX Free text                                 C   99
+-- > 0060   CNT Control total                             C   9
+-- >
+-- > 0070       ----- Segment group 1  ------------------ C   9-----------+
+-- > 0080   RFF Reference                                 M   1           |
+-- > 0090   DTM Date/time/period                          C   9-----------+
+-- >
+-- > 0100       ----- Segment group 2  ------------------ C   9-----------+
+-- > 0110   GOR Governmental requirements                 M   1           |
+-- > 0120   DTM Date/time/period                          C   9           |
+-- > 0130   LOC Place/location identification             C   9           |
+-- > 0140   SEL Seal number                               C   9           |
+-- > 0150   FTX Free text                                 C   9           |
+-- >                                                                      |
+-- > 0160       ----- Segment group 3  ------------------ C   9----------+|
+-- > 0170   DOC Document/message details                  M   1          ||
+-- > 0180   DTM Date/time/period                          C   1----------++
+-- >
+-- > 0190       ----- Segment group 4  ------------------ C   9-----------+
+-- > 0200   TCC Transport charge/rate calculations        M   1           |
+-- > 0210   PRI Price details                             C   1           |
+-- > 0220   EQN Number of units                           C   1           |
+-- > 0230   PCD Percentage details                        C   1           |
+-- > 0240   MOA Monetary amount                           C   9           |
+-- > 0250   QTY Quantity                                  C   9           |
+-- > 0260   LOC Place/location identification             C   9-----------+
+-- >
+-- > 0270       ----- Segment group 5  ------------------ C   9-----------+
+-- > 0280   TDT Details of transport                      M   1           |
+-- > 0290   TSR Transport service requirements            C   9           |
+-- > 0300   LOC Place/location identification             C   9           |
+-- > 0310   DTM Date/time/period                          C   9           |
+-- > 0320   SEL Seal number                               C   9           |
+-- > 0330   FTX Free text                                 C   9           |
+-- >                                                                      |
+-- > 0340       ----- Segment group 6  ------------------ C   9----------+|
+-- > 0350   MEA Measurements                              M   1          ||
+-- > 0360   EQN Number of units                           C   1----------+|
+-- >                                                                      |
+-- > 0370       ----- Segment group 7  ------------------ C   9----------+|
+-- > 0380   DIM Dimensions                                M   1          ||
+-- > 0390   EQN Number of units                           C   1----------+|
+-- >                                                                      |
+-- > 0400       ----- Segment group 8  ------------------ C   9----------+|
+-- > 0410   CTA Contact information                       M   1          ||
+-- > 0420   COM Communication contact                     C   9----------+|
+-- >                                                                      |
+-- > 0430       ----- Segment group 9  ------------------ C   9----------+|
+-- > 0440   NAD Name and address                          M   1          ||
+-- > 0450   LOC Place/location identification             C   9          ||
+-- >                                                                     ||
+-- > 0460       ----- Segment group 10 ------------------ C   9---------+||
+-- > 0470   CTA Contact information                       M   1         |||
+-- > 0480   COM Communication contact                     C   9---------+||
+-- >                                                                     ||
+-- > 0490       ----- Segment group 11 ------------------ C   9---------+||
+-- > 0500   DOC Document/message details                  M   1         |||
+-- > 0510   DTM Date/time/period                          C   1---------+||
+-- >                                                                     ||
+-- > 0520       ----- Segment group 12 ------------------ C   9---------+||
+-- > 0530   TCC Transport charge/rate calculations        M   1         |||
+-- > 0540   PRI Price details                             C   1         |||
+-- > 0550   EQN Number of units                           C   1         |||
+-- > 0560   PCD Percentage details                        C   1         |||
+-- > 0570   MOA Monetary amount                           C   9         |||
+-- > 0580   QTY Quantity                                  C   9---------+++
+-- >
+-- > 0590       ----- Segment group 13 ------------------ C   999---------+
+-- > 0600   EQD Equipment details                         M   1           |
+-- > 0610   EQN Number of units                           C   1           |
+-- > 0620   TPL Transport placement                       C   1           |
+-- > 0630   TMD Transport movement details                C   1           |
+-- > 0640   MEA Measurements                              C   9           |
+-- > 0650   DIM Dimensions                                C   9           |
+-- > 0660   SEL Seal number                               C   9           |
+-- > 0670   NAD Name and address                          C   9           |
+-- > 0680   LOC Place/location identification             C   9           |
+-- > 0690   HAN Handling instructions                     C   1           |
+-- > 0700   TMP Temperature                               C   1           |
+-- > 0710   FTX Free text                                 C   9           |
+-- >                                                                      |
+-- > 0720       ----- Segment group 14 ------------------ C   99---------+|
+-- > 0730   EQA Attached equipment                        M   1          ||
+-- > 0740   EQN Number of units                           C   1----------++
+-- >
+-- > 0750       ----- Segment group 15 ------------------ C   9999--------+
+-- > 0760   CNI Consignment information                   M   1           |
+-- >                                                                      |
+-- > 0770       ----- Segment group 16 ------------------ C   9----------+|
+-- > 0780   SGP Split goods placement                     M   1          ||
+-- >                                                                     ||
+-- > 0790       ----- Segment group 17 ------------------ C   9---------+||
+-- > 0800   MEA Measurements                              M   1         |||
+-- > 0810   EQN Number of units                           C   1---------++|
+-- >                                                                      |
+-- > 0820       ----- Segment group 18 ------------------ C   9----------+|
+-- > 0830   TPL Transport placement                       M   1          ||
+-- >                                                                     ||
+-- > 0840       ----- Segment group 19 ------------------ C   9---------+||
+-- > 0850   MEA Measurements                              M   1         |||
+-- > 0860   EQN Number of units                           C   1---------++|
+-- > 0870   CTA Contact information                       C   1           |
+-- > 0880   COM Communication contact                     C   9           |
+-- > 0890   DTM Date/time/period                          C   9           |
+-- > 0900   CNT Control total                             C   9           |
+-- > 0910   TSR Transport service requirements            C   9           |
+-- > 0920   CUX Currencies                                C   9           |
+-- > 0930   MOA Monetary amount                           C   99          |
+-- > 0940   FTX Free text                                 C   99          |
+-- >                                                                      |
+-- > 0950       ----- Segment group 20 ------------------ C   99---------+|
+-- > 0960   LOC Place/location identification             M   1          ||
+-- > 0970   DTM Date/time/period                          C   9----------+|
+-- >                                                                      |
+-- > 0980       ----- Segment group 21 ------------------ C   2----------+|
+-- > 0990   TOD Terms of delivery or transport            M   1          ||
+-- > 1000   LOC Place/location identification             C   9----------+|
+-- >                                                                      |
+-- > 1010       ----- Segment group 22 ------------------ C   99---------+|
+-- > 1020   RFF Reference                                 M   1          ||
+-- > 1030   DTM Date/time/period                          C   9----------+|
+-- >                                                                      |
+-- > 1040       ----- Segment group 23 ------------------ C   9----------+|
+-- > 1050   GOR Governmental requirements                 M   1          ||
+-- > 1060   DTM Date/time/period                          C   9          ||
+-- > 1070   LOC Place/location identification             C   9          ||
+-- > 1080   SEL Seal number                               C   9          ||
+-- > 1090   FTX Free text                                 C   9          ||
+-- >                                                                     ||
+-- > 1100       ----- Segment group 24 ------------------ C   9---------+||
+-- > 1110   DOC Document/message details                  M   1         |||
+-- > 1120   DTM Date/time/period                          C   1---------++|
+-- >                                                                      |
+-- > 1130 *     ----- Segment group 25 ------------------ C   9----------+|
+-- > 1140   CPI Charge payment instructions               M   1          ||
+-- > 1150 + RFF Reference                                 C   99         ||
+-- > 1160   CUX Currencies                                C   1          ||
+-- > 1170   LOC Place/location identification             C   9          ||
+-- > 1180   MOA Monetary amount                           C   9----------+|
+-- >                                                                      |
+-- > 1190       ----- Segment group 26 ------------------ C   99---------+|
+-- > 1200   TCC Transport charge/rate calculations        M   1          ||
+-- > 1210   LOC Place/location identification             C   1          ||
+-- > 1220   FTX Free text                                 C   1          ||
+-- > 1230   CUX Currencies                                C   1          ||
+-- > 1240   PRI Price details                             C   1          ||
+-- > 1250   EQN Number of units                           C   1          ||
+-- > 1260   PCD Percentage details                        C   1          ||
+-- > 1270   MOA Monetary amount                           C   9          ||
+-- > 1280   QTY Quantity                                  C   9----------+|
+-- >                                                                      |
+-- > 1290       ----- Segment group 27 ------------------ C   99---------+|
+-- > 1300   TDT Details of transport                      M   1          ||
+-- > 1310   DTM Date/time/period                          C   9          ||
+-- > 1320   TSR Transport service requirements            C   9          ||
+-- >                                                                     ||
+-- > 1330       ----- Segment group 28 ------------------ C   99--------+||
+-- > 1340   LOC Place/location identification             M   1         |||
+-- > 1350   DTM Date/time/period                          C   1---------+||
+-- >                                                                     ||
+-- > 1360       ----- Segment group 29 ------------------ C   9---------+||
+-- > 1370   RFF Reference                                 M   1         |||
+-- > 1380   DTM Date/time/period                          C   1---------++|
+-- >                                                                      |
+-- > 1390       ----- Segment group 30 ------------------ C   99---------+|
+-- > 1400   NAD Name and address                          M   1          ||
+-- > 1410   LOC Place/location identification             C   9          ||
+-- > 1420   MOA Monetary amount                           C   9          ||
+-- >                                                                     ||
+-- > 1430       ----- Segment group 31 ------------------ C   9---------+||
+-- > 1440   CTA Contact information                       M   1         |||
+-- > 1450   COM Communication contact                     C   9---------+||
+-- >                                                                     ||
+-- > 1460       ----- Segment group 32 ------------------ C   9---------+||
+-- > 1470   DOC Document/message details                  M   1         |||
+-- > 1480   DTM Date/time/period                          C   1---------+||
+-- >                                                                     ||
+-- > 1490       ----- Segment group 33 ------------------ C   99--------+||
+-- > 1500   TCC Transport charge/rate calculations        M   1         |||
+-- > 1510   PRI Price details                             C   1         |||
+-- > 1520   EQN Number of units                           C   1         |||
+-- > 1530   PCD Percentage details                        C   1         |||
+-- > 1540   MOA Monetary amount                           C   9         |||
+-- > 1550   QTY Quantity                                  C   9---------+||
+-- >                                                                     ||
+-- > 1560       ----- Segment group 34 ------------------ C   9---------+||
+-- > 1570   RFF Reference                                 M   1         |||
+-- > 1580   DTM Date/time/period                          C   9---------+||
+-- >                                                                     ||
+-- > 1590 *     ----- Segment group 35 ------------------ C   9---------+||
+-- > 1600   CPI Charge payment instructions               M   1         |||
+-- > 1610 + RFF Reference                                 C   99        |||
+-- > 1620   CUX Currencies                                C   1         |||
+-- > 1630   LOC Place/location identification             C   9         |||
+-- > 1640   MOA Monetary amount                           C   9---------+||
+-- >                                                                     ||
+-- > 1650       ----- Segment group 36 ------------------ C   99--------+||
+-- > 1660   TSR Transport service requirements            M   1         |||
+-- > 1670   RFF Reference                                 C   1         |||
+-- > 1680   LOC Place/location identification             C   1         |||
+-- > 1690   TPL Transport placement                       C   1         |||
+-- > 1700   FTX Free text                                 C   9---------++|
+-- >                                                                      |
+-- > 1710       ----- Segment group 37 ------------------ C   999--------+|
+-- > 1720   GID Goods item details                        M   1          ||
+-- > 1730   HAN Handling instructions                     C   1          ||
+-- > 1740   TMP Temperature                               C   1          ||
+-- > 1750   RNG Range details                             C   1          ||
+-- > 1760   TMD Transport movement details                C   1          ||
+-- > 1770   LOC Place/location identification             C   9          ||
+-- > 1780   MOA Monetary amount                           C   9          ||
+-- > 1790   PIA Additional product id                     C   9          ||
+-- > 1800   FTX Free text                                 C   9          ||
+-- >                                                                     ||
+-- > 1810       ----- Segment group 38 ------------------ C   9---------+||
+-- > 1820   NAD Name and address                          M   1         |||
+-- > 1830   DTM Date/time/period                          C   1---------+||
+-- > 1840   GDS Nature of cargo                           C   9          ||
+-- >                                                                     ||
+-- > 1850       ----- Segment group 39 ------------------ C   99--------+||
+-- > 1860   MEA Measurements                              M   1         |||
+-- > 1870   EQN Number of units                           C   1---------+||
+-- >                                                                     ||
+-- > 1880       ----- Segment group 40 ------------------ C   99--------+||
+-- > 1890   DIM Dimensions                                M   1         |||
+-- > 1900   EQN Number of units                           C   1---------+||
+-- >                                                                     ||
+-- > 1910       ----- Segment group 41 ------------------ C   9---------+||
+-- > 1920   RFF Reference                                 M   1         |||
+-- > 1930   DTM Date/time/period                          C   9---------+||
+-- >                                                                     ||
+-- > 1940 *     ----- Segment group 42 ------------------ C   9---------+||
+-- > 1950   PCI Package identification                    M   1         |||
+-- > 1960   RFF Reference                                 C   1         |||
+-- > 1970   DTM Date/time/period                          C   1         |||
+-- > 1980 + GIN Goods identity number                     C   9---------+||
+-- >                                                                     ||
+-- > 1990       ----- Segment group 43 ------------------ C   9---------+||
+-- > 2000   DOC Document/message details                  M   1         |||
+-- > 2010   DTM Date/time/period                          C   9---------+||
+-- >                                                                     ||
+-- > 2020       ----- Segment group 44 ------------------ C   9---------+||
+-- > 2030   GOR Governmental requirements                 M   1         |||
+-- > 2040   DTM Date/time/period                          C   9         |||
+-- > 2050   LOC Place/location identification             C   9         |||
+-- > 2060   SEL Seal number                               C   9         |||
+-- > 2070   FTX Free text                                 C   9         |||
+-- >                                                                    |||
+-- > 2080       ----- Segment group 45 ------------------ C   9--------+|||
+-- > 2090   DOC Document/message details                  M   1        ||||
+-- > 2100   DTM Date/time/period                          C   1--------++||
+-- >                                                                     ||
+-- > 2110       ----- Segment group 46 ------------------ C   9---------+||
+-- > 2120   TPL Transport placement                       M   1         |||
+-- >                                                                    |||
+-- > 2130       ----- Segment group 47 ------------------ C   9--------+|||
+-- > 2140   MEA Measurements                              M   1        ||||
+-- > 2150   EQN Number of units                           C   1--------++||
+-- >                                                                     ||
+-- > 2160       ----- Segment group 48 ------------------ C   999-------+||
+-- > 2170   SGP Split goods placement                     M   1         |||
+-- >                                                                    |||
+-- > 2180       ----- Segment group 49 ------------------ C   9--------+|||
+-- > 2190   MEA Measurements                              M   1        ||||
+-- > 2200   EQN Number of units                           C   1--------++||
+-- >                                                                     ||
+-- > 2210       ----- Segment group 50 ------------------ C   99--------+||
+-- > 2220   TCC Transport charge/rate calculations        M   1         |||
+-- > 2230   PRI Price details                             C   1         |||
+-- > 2240   EQN Number of units                           C   1         |||
+-- > 2250   PCD Percentage details                        C   1         |||
+-- > 2260   MOA Monetary amount                           C   9         |||
+-- > 2270   QTY Quantity                                  C   9         |||
+-- > 2280   LOC Place/location identification             C   9---------+||
+-- >                                                                     ||
+-- > 2290       ----- Segment group 51 ------------------ C   9---------+||
+-- > 2300   DGS Dangerous goods                           M   1         |||
+-- > 2310   FTX Free text                                 C   99        |||
+-- >                                                                    |||
+-- > 2320       ----- Segment group 52 ------------------ C   9--------+|||
+-- > 2330   CTA Contact information                       M   1        ||||
+-- > 2340   COM Communication contact                     C   9--------+|||
+-- >                                                                    |||
+-- > 2350       ----- Segment group 53 ------------------ C   9--------+|||
+-- > 2360   MEA Measurements                              M   1        ||||
+-- > 2370   EQN Number of units                           C   1--------+|||
+-- >                                                                    |||
+-- > 2380       ----- Segment group 54 ------------------ C   999------+|||
+-- > 2390   SGP Split goods placement                     M   1        ||||
+-- >                                                                   ||||
+-- > 2400       ----- Segment group 55 ------------------ C   9-------+||||
+-- > 2410   MEA Measurements                              M   1       |||||
+-- > 2420   EQN Number of units                           C   1-------++++|
+-- >                                                                      |
+-- > 2430       ----- Segment group 56 ------------------ C   999--------+|
+-- > 2440   EQD Equipment details                         M   1          ||
+-- > 2450   EQN Number of units                           C   1          ||
+-- > 2460   TMD Transport movement details                C   1          ||
+-- > 2470   MEA Measurements                              C   9          ||
+-- > 2480   DIM Dimensions                                C   9          ||
+-- > 2490   SEL Seal number                               C   99         ||
+-- > 2500   TPL Transport placement                       C   9          ||
+-- > 2510   HAN Handling instructions                     C   1          ||
+-- > 2520   TMP Temperature                               C   1          ||
+-- > 2530   FTX Free text                                 C   9          ||
+-- >                                                                     ||
+-- > 2540       ----- Segment group 57 ------------------ C   99--------+||
+-- > 2550   TCC Transport charge/rate calculations        M   1         |||
+-- > 2560   PRI Price details                             C   1         |||
+-- > 2570   EQN Number of units                           C   1         |||
+-- > 2580   PCD Percentage details                        C   1         |||
+-- > 2590   MOA Monetary amount                           C   9         |||
+-- > 2600   QTY Quantity                                  C   9---------+||
+-- >                                                                     ||
+-- > 2610       ----- Segment group 58 ------------------ C   9---------+||
+-- > 2620   NAD Name and address                          M   1         |||
+-- > 2630   DTM Date/time/period                          C   1---------+||
+-- >                                                                     ||
+-- > 2640       ----- Segment group 59 ------------------ C   99--------+||
+-- > 2650   EQA Attached equipment                        M   1         |||
+-- > 2660   EQN Number of units                           C   1---------+++
+-- > 2670   UNT Message trailer                           M   1
+--
+-- Dependencies: 'segmentBGM', 'segmentCNI', 'segmentCNT', 'segmentCOM', 'segmentCPI', 'segmentCTA', 'segmentCUX', 'segmentDGS', 'segmentDIM', 'segmentDOC', 'segmentDTM', 'segmentEQA', 'segmentEQD', 'segmentEQN', 'segmentFTX', 'segmentGDS', 'segmentGID', 'segmentGIN', 'segmentGOR', 'segmentHAN', 'segmentLOC', 'segmentMEA', 'segmentMOA', 'segmentNAD', 'segmentPCD', 'segmentPCI', 'segmentPIA', 'segmentPRI', 'segmentQTY', 'segmentRFF', 'segmentRNG', 'segmentSEL', 'segmentSGP', 'segmentTCC', 'segmentTDT', 'segmentTMD', 'segmentTMP', 'segmentTOD', 'segmentTPL', 'segmentTSR'.
+messageIFCSUM :: Parser Value
+messageIFCSUM =
+  message "IFCSUM"
+    [ "0010" .@ once segmentUNH
+    , "0020" .@ once segmentBGM
+    , "0030" .@ repeated 9 segmentDTM
+    , "0040" .@ repeated 99 segmentMOA
+    , "0050" .@ repeated 99 segmentFTX
+    , "0060" .@ repeated 9 segmentCNT
+    , "0070" .@ repeated 9 (
+      segmentGroup "1"
+        [ "0080" .@ once segmentRFF
+        , "0090" .@ repeated 9 segmentDTM
+        ]
+      )
+    , "0100" .@ repeated 9 (
+      segmentGroup "2"
+        [ "0110" .@ once segmentGOR
+        , "0120" .@ repeated 9 segmentDTM
+        , "0130" .@ repeated 9 segmentLOC
+        , "0140" .@ repeated 9 segmentSEL
+        , "0150" .@ repeated 9 segmentFTX
+        , "0160" .@ repeated 9 (
+          segmentGroup "3"
+            [ "0170" .@ once segmentDOC
+            , "0180" .@ maybeOnce segmentDTM
+            ]
+          )
+        ]
+      )
+    , "0190" .@ repeated 9 (
+      segmentGroup "4"
+        [ "0200" .@ once segmentTCC
+        , "0210" .@ maybeOnce segmentPRI
+        , "0220" .@ maybeOnce segmentEQN
+        , "0230" .@ maybeOnce segmentPCD
+        , "0240" .@ repeated 9 segmentMOA
+        , "0250" .@ repeated 9 segmentQTY
+        , "0260" .@ repeated 9 segmentLOC
+        ]
+      )
+    , "0270" .@ repeated 9 (
+      segmentGroup "5"
+        [ "0280" .@ once segmentTDT
+        , "0290" .@ repeated 9 segmentTSR
+        , "0300" .@ repeated 9 segmentLOC
+        , "0310" .@ repeated 9 segmentDTM
+        , "0320" .@ repeated 9 segmentSEL
+        , "0330" .@ repeated 9 segmentFTX
+        , "0340" .@ repeated 9 (
+          segmentGroup "6"
+            [ "0350" .@ once segmentMEA
+            , "0360" .@ maybeOnce segmentEQN
+            ]
+          )
+        , "0370" .@ repeated 9 (
+          segmentGroup "7"
+            [ "0380" .@ once segmentDIM
+            , "0390" .@ maybeOnce segmentEQN
+            ]
+          )
+        , "0400" .@ repeated 9 (
+          segmentGroup "8"
+            [ "0410" .@ once segmentCTA
+            , "0420" .@ repeated 9 segmentCOM
+            ]
+          )
+        , "0430" .@ repeated 9 (
+          segmentGroup "9"
+            [ "0440" .@ once segmentNAD
+            , "0450" .@ repeated 9 segmentLOC
+            , "0460" .@ repeated 9 (
+              segmentGroup "10"
+                [ "0470" .@ once segmentCTA
+                , "0480" .@ repeated 9 segmentCOM
+                ]
+              )
+            , "0490" .@ repeated 9 (
+              segmentGroup "11"
+                [ "0500" .@ once segmentDOC
+                , "0510" .@ maybeOnce segmentDTM
+                ]
+              )
+            , "0520" .@ repeated 9 (
+              segmentGroup "12"
+                [ "0530" .@ once segmentTCC
+                , "0540" .@ maybeOnce segmentPRI
+                , "0550" .@ maybeOnce segmentEQN
+                , "0560" .@ maybeOnce segmentPCD
+                , "0570" .@ repeated 9 segmentMOA
+                , "0580" .@ repeated 9 segmentQTY
+                ]
+              )
+            ]
+          )
+        ]
+      )
+    , "0590" .@ repeated 999 (
+      segmentGroup "13"
+        [ "0600" .@ once segmentEQD
+        , "0610" .@ maybeOnce segmentEQN
+        , "0620" .@ maybeOnce segmentTPL
+        , "0630" .@ maybeOnce segmentTMD
+        , "0640" .@ repeated 9 segmentMEA
+        , "0650" .@ repeated 9 segmentDIM
+        , "0660" .@ repeated 9 segmentSEL
+        , "0670" .@ repeated 9 segmentNAD
+        , "0680" .@ repeated 9 segmentLOC
+        , "0690" .@ maybeOnce segmentHAN
+        , "0700" .@ maybeOnce segmentTMP
+        , "0710" .@ repeated 9 segmentFTX
+        , "0720" .@ repeated 99 (
+          segmentGroup "14"
+            [ "0730" .@ once segmentEQA
+            , "0740" .@ maybeOnce segmentEQN
+            ]
+          )
+        ]
+      )
+    , "0750" .@ repeated 9999 (
+      segmentGroup "15"
+        [ "0760" .@ once segmentCNI
+        , "0770" .@ repeated 9 (
+          segmentGroup "16"
+            [ "0780" .@ once segmentSGP
+            , "0790" .@ repeated 9 (
+              segmentGroup "17"
+                [ "0800" .@ once segmentMEA
+                , "0810" .@ maybeOnce segmentEQN
+                ]
+              )
+            ]
+          )
+        , "0820" .@ repeated 9 (
+          segmentGroup "18"
+            [ "0830" .@ once segmentTPL
+            , "0840" .@ repeated 9 (
+              segmentGroup "19"
+                [ "0850" .@ once segmentMEA
+                , "0860" .@ maybeOnce segmentEQN
+                ]
+              )
+            ]
+          )
+        , "0870" .@ maybeOnce segmentCTA
+        , "0880" .@ repeated 9 segmentCOM
+        , "0890" .@ repeated 9 segmentDTM
+        , "0900" .@ repeated 9 segmentCNT
+        , "0910" .@ repeated 9 segmentTSR
+        , "0920" .@ repeated 9 segmentCUX
+        , "0930" .@ repeated 99 segmentMOA
+        , "0940" .@ repeated 99 segmentFTX
+        , "0950" .@ repeated 99 (
+          segmentGroup "20"
+            [ "0960" .@ once segmentLOC
+            , "0970" .@ repeated 9 segmentDTM
+            ]
+          )
+        , "0980" .@ repeated 2 (
+          segmentGroup "21"
+            [ "0990" .@ once segmentTOD
+            , "1000" .@ repeated 9 segmentLOC
+            ]
+          )
+        , "1010" .@ repeated 99 (
+          segmentGroup "22"
+            [ "1020" .@ once segmentRFF
+            , "1030" .@ repeated 9 segmentDTM
+            ]
+          )
+        , "1040" .@ repeated 9 (
+          segmentGroup "23"
+            [ "1050" .@ once segmentGOR
+            , "1060" .@ repeated 9 segmentDTM
+            , "1070" .@ repeated 9 segmentLOC
+            , "1080" .@ repeated 9 segmentSEL
+            , "1090" .@ repeated 9 segmentFTX
+            , "1100" .@ repeated 9 (
+              segmentGroup "24"
+                [ "1110" .@ once segmentDOC
+                , "1120" .@ maybeOnce segmentDTM
+                ]
+              )
+            ]
+          )
+        , "1130" .@ repeated 9 (
+          segmentGroup "25"
+            [ "1140" .@ once segmentCPI
+            , "1150" .@ repeated 99 segmentRFF
+            , "1160" .@ maybeOnce segmentCUX
+            , "1170" .@ repeated 9 segmentLOC
+            , "1180" .@ repeated 9 segmentMOA
+            ]
+          )
+        , "1190" .@ repeated 99 (
+          segmentGroup "26"
+            [ "1200" .@ once segmentTCC
+            , "1210" .@ maybeOnce segmentLOC
+            , "1220" .@ maybeOnce segmentFTX
+            , "1230" .@ maybeOnce segmentCUX
+            , "1240" .@ maybeOnce segmentPRI
+            , "1250" .@ maybeOnce segmentEQN
+            , "1260" .@ maybeOnce segmentPCD
+            , "1270" .@ repeated 9 segmentMOA
+            , "1280" .@ repeated 9 segmentQTY
+            ]
+          )
+        , "1290" .@ repeated 99 (
+          segmentGroup "27"
+            [ "1300" .@ once segmentTDT
+            , "1310" .@ repeated 9 segmentDTM
+            , "1320" .@ repeated 9 segmentTSR
+            , "1330" .@ repeated 99 (
+              segmentGroup "28"
+                [ "1340" .@ once segmentLOC
+                , "1350" .@ maybeOnce segmentDTM
+                ]
+              )
+            , "1360" .@ repeated 9 (
+              segmentGroup "29"
+                [ "1370" .@ once segmentRFF
+                , "1380" .@ maybeOnce segmentDTM
+                ]
+              )
+            ]
+          )
+        , "1390" .@ repeated 99 (
+          segmentGroup "30"
+            [ "1400" .@ once segmentNAD
+            , "1410" .@ repeated 9 segmentLOC
+            , "1420" .@ repeated 9 segmentMOA
+            , "1430" .@ repeated 9 (
+              segmentGroup "31"
+                [ "1440" .@ once segmentCTA
+                , "1450" .@ repeated 9 segmentCOM
+                ]
+              )
+            , "1460" .@ repeated 9 (
+              segmentGroup "32"
+                [ "1470" .@ once segmentDOC
+                , "1480" .@ maybeOnce segmentDTM
+                ]
+              )
+            , "1490" .@ repeated 99 (
+              segmentGroup "33"
+                [ "1500" .@ once segmentTCC
+                , "1510" .@ maybeOnce segmentPRI
+                , "1520" .@ maybeOnce segmentEQN
+                , "1530" .@ maybeOnce segmentPCD
+                , "1540" .@ repeated 9 segmentMOA
+                , "1550" .@ repeated 9 segmentQTY
+                ]
+              )
+            , "1560" .@ repeated 9 (
+              segmentGroup "34"
+                [ "1570" .@ once segmentRFF
+                , "1580" .@ repeated 9 segmentDTM
+                ]
+              )
+            , "1590" .@ repeated 9 (
+              segmentGroup "35"
+                [ "1600" .@ once segmentCPI
+                , "1610" .@ repeated 99 segmentRFF
+                , "1620" .@ maybeOnce segmentCUX
+                , "1630" .@ repeated 9 segmentLOC
+                , "1640" .@ repeated 9 segmentMOA
+                ]
+              )
+            , "1650" .@ repeated 99 (
+              segmentGroup "36"
+                [ "1660" .@ once segmentTSR
+                , "1670" .@ maybeOnce segmentRFF
+                , "1680" .@ maybeOnce segmentLOC
+                , "1690" .@ maybeOnce segmentTPL
+                , "1700" .@ repeated 9 segmentFTX
+                ]
+              )
+            ]
+          )
+        , "1710" .@ repeated 999 (
+          segmentGroup "37"
+            [ "1720" .@ once segmentGID
+            , "1730" .@ maybeOnce segmentHAN
+            , "1740" .@ maybeOnce segmentTMP
+            , "1750" .@ maybeOnce segmentRNG
+            , "1760" .@ maybeOnce segmentTMD
+            , "1770" .@ repeated 9 segmentLOC
+            , "1780" .@ repeated 9 segmentMOA
+            , "1790" .@ repeated 9 segmentPIA
+            , "1800" .@ repeated 9 segmentFTX
+            , "1810" .@ repeated 9 (
+              segmentGroup "38"
+                [ "1820" .@ once segmentNAD
+                , "1830" .@ maybeOnce segmentDTM
+                ]
+              )
+            , "1840" .@ repeated 9 segmentGDS
+            , "1850" .@ repeated 99 (
+              segmentGroup "39"
+                [ "1860" .@ once segmentMEA
+                , "1870" .@ maybeOnce segmentEQN
+                ]
+              )
+            , "1880" .@ repeated 99 (
+              segmentGroup "40"
+                [ "1890" .@ once segmentDIM
+                , "1900" .@ maybeOnce segmentEQN
+                ]
+              )
+            , "1910" .@ repeated 9 (
+              segmentGroup "41"
+                [ "1920" .@ once segmentRFF
+                , "1930" .@ repeated 9 segmentDTM
+                ]
+              )
+            , "1940" .@ repeated 9 (
+              segmentGroup "42"
+                [ "1950" .@ once segmentPCI
+                , "1960" .@ maybeOnce segmentRFF
+                , "1970" .@ maybeOnce segmentDTM
+                , "1980" .@ repeated 9 segmentGIN
+                ]
+              )
+            , "1990" .@ repeated 9 (
+              segmentGroup "43"
+                [ "2000" .@ once segmentDOC
+                , "2010" .@ repeated 9 segmentDTM
+                ]
+              )
+            , "2020" .@ repeated 9 (
+              segmentGroup "44"
+                [ "2030" .@ once segmentGOR
+                , "2040" .@ repeated 9 segmentDTM
+                , "2050" .@ repeated 9 segmentLOC
+                , "2060" .@ repeated 9 segmentSEL
+                , "2070" .@ repeated 9 segmentFTX
+                , "2080" .@ repeated 9 (
+                  segmentGroup "45"
+                    [ "2090" .@ once segmentDOC
+                    , "2100" .@ maybeOnce segmentDTM
+                    ]
+                  )
+                ]
+              )
+            , "2110" .@ repeated 9 (
+              segmentGroup "46"
+                [ "2120" .@ once segmentTPL
+                , "2130" .@ repeated 9 (
+                  segmentGroup "47"
+                    [ "2140" .@ once segmentMEA
+                    , "2150" .@ maybeOnce segmentEQN
+                    ]
+                  )
+                ]
+              )
+            , "2160" .@ repeated 999 (
+              segmentGroup "48"
+                [ "2170" .@ once segmentSGP
+                , "2180" .@ repeated 9 (
+                  segmentGroup "49"
+                    [ "2190" .@ once segmentMEA
+                    , "2200" .@ maybeOnce segmentEQN
+                    ]
+                  )
+                ]
+              )
+            , "2210" .@ repeated 99 (
+              segmentGroup "50"
+                [ "2220" .@ once segmentTCC
+                , "2230" .@ maybeOnce segmentPRI
+                , "2240" .@ maybeOnce segmentEQN
+                , "2250" .@ maybeOnce segmentPCD
+                , "2260" .@ repeated 9 segmentMOA
+                , "2270" .@ repeated 9 segmentQTY
+                , "2280" .@ repeated 9 segmentLOC
+                ]
+              )
+            , "2290" .@ repeated 9 (
+              segmentGroup "51"
+                [ "2300" .@ once segmentDGS
+                , "2310" .@ repeated 99 segmentFTX
+                , "2320" .@ repeated 9 (
+                  segmentGroup "52"
+                    [ "2330" .@ once segmentCTA
+                    , "2340" .@ repeated 9 segmentCOM
+                    ]
+                  )
+                , "2350" .@ repeated 9 (
+                  segmentGroup "53"
+                    [ "2360" .@ once segmentMEA
+                    , "2370" .@ maybeOnce segmentEQN
+                    ]
+                  )
+                , "2380" .@ repeated 999 (
+                  segmentGroup "54"
+                    [ "2390" .@ once segmentSGP
+                    , "2400" .@ repeated 9 (
+                      segmentGroup "55"
+                        [ "2410" .@ once segmentMEA
+                        , "2420" .@ maybeOnce segmentEQN
+                        ]
+                      )
+                    ]
+                  )
+                ]
+              )
+            ]
+          )
+        , "2430" .@ repeated 999 (
+          segmentGroup "56"
+            [ "2440" .@ once segmentEQD
+            , "2450" .@ maybeOnce segmentEQN
+            , "2460" .@ maybeOnce segmentTMD
+            , "2470" .@ repeated 9 segmentMEA
+            , "2480" .@ repeated 9 segmentDIM
+            , "2490" .@ repeated 99 segmentSEL
+            , "2500" .@ repeated 9 segmentTPL
+            , "2510" .@ maybeOnce segmentHAN
+            , "2520" .@ maybeOnce segmentTMP
+            , "2530" .@ repeated 9 segmentFTX
+            , "2540" .@ repeated 99 (
+              segmentGroup "57"
+                [ "2550" .@ once segmentTCC
+                , "2560" .@ maybeOnce segmentPRI
+                , "2570" .@ maybeOnce segmentEQN
+                , "2580" .@ maybeOnce segmentPCD
+                , "2590" .@ repeated 9 segmentMOA
+                , "2600" .@ repeated 9 segmentQTY
+                ]
+              )
+            , "2610" .@ repeated 9 (
+              segmentGroup "58"
+                [ "2620" .@ once segmentNAD
+                , "2630" .@ maybeOnce segmentDTM
+                ]
+              )
+            , "2640" .@ repeated 99 (
+              segmentGroup "59"
+                [ "2650" .@ once segmentEQA
+                , "2660" .@ maybeOnce segmentEQN
+                ]
+              )
+            ]
+          )
+        ]
+      )
+    , "2670" .@ once segmentUNT
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Messages/IFTSAI.hs b/specification/src/Text/Edifact/D96A/Messages/IFTSAI.hs
new file mode 100644
index 0000000..3c4a345
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Messages/IFTSAI.hs
@@ -0,0 +1,208 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Messages.IFTSAI
+  ( -- * Definition
+    messageIFTSAI
+    -- * Dependencies
+  , segmentBGM
+  , segmentCOM
+  , segmentCTA
+  , segmentDGS
+  , segmentDIM
+  , segmentDTM
+  , segmentEQD
+  , segmentEQN
+  , segmentFTX
+  , segmentGDS
+  , segmentGID
+  , segmentHAN
+  , segmentLOC
+  , segmentMEA
+  , segmentNAD
+  , segmentQTY
+  , segmentRFF
+  , segmentTDT
+  , segmentTSR
+  ) where
+
+import           Text.Edifact.Common.Segments
+
+import           Text.Edifact.D96A.Segments   (segmentBGM, segmentCOM,
+                                               segmentCTA, segmentDGS,
+                                               segmentDIM, segmentDTM,
+                                               segmentEQD, segmentEQN,
+                                               segmentFTX, segmentGDS,
+                                               segmentGID, segmentHAN,
+                                               segmentLOC, segmentMEA,
+                                               segmentNAD, segmentQTY,
+                                               segmentRFF, segmentTDT,
+                                               segmentTSR)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- > 4.3    Message structure
+-- >
+-- > 4.3.1  Segment table
+-- >
+-- > Pos    Tag Name                                      S   R
+-- >
+-- > 0010   UNH Message header                            M   1
+-- > 0020   BGM Beginning of message                      M   1
+-- > 0030   DTM Date/time/period                          C   9
+-- > 0040   FTX Free text                                 C   99
+-- >
+-- > 0050 +     ----- Segment group 1  ------------------ C   9-----------+
+-- > 0060 * RFF Reference                                 M   1           |
+-- > 0070 + DTM Date/time/period                          C   9-----------+
+-- >
+-- > 0080       ----- Segment group 2  ------------------ C   9-----------+
+-- > 0090   LOC Place/location identification             M   1           |
+-- > 0100   DTM Date/time/period                          C   9-----------+
+-- >
+-- > 0110       ----- Segment group 3  ------------------ C   9-----------+
+-- > 0120   EQD Equipment details                         M   1           |
+-- > 0130   EQN Number of units                           C   9           |
+-- > 0140   MEA Measurements                              C   9           |
+-- > 0150   DIM Dimensions                                C   9           |
+-- > 0160   FTX Free text                                 C   9-----------+
+-- >
+-- > 0170       ----- Segment group 4  ------------------ C   999---------+
+-- > 0180   TDT Details of transport                      M   1           |
+-- > 0190   DTM Date/time/period                          C   9           |
+-- > 0200   TSR Transport service requirements            C   9           |
+-- > 0210   FTX Free text                                 C   9           |
+-- > 0220   EQD Equipment details                         C   99          |
+-- > 0230   QTY Quantity                                  C   9           |
+-- > 0240   MEA Measurements                              C   9           |
+-- >                                                                      |
+-- > 0250       ----- Segment group 5  ------------------ C   99---------+|
+-- > 0260   LOC Place/location identification             M   1          ||
+-- > 0270   DTM Date/time/period                          C   9----------++
+-- >
+-- > 0280       ----- Segment group 6  ------------------ C   9-----------+
+-- > 0290   NAD Name and address                          M   1           |
+-- > 0300   LOC Place/location identification             C   9           |
+-- >                                                                      |
+-- > 0310       ----- Segment group 7  ------------------ C   9----------+|
+-- > 0320   CTA Contact information                       M   1          ||
+-- > 0330   COM Communication contact                     C   9----------++
+-- >
+-- > 0340       ----- Segment group 8  ------------------ C   9-----------+
+-- > 0350   GID Goods item details                        M   1           |
+-- > 0360   HAN Handling instructions                     C   9           |
+-- > 0370   FTX Free text                                 C   9           |
+-- >                                                                      |
+-- > 0380       ----- Segment group 9  ------------------ C   9----------+|
+-- > 0390   GDS Nature of cargo                           M   1          ||
+-- > 0400   FTX Free text                                 C   9----------+|
+-- >                                                                      |
+-- > 0410       ----- Segment group 10 ------------------ C   9----------+|
+-- > 0420   MEA Measurements                              M   1          ||
+-- > 0430   EQN Number of units                           C   9----------+|
+-- >                                                                      |
+-- > 0440       ----- Segment group 11 ------------------ C   9----------+|
+-- > 0450   DIM Dimensions                                M   1          ||
+-- > 0460   EQN Number of units                           C   9----------+|
+-- >                                                                      |
+-- > 0470       ----- Segment group 12 ------------------ C   9----------+|
+-- > 0480   DGS Dangerous goods                           M   1          ||
+-- > 0490   FTX Free text                                 C   9----------++
+-- > 0500   UNT Message trailer                           M   1
+--
+-- Dependencies: 'segmentBGM', 'segmentCOM', 'segmentCTA', 'segmentDGS', 'segmentDIM', 'segmentDTM', 'segmentEQD', 'segmentEQN', 'segmentFTX', 'segmentGDS', 'segmentGID', 'segmentHAN', 'segmentLOC', 'segmentMEA', 'segmentNAD', 'segmentQTY', 'segmentRFF', 'segmentTDT', 'segmentTSR'.
+messageIFTSAI :: Parser Value
+messageIFTSAI =
+  message "IFTSAI"
+    [ "0010" .@ once segmentUNH
+    , "0020" .@ once segmentBGM
+    , "0030" .@ repeated 9 segmentDTM
+    , "0040" .@ repeated 99 segmentFTX
+    , "0050" .@ repeated 9 (
+      segmentGroup "1"
+        [ "0060" .@ once segmentRFF
+        , "0070" .@ repeated 9 segmentDTM
+        ]
+      )
+    , "0080" .@ repeated 9 (
+      segmentGroup "2"
+        [ "0090" .@ once segmentLOC
+        , "0100" .@ repeated 9 segmentDTM
+        ]
+      )
+    , "0110" .@ repeated 9 (
+      segmentGroup "3"
+        [ "0120" .@ once segmentEQD
+        , "0130" .@ repeated 9 segmentEQN
+        , "0140" .@ repeated 9 segmentMEA
+        , "0150" .@ repeated 9 segmentDIM
+        , "0160" .@ repeated 9 segmentFTX
+        ]
+      )
+    , "0170" .@ repeated 999 (
+      segmentGroup "4"
+        [ "0180" .@ once segmentTDT
+        , "0190" .@ repeated 9 segmentDTM
+        , "0200" .@ repeated 9 segmentTSR
+        , "0210" .@ repeated 9 segmentFTX
+        , "0220" .@ repeated 99 segmentEQD
+        , "0230" .@ repeated 9 segmentQTY
+        , "0240" .@ repeated 9 segmentMEA
+        , "0250" .@ repeated 99 (
+          segmentGroup "5"
+            [ "0260" .@ once segmentLOC
+            , "0270" .@ repeated 9 segmentDTM
+            ]
+          )
+        ]
+      )
+    , "0280" .@ repeated 9 (
+      segmentGroup "6"
+        [ "0290" .@ once segmentNAD
+        , "0300" .@ repeated 9 segmentLOC
+        , "0310" .@ repeated 9 (
+          segmentGroup "7"
+            [ "0320" .@ once segmentCTA
+            , "0330" .@ repeated 9 segmentCOM
+            ]
+          )
+        ]
+      )
+    , "0340" .@ repeated 9 (
+      segmentGroup "8"
+        [ "0350" .@ once segmentGID
+        , "0360" .@ repeated 9 segmentHAN
+        , "0370" .@ repeated 9 segmentFTX
+        , "0380" .@ repeated 9 (
+          segmentGroup "9"
+            [ "0390" .@ once segmentGDS
+            , "0400" .@ repeated 9 segmentFTX
+            ]
+          )
+        , "0410" .@ repeated 9 (
+          segmentGroup "10"
+            [ "0420" .@ once segmentMEA
+            , "0430" .@ repeated 9 segmentEQN
+            ]
+          )
+        , "0440" .@ repeated 9 (
+          segmentGroup "11"
+            [ "0450" .@ once segmentDIM
+            , "0460" .@ repeated 9 segmentEQN
+            ]
+          )
+        , "0470" .@ repeated 9 (
+          segmentGroup "12"
+            [ "0480" .@ once segmentDGS
+            , "0490" .@ repeated 9 segmentFTX
+            ]
+          )
+        ]
+      )
+    , "0500" .@ once segmentUNT
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Messages/IFTSTA.hs b/specification/src/Text/Edifact/D96A/Messages/IFTSTA.hs
new file mode 100644
index 0000000..6bf19a1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Messages/IFTSTA.hs
@@ -0,0 +1,223 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Messages.IFTSTA
+  ( -- * Definition
+    messageIFTSTA
+    -- * Dependencies
+  , segmentBGM
+  , segmentCNI
+  , segmentCNT
+  , segmentCOM
+  , segmentCTA
+  , segmentDIM
+  , segmentDOC
+  , segmentDTM
+  , segmentEQA
+  , segmentEQD
+  , segmentEQN
+  , segmentFTX
+  , segmentGID
+  , segmentGIN
+  , segmentHAN
+  , segmentLOC
+  , segmentMEA
+  , segmentNAD
+  , segmentPCI
+  , segmentRFF
+  , segmentSEL
+  , segmentSTS
+  , segmentTDT
+  , segmentTSR
+  ) where
+
+import           Text.Edifact.Common.Segments
+
+import           Text.Edifact.D96A.Segments   (segmentBGM, segmentCNI,
+                                               segmentCNT, segmentCOM,
+                                               segmentCTA, segmentDIM,
+                                               segmentDOC, segmentDTM,
+                                               segmentEQA, segmentEQD,
+                                               segmentEQN, segmentFTX,
+                                               segmentGID, segmentGIN,
+                                               segmentHAN, segmentLOC,
+                                               segmentMEA, segmentNAD,
+                                               segmentPCI, segmentRFF,
+                                               segmentSEL, segmentSTS,
+                                               segmentTDT, segmentTSR)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- > 4.3    Message structure
+-- >
+-- > 4.3.1  Segment table
+-- >
+-- > Pos    Tag Name                                      S   R
+-- >
+-- > 0010   UNH Message header                            M   1
+-- > 0020   BGM Beginning of message                      M   1
+-- > 0030   DTM Date/time/period                          C   9
+-- > 0040   TSR Transport service requirements            C   1
+-- >
+-- > 0050       ----- Segment group 1  ------------------ C   9-----------+
+-- > 0060   NAD Name and address                          M   1           |
+-- >                                                                      |
+-- > 0070       ----- Segment group 2  ------------------ C   9----------+|
+-- > 0080   CTA Contact information                       M   1          ||
+-- > 0090   COM Communication contact                     C   9----------++
+-- >
+-- > 0100       ----- Segment group 3  ------------------ C   9-----------+
+-- > 0110   RFF Reference                                 M   1           |
+-- > 0120   DTM Date/time/period                          C   1-----------+
+-- > 0130   LOC Place/location identification             C   9
+-- > 0140   FTX Free text                                 C   9
+-- > 0150   CNT Control total                             C   9
+-- >
+-- > 0160       ----- Segment group 4  ------------------ C   999---------+
+-- > 0170   CNI Consignment information                   M   1           |
+-- > 0180   LOC Place/location identification             C   9           |
+-- > 0190   CNT Control total                             C   9           |
+-- >                                                                      |
+-- > 0200 *     ----- Segment group 5  ------------------ M   99---------+|
+-- > 0210   STS Status                                    M   1          ||
+-- > 0220   RFF Reference                                 C   9          ||
+-- > 0230   DTM Date/time/period                          C   9          ||
+-- > 0240 + DOC Document/message details                  C   1          ||
+-- > 0250   FTX Free text                                 C   9          ||
+-- > 0260   NAD Name and address                          C   9          ||
+-- > 0270   LOC Place/location identification             C   1          ||
+-- > 0280   PCI Package identification                    C   99         ||
+-- >                                                                     ||
+-- > 0290       ----- Segment group 6  ------------------ C   99--------+||
+-- > 0300   TDT Details of transport                      M   1         |||
+-- > 0310   RFF Reference                                 C   9         |||
+-- > 0320   LOC Place/location identification             C   9         |||
+-- > 0330   DTM Date/time/period                          C   9---------+||
+-- >                                                                     ||
+-- > 0340       ----- Segment group 7  ------------------ C   99--------+||
+-- > 0350   EQD Equipment details                         M   1         |||
+-- > 0360   MEA Measurements                              C   9         |||
+-- > 0370   DIM Dimensions                                C   9         |||
+-- > 0380   SEL Seal number                               C   9         |||
+-- >                                                                    |||
+-- > 0390       ----- Segment group 8  ------------------ C   99-------+|||
+-- > 0400   EQA Attached equipment                        M   1        ||||
+-- > 0410   SEL Seal number                               C   9--------++||
+-- >                                                                     ||
+-- > 0420 *     ----- Segment group 9  ------------------ C   99--------+||
+-- > 0430   GID Goods item details                        M   1         |||
+-- > 0440   HAN Handling instructions                     C   9         |||
+-- >                                                                    |||
+-- > 0450       ----- Segment group 10 ------------------ C   99-------+|||
+-- > 0460   MEA Measurements                              M   1        ||||
+-- > 0470   EQN Number of units                           C   1--------+|||
+-- >                                                                    |||
+-- > 0480       ----- Segment group 11 ------------------ C   99-------+|||
+-- > 0490   DIM Dimensions                                M   1        ||||
+-- > 0500   EQN Number of units                           C   1--------+|||
+-- >                                                                    |||
+-- > 0510 +     ----- Segment group 12 ------------------ C   99-------+|||
+-- > 0520 + PCI Package identification                    M   1        ||||
+-- > 0530 + GIN Goods identity number                     C   9--------++++
+-- > 0540   UNT Message trailer                           M   1
+--
+-- Dependencies: 'segmentBGM', 'segmentCNI', 'segmentCNT', 'segmentCOM', 'segmentCTA', 'segmentDIM', 'segmentDOC', 'segmentDTM', 'segmentEQA', 'segmentEQD', 'segmentEQN', 'segmentFTX', 'segmentGID', 'segmentGIN', 'segmentHAN', 'segmentLOC', 'segmentMEA', 'segmentNAD', 'segmentPCI', 'segmentRFF', 'segmentSEL', 'segmentSTS', 'segmentTDT', 'segmentTSR'.
+messageIFTSTA :: Parser Value
+messageIFTSTA =
+  message "IFTSTA"
+    [ "0010" .@ once segmentUNH
+    , "0020" .@ once segmentBGM
+    , "0030" .@ repeated 9 segmentDTM
+    , "0040" .@ maybeOnce segmentTSR
+    , "0050" .@ repeated 9 (
+      segmentGroup "1"
+        [ "0060" .@ once segmentNAD
+        , "0070" .@ repeated 9 (
+          segmentGroup "2"
+            [ "0080" .@ once segmentCTA
+            , "0090" .@ repeated 9 segmentCOM
+            ]
+          )
+        ]
+      )
+    , "0100" .@ repeated 9 (
+      segmentGroup "3"
+        [ "0110" .@ once segmentRFF
+        , "0120" .@ maybeOnce segmentDTM
+        ]
+      )
+    , "0130" .@ repeated 9 segmentLOC
+    , "0140" .@ repeated 9 segmentFTX
+    , "0150" .@ repeated 9 segmentCNT
+    , "0160" .@ repeated 999 (
+      segmentGroup "4"
+        [ "0170" .@ once segmentCNI
+        , "0180" .@ repeated 9 segmentLOC
+        , "0190" .@ repeated 9 segmentCNT
+        , "0200" .@ repeatedAtLeastOnce 99 (
+          segmentGroup "5"
+            [ "0210" .@ once segmentSTS
+            , "0220" .@ repeated 9 segmentRFF
+            , "0230" .@ repeated 9 segmentDTM
+            , "0240" .@ maybeOnce segmentDOC
+            , "0250" .@ repeated 9 segmentFTX
+            , "0260" .@ repeated 9 segmentNAD
+            , "0270" .@ maybeOnce segmentLOC
+            , "0280" .@ repeated 99 segmentPCI
+            , "0290" .@ repeated 99 (
+              segmentGroup "6"
+                [ "0300" .@ once segmentTDT
+                , "0310" .@ repeated 9 segmentRFF
+                , "0320" .@ repeated 9 segmentLOC
+                , "0330" .@ repeated 9 segmentDTM
+                ]
+              )
+            , "0340" .@ repeated 99 (
+              segmentGroup "7"
+                [ "0350" .@ once segmentEQD
+                , "0360" .@ repeated 9 segmentMEA
+                , "0370" .@ repeated 9 segmentDIM
+                , "0380" .@ repeated 9 segmentSEL
+                , "0390" .@ repeated 99 (
+                  segmentGroup "8"
+                    [ "0400" .@ once segmentEQA
+                    , "0410" .@ repeated 9 segmentSEL
+                    ]
+                  )
+                ]
+              )
+            , "0420" .@ repeated 99 (
+              segmentGroup "9"
+                [ "0430" .@ once segmentGID
+                , "0440" .@ repeated 9 segmentHAN
+                , "0450" .@ repeated 99 (
+                  segmentGroup "10"
+                    [ "0460" .@ once segmentMEA
+                    , "0470" .@ maybeOnce segmentEQN
+                    ]
+                  )
+                , "0480" .@ repeated 99 (
+                  segmentGroup "11"
+                    [ "0490" .@ once segmentDIM
+                    , "0500" .@ maybeOnce segmentEQN
+                    ]
+                  )
+                , "0510" .@ repeated 99 (
+                  segmentGroup "12"
+                    [ "0520" .@ once segmentPCI
+                    , "0530" .@ repeated 9 segmentGIN
+                    ]
+                  )
+                ]
+              )
+            ]
+          )
+        ]
+      )
+    , "0540" .@ once segmentUNT
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments.hs b/specification/src/Text/Edifact/D96A/Segments.hs
new file mode 100644
index 0000000..b215b18
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments.hs
@@ -0,0 +1,53 @@
+module Text.Edifact.D96A.Segments
+  ( module S
+  ) where
+
+import           Text.Edifact.D96A.Segments.ALI as S
+import           Text.Edifact.D96A.Segments.BGM as S
+import           Text.Edifact.D96A.Segments.CNI as S
+import           Text.Edifact.D96A.Segments.CNT as S
+import           Text.Edifact.D96A.Segments.COM as S
+import           Text.Edifact.D96A.Segments.CPI as S
+import           Text.Edifact.D96A.Segments.CPS as S
+import           Text.Edifact.D96A.Segments.CTA as S
+import           Text.Edifact.D96A.Segments.CUX as S
+import           Text.Edifact.D96A.Segments.DGS as S
+import           Text.Edifact.D96A.Segments.DIM as S
+import           Text.Edifact.D96A.Segments.DLM as S
+import           Text.Edifact.D96A.Segments.DOC as S
+import           Text.Edifact.D96A.Segments.DTM as S
+import           Text.Edifact.D96A.Segments.EQA as S
+import           Text.Edifact.D96A.Segments.EQD as S
+import           Text.Edifact.D96A.Segments.EQN as S
+import           Text.Edifact.D96A.Segments.FTX as S
+import           Text.Edifact.D96A.Segments.GDS as S
+import           Text.Edifact.D96A.Segments.GID as S
+import           Text.Edifact.D96A.Segments.GIN as S
+import           Text.Edifact.D96A.Segments.GIR as S
+import           Text.Edifact.D96A.Segments.GOR as S
+import           Text.Edifact.D96A.Segments.HAN as S
+import           Text.Edifact.D96A.Segments.IMD as S
+import           Text.Edifact.D96A.Segments.LIN as S
+import           Text.Edifact.D96A.Segments.LOC as S
+import           Text.Edifact.D96A.Segments.MEA as S
+import           Text.Edifact.D96A.Segments.MOA as S
+import           Text.Edifact.D96A.Segments.NAD as S
+import           Text.Edifact.D96A.Segments.PAC as S
+import           Text.Edifact.D96A.Segments.PCD as S
+import           Text.Edifact.D96A.Segments.PCI as S
+import           Text.Edifact.D96A.Segments.PIA as S
+import           Text.Edifact.D96A.Segments.PRI as S
+import           Text.Edifact.D96A.Segments.QTY as S
+import           Text.Edifact.D96A.Segments.QVR as S
+import           Text.Edifact.D96A.Segments.RFF as S
+import           Text.Edifact.D96A.Segments.RNG as S
+import           Text.Edifact.D96A.Segments.SEL as S
+import           Text.Edifact.D96A.Segments.SGP as S
+import           Text.Edifact.D96A.Segments.STS as S
+import           Text.Edifact.D96A.Segments.TCC as S
+import           Text.Edifact.D96A.Segments.TDT as S
+import           Text.Edifact.D96A.Segments.TMD as S
+import           Text.Edifact.D96A.Segments.TMP as S
+import           Text.Edifact.D96A.Segments.TOD as S
+import           Text.Edifact.D96A.Segments.TPL as S
+import           Text.Edifact.D96A.Segments.TSR as S
diff --git a/specification/src/Text/Edifact/D96A/Segments/ALI.hs b/specification/src/Text/Edifact/D96A/Segments/ALI.hs
new file mode 100644
index 0000000..3b4fc54
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/ALI.hs
@@ -0,0 +1,53 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.ALI
+  ( -- * Definition
+    segmentALI
+    -- * Dependencies
+  , simple3239
+  , simple4183
+  , simple9213
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple3239, simple4183, simple9213)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       ALI    ADDITIONAL INFORMATION
+-- >
+-- >       Function: To indicate that special conditions due to the origin,
+-- >                 customs preference, fiscal or commercial factors are
+-- >                 applicable.
+-- >
+-- > 010   3239  COUNTRY OF ORIGIN, CODED                       C  an..3
+-- >
+-- > 020   9213  TYPE OF DUTY REGIME, CODED                     C  an..3
+-- >
+-- > 030   4183  SPECIAL CONDITIONS, CODED                      C  an..3
+-- >
+-- > 040   4183  SPECIAL CONDITIONS, CODED                      C  an..3
+-- >
+-- > 050   4183  SPECIAL CONDITIONS, CODED                      C  an..3
+-- >
+-- > 060   4183  SPECIAL CONDITIONS, CODED                      C  an..3
+-- >
+-- > 070   4183  SPECIAL CONDITIONS, CODED                      C  an..3
+--
+-- Dependencies: 'simple3239', 'simple4183', 'simple9213'.
+segmentALI :: Parser Value
+segmentALI =
+  segment "ALI"
+    [ "010" .@ optional  simple3239
+    , "020" .@ optional  simple9213
+    , "030" .@ optional  simple4183
+    , "040" .@ optional  simple4183
+    , "050" .@ optional  simple4183
+    , "060" .@ optional  simple4183
+    , "070" .@ optional  simple4183
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/BGM.hs b/specification/src/Text/Edifact/D96A/Segments/BGM.hs
new file mode 100644
index 0000000..5c30fcd
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/BGM.hs
@@ -0,0 +1,50 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.BGM
+  ( -- * Definition
+    segmentBGM
+    -- * Dependencies
+  , compositeC002
+  , simple1004
+  , simple1225
+  , simple4343
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC002)
+import           Text.Edifact.D96A.Simples    (simple1004, simple1225,
+                                               simple4343)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       BGM    BEGINNING OF MESSAGE
+-- >
+-- >       Function: To indicate the type and function of a message and to
+-- >                 transmit the identifying number.
+-- >
+-- > 010   C002  DOCUMENT/MESSAGE NAME                          C
+-- >       1001   Document/message name, coded                  C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       1000   Document/message name                         C  an..35
+-- >
+-- > 020   1004  DOCUMENT/MESSAGE NUMBER                        C  an..35
+-- >
+-- > 030   1225  MESSAGE FUNCTION, CODED                        C  an..3
+-- >
+-- > 040   4343  RESPONSE TYPE, CODED                           C  an..3
+--
+-- Dependencies: 'compositeC002', 'simple1004', 'simple1225', 'simple4343'.
+segmentBGM :: Parser Value
+segmentBGM =
+  segment "BGM"
+    [ "010" .@ optional  compositeC002
+    , "020" .@ optional  simple1004
+    , "030" .@ optional  simple1225
+    , "040" .@ optional  simple4343
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/CNI.hs b/specification/src/Text/Edifact/D96A/Segments/CNI.hs
new file mode 100644
index 0000000..cdd22fd
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/CNI.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.CNI
+  ( -- * Definition
+    segmentCNI
+    -- * Dependencies
+  , compositeC503
+  , simple1312
+  , simple1490
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC503)
+import           Text.Edifact.D96A.Simples    (simple1312, simple1490)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       CNI    CONSIGNMENT INFORMATION
+-- >
+-- >       Function: To identify one consignment.
+-- >
+-- > 010   1490  CONSOLIDATION ITEM NUMBER                      C  n..4
+-- >
+-- > 020   C503  DOCUMENT/MESSAGE DETAILS                       C
+-- >       1004   Document/message number                       C  an..35
+-- >       1373   Document/message status, coded                C  an..3
+-- >       1366   Document/message source                       C  an..35
+-- >       3453   Language, coded                               C  an..3
+-- >
+-- > 030   1312  CONSIGNMENT LOAD SEQUENCE NUMBER               C  n..4
+--
+-- Dependencies: 'compositeC503', 'simple1312', 'simple1490'.
+segmentCNI :: Parser Value
+segmentCNI =
+  segment "CNI"
+    [ "010" .@ optional  simple1490
+    , "020" .@ optional  compositeC503
+    , "030" .@ optional  simple1312
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/CNT.hs b/specification/src/Text/Edifact/D96A/Segments/CNT.hs
new file mode 100644
index 0000000..a5a2273
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/CNT.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.CNT
+  ( -- * Definition
+    segmentCNT
+    -- * Dependencies
+  , compositeC270
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC270)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       CNT    CONTROL TOTAL
+-- >
+-- >       Function: To provide control total.
+-- >
+-- > 010   C270  CONTROL                                        M
+-- >       6069   Control qualifier                             M  an..3
+-- >       6066   Control value                                 M  n..18
+-- >       6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'compositeC270'.
+segmentCNT :: Parser Value
+segmentCNT =
+  segment "CNT"
+    [ "010" .@ mandatory compositeC270
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/COM.hs b/specification/src/Text/Edifact/D96A/Segments/COM.hs
new file mode 100644
index 0000000..5f5782b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/COM.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.COM
+  ( -- * Definition
+    segmentCOM
+    -- * Dependencies
+  , compositeC076
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC076)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       COM    COMMUNICATION CONTACT
+-- >
+-- >       Function: To identify a communication number of a department or
+-- >                 a person to whom communication should be directed.
+-- >
+-- > 010   C076  COMMUNICATION CONTACT                          M
+-- >       3148   Communication number                          M  an..512
+-- >       3155   Communication channel qualifier               M  an..3
+--
+-- Dependencies: 'compositeC076'.
+segmentCOM :: Parser Value
+segmentCOM =
+  segment "COM"
+    [ "010" .@ mandatory compositeC076
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/CPI.hs b/specification/src/Text/Edifact/D96A/Segments/CPI.hs
new file mode 100644
index 0000000..7325e32
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/CPI.hs
@@ -0,0 +1,46 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.CPI
+  ( -- * Definition
+    segmentCPI
+    -- * Dependencies
+  , compositeC229
+  , compositeC231
+  , simple4237
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC229, compositeC231)
+import           Text.Edifact.D96A.Simples    (simple4237)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       CPI    CHARGE PAYMENT INSTRUCTIONS
+-- >
+-- >       Function: To identify a charge.
+-- >
+-- > 010   C229  CHARGE CATEGORY                                C
+-- >       5237   Charge category, coded                        M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 020   C231  METHOD OF PAYMENT                              C
+-- >       4215   Transport charges method of payment, coded    M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 030   4237  PREPAID/COLLECT INDICATOR, CODED               C  an..3
+--
+-- Dependencies: 'compositeC229', 'compositeC231', 'simple4237'.
+segmentCPI :: Parser Value
+segmentCPI =
+  segment "CPI"
+    [ "010" .@ optional  compositeC229
+    , "020" .@ optional  compositeC231
+    , "030" .@ optional  simple4237
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/CPS.hs b/specification/src/Text/Edifact/D96A/Segments/CPS.hs
new file mode 100644
index 0000000..0ce27b5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/CPS.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.CPS
+  ( -- * Definition
+    segmentCPS
+    -- * Dependencies
+  , simple7075
+  , simple7164
+  , simple7166
+  ) where
+
+import           Text.Edifact.D96A.Simples (simple7075, simple7164, simple7166)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types        (Value)
+
+-- | Derived from this specification:
+--
+-- >       CPS    CONSIGNMENT PACKING SEQUENCE
+-- >
+-- >       Function: To identify the sequence in which physical packing is
+-- >                 presented in the consignment, and optionally to
+-- >                 identify the hierarchical relationship between packing
+-- >                 layers.
+-- >
+-- > 010   7164  HIERARCHICAL ID. NUMBER                        M  an..12
+-- >
+-- > 020   7166  HIERARCHICAL PARENT ID.                        C  an..12
+-- >
+-- > 030   7075  PACKAGING LEVEL, CODED                         C  an..3
+--
+-- Dependencies: 'simple7075', 'simple7164', 'simple7166'.
+segmentCPS :: Parser Value
+segmentCPS =
+  segment "CPS"
+    [ "010" .@ mandatory simple7164
+    , "020" .@ optional  simple7166
+    , "030" .@ optional  simple7075
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/CTA.hs b/specification/src/Text/Edifact/D96A/Segments/CTA.hs
new file mode 100644
index 0000000..3d7dac8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/CTA.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.CTA
+  ( -- * Definition
+    segmentCTA
+    -- * Dependencies
+  , compositeC056
+  , simple3139
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC056)
+import           Text.Edifact.D96A.Simples    (simple3139)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       CTA    CONTACT INFORMATION
+-- >
+-- >       Function: To identify a person or a department to whom
+-- >                 communication should be directed.
+-- >
+-- > 010   3139  CONTACT FUNCTION, CODED                        C  an..3
+-- >
+-- > 020   C056  DEPARTMENT OR EMPLOYEE DETAILS                 C
+-- >       3413   Department or employee identification         C  an..17
+-- >       3412   Department or employee                        C  an..35
+--
+-- Dependencies: 'compositeC056', 'simple3139'.
+segmentCTA :: Parser Value
+segmentCTA =
+  segment "CTA"
+    [ "010" .@ optional  simple3139
+    , "020" .@ optional  compositeC056
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/CUX.hs b/specification/src/Text/Edifact/D96A/Segments/CUX.hs
new file mode 100644
index 0000000..c4982a6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/CUX.hs
@@ -0,0 +1,52 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.CUX
+  ( -- * Definition
+    segmentCUX
+    -- * Dependencies
+  , compositeC504
+  , simple5402
+  , simple6341
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC504)
+import           Text.Edifact.D96A.Simples    (simple5402, simple6341)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       CUX    CURRENCIES
+-- >
+-- >       Function: To specify currencies used in the transaction and
+-- >                 relevant details for the rate of exchange.
+-- >
+-- > 010   C504  CURRENCY DETAILS                               C
+-- >       6347   Currency details qualifier                    M  an..3
+-- >       6345   Currency, coded                               C  an..3
+-- >       6343   Currency qualifier                            C  an..3
+-- >       6348   Currency rate base                            C  n..4
+-- >
+-- > 020   C504  CURRENCY DETAILS                               C
+-- >       6347   Currency details qualifier                    M  an..3
+-- >       6345   Currency, coded                               C  an..3
+-- >       6343   Currency qualifier                            C  an..3
+-- >       6348   Currency rate base                            C  n..4
+-- >
+-- > 030   5402  RATE OF EXCHANGE                               C  n..12
+-- >
+-- > 040   6341  CURRENCY MARKET EXCHANGE, CODED                C  an..3
+--
+-- Dependencies: 'compositeC504', 'simple5402', 'simple6341'.
+segmentCUX :: Parser Value
+segmentCUX =
+  segment "CUX"
+    [ "010" .@ optional  compositeC504
+    , "020" .@ optional  compositeC504
+    , "030" .@ optional  simple5402
+    , "040" .@ optional  simple6341
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/DGS.hs b/specification/src/Text/Edifact/D96A/Segments/DGS.hs
new file mode 100644
index 0000000..6330f6d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/DGS.hs
@@ -0,0 +1,97 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.DGS
+  ( -- * Definition
+    segmentDGS
+    -- * Dependencies
+  , compositeC205
+  , compositeC223
+  , compositeC234
+  , compositeC235
+  , compositeC236
+  , simple8126
+  , simple8211
+  , simple8255
+  , simple8273
+  , simple8325
+  , simple8339
+  , simple8364
+  , simple8410
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC205, compositeC223,
+                                               compositeC234, compositeC235,
+                                               compositeC236)
+import           Text.Edifact.D96A.Simples    (simple8126, simple8211,
+                                               simple8255, simple8273,
+                                               simple8325, simple8339,
+                                               simple8364, simple8410)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       DGS    DANGEROUS GOODS
+-- >
+-- >       Function: To identify dangerous goods.
+-- >
+-- > 010   8273  DANGEROUS GOODS REGULATIONS, CODED             C  an..3
+-- >
+-- > 020   C205  HAZARD CODE                                    C
+-- >       8351   Hazard code identification                    M  an..7
+-- >       8078   Hazard substance/item/page number             C  an..7
+-- >       8092   Hazard code version number                    C  an..10
+-- >
+-- > 030   C234  UNDG INFORMATION                               C
+-- >       7124   UNDG number                                   C  n4
+-- >       7088   Dangerous goods flashpoint                    C  an..8
+-- >
+-- > 040   C223  DANGEROUS GOODS SHIPMENT FLASHPOINT            C
+-- >       7106   Shipment flashpoint                           C  n3
+-- >       6411   Measure unit qualifier                        C  an..3
+-- >
+-- > 050   8339  PACKING GROUP, CODED                           C  an..3
+-- >
+-- > 060   8364  EMS NUMBER                                     C  an..6
+-- >
+-- > 070   8410  MFAG                                           C  an..4
+-- >
+-- > 080   8126  TREM CARD NUMBER                               C  an..10
+-- >
+-- > 090   C235  HAZARD IDENTIFICATION                          C
+-- >       8158   Hazard identification number, upper part      C  an..4
+-- >       8186   Substance identification number, lower part   C  an4
+-- >
+-- > 100   C236  DANGEROUS GOODS LABEL                          C
+-- >       8246   Dangerous goods label marking                 C  an..4
+-- >       8246   Dangerous goods label marking                 C  an..4
+-- >       8246   Dangerous goods label marking                 C  an..4
+-- >
+-- > 110   8255  PACKING INSTRUCTION, CODED                     C  an..3
+-- >
+-- > 120   8325  CATEGORY OF MEANS OF TRANSPORT, CODED          C  an..3
+-- >
+-- > 130   8211  PERMISSION FOR TRANSPORT, CODED                C  an..3
+--
+-- Dependencies: 'compositeC205', 'compositeC223', 'compositeC234', 'compositeC235', 'compositeC236', 'simple8126', 'simple8211', 'simple8255', 'simple8273', 'simple8325', 'simple8339', 'simple8364', 'simple8410'.
+segmentDGS :: Parser Value
+segmentDGS =
+  segment "DGS"
+    [ "010" .@ optional  simple8273
+    , "020" .@ optional  compositeC205
+    , "030" .@ optional  compositeC234
+    , "040" .@ optional  compositeC223
+    , "050" .@ optional  simple8339
+    , "060" .@ optional  simple8364
+    , "070" .@ optional  simple8410
+    , "080" .@ optional  simple8126
+    , "090" .@ optional  compositeC235
+    , "100" .@ optional  compositeC236
+    , "110" .@ optional  simple8255
+    , "120" .@ optional  simple8325
+    , "130" .@ optional  simple8211
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/DIM.hs b/specification/src/Text/Edifact/D96A/Segments/DIM.hs
new file mode 100644
index 0000000..a42b6db
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/DIM.hs
@@ -0,0 +1,40 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.DIM
+  ( -- * Definition
+    segmentDIM
+    -- * Dependencies
+  , compositeC211
+  , simple6145
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC211)
+import           Text.Edifact.D96A.Simples    (simple6145)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       DIM    DIMENSIONS
+-- >
+-- >       Function: To specify dimensions.
+-- >
+-- > 010   6145  DIMENSION QUALIFIER                            M  an..3
+-- >
+-- > 020   C211  DIMENSIONS                                     M
+-- >       6411   Measure unit qualifier                        M  an..3
+-- >       6168   Length dimension                              C  n..15
+-- >       6140   Width dimension                               C  n..15
+-- >       6008   Height dimension                              C  n..15
+--
+-- Dependencies: 'compositeC211', 'simple6145'.
+segmentDIM :: Parser Value
+segmentDIM =
+  segment "DIM"
+    [ "010" .@ mandatory simple6145
+    , "020" .@ mandatory compositeC211
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/DLM.hs b/specification/src/Text/Edifact/D96A/Segments/DLM.hs
new file mode 100644
index 0000000..94c31a9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/DLM.hs
@@ -0,0 +1,54 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.DLM
+  ( -- * Definition
+    segmentDLM
+    -- * Dependencies
+  , compositeC214
+  , compositeC522
+  , simple4455
+  , simple4457
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC214, compositeC522)
+import           Text.Edifact.D96A.Simples    (simple4455, simple4457)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       DLM    DELIVERY LIMITATIONS
+-- >
+-- >       Function: To specify limitations on deliveries.
+-- >
+-- > 010   4455  BACK ORDER, CODED                              C  an..3
+-- >
+-- > 020   C522  INSTRUCTION                                    C
+-- >       4403   Instruction qualifier                         M  an..3
+-- >       4401   Instruction, coded                            C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       4400   Instruction                                   C  an..35
+-- >
+-- > 030   C214  SPECIAL SERVICES IDENTIFICATION                C
+-- >       7161   Special services, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7160   Special service                               C  an..35
+-- >       7160   Special service                               C  an..35
+-- >
+-- > 040   4457  PRODUCT/SERVICE SUBSTITUTION, CODED            C  an..3
+--
+-- Dependencies: 'compositeC214', 'compositeC522', 'simple4455', 'simple4457'.
+segmentDLM :: Parser Value
+segmentDLM =
+  segment "DLM"
+    [ "010" .@ optional  simple4455
+    , "020" .@ optional  compositeC522
+    , "030" .@ optional  compositeC214
+    , "040" .@ optional  simple4457
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/DOC.hs b/specification/src/Text/Edifact/D96A/Segments/DOC.hs
new file mode 100644
index 0000000..61bf69c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/DOC.hs
@@ -0,0 +1,61 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.DOC
+  ( -- * Definition
+    segmentDOC
+    -- * Dependencies
+  , compositeC002
+  , compositeC503
+  , simple1218
+  , simple1220
+  , simple3153
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC002, compositeC503)
+import           Text.Edifact.D96A.Simples    (simple1218, simple1220,
+                                               simple3153)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       DOC    DOCUMENT/MESSAGE DETAILS
+-- >
+-- >       Function: To identify documents, either printed, electronically
+-- >                 transferred, or referenced as specified in message
+-- >                 description, including, where relevant, the
+-- >                 identification of the type of transaction that will
+-- >                 result from this message.
+-- >
+-- > 010   C002  DOCUMENT/MESSAGE NAME                          M
+-- >       1001   Document/message name, coded                  C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       1000   Document/message name                         C  an..35
+-- >
+-- > 020   C503  DOCUMENT/MESSAGE DETAILS                       C
+-- >       1004   Document/message number                       C  an..35
+-- >       1373   Document/message status, coded                C  an..3
+-- >       1366   Document/message source                       C  an..35
+-- >       3453   Language, coded                               C  an..3
+-- >
+-- > 030   3153  COMMUNICATION CHANNEL IDENTIFIER, CODED        C  an..3
+-- >
+-- > 040   1220  NUMBER OF COPIES OF DOCUMENT REQUIRED          C  n..2
+-- >
+-- > 050   1218  NUMBER OF ORIGINALS OF DOCUMENT REQUIRED       C  n..2
+--
+-- Dependencies: 'compositeC002', 'compositeC503', 'simple1218', 'simple1220', 'simple3153'.
+segmentDOC :: Parser Value
+segmentDOC =
+  segment "DOC"
+    [ "010" .@ mandatory compositeC002
+    , "020" .@ optional  compositeC503
+    , "030" .@ optional  simple3153
+    , "040" .@ optional  simple1220
+    , "050" .@ optional  simple1218
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/DTM.hs b/specification/src/Text/Edifact/D96A/Segments/DTM.hs
new file mode 100644
index 0000000..066724c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/DTM.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.DTM
+  ( -- * Definition
+    segmentDTM
+    -- * Dependencies
+  , compositeC507
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC507)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       DTM    DATE/TIME/PERIOD
+-- >
+-- >       Function: To specify date, and/or time, or period.
+-- >
+-- > 010   C507  DATE/TIME/PERIOD                               M
+-- >       2005   Date/time/period qualifier                    M  an..3
+-- >       2380   Date/time/period                              C  an..35
+-- >       2379   Date/time/period format qualifier             C  an..3
+--
+-- Dependencies: 'compositeC507'.
+segmentDTM :: Parser Value
+segmentDTM =
+  segment "DTM"
+    [ "010" .@ mandatory compositeC507
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/EQA.hs b/specification/src/Text/Edifact/D96A/Segments/EQA.hs
new file mode 100644
index 0000000..d16d109
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/EQA.hs
@@ -0,0 +1,40 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.EQA
+  ( -- * Definition
+    segmentEQA
+    -- * Dependencies
+  , compositeC237
+  , simple8053
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC237)
+import           Text.Edifact.D96A.Simples    (simple8053)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       EQA    ATTACHED EQUIPMENT
+-- >
+-- >       Function: To specify attached or related equipment.
+-- >
+-- > 010   8053  EQUIPMENT QUALIFIER                            M  an..3
+-- >
+-- > 020   C237  EQUIPMENT IDENTIFICATION                       C
+-- >       8260   Equipment identification number               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3207   Country, coded                                C  an..3
+--
+-- Dependencies: 'compositeC237', 'simple8053'.
+segmentEQA :: Parser Value
+segmentEQA =
+  segment "EQA"
+    [ "010" .@ mandatory simple8053
+    , "020" .@ optional  compositeC237
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/EQD.hs b/specification/src/Text/Edifact/D96A/Segments/EQD.hs
new file mode 100644
index 0000000..e0f63d7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/EQD.hs
@@ -0,0 +1,61 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.EQD
+  ( -- * Definition
+    segmentEQD
+    -- * Dependencies
+  , compositeC224
+  , compositeC237
+  , simple8053
+  , simple8077
+  , simple8169
+  , simple8249
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC224, compositeC237)
+import           Text.Edifact.D96A.Simples    (simple8053, simple8077,
+                                               simple8169, simple8249)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       EQD    EQUIPMENT DETAILS
+-- >
+-- >       Function: To identify a unit of equipment.
+-- >
+-- > 010   8053  EQUIPMENT QUALIFIER                            M  an..3
+-- >
+-- > 020   C237  EQUIPMENT IDENTIFICATION                       C
+-- >       8260   Equipment identification number               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3207   Country, coded                                C  an..3
+-- >
+-- > 030   C224  EQUIPMENT SIZE AND TYPE                        C
+-- >       8155   Equipment size and type identification        C  an..10
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       8154   Equipment size and type                       C  an..35
+-- >
+-- > 040   8077  EQUIPMENT SUPPLIER, CODED                      C  an..3
+-- >
+-- > 050   8249  EQUIPMENT STATUS, CODED                        C  an..3
+-- >
+-- > 060   8169  FULL/EMPTY INDICATOR, CODED                    C  an..3
+--
+-- Dependencies: 'compositeC224', 'compositeC237', 'simple8053', 'simple8077', 'simple8169', 'simple8249'.
+segmentEQD :: Parser Value
+segmentEQD =
+  segment "EQD"
+    [ "010" .@ mandatory simple8053
+    , "020" .@ optional  compositeC237
+    , "030" .@ optional  compositeC224
+    , "040" .@ optional  simple8077
+    , "050" .@ optional  simple8249
+    , "060" .@ optional  simple8169
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/EQN.hs b/specification/src/Text/Edifact/D96A/Segments/EQN.hs
new file mode 100644
index 0000000..ce052a2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/EQN.hs
@@ -0,0 +1,33 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.EQN
+  ( -- * Definition
+    segmentEQN
+    -- * Dependencies
+  , compositeC523
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC523)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       EQN    NUMBER OF UNITS
+-- >
+-- >       Function: To specify the number of units.
+-- >
+-- > 010   C523  NUMBER OF UNIT DETAILS                         M
+-- >       6350   Number of units                               C  n..15
+-- >       6353   Number of units qualifier                     C  an..3
+--
+-- Dependencies: 'compositeC523'.
+segmentEQN :: Parser Value
+segmentEQN =
+  segment "EQN"
+    [ "010" .@ mandatory compositeC523
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/FTX.hs b/specification/src/Text/Edifact/D96A/Segments/FTX.hs
new file mode 100644
index 0000000..68eebbc
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/FTX.hs
@@ -0,0 +1,57 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.FTX
+  ( -- * Definition
+    segmentFTX
+    -- * Dependencies
+  , compositeC107
+  , compositeC108
+  , simple3453
+  , simple4451
+  , simple4453
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC107, compositeC108)
+import           Text.Edifact.D96A.Simples    (simple3453, simple4451,
+                                               simple4453)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       FTX    FREE TEXT
+-- >
+-- >       Function: To provide free form or coded text information.
+-- >
+-- > 010   4451  TEXT SUBJECT QUALIFIER                         M  an..3
+-- >
+-- > 020   4453  TEXT FUNCTION, CODED                           C  an..3
+-- >
+-- > 030   C107  TEXT REFERENCE                                 C
+-- >       4441   Free text, coded                              M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 040   C108  TEXT LITERAL                                   C
+-- >       4440   Free text                                     M  an..70
+-- >       4440   Free text                                     C  an..70
+-- >       4440   Free text                                     C  an..70
+-- >       4440   Free text                                     C  an..70
+-- >       4440   Free text                                     C  an..70
+-- >
+-- > 050   3453  LANGUAGE, CODED                                C  an..3
+--
+-- Dependencies: 'compositeC107', 'compositeC108', 'simple3453', 'simple4451', 'simple4453'.
+segmentFTX :: Parser Value
+segmentFTX =
+  segment "FTX"
+    [ "010" .@ mandatory simple4451
+    , "020" .@ optional  simple4453
+    , "030" .@ optional  compositeC107
+    , "040" .@ optional  compositeC108
+    , "050" .@ optional  simple3453
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/GDS.hs b/specification/src/Text/Edifact/D96A/Segments/GDS.hs
new file mode 100644
index 0000000..5ea1ae2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/GDS.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.GDS
+  ( -- * Definition
+    segmentGDS
+    -- * Dependencies
+  , compositeC703
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC703)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       GDS    NATURE OF CARGO
+-- >
+-- >       Function: To indicate the type of cargo as a general
+-- >                 classification.
+-- >
+-- > 010   C703  NATURE OF CARGO                                C
+-- >       7085   Nature of cargo, coded                        M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC703'.
+segmentGDS :: Parser Value
+segmentGDS =
+  segment "GDS"
+    [ "010" .@ optional  compositeC703
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/GID.hs b/specification/src/Text/Edifact/D96A/Segments/GID.hs
new file mode 100644
index 0000000..cdb8254
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/GID.hs
@@ -0,0 +1,57 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.GID
+  ( -- * Definition
+    segmentGID
+    -- * Dependencies
+  , compositeC213
+  , simple1496
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC213)
+import           Text.Edifact.D96A.Simples    (simple1496)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       GID    GOODS ITEM DETAILS
+-- >
+-- >       Function: To indicate totals of a goods item.
+-- >
+-- > 010   1496  GOODS ITEM NUMBER                              C  n..5
+-- >
+-- > 020   C213  NUMBER AND TYPE OF PACKAGES                    C
+-- >       7224   Number of packages                            C  n..8
+-- >       7065   Type of packages identification               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7064   Type of packages                              C  an..35
+-- >
+-- > 030   C213  NUMBER AND TYPE OF PACKAGES                    C
+-- >       7224   Number of packages                            C  n..8
+-- >       7065   Type of packages identification               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7064   Type of packages                              C  an..35
+-- >
+-- > 040   C213  NUMBER AND TYPE OF PACKAGES                    C
+-- >       7224   Number of packages                            C  n..8
+-- >       7065   Type of packages identification               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7064   Type of packages                              C  an..35
+--
+-- Dependencies: 'compositeC213', 'simple1496'.
+segmentGID :: Parser Value
+segmentGID =
+  segment "GID"
+    [ "010" .@ optional  simple1496
+    , "020" .@ optional  compositeC213
+    , "030" .@ optional  compositeC213
+    , "040" .@ optional  compositeC213
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/GIN.hs b/specification/src/Text/Edifact/D96A/Segments/GIN.hs
new file mode 100644
index 0000000..a349490
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/GIN.hs
@@ -0,0 +1,59 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.GIN
+  ( -- * Definition
+    segmentGIN
+    -- * Dependencies
+  , compositeC208
+  , simple7405
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC208)
+import           Text.Edifact.D96A.Simples    (simple7405)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       GIN    GOODS IDENTITY NUMBER
+-- >
+-- >       Function: To give specific identification numbers, either as
+-- >                 single numbers or ranges.
+-- >
+-- > 010   7405  IDENTITY NUMBER QUALIFIER                      M  an..3
+-- >
+-- > 020   C208  IDENTITY NUMBER RANGE                          M
+-- >       7402   Identity number                               M  an..35
+-- >       7402   Identity number                               C  an..35
+-- >
+-- > 030   C208  IDENTITY NUMBER RANGE                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7402   Identity number                               C  an..35
+-- >
+-- > 040   C208  IDENTITY NUMBER RANGE                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7402   Identity number                               C  an..35
+-- >
+-- > 050   C208  IDENTITY NUMBER RANGE                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7402   Identity number                               C  an..35
+-- >
+-- > 060   C208  IDENTITY NUMBER RANGE                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7402   Identity number                               C  an..35
+--
+-- Dependencies: 'compositeC208', 'simple7405'.
+segmentGIN :: Parser Value
+segmentGIN =
+  segment "GIN"
+    [ "010" .@ mandatory simple7405
+    , "020" .@ mandatory compositeC208
+    , "030" .@ optional  compositeC208
+    , "040" .@ optional  compositeC208
+    , "050" .@ optional  compositeC208
+    , "060" .@ optional  compositeC208
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/GIR.hs b/specification/src/Text/Edifact/D96A/Segments/GIR.hs
new file mode 100644
index 0000000..b70cef7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/GIR.hs
@@ -0,0 +1,63 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.GIR
+  ( -- * Definition
+    segmentGIR
+    -- * Dependencies
+  , compositeC206
+  , simple7297
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC206)
+import           Text.Edifact.D96A.Simples    (simple7297)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       GIR    RELATED IDENTIFICATION NUMBERS
+-- >
+-- >       Function: To specify a related set of identification numbers.
+-- >
+-- > 010   7297  SET IDENTIFICATION QUALIFIER                   M  an..3
+-- >
+-- > 020   C206  IDENTIFICATION NUMBER                          M
+-- >       7402   Identity number                               M  an..35
+-- >       7405   Identity number qualifier                     C  an..3
+-- >       4405   Status, coded                                 C  an..3
+-- >
+-- > 030   C206  IDENTIFICATION NUMBER                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7405   Identity number qualifier                     C  an..3
+-- >       4405   Status, coded                                 C  an..3
+-- >
+-- > 040   C206  IDENTIFICATION NUMBER                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7405   Identity number qualifier                     C  an..3
+-- >       4405   Status, coded                                 C  an..3
+-- >
+-- > 050   C206  IDENTIFICATION NUMBER                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7405   Identity number qualifier                     C  an..3
+-- >       4405   Status, coded                                 C  an..3
+-- >
+-- > 060   C206  IDENTIFICATION NUMBER                          C
+-- >       7402   Identity number                               M  an..35
+-- >       7405   Identity number qualifier                     C  an..3
+-- >       4405   Status, coded                                 C  an..3
+--
+-- Dependencies: 'compositeC206', 'simple7297'.
+segmentGIR :: Parser Value
+segmentGIR =
+  segment "GIR"
+    [ "010" .@ mandatory simple7297
+    , "020" .@ mandatory compositeC206
+    , "030" .@ optional  compositeC206
+    , "040" .@ optional  compositeC206
+    , "050" .@ optional  compositeC206
+    , "060" .@ optional  compositeC206
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/GOR.hs b/specification/src/Text/Edifact/D96A/Segments/GOR.hs
new file mode 100644
index 0000000..fd28bf8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/GOR.hs
@@ -0,0 +1,63 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.GOR
+  ( -- * Definition
+    segmentGOR
+    -- * Dependencies
+  , compositeC232
+  , simple8323
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC232)
+import           Text.Edifact.D96A.Simples    (simple8323)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       GOR    GOVERNMENTAL REQUIREMENTS
+-- >
+-- >       Function: To indicate the requirement for a specific govermental
+-- >                 action and/or procedure or which specific procedure is
+-- >                 valid for a specific part of the transport.
+-- >
+-- > 010   8323  TRANSPORT MOVEMENT, CODED                      C  an..3
+-- >
+-- > 020   C232  GOVERNMENT ACTION                              C
+-- >       9415   Government agency, coded                      C  an..3
+-- >       9411   Government involvement, coded                 C  an..3
+-- >       9417   Government action, coded                      C  an..3
+-- >       9353   Government procedure, coded                   C  an..3
+-- >
+-- > 030   C232  GOVERNMENT ACTION                              C
+-- >       9415   Government agency, coded                      C  an..3
+-- >       9411   Government involvement, coded                 C  an..3
+-- >       9417   Government action, coded                      C  an..3
+-- >       9353   Government procedure, coded                   C  an..3
+-- >
+-- > 040   C232  GOVERNMENT ACTION                              C
+-- >       9415   Government agency, coded                      C  an..3
+-- >       9411   Government involvement, coded                 C  an..3
+-- >       9417   Government action, coded                      C  an..3
+-- >       9353   Government procedure, coded                   C  an..3
+-- >
+-- > 050   C232  GOVERNMENT ACTION                              C
+-- >       9415   Government agency, coded                      C  an..3
+-- >       9411   Government involvement, coded                 C  an..3
+-- >       9417   Government action, coded                      C  an..3
+-- >       9353   Government procedure, coded                   C  an..3
+--
+-- Dependencies: 'compositeC232', 'simple8323'.
+segmentGOR :: Parser Value
+segmentGOR =
+  segment "GOR"
+    [ "010" .@ optional  simple8323
+    , "020" .@ optional  compositeC232
+    , "030" .@ optional  compositeC232
+    , "040" .@ optional  compositeC232
+    , "050" .@ optional  compositeC232
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/HAN.hs b/specification/src/Text/Edifact/D96A/Segments/HAN.hs
new file mode 100644
index 0000000..2f6f523
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/HAN.hs
@@ -0,0 +1,43 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.HAN
+  ( -- * Definition
+    segmentHAN
+    -- * Dependencies
+  , compositeC218
+  , compositeC524
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC218, compositeC524)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       HAN    HANDLING INSTRUCTIONS
+-- >
+-- >       Function: To specify handling and where necessary, notify
+-- >                 hazards.
+-- >
+-- > 010   C524  HANDLING INSTRUCTIONS                          C
+-- >       4079   Handling instructions, coded                  C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       4078   Handling instructions                         C  an..70
+-- >
+-- > 020   C218  HAZARDOUS MATERIAL                             C
+-- >       7419   Hazardous material class code, identification C  an..4
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC218', 'compositeC524'.
+segmentHAN :: Parser Value
+segmentHAN =
+  segment "HAN"
+    [ "010" .@ optional  compositeC524
+    , "020" .@ optional  compositeC218
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/IMD.hs b/specification/src/Text/Edifact/D96A/Segments/IMD.hs
new file mode 100644
index 0000000..165c1af
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/IMD.hs
@@ -0,0 +1,52 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.IMD
+  ( -- * Definition
+    segmentIMD
+    -- * Dependencies
+  , compositeC273
+  , simple7077
+  , simple7081
+  , simple7383
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC273)
+import           Text.Edifact.D96A.Simples    (simple7077, simple7081,
+                                               simple7383)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       IMD    ITEM DESCRIPTION
+-- >
+-- >       Function: To describe an item in either an industry or free
+-- >                 format.
+-- >
+-- > 010   7077  ITEM DESCRIPTION TYPE, CODED                   C  an..3
+-- >
+-- > 020   7081  ITEM CHARACTERISTIC, CODED                     C  an..3
+-- >
+-- > 030   C273  ITEM DESCRIPTION                               C
+-- >       7009   Item description identification               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7008   Item description                              C  an..35
+-- >       7008   Item description                              C  an..35
+-- >       3453   Language, coded                               C  an..3
+-- >
+-- > 040   7383  SURFACE/LAYER INDICATOR, CODED                 C  an..3
+--
+-- Dependencies: 'compositeC273', 'simple7077', 'simple7081', 'simple7383'.
+segmentIMD :: Parser Value
+segmentIMD =
+  segment "IMD"
+    [ "010" .@ optional  simple7077
+    , "020" .@ optional  simple7081
+    , "030" .@ optional  compositeC273
+    , "040" .@ optional  simple7383
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/LIN.hs b/specification/src/Text/Edifact/D96A/Segments/LIN.hs
new file mode 100644
index 0000000..42dced8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/LIN.hs
@@ -0,0 +1,59 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.LIN
+  ( -- * Definition
+    segmentLIN
+    -- * Dependencies
+  , compositeC212
+  , compositeC829
+  , simple1082
+  , simple1222
+  , simple1229
+  , simple7083
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC212, compositeC829)
+import           Text.Edifact.D96A.Simples    (simple1082, simple1222,
+                                               simple1229, simple7083)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       LIN    LINE ITEM
+-- >
+-- >       Function: To identify a line item and configuration.
+-- >
+-- > 010   1082  LINE ITEM NUMBER                               C  n..6
+-- >
+-- > 020   1229  ACTION REQUEST/NOTIFICATION, CODED             C  an..3
+-- >
+-- > 030   C212  ITEM NUMBER IDENTIFICATION                     C
+-- >       7140   Item number                                   C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 040   C829  SUB-LINE INFORMATION                           C
+-- >       5495   Sub-line indicator, coded                     C  an..3
+-- >       1082   Line item number                              C  n..6
+-- >
+-- > 050   1222  CONFIGURATION LEVEL                            C  n..2
+-- >
+-- > 060   7083  CONFIGURATION, CODED                           C  an..3
+--
+-- Dependencies: 'compositeC212', 'compositeC829', 'simple1082', 'simple1222', 'simple1229', 'simple7083'.
+segmentLIN :: Parser Value
+segmentLIN =
+  segment "LIN"
+    [ "010" .@ optional  simple1082
+    , "020" .@ optional  simple1229
+    , "030" .@ optional  compositeC212
+    , "040" .@ optional  compositeC829
+    , "050" .@ optional  simple1222
+    , "060" .@ optional  simple7083
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/LOC.hs b/specification/src/Text/Edifact/D96A/Segments/LOC.hs
new file mode 100644
index 0000000..91a4022
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/LOC.hs
@@ -0,0 +1,62 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.LOC
+  ( -- * Definition
+    segmentLOC
+    -- * Dependencies
+  , compositeC517
+  , compositeC519
+  , compositeC553
+  , simple3227
+  , simple5479
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC517, compositeC519,
+                                               compositeC553)
+import           Text.Edifact.D96A.Simples    (simple3227, simple5479)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       LOC    PLACE/LOCATION IDENTIFICATION
+-- >
+-- >       Function: To identify a country/place/location/related location
+-- >                 one/related location two.
+-- >
+-- > 010   3227  PLACE/LOCATION QUALIFIER                       M  an..3
+-- >
+-- > 020   C517  LOCATION IDENTIFICATION                        C
+-- >       3225   Place/location identification                 C  an..25
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3224   Place/location                                C  an..70
+-- >
+-- > 030   C519  RELATED LOCATION ONE IDENTIFICATION            C
+-- >       3223   Related place/location one identification     C  an..25
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3222   Related place/location one                    C  an..70
+-- >
+-- > 040   C553  RELATED LOCATION TWO IDENTIFICATION            C
+-- >       3233   Related place/location two identification     C  an..25
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3232   Related place/location two                    C  an..70
+-- >
+-- > 050   5479  RELATION, CODED                                C  an..3
+--
+-- Dependencies: 'compositeC517', 'compositeC519', 'compositeC553', 'simple3227', 'simple5479'.
+segmentLOC :: Parser Value
+segmentLOC =
+  segment "LOC"
+    [ "010" .@ mandatory simple3227
+    , "020" .@ optional  compositeC517
+    , "030" .@ optional  compositeC519
+    , "040" .@ optional  compositeC553
+    , "050" .@ optional  simple5479
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/MEA.hs b/specification/src/Text/Edifact/D96A/Segments/MEA.hs
new file mode 100644
index 0000000..8985f7a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/MEA.hs
@@ -0,0 +1,54 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.MEA
+  ( -- * Definition
+    segmentMEA
+    -- * Dependencies
+  , compositeC174
+  , compositeC502
+  , simple6311
+  , simple7383
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC174, compositeC502)
+import           Text.Edifact.D96A.Simples    (simple6311, simple7383)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       MEA    MEASUREMENTS
+-- >
+-- >       Function: To specify physical measurements, including dimension
+-- >                 tolerances, weights and counts.
+-- >
+-- > 010   6311  MEASUREMENT APPLICATION QUALIFIER              M  an..3
+-- >
+-- > 020   C502  MEASUREMENT DETAILS                            C
+-- >       6313   Measurement dimension, coded                  C  an..3
+-- >       6321   Measurement significance, coded               C  an..3
+-- >       6155   Measurement attribute, coded                  C  an..3
+-- >       6154   Measurement attribute                         C  an..70
+-- >
+-- > 030   C174  VALUE/RANGE                                    C
+-- >       6411   Measure unit qualifier                        M  an..3
+-- >       6314   Measurement value                             C  n..18
+-- >       6162   Range minimum                                 C  n..18
+-- >       6152   Range maximum                                 C  n..18
+-- >       6432   Significant digits                            C  n..2
+-- >
+-- > 040   7383  SURFACE/LAYER INDICATOR, CODED                 C  an..3
+--
+-- Dependencies: 'compositeC174', 'compositeC502', 'simple6311', 'simple7383'.
+segmentMEA :: Parser Value
+segmentMEA =
+  segment "MEA"
+    [ "010" .@ mandatory simple6311
+    , "020" .@ optional  compositeC502
+    , "030" .@ optional  compositeC174
+    , "040" .@ optional  simple7383
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/MOA.hs b/specification/src/Text/Edifact/D96A/Segments/MOA.hs
new file mode 100644
index 0000000..db1def8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/MOA.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.MOA
+  ( -- * Definition
+    segmentMOA
+    -- * Dependencies
+  , compositeC516
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC516)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       MOA    MONETARY AMOUNT
+-- >
+-- >       Function: To specify a monetary amount.
+-- >
+-- > 010   C516  MONETARY AMOUNT                                M
+-- >       5025   Monetary amount type qualifier                M  an..3
+-- >       5004   Monetary amount                               C  n..18
+-- >       6345   Currency, coded                               C  an..3
+-- >       6343   Currency qualifier                            C  an..3
+-- >       4405   Status, coded                                 C  an..3
+--
+-- Dependencies: 'compositeC516'.
+segmentMOA :: Parser Value
+segmentMOA =
+  segment "MOA"
+    [ "010" .@ mandatory compositeC516
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/NAD.hs b/specification/src/Text/Edifact/D96A/Segments/NAD.hs
new file mode 100644
index 0000000..251d04b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/NAD.hs
@@ -0,0 +1,87 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.NAD
+  ( -- * Definition
+    segmentNAD
+    -- * Dependencies
+  , compositeC058
+  , compositeC059
+  , compositeC080
+  , compositeC082
+  , simple3035
+  , simple3164
+  , simple3207
+  , simple3229
+  , simple3251
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC058, compositeC059,
+                                               compositeC080, compositeC082)
+import           Text.Edifact.D96A.Simples    (simple3035, simple3164,
+                                               simple3207, simple3229,
+                                               simple3251)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       NAD    NAME AND ADDRESS
+-- >
+-- >       Function: To specify the name/address and their related
+-- >                 function, either by CO82 only and/or unstructured by
+-- >                 CO58 or structured by CO80 thru 3207.
+-- >
+-- > 010   3035  PARTY QUALIFIER                                M  an..3
+-- >
+-- > 020   C082  PARTY IDENTIFICATION DETAILS                   C
+-- >       3039   Party id. identification                      M  an..35
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 030   C058  NAME AND ADDRESS                               C
+-- >       3124   Name and address line                         M  an..35
+-- >       3124   Name and address line                         C  an..35
+-- >       3124   Name and address line                         C  an..35
+-- >       3124   Name and address line                         C  an..35
+-- >       3124   Name and address line                         C  an..35
+-- >
+-- > 040   C080  PARTY NAME                                     C
+-- >       3036   Party name                                    M  an..35
+-- >       3036   Party name                                    C  an..35
+-- >       3036   Party name                                    C  an..35
+-- >       3036   Party name                                    C  an..35
+-- >       3036   Party name                                    C  an..35
+-- >       3045   Party name format, coded                      C  an..3
+-- >
+-- > 050   C059  STREET                                         C
+-- >       3042   Street and number/p.o. box                    M  an..35
+-- >       3042   Street and number/p.o. box                    C  an..35
+-- >       3042   Street and number/p.o. box                    C  an..35
+-- >       3042   Street and number/p.o. box                    C  an..35
+-- >
+-- > 060   3164  CITY NAME                                      C  an..35
+-- >
+-- > 070   3229  COUNTRY SUB-ENTITY IDENTIFICATION              C  an..9
+-- >
+-- > 080   3251  POSTCODE IDENTIFICATION                        C  an..9
+-- >
+-- > 090   3207  COUNTRY, CODED                                 C  an..3
+--
+-- Dependencies: 'compositeC058', 'compositeC059', 'compositeC080', 'compositeC082', 'simple3035', 'simple3164', 'simple3207', 'simple3229', 'simple3251'.
+segmentNAD :: Parser Value
+segmentNAD =
+  segment "NAD"
+    [ "010" .@ mandatory simple3035
+    , "020" .@ optional  compositeC082
+    , "030" .@ optional  compositeC058
+    , "040" .@ optional  compositeC080
+    , "050" .@ optional  compositeC059
+    , "060" .@ optional  simple3164
+    , "070" .@ optional  simple3229
+    , "080" .@ optional  simple3251
+    , "090" .@ optional  simple3207
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/PAC.hs b/specification/src/Text/Edifact/D96A/Segments/PAC.hs
new file mode 100644
index 0000000..52fa367
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/PAC.hs
@@ -0,0 +1,65 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.PAC
+  ( -- * Definition
+    segmentPAC
+    -- * Dependencies
+  , compositeC202
+  , compositeC402
+  , compositeC531
+  , compositeC532
+  , simple7224
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC202, compositeC402,
+                                               compositeC531, compositeC532)
+import           Text.Edifact.D96A.Simples    (simple7224)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       PAC    PACKAGE
+-- >
+-- >       Function: To describe the number and type of packages/physical
+-- >                 units.
+-- >
+-- > 010   7224  NUMBER OF PACKAGES                             C  n..8
+-- >
+-- > 020   C531  PACKAGING DETAILS                              C
+-- >       7075   Packaging level, coded                        C  an..3
+-- >       7233   Packaging related information, coded          C  an..3
+-- >       7073   Packaging terms and conditions, coded         C  an..3
+-- >
+-- > 030   C202  PACKAGE TYPE                                   C
+-- >       7065   Type of packages identification               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7064   Type of packages                              C  an..35
+-- >
+-- > 040   C402  PACKAGE TYPE IDENTIFICATION                    C
+-- >       7077   Item description type, coded                  M  an..3
+-- >       7064   Type of packages                              M  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       7064   Type of packages                              C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >
+-- > 050   C532  RETURNABLE PACKAGE DETAILS                     C
+-- >       8395   Returnable package freight payment            C  an..3
+-- >              responsibility, coded
+-- >       8393   Returnable package load contents, coded       C  an..3
+--
+-- Dependencies: 'compositeC202', 'compositeC402', 'compositeC531', 'compositeC532', 'simple7224'.
+segmentPAC :: Parser Value
+segmentPAC =
+  segment "PAC"
+    [ "010" .@ optional  simple7224
+    , "020" .@ optional  compositeC531
+    , "030" .@ optional  compositeC202
+    , "040" .@ optional  compositeC402
+    , "050" .@ optional  compositeC532
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/PCD.hs b/specification/src/Text/Edifact/D96A/Segments/PCD.hs
new file mode 100644
index 0000000..6f4da2d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/PCD.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.PCD
+  ( -- * Definition
+    segmentPCD
+    -- * Dependencies
+  , compositeC501
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC501)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       PCD    PERCENTAGE DETAILS
+-- >
+-- >       Function: To specify percentage information.
+-- >
+-- > 010   C501  PERCENTAGE DETAILS                             M
+-- >       5245   Percentage qualifier                          M  an..3
+-- >       5482   Percentage                                    C  n..10
+-- >       5249   Percentage basis, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC501'.
+segmentPCD :: Parser Value
+segmentPCD =
+  segment "PCD"
+    [ "010" .@ mandatory compositeC501
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/PCI.hs b/specification/src/Text/Edifact/D96A/Segments/PCI.hs
new file mode 100644
index 0000000..cd5e458
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/PCI.hs
@@ -0,0 +1,58 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.PCI
+  ( -- * Definition
+    segmentPCI
+    -- * Dependencies
+  , compositeC210
+  , compositeC827
+  , simple4233
+  , simple8275
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC210, compositeC827)
+import           Text.Edifact.D96A.Simples    (simple4233, simple8275)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       PCI    PACKAGE IDENTIFICATION
+-- >
+-- >       Function: To specify markings and labels on individual packages
+-- >                 or physical units.
+-- >
+-- > 010   4233  MARKING INSTRUCTIONS, CODED                    C  an..3
+-- >
+-- > 020   C210  MARKS & LABELS                                 C
+-- >       7102   Shipping marks                                M  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >       7102   Shipping marks                                C  an..35
+-- >
+-- > 030   8275  CONTAINER/PACKAGE STATUS, CODED                C  an..3
+-- >
+-- > 040   C827  TYPE OF MARKING                                C
+-- >       7511   Type of marking, coded                        M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC210', 'compositeC827', 'simple4233', 'simple8275'.
+segmentPCI :: Parser Value
+segmentPCI =
+  segment "PCI"
+    [ "010" .@ optional  simple4233
+    , "020" .@ optional  compositeC210
+    , "030" .@ optional  simple8275
+    , "040" .@ optional  compositeC827
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/PIA.hs b/specification/src/Text/Edifact/D96A/Segments/PIA.hs
new file mode 100644
index 0000000..95d9813
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/PIA.hs
@@ -0,0 +1,69 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.PIA
+  ( -- * Definition
+    segmentPIA
+    -- * Dependencies
+  , compositeC212
+  , simple4347
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC212)
+import           Text.Edifact.D96A.Simples    (simple4347)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       PIA    ADDITIONAL PRODUCT ID
+-- >
+-- >       Function: To specify additional or substitutional item
+-- >                 identification codes.
+-- >
+-- > 010   4347  PRODUCT ID. FUNCTION QUALIFIER                 M  an..3
+-- >
+-- > 020   C212  ITEM NUMBER IDENTIFICATION                     M
+-- >       7140   Item number                                   C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 030   C212  ITEM NUMBER IDENTIFICATION                     C
+-- >       7140   Item number                                   C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 040   C212  ITEM NUMBER IDENTIFICATION                     C
+-- >       7140   Item number                                   C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 050   C212  ITEM NUMBER IDENTIFICATION                     C
+-- >       7140   Item number                                   C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 060   C212  ITEM NUMBER IDENTIFICATION                     C
+-- >       7140   Item number                                   C  an..35
+-- >       7143   Item number type, coded                       C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC212', 'simple4347'.
+segmentPIA :: Parser Value
+segmentPIA =
+  segment "PIA"
+    [ "010" .@ mandatory simple4347
+    , "020" .@ mandatory compositeC212
+    , "030" .@ optional  compositeC212
+    , "040" .@ optional  compositeC212
+    , "050" .@ optional  compositeC212
+    , "060" .@ optional  compositeC212
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/PRI.hs b/specification/src/Text/Edifact/D96A/Segments/PRI.hs
new file mode 100644
index 0000000..09c4834
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/PRI.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.PRI
+  ( -- * Definition
+    segmentPRI
+    -- * Dependencies
+  , compositeC509
+  , simple5213
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC509)
+import           Text.Edifact.D96A.Simples    (simple5213)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       PRI    PRICE DETAILS
+-- >
+-- >       Function: To specify price information.
+-- >
+-- > 010   C509  PRICE INFORMATION                              C
+-- >       5125   Price qualifier                               M  an..3
+-- >       5118   Price                                         C  n..15
+-- >       5375   Price type, coded                             C  an..3
+-- >       5387   Price type qualifier                          C  an..3
+-- >       5284   Unit price basis                              C  n..9
+-- >       6411   Measure unit qualifier                        C  an..3
+-- >
+-- > 020   5213  SUB-LINE PRICE CHANGE, CODED                   C  an..3
+--
+-- Dependencies: 'compositeC509', 'simple5213'.
+segmentPRI :: Parser Value
+segmentPRI =
+  segment "PRI"
+    [ "010" .@ optional  compositeC509
+    , "020" .@ optional  simple5213
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/QTY.hs b/specification/src/Text/Edifact/D96A/Segments/QTY.hs
new file mode 100644
index 0000000..9d8027b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/QTY.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.QTY
+  ( -- * Definition
+    segmentQTY
+    -- * Dependencies
+  , compositeC186
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC186)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       QTY    QUANTITY
+-- >
+-- >       Function: To specify a pertinent quantity.
+-- >
+-- > 010   C186  QUANTITY DETAILS                               M
+-- >       6063   Quantity qualifier                            M  an..3
+-- >       6060   Quantity                                      M  n..15
+-- >       6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'compositeC186'.
+segmentQTY :: Parser Value
+segmentQTY =
+  segment "QTY"
+    [ "010" .@ mandatory compositeC186
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/QVR.hs b/specification/src/Text/Edifact/D96A/Segments/QVR.hs
new file mode 100644
index 0000000..8130fe1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/QVR.hs
@@ -0,0 +1,50 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.QVR
+  ( -- * Definition
+    segmentQVR
+    -- * Dependencies
+  , compositeC279
+  , compositeC960
+  , simple4221
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC279, compositeC960)
+import           Text.Edifact.D96A.Simples    (simple4221)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       QVR    QUANTITY VARIANCES
+-- >
+-- >       Function: To specify item details relating to quantity
+-- >                 variances.
+-- >
+-- >           Note: This segment replaces segment QVA (which has been
+-- >                 deleted in this directory).
+-- >
+-- > 010   C279  QUANTITY DIFFERENCE INFORMATION                C
+-- >       6064   Quantity difference                           M  n..15
+-- >       6063   Quantity qualifier                            C  an..3
+-- >
+-- > 020   4221  DISCREPANCY, CODED                             C  an..3
+-- >
+-- > 030   C960  REASON FOR CHANGE                              C
+-- >       4295   Change reason, coded                          C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       4294   Change reason                                 C  an..35
+--
+-- Dependencies: 'compositeC279', 'compositeC960', 'simple4221'.
+segmentQVR :: Parser Value
+segmentQVR =
+  segment "QVR"
+    [ "010" .@ optional  compositeC279
+    , "020" .@ optional  simple4221
+    , "030" .@ optional  compositeC960
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/RFF.hs b/specification/src/Text/Edifact/D96A/Segments/RFF.hs
new file mode 100644
index 0000000..a5bbab6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/RFF.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.RFF
+  ( -- * Definition
+    segmentRFF
+    -- * Dependencies
+  , compositeC506
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC506)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       RFF    REFERENCE
+-- >
+-- >       Function: To specify a reference.
+-- >
+-- > 010   C506  REFERENCE                                      M
+-- >       1153   Reference qualifier                           M  an..3
+-- >       1154   Reference number                              C  an..35
+-- >       1156   Line number                                   C  an..6
+-- >       4000   Reference version number                      C  an..35
+--
+-- Dependencies: 'compositeC506'.
+segmentRFF :: Parser Value
+segmentRFF =
+  segment "RFF"
+    [ "010" .@ mandatory compositeC506
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/RNG.hs b/specification/src/Text/Edifact/D96A/Segments/RNG.hs
new file mode 100644
index 0000000..013d6b7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/RNG.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.RNG
+  ( -- * Definition
+    segmentRNG
+    -- * Dependencies
+  , compositeC280
+  , simple6167
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC280)
+import           Text.Edifact.D96A.Simples    (simple6167)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       RNG    RANGE DETAILS
+-- >
+-- >       Function: To identify a range.
+-- >
+-- > 010   6167  RANGE TYPE QUALIFIER                           M  an..3
+-- >
+-- > 020   C280  RANGE                                          C
+-- >       6411   Measure unit qualifier                        M  an..3
+-- >       6162   Range minimum                                 C  n..18
+-- >       6152   Range maximum                                 C  n..18
+--
+-- Dependencies: 'compositeC280', 'simple6167'.
+segmentRNG :: Parser Value
+segmentRNG =
+  segment "RNG"
+    [ "010" .@ mandatory simple6167
+    , "020" .@ optional  compositeC280
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/SEL.hs b/specification/src/Text/Edifact/D96A/Segments/SEL.hs
new file mode 100644
index 0000000..fab1a00
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/SEL.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.SEL
+  ( -- * Definition
+    segmentSEL
+    -- * Dependencies
+  , compositeC215
+  , simple4517
+  , simple9308
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC215)
+import           Text.Edifact.D96A.Simples    (simple4517, simple9308)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       SEL    SEAL NUMBER
+-- >
+-- >       Function: To specify a seal number related to equipment.
+-- >
+-- > 010   9308  SEAL NUMBER                                    M  an..10
+-- >
+-- > 020   C215  SEAL ISSUER                                    C
+-- >       9303   Sealing party, coded                          C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9302   Sealing party                                 C  an..35
+-- >
+-- > 030   4517  SEAL CONDITION, CODED                          C  an..3
+--
+-- Dependencies: 'compositeC215', 'simple4517', 'simple9308'.
+segmentSEL :: Parser Value
+segmentSEL =
+  segment "SEL"
+    [ "010" .@ mandatory simple9308
+    , "020" .@ optional  compositeC215
+    , "030" .@ optional  simple4517
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/SGP.hs b/specification/src/Text/Edifact/D96A/Segments/SGP.hs
new file mode 100644
index 0000000..41b6144
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/SGP.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.SGP
+  ( -- * Definition
+    segmentSGP
+    -- * Dependencies
+  , compositeC237
+  , simple7224
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC237)
+import           Text.Edifact.D96A.Simples    (simple7224)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       SGP    SPLIT GOODS PLACEMENT
+-- >
+-- >       Function: To specify the placement of goods in relation to
+-- >                 equipment.
+-- >
+-- > 010   C237  EQUIPMENT IDENTIFICATION                       M
+-- >       8260   Equipment identification number               C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3207   Country, coded                                C  an..3
+-- >
+-- > 020   7224  NUMBER OF PACKAGES                             C  n..8
+--
+-- Dependencies: 'compositeC237', 'simple7224'.
+segmentSGP :: Parser Value
+segmentSGP =
+  segment "SGP"
+    [ "010" .@ mandatory compositeC237
+    , "020" .@ optional  simple7224
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/STS.hs b/specification/src/Text/Edifact/D96A/Segments/STS.hs
new file mode 100644
index 0000000..f162dc4
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/STS.hs
@@ -0,0 +1,82 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.STS
+  ( -- * Definition
+    segmentSTS
+    -- * Dependencies
+  , compositeC555
+  , compositeC556
+  , compositeC601
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC555, compositeC556,
+                                               compositeC601)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       STS    STATUS
+-- >
+-- >       Function: To specify the type of industry sector/application to
+-- >                 which this segment refers, giving the status and
+-- >                 status reason relevant to conducting business and/or
+-- >                 services.
+-- >
+-- > 010   C601  STATUS TYPE                                    C
+-- >       9015   Status type, coded                            M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 020   C555  STATUS EVENT                                   C
+-- >       9011   Status event, coded                           M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9010   Status event                                  C  an..35
+-- >
+-- > 030   C556  STATUS REASON                                  C
+-- >       9013   Status reason, coded                          M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9012   Status reason                                 C  an..35
+-- >
+-- > 040   C556  STATUS REASON                                  C
+-- >       9013   Status reason, coded                          M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9012   Status reason                                 C  an..35
+-- >
+-- > 050   C556  STATUS REASON                                  C
+-- >       9013   Status reason, coded                          M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9012   Status reason                                 C  an..35
+-- >
+-- > 060   C556  STATUS REASON                                  C
+-- >       9013   Status reason, coded                          M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9012   Status reason                                 C  an..35
+-- >
+-- > 070   C556  STATUS REASON                                  C
+-- >       9013   Status reason, coded                          M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       9012   Status reason                                 C  an..35
+--
+-- Dependencies: 'compositeC555', 'compositeC556', 'compositeC601'.
+segmentSTS :: Parser Value
+segmentSTS =
+  segment "STS"
+    [ "010" .@ optional  compositeC601
+    , "020" .@ optional  compositeC555
+    , "030" .@ optional  compositeC556
+    , "040" .@ optional  compositeC556
+    , "050" .@ optional  compositeC556
+    , "060" .@ optional  compositeC556
+    , "070" .@ optional  compositeC556
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TCC.hs b/specification/src/Text/Edifact/D96A/Segments/TCC.hs
new file mode 100644
index 0000000..3595b96
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TCC.hs
@@ -0,0 +1,68 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TCC
+  ( -- * Definition
+    segmentTCC
+    -- * Dependencies
+  , compositeC200
+  , compositeC203
+  , compositeC528
+  , compositeC554
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC200, compositeC203,
+                                               compositeC528, compositeC554)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       TCC    TRANSPORT CHARGE/RATE CALCULATIONS
+-- >
+-- >       Function: To specify charges.
+-- >
+-- > 010   C200  CHARGE                                         C
+-- >       8023   Freight and charges identification            C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       8022   Freight and charges                           C  an..26
+-- >       4237   Prepaid/collect indicator, coded              C  an..3
+-- >       7140   Item number                                   C  an..35
+-- >
+-- > 020   C203  RATE/TARIFF CLASS                              C
+-- >       5243   Rate/tariff class identification              M  an..9
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       5242   Rate/tariff class                             C  an..35
+-- >       5275   Supplementary rate/tariff basis               C  an..6
+-- >              identification
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       5275   Supplementary rate/tariff basis               C  an..6
+-- >              identification
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 030   C528  COMMODITY/RATE DETAIL                          C
+-- >       7357   Commodity/rate identification                 C  an..18
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 040   C554  RATE/TARIFF CLASS DETAIL                       C
+-- >       5243   Rate/tariff class identification              C  an..9
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC200', 'compositeC203', 'compositeC528', 'compositeC554'.
+segmentTCC :: Parser Value
+segmentTCC =
+  segment "TCC"
+    [ "010" .@ optional  compositeC200
+    , "020" .@ optional  compositeC203
+    , "030" .@ optional  compositeC528
+    , "040" .@ optional  compositeC554
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TDT.hs b/specification/src/Text/Edifact/D96A/Segments/TDT.hs
new file mode 100644
index 0000000..2d65eea
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TDT.hs
@@ -0,0 +1,87 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TDT
+  ( -- * Definition
+    segmentTDT
+    -- * Dependencies
+  , compositeC040
+  , compositeC220
+  , compositeC222
+  , compositeC228
+  , compositeC401
+  , simple8028
+  , simple8051
+  , simple8101
+  , simple8281
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC040, compositeC220,
+                                               compositeC222, compositeC228,
+                                               compositeC401)
+import           Text.Edifact.D96A.Simples    (simple8028, simple8051,
+                                               simple8101, simple8281)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       TDT    DETAILS OF TRANSPORT
+-- >
+-- >       Function: To specify the transport details such as mode of
+-- >                 transport, means of transport, its conveyance
+-- >                 reference number and the identification of the means
+-- >                 of transport.
+-- >                 The segment may be pointed to by the TPL segment.
+-- >
+-- > 010   8051  TRANSPORT STAGE QUALIFIER                      M  an..3
+-- >
+-- > 020   8028  CONVEYANCE REFERENCE NUMBER                    C  an..17
+-- >
+-- > 030   C220  MODE OF TRANSPORT                              C
+-- >       8067   Mode of transport, coded                      C  an..3
+-- >       8066   Mode of transport                             C  an..17
+-- >
+-- > 040   C228  TRANSPORT MEANS                                C
+-- >       8179   Type of means of transport identification     C  an..8
+-- >       8178   Type of means of transport                    C  an..17
+-- >
+-- > 050   C040  CARRIER                                        C
+-- >       3127   Carrier identification                        C  an..17
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       3128   Carrier name                                  C  an..35
+-- >
+-- > 060   8101  TRANSIT DIRECTION, CODED                       C  an..3
+-- >
+-- > 070   C401  EXCESS TRANSPORTATION INFORMATION              C
+-- >       8457   Excess transportation reason, coded           M  an..3
+-- >       8459   Excess transportation responsibility, coded   M  an..3
+-- >       7130   Customer authorization number                 C  an..17
+-- >
+-- > 080   C222  TRANSPORT IDENTIFICATION                       C
+-- >       8213   Id. of means of transport identification      C  an..9
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       8212   Id. of the means of transport                 C  an..35
+-- >       8453   Nationality of means of transport, coded      C  an..3
+-- >
+-- > 090   8281  TRANSPORT OWNERSHIP, CODED                     C  an..3
+--
+-- Dependencies: 'compositeC040', 'compositeC220', 'compositeC222', 'compositeC228', 'compositeC401', 'simple8028', 'simple8051', 'simple8101', 'simple8281'.
+segmentTDT :: Parser Value
+segmentTDT =
+  segment "TDT"
+    [ "010" .@ mandatory simple8051
+    , "020" .@ optional  simple8028
+    , "030" .@ optional  compositeC220
+    , "040" .@ optional  compositeC228
+    , "050" .@ optional  compositeC040
+    , "060" .@ optional  simple8101
+    , "070" .@ optional  compositeC401
+    , "080" .@ optional  compositeC222
+    , "090" .@ optional  simple8281
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TMD.hs b/specification/src/Text/Edifact/D96A/Segments/TMD.hs
new file mode 100644
index 0000000..df7157a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TMD.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TMD
+  ( -- * Definition
+    segmentTMD
+    -- * Dependencies
+  , compositeC219
+  , simple8332
+  , simple8341
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC219)
+import           Text.Edifact.D96A.Simples    (simple8332, simple8341)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >     | TMD    TRANSPORT MOVEMENT DETAILS
+-- >
+-- >     | Function: To specify operational transport movement details for
+-- >                 a goods item or equipment (which may differ from the
+-- >                 contractual conditions).
+-- >
+-- > 010   C219  MOVEMENT TYPE                                  C
+-- >       8335   Movement type, coded                          C  an..3
+-- >       8334   Movement type                                 C  an..35
+-- >
+-- > 020   8332  EQUIPMENT PLAN                                 C  an..26
+-- >
+-- > 030   8341  HAULAGE ARRANGEMENTS, CODED                    C  an..3
+--
+-- Dependencies: 'compositeC219', 'simple8332', 'simple8341'.
+segmentTMD :: Parser Value
+segmentTMD =
+  segment "TMD"
+    [ "010" .@ optional  compositeC219
+    , "020" .@ optional  simple8332
+    , "030" .@ optional  simple8341
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TMP.hs b/specification/src/Text/Edifact/D96A/Segments/TMP.hs
new file mode 100644
index 0000000..7f251c8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TMP.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TMP
+  ( -- * Definition
+    segmentTMP
+    -- * Dependencies
+  , compositeC239
+  , simple6245
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC239)
+import           Text.Edifact.D96A.Simples    (simple6245)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       TMP    TEMPERATURE
+-- >
+-- >       Function: To specify the temperature setting.
+-- >
+-- > 010   6245  TEMPERATURE QUALIFIER                          M  an..3
+-- >
+-- > 020   C239  TEMPERATURE SETTING                            C
+-- >       6246   Temperature setting                           C  n3
+-- >       6411   Measure unit qualifier                        C  an..3
+--
+-- Dependencies: 'compositeC239', 'simple6245'.
+segmentTMP :: Parser Value
+segmentTMP =
+  segment "TMP"
+    [ "010" .@ mandatory simple6245
+    , "020" .@ optional  compositeC239
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TOD.hs b/specification/src/Text/Edifact/D96A/Segments/TOD.hs
new file mode 100644
index 0000000..a0c129a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TOD.hs
@@ -0,0 +1,45 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TOD
+  ( -- * Definition
+    segmentTOD
+    -- * Dependencies
+  , compositeC100
+  , simple4055
+  , simple4215
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC100)
+import           Text.Edifact.D96A.Simples    (simple4055, simple4215)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       TOD    TERMS OF DELIVERY OR TRANSPORT
+-- >
+-- >       Function: To specify terms of delivery or transport.
+-- >
+-- > 010   4055  TERMS OF DELIVERY OR TRANSPORT FUNCTION, CODED C  an..3
+-- >
+-- > 020   4215  TRANSPORT CHARGES METHOD OF PAYMENT, CODED     C  an..3
+-- >
+-- > 030   C100  TERMS OF DELIVERY OR TRANSPORT                 C
+-- >       4053   Terms of delivery or transport, coded         C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       4052   Terms of delivery or transport                C  an..70
+-- >       4052   Terms of delivery or transport                C  an..70
+--
+-- Dependencies: 'compositeC100', 'simple4055', 'simple4215'.
+segmentTOD :: Parser Value
+segmentTOD =
+  segment "TOD"
+    [ "010" .@ optional  simple4055
+    , "020" .@ optional  simple4215
+    , "030" .@ optional  compositeC100
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TPL.hs b/specification/src/Text/Edifact/D96A/Segments/TPL.hs
new file mode 100644
index 0000000..2e9f64a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TPL.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TPL
+  ( -- * Definition
+    segmentTPL
+    -- * Dependencies
+  , compositeC222
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC222)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       TPL    TRANSPORT PLACEMENT
+-- >
+-- >       Function: To specify placement of goods or equipment in relation
+-- >                 to the transport used. The segment serves as a pointer
+-- >                 to the TDT segment group.
+-- >
+-- > 010   C222  TRANSPORT IDENTIFICATION                       M
+-- >       8213   Id. of means of transport identification      C  an..9
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       8212   Id. of the means of transport                 C  an..35
+-- >       8453   Nationality of means of transport, coded      C  an..3
+--
+-- Dependencies: 'compositeC222'.
+segmentTPL :: Parser Value
+segmentTPL =
+  segment "TPL"
+    [ "010" .@ mandatory compositeC222
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Segments/TSR.hs b/specification/src/Text/Edifact/D96A/Segments/TSR.hs
new file mode 100644
index 0000000..9c65396
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Segments/TSR.hs
@@ -0,0 +1,60 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Segments.TSR
+  ( -- * Definition
+    segmentTSR
+    -- * Dependencies
+  , compositeC233
+  , compositeC536
+  , compositeC537
+  , compositeC703
+  ) where
+
+import           Text.Edifact.D96A.Composites (compositeC233, compositeC536,
+                                               compositeC537, compositeC703)
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types           (Value)
+
+-- | Derived from this specification:
+--
+-- >       TSR    TRANSPORT SERVICE REQUIREMENTS
+-- >
+-- >       Function: To specify the contract and carriage conditions and
+-- >                 service and priority requirements for the transport.
+-- >
+-- > 010   C536  CONTRACT AND CARRIAGE CONDITION                C
+-- >       4065   Contract and carriage condition, coded        M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 020   C233  SERVICE                                        C
+-- >       7273   Service requirement, coded                    M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >       7273   Service requirement, coded                    C  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 030   C537  TRANSPORT PRIORITY                             C
+-- >       4219   Transport priority, coded                     M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+-- >
+-- > 040   C703  NATURE OF CARGO                                C
+-- >       7085   Nature of cargo, coded                        M  an..3
+-- >       1131   Code list qualifier                           C  an..3
+-- >       3055   Code list responsible agency, coded           C  an..3
+--
+-- Dependencies: 'compositeC233', 'compositeC536', 'compositeC537', 'compositeC703'.
+segmentTSR :: Parser Value
+segmentTSR =
+  segment "TSR"
+    [ "010" .@ optional  compositeC536
+    , "020" .@ optional  compositeC233
+    , "030" .@ optional  compositeC537
+    , "040" .@ optional  compositeC703
+    ]
diff --git a/specification/src/Text/Edifact/D96A/Simples.hs b/specification/src/Text/Edifact/D96A/Simples.hs
new file mode 100644
index 0000000..dea0734
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples.hs
@@ -0,0 +1,216 @@
+module Text.Edifact.D96A.Simples
+  ( module S
+  ) where
+
+import           Text.Edifact.D96A.Simples.S1000 as S
+import           Text.Edifact.D96A.Simples.S1001 as S
+import           Text.Edifact.D96A.Simples.S1004 as S
+import           Text.Edifact.D96A.Simples.S1082 as S
+import           Text.Edifact.D96A.Simples.S1131 as S
+import           Text.Edifact.D96A.Simples.S1153 as S
+import           Text.Edifact.D96A.Simples.S1154 as S
+import           Text.Edifact.D96A.Simples.S1156 as S
+import           Text.Edifact.D96A.Simples.S1218 as S
+import           Text.Edifact.D96A.Simples.S1220 as S
+import           Text.Edifact.D96A.Simples.S1222 as S
+import           Text.Edifact.D96A.Simples.S1225 as S
+import           Text.Edifact.D96A.Simples.S1229 as S
+import           Text.Edifact.D96A.Simples.S1312 as S
+import           Text.Edifact.D96A.Simples.S1366 as S
+import           Text.Edifact.D96A.Simples.S1373 as S
+import           Text.Edifact.D96A.Simples.S1490 as S
+import           Text.Edifact.D96A.Simples.S1496 as S
+import           Text.Edifact.D96A.Simples.S2005 as S
+import           Text.Edifact.D96A.Simples.S2379 as S
+import           Text.Edifact.D96A.Simples.S2380 as S
+import           Text.Edifact.D96A.Simples.S3035 as S
+import           Text.Edifact.D96A.Simples.S3036 as S
+import           Text.Edifact.D96A.Simples.S3039 as S
+import           Text.Edifact.D96A.Simples.S3042 as S
+import           Text.Edifact.D96A.Simples.S3045 as S
+import           Text.Edifact.D96A.Simples.S3055 as S
+import           Text.Edifact.D96A.Simples.S3124 as S
+import           Text.Edifact.D96A.Simples.S3127 as S
+import           Text.Edifact.D96A.Simples.S3128 as S
+import           Text.Edifact.D96A.Simples.S3139 as S
+import           Text.Edifact.D96A.Simples.S3148 as S
+import           Text.Edifact.D96A.Simples.S3153 as S
+import           Text.Edifact.D96A.Simples.S3155 as S
+import           Text.Edifact.D96A.Simples.S3164 as S
+import           Text.Edifact.D96A.Simples.S3207 as S
+import           Text.Edifact.D96A.Simples.S3222 as S
+import           Text.Edifact.D96A.Simples.S3223 as S
+import           Text.Edifact.D96A.Simples.S3224 as S
+import           Text.Edifact.D96A.Simples.S3225 as S
+import           Text.Edifact.D96A.Simples.S3227 as S
+import           Text.Edifact.D96A.Simples.S3229 as S
+import           Text.Edifact.D96A.Simples.S3232 as S
+import           Text.Edifact.D96A.Simples.S3233 as S
+import           Text.Edifact.D96A.Simples.S3239 as S
+import           Text.Edifact.D96A.Simples.S3251 as S
+import           Text.Edifact.D96A.Simples.S3412 as S
+import           Text.Edifact.D96A.Simples.S3413 as S
+import           Text.Edifact.D96A.Simples.S3453 as S
+import           Text.Edifact.D96A.Simples.S4000 as S
+import           Text.Edifact.D96A.Simples.S4052 as S
+import           Text.Edifact.D96A.Simples.S4053 as S
+import           Text.Edifact.D96A.Simples.S4055 as S
+import           Text.Edifact.D96A.Simples.S4065 as S
+import           Text.Edifact.D96A.Simples.S4078 as S
+import           Text.Edifact.D96A.Simples.S4079 as S
+import           Text.Edifact.D96A.Simples.S4183 as S
+import           Text.Edifact.D96A.Simples.S4215 as S
+import           Text.Edifact.D96A.Simples.S4219 as S
+import           Text.Edifact.D96A.Simples.S4221 as S
+import           Text.Edifact.D96A.Simples.S4233 as S
+import           Text.Edifact.D96A.Simples.S4237 as S
+import           Text.Edifact.D96A.Simples.S4294 as S
+import           Text.Edifact.D96A.Simples.S4295 as S
+import           Text.Edifact.D96A.Simples.S4343 as S
+import           Text.Edifact.D96A.Simples.S4347 as S
+import           Text.Edifact.D96A.Simples.S4400 as S
+import           Text.Edifact.D96A.Simples.S4401 as S
+import           Text.Edifact.D96A.Simples.S4403 as S
+import           Text.Edifact.D96A.Simples.S4405 as S
+import           Text.Edifact.D96A.Simples.S4440 as S
+import           Text.Edifact.D96A.Simples.S4441 as S
+import           Text.Edifact.D96A.Simples.S4451 as S
+import           Text.Edifact.D96A.Simples.S4453 as S
+import           Text.Edifact.D96A.Simples.S4455 as S
+import           Text.Edifact.D96A.Simples.S4457 as S
+import           Text.Edifact.D96A.Simples.S4517 as S
+import           Text.Edifact.D96A.Simples.S5004 as S
+import           Text.Edifact.D96A.Simples.S5025 as S
+import           Text.Edifact.D96A.Simples.S5118 as S
+import           Text.Edifact.D96A.Simples.S5125 as S
+import           Text.Edifact.D96A.Simples.S5213 as S
+import           Text.Edifact.D96A.Simples.S5237 as S
+import           Text.Edifact.D96A.Simples.S5242 as S
+import           Text.Edifact.D96A.Simples.S5243 as S
+import           Text.Edifact.D96A.Simples.S5245 as S
+import           Text.Edifact.D96A.Simples.S5249 as S
+import           Text.Edifact.D96A.Simples.S5275 as S
+import           Text.Edifact.D96A.Simples.S5284 as S
+import           Text.Edifact.D96A.Simples.S5375 as S
+import           Text.Edifact.D96A.Simples.S5387 as S
+import           Text.Edifact.D96A.Simples.S5402 as S
+import           Text.Edifact.D96A.Simples.S5479 as S
+import           Text.Edifact.D96A.Simples.S5482 as S
+import           Text.Edifact.D96A.Simples.S5495 as S
+import           Text.Edifact.D96A.Simples.S6008 as S
+import           Text.Edifact.D96A.Simples.S6060 as S
+import           Text.Edifact.D96A.Simples.S6063 as S
+import           Text.Edifact.D96A.Simples.S6064 as S
+import           Text.Edifact.D96A.Simples.S6066 as S
+import           Text.Edifact.D96A.Simples.S6069 as S
+import           Text.Edifact.D96A.Simples.S6140 as S
+import           Text.Edifact.D96A.Simples.S6145 as S
+import           Text.Edifact.D96A.Simples.S6152 as S
+import           Text.Edifact.D96A.Simples.S6154 as S
+import           Text.Edifact.D96A.Simples.S6155 as S
+import           Text.Edifact.D96A.Simples.S6162 as S
+import           Text.Edifact.D96A.Simples.S6167 as S
+import           Text.Edifact.D96A.Simples.S6168 as S
+import           Text.Edifact.D96A.Simples.S6245 as S
+import           Text.Edifact.D96A.Simples.S6246 as S
+import           Text.Edifact.D96A.Simples.S6311 as S
+import           Text.Edifact.D96A.Simples.S6313 as S
+import           Text.Edifact.D96A.Simples.S6314 as S
+import           Text.Edifact.D96A.Simples.S6321 as S
+import           Text.Edifact.D96A.Simples.S6341 as S
+import           Text.Edifact.D96A.Simples.S6343 as S
+import           Text.Edifact.D96A.Simples.S6345 as S
+import           Text.Edifact.D96A.Simples.S6347 as S
+import           Text.Edifact.D96A.Simples.S6348 as S
+import           Text.Edifact.D96A.Simples.S6350 as S
+import           Text.Edifact.D96A.Simples.S6353 as S
+import           Text.Edifact.D96A.Simples.S6411 as S
+import           Text.Edifact.D96A.Simples.S6432 as S
+import           Text.Edifact.D96A.Simples.S7008 as S
+import           Text.Edifact.D96A.Simples.S7009 as S
+import           Text.Edifact.D96A.Simples.S7064 as S
+import           Text.Edifact.D96A.Simples.S7065 as S
+import           Text.Edifact.D96A.Simples.S7073 as S
+import           Text.Edifact.D96A.Simples.S7075 as S
+import           Text.Edifact.D96A.Simples.S7077 as S
+import           Text.Edifact.D96A.Simples.S7081 as S
+import           Text.Edifact.D96A.Simples.S7083 as S
+import           Text.Edifact.D96A.Simples.S7085 as S
+import           Text.Edifact.D96A.Simples.S7088 as S
+import           Text.Edifact.D96A.Simples.S7102 as S
+import           Text.Edifact.D96A.Simples.S7106 as S
+import           Text.Edifact.D96A.Simples.S7124 as S
+import           Text.Edifact.D96A.Simples.S7130 as S
+import           Text.Edifact.D96A.Simples.S7140 as S
+import           Text.Edifact.D96A.Simples.S7143 as S
+import           Text.Edifact.D96A.Simples.S7160 as S
+import           Text.Edifact.D96A.Simples.S7161 as S
+import           Text.Edifact.D96A.Simples.S7164 as S
+import           Text.Edifact.D96A.Simples.S7166 as S
+import           Text.Edifact.D96A.Simples.S7224 as S
+import           Text.Edifact.D96A.Simples.S7233 as S
+import           Text.Edifact.D96A.Simples.S7273 as S
+import           Text.Edifact.D96A.Simples.S7297 as S
+import           Text.Edifact.D96A.Simples.S7357 as S
+import           Text.Edifact.D96A.Simples.S7383 as S
+import           Text.Edifact.D96A.Simples.S7402 as S
+import           Text.Edifact.D96A.Simples.S7405 as S
+import           Text.Edifact.D96A.Simples.S7419 as S
+import           Text.Edifact.D96A.Simples.S7511 as S
+import           Text.Edifact.D96A.Simples.S8022 as S
+import           Text.Edifact.D96A.Simples.S8023 as S
+import           Text.Edifact.D96A.Simples.S8028 as S
+import           Text.Edifact.D96A.Simples.S8051 as S
+import           Text.Edifact.D96A.Simples.S8053 as S
+import           Text.Edifact.D96A.Simples.S8066 as S
+import           Text.Edifact.D96A.Simples.S8067 as S
+import           Text.Edifact.D96A.Simples.S8077 as S
+import           Text.Edifact.D96A.Simples.S8078 as S
+import           Text.Edifact.D96A.Simples.S8092 as S
+import           Text.Edifact.D96A.Simples.S8101 as S
+import           Text.Edifact.D96A.Simples.S8126 as S
+import           Text.Edifact.D96A.Simples.S8154 as S
+import           Text.Edifact.D96A.Simples.S8155 as S
+import           Text.Edifact.D96A.Simples.S8158 as S
+import           Text.Edifact.D96A.Simples.S8169 as S
+import           Text.Edifact.D96A.Simples.S8178 as S
+import           Text.Edifact.D96A.Simples.S8179 as S
+import           Text.Edifact.D96A.Simples.S8186 as S
+import           Text.Edifact.D96A.Simples.S8211 as S
+import           Text.Edifact.D96A.Simples.S8212 as S
+import           Text.Edifact.D96A.Simples.S8213 as S
+import           Text.Edifact.D96A.Simples.S8246 as S
+import           Text.Edifact.D96A.Simples.S8249 as S
+import           Text.Edifact.D96A.Simples.S8255 as S
+import           Text.Edifact.D96A.Simples.S8260 as S
+import           Text.Edifact.D96A.Simples.S8273 as S
+import           Text.Edifact.D96A.Simples.S8275 as S
+import           Text.Edifact.D96A.Simples.S8281 as S
+import           Text.Edifact.D96A.Simples.S8323 as S
+import           Text.Edifact.D96A.Simples.S8325 as S
+import           Text.Edifact.D96A.Simples.S8332 as S
+import           Text.Edifact.D96A.Simples.S8334 as S
+import           Text.Edifact.D96A.Simples.S8335 as S
+import           Text.Edifact.D96A.Simples.S8339 as S
+import           Text.Edifact.D96A.Simples.S8341 as S
+import           Text.Edifact.D96A.Simples.S8351 as S
+import           Text.Edifact.D96A.Simples.S8364 as S
+import           Text.Edifact.D96A.Simples.S8393 as S
+import           Text.Edifact.D96A.Simples.S8395 as S
+import           Text.Edifact.D96A.Simples.S8410 as S
+import           Text.Edifact.D96A.Simples.S8453 as S
+import           Text.Edifact.D96A.Simples.S8457 as S
+import           Text.Edifact.D96A.Simples.S8459 as S
+import           Text.Edifact.D96A.Simples.S9010 as S
+import           Text.Edifact.D96A.Simples.S9011 as S
+import           Text.Edifact.D96A.Simples.S9012 as S
+import           Text.Edifact.D96A.Simples.S9013 as S
+import           Text.Edifact.D96A.Simples.S9015 as S
+import           Text.Edifact.D96A.Simples.S9213 as S
+import           Text.Edifact.D96A.Simples.S9302 as S
+import           Text.Edifact.D96A.Simples.S9303 as S
+import           Text.Edifact.D96A.Simples.S9308 as S
+import           Text.Edifact.D96A.Simples.S9353 as S
+import           Text.Edifact.D96A.Simples.S9411 as S
+import           Text.Edifact.D96A.Simples.S9415 as S
+import           Text.Edifact.D96A.Simples.S9417 as S
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1000.hs b/specification/src/Text/Edifact/D96A/Simples/S1000.hs
new file mode 100644
index 0000000..021ae56
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1000.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1000
+  ( simple1000
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1000  Document/message name
+-- >
+-- >    Desc: Plain language identifier specifying the function of a
+-- >          document/message.
+-- >
+-- >    Repr: an..35
+simple1000 :: Parser Value
+simple1000 = simple "1000" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1001.hs b/specification/src/Text/Edifact/D96A/Simples/S1001.hs
new file mode 100644
index 0000000..3e1838e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1001.hs
@@ -0,0 +1,1383 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1001
+  ( simple1001
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 1001  Document/message name, coded
+-- >
+-- >   Desc: Document/message identifier expressed in code.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Certificate of analysis
+-- >              Certificate providing the values of an analysis.
+-- >         2 Certificate of conformity
+-- >              Certificate certifying the conformity to predefined
+-- >              definitions.
+-- >         3 Certificate of quality
+-- >              Certificate certifying the quality of goods, services
+-- >              etc.
+-- >         4 Test report
+-- >              Report providing the results of a test session.
+-- >         5 Product performance report
+-- >              Report specifying the performance values of products.
+-- >         6 Product specification report
+-- >              Report providing specification values of products.
+-- >         7 Process data report
+-- >              Reports on events during production process.
+-- >         8 First sample test report
+-- >              Self explanatory.
+-- >         9 Price/sales catalogue
+-- >              Self explanatory.
+-- >        10 Party information
+-- >              Document/message providing basic data concerning a party.
+-- > +      11 Federal label approval
+-- >              A pre-approved document relating to federal label
+-- >              approval requirements.
+-- >        12 Mill certificate
+-- >              Certificate certifying a specific quality of agricultural
+-- >              products.
+-- >        13 Post receipt
+-- >              Document/message which evidences the transport of goods
+-- >              by post (e.g. mail, parcel, etc.).
+-- >        14 Weight certificate
+-- >              Certificate certifying the weight of goods.
+-- >        15 Weight list
+-- >              Document/message specifying the weight of goods.
+-- >        16 Certificate
+-- >              Document by means of which the documentary credit
+-- >              applicant specifies the conditions for the certificate
+-- >              and by whom the certificate is to be issued.
+-- >        17 Combined certificate of value and origin
+-- >              Document identifying goods, in which the authority
+-- >              empowered to issue it certifies expressly that the goods
+-- >              to which the respective goods originate in a specific
+-- >              (part of or group of) country(ies). It also states the
+-- >              price and/or costs of the goods with the purpose of
+-- >              determining the Customs value.
+-- >        18 Movement certificate A.TR.1
+-- >              Specific form of transit declaration issued by the
+-- >              exporter (movement certificate).
+-- >        19 Certificate of quantity
+-- >              Certificate certifying the quantity of goods, services
+-- >              etc.
+-- >        20 Quality data  message
+-- >              Usage of QALITY-message.
+-- >        21 Query
+-- >              Self-explanatory.
+-- >        22 Response to query
+-- >              Self-explanatory.
+-- >        23 Status information
+-- >              Information regarding the status of a related message.
+-- >        24 Restow
+-- >              Message/document identifying containers that have been
+-- >              unloaded and then reloaded onto the same means of
+-- >              transport.
+-- >        25 Container discharger list
+-- >              Message/document itemising containers to be discharged
+-- >              from vessel.
+-- >        26 Corporate superannuation contributions advice
+-- >              Document/message providing contributions advice used for
+-- >              corporate superannuation schemes.
+-- >        27 Industry superannuation contributions advice
+-- >              Document/message providing contributions advice used for
+-- >              superannuation schemes which are industry wide.
+-- >        28 Corporate superannuation member maintenance message
+-- >              Member maintenance message used for corporate
+-- >              superannuation schemes.
+-- >        29 Industry superannuation member maintenance message
+-- >              Member maintenance message used for industry wide
+-- >              superannuation schemes.
+-- >        30 Life insurance payroll deductions advice
+-- >              Payroll deductions advice used in the life insurance
+-- >              industry.
+-- >        31 Underbond request
+-- >              A Message/document requesting to move cargo from one
+-- >              Customs control point to another.
+-- >        32 Underbond approval
+-- >              A message/document issuing Customs approval to move cargo
+-- >              from one Customs control point to another.
+-- >        33 Certificate of sealing of export meat lockers
+-- >              Document / message issued by the authority in the
+-- >              exporting country evidencing the sealing of export meat
+-- >              lockers.
+-- >        34 Cargo status
+-- >              Message identifying the status of cargo.
+-- >        35 Inventory report
+-- >              A message specifying information relating to held
+-- >              inventories.
+-- > +      36 Identity card
+-- >              Official document to identify a person.
+-- >        37 Response to a trade statistics message
+-- >              Document/message in which the competent national
+-- >              authorities provide a declarant with an acceptance or a
+-- >              rejection about a received declaration for European
+-- >              statistical purposes.
+-- > +      38 Vaccination certificate
+-- >              Official document proving immunisation against certain
+-- >              diseases.
+-- > +      39 Passport
+-- >              An official document giving permission to travel in
+-- >              foreign countries.
+-- > +      40 Driving licence (national)
+-- >              An official document giving permission to drive a car in
+-- >              a given country.
+-- > +      41 Driving licence (international)
+-- >              An official document giving a native of one country
+-- >              permission to drive a vehicle in certain other countries.
+-- > +      42 Free pass
+-- >              A document giving free access to a service.
+-- > +      43 Season ticket
+-- >              A document giving access to a service for a determined
+-- >              period of time.
+-- >        59 Treatment - nil outturn
+-- >              No shortage, surplus or damaged outturn resulting from
+-- >              container vessel unpacking.
+-- >        60 Treatment - time-up underbond
+-- >              Movement type indicator: goods are moved under customs
+-- >              control for warehousing due to being time-up.
+-- >        61 Treatment - underbond by sea
+-- >              Movement type indicator: goods are to move by sea under
+-- >              customs control to a customs office where formalities
+-- >              will be completed.
+-- >        62 Treatment - personal effect
+-- >              Cargo consists of personal effects.
+-- >        63 Treatment - timber
+-- >              Cargo consists of timber.
+-- >        64 Preliminary credit assessment
+-- >              Document/message issued either by a factor to indicate
+-- >              his preliminary credit assessment on a buyer, or by a
+-- >              seller to request a factor's preliminary credit
+-- >              assessment on a buyer.
+-- >        65 Credit cover
+-- >              Document/message issued either by a factor to give a
+-- >              credit cover on a buyer, or by a seller to request a
+-- >              factor's credit cover.
+-- >        66 Current account
+-- >              Document/message issued by a factor to indicate the money
+-- >              movements of a seller's or another factor's account with
+-- >              him.
+-- >        67 Commercial dispute
+-- >              Document/message issued by a party (usually the buyer) to
+-- >              indicate that one or more invoices or one or more credit
+-- >              notes are disputed for payment.
+-- >        68 Chargeback
+-- >              Document/message issued by a factor to a seller or to
+-- >              another factor to indicate that the rest of the amounts
+-- >              of one or more invoices uncollectable from buyers are
+-- >              charged back to clear the invoice(s) off the ledger.
+-- >        69 Reassignment
+-- >              Document/message issued by a factor to a seller or to
+-- >              another factor to reassign an invoice or credit note
+-- >              previously assigned to him.
+-- >        70 Collateral account
+-- >              Document message issued by a factor to indicate the
+-- >              movements of invoices, credit notes and payments of a
+-- >              seller's account.
+-- >        71 Request for payment
+-- >              Document/message issued by a creditor to a debtor to
+-- >              request payment of one or more invoices past due.
+-- >        72 Unship permit
+-- >              A message or document issuing permission to unship cargo.
+-- >        73 Statistical definitions
+-- >              Transmission of one or more statistical definitions.
+-- >        74 Statistical data
+-- >              Transmission of one or more items of data or data sets.
+-- >        75 Request for statistical data
+-- >              Request for one or more items or data sets of statistical
+-- >              data.
+-- >        76 Call-off delivery
+-- >              Document/message to provide split quantities and delivery
+-- >              dates referring to a previous delivery instruction.
+-- >        77 Status report
+-- >              Message covers information about the consignment status.
+-- >        78 Inventory movement advice
+-- >              Advice of inventory movements.
+-- >        79 Inventory status advice
+-- >              Advice of stock on hand.
+-- >        80 Debit note related to goods or services
+-- >              Debit information related to a transaction for goods or
+-- >              services to the relevant party.
+-- >        81 Credit note related to goods or services
+-- >              Document message used to provide credit information
+-- >              related to a transaction for goods or services to the
+-- >              relevant party.
+-- >        82 Metered services invoice
+-- >              Document/message claiming payment for the supply of
+-- >              metered services (e.g., gas, electricity, etc.) supplied
+-- >              to a fixed meter whose consumption is measured over a
+-- >              period of time.
+-- >        83 Credit note related to financial adjustments
+-- >              Document message for providing credit information related
+-- >              to financial adjustments to the relevant party, e.g.,
+-- >              bonuses.
+-- >        84 Debit note related to financial adjustments
+-- >              Document/message for providing debit information related
+-- >              to financial adjustments to the relevant party.
+-- >        85 Customs manifest
+-- >              Message/document identifying a customs manifest. The
+-- >              document itemises a list of cargo prepared by shipping
+-- >              companies from bills of landing and presented to customs
+-- >              for formal report of cargo.
+-- >        86 Vessel unpack report
+-- >              A document code to indicate that the message being
+-- >              transmitted identifies all short and surplus cargoes off-
+-- >              loaded from a vessel at a specified discharging port.
+-- >        87 General cargo summary manifest report
+-- >              A document code to indicate that the message being
+-- >              transmitted is summary manifest information for general
+-- >              cargo.
+-- >        88 Consignment unpack report
+-- >              A document code to indicate that the message being
+-- >              transmitted is a consignment unpack report only.
+-- >        89 Meat and meat by-products sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that meat or meat by-
+-- >              products comply with the requirements set by the
+-- >              importing country.
+-- >        90 Meat food products sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that meat food products
+-- >              comply with the requirements set by the importing
+-- >              country.
+-- >        91 Poultry sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that poultry products
+-- >              comply with the requirements set by the importing
+-- >              country.
+-- >        92 Horsemeat sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that horsemeat products
+-- >              comply with the requirements set by the importing
+-- >              country.
+-- >        93 Casing sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that casing products
+-- >              comply with the requirements set by the importing
+-- >              country.
+-- >        94 Pharmaceutical sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that pharmaceutical
+-- >              products comply with the requirements set by the
+-- >              importing country.
+-- >        95 Inedible sanitary certificate
+-- >              Document or message issued by the competent authority in
+-- >              the exporting country evidencing that inedible products
+-- >              comply with the requirements set by the importing
+-- >              country.
+-- >        96 Impending arrival
+-- >              Notification of impending arrival details for vessel.
+-- >        97 Means of transport advice
+-- >              Message reporting the means of transport used to carry
+-- >              goods or cargo.
+-- >        98 Arrival information
+-- >              Message reporting the arrival details of goods or cargo.
+-- >        99 Cargo release notification
+-- >              Message/document sent by the cargo handler indicating
+-- >              that the cargo has moved from a Customs controlled
+-- >              premise.
+-- > +     100 Excise certificate
+-- >              Certificate asserting that the goods have been submitted
+-- >              to the excise authorities before departure from the
+-- >              exporting country or before delivery in case of import
+-- >              traffic.
+-- > +     101 Registration document
+-- >              An official document providing registration details.
+-- >       105 Purchase order
+-- >              Document/message issued within an enterprise to initiate
+-- >              the purchase of articles, materials or services required
+-- >              for the production or manufacture of goods to be offered
+-- >              for sale or otherwise supplied to customers.
+-- >       110 Manufacturing instructions
+-- >              Document/message issued within an enterprise to initiate
+-- >              the manufacture of goods to be offered for sale.
+-- >       120 Stores requisition
+-- >              Document/message issued within an enterprise ordering the
+-- >              taking out of stock of goods.
+-- >       130 Invoicing data sheet
+-- >              Document/message issued within an enterprise containing
+-- >              data about goods sold, to be used as the basis for the
+-- >              preparation of an invoice.
+-- >       140 Packing instructions
+-- >              Document/message within an enterprise giving instructions
+-- >              on how goods are to be packed.
+-- >       150 Internal transport order
+-- >              Document/message giving instructions about the transport
+-- >              of goods within an enterprise.
+-- >       190 Statistical and other administrative internal documents
+-- >              Documents/messages issued within an enterprise for the
+-- >              for the purpose of collection of production and other
+-- >              internal statistics, and for other administration
+-- >              purposes.
+-- >       201 Direct payment valuation request
+-- >              Request to establish a direct payment valuation.
+-- >       202 Direct payment valuation
+-- >              Document/message addressed, for instance, by a general
+-- >              contractor to the owner, in order that a direct payment
+-- >              be made to a subcontractor.
+-- >       203 Provisional payment valuation
+-- >              Document/message establishing a provisional payment
+-- >              valuation.
+-- >       204 Payment valuation
+-- >              Document/message establishing the financial elements of a
+-- >              situation of works.
+-- >       205 Quantity valuation
+-- >              Document/message providing a confirmed assessment, by
+-- >              quantity, of the completed work for a construction
+-- >              contract.
+-- >       206 Quantity valuation request
+-- >              Document/message providing an initial assessment, by
+-- >              quantity, of the completed work for a construction
+-- >              contract.
+-- >       207 Contract bill of quantities - BOQ
+-- >              Document/message providing a formal specification
+-- >              identifying quantities and prices that are the basis of a
+-- >              contract for a construction project. BOQ means: Bill of
+-- >              quantity.
+-- >       208 Unpriced tender BOQ
+-- >              Document/message providing a detailed, quantity based
+-- >              specification, issued in an unpriced form to invite
+-- >              tender prices. BOQ means: Bill of quantity.
+-- >       209 Priced tender BOQ
+-- >              Document/message providing a detailed, quantity based
+-- >              specification, updated with prices to form a tender
+-- >              submission for a construction contract. BOQ means: Bill
+-- >              of quantity.
+-- >       210 Enquiry
+-- >              Document/message issued by a party interested in the
+-- >              purchase of goods specified therein and indicating
+-- >              particular, desirable conditions regarding delivery
+-- >              terms, etc., addressed to a prospective supplier with a
+-- >              view to obtaining an offer.
+-- >       211 Interim application for payment
+-- >              Document/message containing a provisional assessment in
+-- >              support of a request for payment for completed work for a
+-- >              construction contract.
+-- >       212 Agreement to pay
+-- >              Document/message in which the debtor expresses the
+-- >              intention to pay.
+-- >       215 Letter of intent
+-- >              Document/message by means of which a buyer informs a
+-- >              seller that the buyer intends to enter into contractual
+-- >              negotiations.
+-- >       220 Order
+-- >              Document/message by means of which a buyer initiates a
+-- >              transaction with a seller involving the supply of goods
+-- >              or services as specified, according to conditions set out
+-- >              in an offer, or otherwise known to the buyer.
+-- >       221 Blanket order
+-- >              Usage of document/message for general order purposes with
+-- >              later split into quantities and delivery dates and maybe
+-- >              delivery locations.
+-- >       222 Spot order
+-- >              Document/message ordering the remainder of a production's
+-- >              batch.
+-- >       223 Lease order
+-- >              Document/message for goods in leasing contracts.
+-- >       224 Rush order
+-- >              Document/message for urgent ordering.
+-- >       225 Repair order
+-- >              Document/message to order repair of goods.
+-- >       226 Call off order
+-- >              Document/message to provide split quantities and delivery
+-- >              dates referring to a previous blanket order.
+-- >       227 Consignment order
+-- >              Order to deliver goods into stock with agreement on
+-- >              payment when goods are sold out of this stock.
+-- >       228 Sample order
+-- >              Document/message to order samples.
+-- >       229 Swap order
+-- >              Document/message informing buyer or seller of the
+-- >              replacement of goods previously ordered.
+-- >       230 Purchase order change request
+-- >              Change to an purchase order already sent.
+-- >       231 Purchase order response
+-- >              Response to an purchase order already received.
+-- >       232 Hire order
+-- >              Document/message for hiring human resources or renting
+-- >              goods or equipment.
+-- >       233 Spare parts order
+-- >              Document/message to order spare parts.
+-- >       240 Delivery instructions
+-- >              Document/message issued by a buyer giving instructions
+-- >              regarding the details of the delivery of goods ordered.
+-- >       241 Delivery schedule
+-- >              Usage of DELFOR-message.
+-- >       242 Delivery just-in-time
+-- >              Usage of DELJIT-message.
+-- >       245 Delivery release
+-- >              Document/message issued by a buyer releasing the despatch
+-- >              of goods after receipt of the Ready for despatch advice
+-- >              from the seller.
+-- >       270 Delivery note
+-- >              Paper document attached to a consignment informing the
+-- >              receiving party about contents of this consignment.
+-- >       271 Packing list
+-- >              Document/message specifying the distribution of goods in
+-- >              individual packages (in trade environment the despatch
+-- >              advice message is used for the packing list).
+-- >       310 Offer/quotation
+-- >              Document/message which , with a view to concluding a
+-- >              contract, sets out the conditions under which the goods
+-- >              are offered.
+-- >       311 Request for quote
+-- >              Document/message requesting a quote on specified goods or
+-- >              services.
+-- >       315 Contract
+-- >              Document/message evidencing an agreement between the
+-- >              seller and the buyer for the supply of goods or services;
+-- >              its effects are equivalent to those of an order followed
+-- >              by an acknowledgement of order.
+-- >       320 Acknowledgement of order
+-- >              Document/message acknowledging an undertaking to fulfil
+-- >              an order and confirming conditions or acceptance of
+-- >              conditions.
+-- >       325 Proforma invoice
+-- >              Document/message serving as a preliminary invoice,
+-- >              containing - on the whole - the same information as the
+-- >              final invoice, but not actually claiming payment.
+-- >       326 Partial invoice
+-- >              Self explanatory.
+-- >       327 Operating instructions
+-- >              Self explanatory.
+-- >       328 Name/product plate
+-- >              Plates on goods identifying and describing an article.
+-- >       330 Request for delivery instructions
+-- >              Document/message issued by a supplier requesting
+-- >              instructions from the buyer regarding the details of the
+-- >              delivery of goods ordered.
+-- >       335 Booking request
+-- >              Document/message issued by a supplier to a carrier
+-- >              requesting space to be reserved for a specified
+-- >              consignment, indicating desirable conveyance, despatch
+-- >              time, etc.
+-- >       340 Shipping instructions
+-- >              Document/message advising details of cargo and exporter's
+-- >              requirements for its physical movement.
+-- >       341 Shipper's letter of instructions (air)
+-- >              Document/message issued by a consignor in which he gives
+-- >              details of a consignment of goods that enables an airline
+-- >              or its agent to prepare an air waybill.
+-- >       343 Cartage order (local transport)
+-- >              Document/message giving instructions regarding local
+-- >              transport of goods, e.g. from the premises of an
+-- >              enterprise to those of a carrier undertaking further
+-- >              transport.
+-- >       345 Ready for despatch advice
+-- >              Document/message issued by a supplier informing a buyer
+-- >              that goods ordered are ready for despatch.
+-- >       350 Despatch order
+-- >              Document/message issued by a supplier initiating the
+-- >              despatch of goods to a buyer (consignee).
+-- >       351 Despatch advice
+-- >              Document/message by means of which the seller or
+-- >              consignor informs the consignee about the despatch of
+-- >              goods.
+-- >       370 Advice of distribution of documents
+-- >              Document/message in which the party responsible for the
+-- >              issue of a set of trade documents specifies the various
+-- >              recipients of originals and copies of these documents,
+-- >              with an indication of the number of copies distributed to
+-- >              each of them.
+-- >       380 Commercial invoice
+-- >              Document/message claiming payment for goods or services
+-- >              supplied under conditions agreed between seller and
+-- >              buyer.
+-- >       381 Credit note
+-- >              Document/message for providing credit information to the
+-- >              relevant party.
+-- >       382 Commission note
+-- >              Document/message in which a seller specifies the amount
+-- >              of commission, the percentage of the invoice amount, or
+-- >              some other basis for the calculation of the commission to
+-- >              which a sales agent is entitled.
+-- >       383 Debit note
+-- >              Document/message for providing debit information to the
+-- >              relevant party.
+-- >       384 Corrected invoice
+-- >              Commercial invoice that includes revised information
+-- >              differing from an earlier submission of the same invoice.
+-- >       385 Consolidated invoice
+-- >              Commercial invoice that covers multiple transactions
+-- >              involving more than one vendor.
+-- >       386 Prepayment invoice
+-- >              An invoice to pay amounts for goods and services in
+-- >              advance; these amounts will be subtracted from the final
+-- >              invoice.
+-- >       387 Hire invoice
+-- >              Document/message for invoicing the hiring of human
+-- >              resources or renting goods or equipment.
+-- >       388 Tax invoice
+-- >              An invoice for tax purposes.
+-- >       389 Self-billed invoice
+-- >              An invoice the invoicee is producing instead of the
+-- >              seller.
+-- >       390 Delcredere invoice
+-- >              An invoice sent to the party paying for a number of
+-- >              buyers.
+-- >       393 Factored invoice
+-- >              Invoice assigned to a third party for collection.
+-- >       394 Lease invoice
+-- >              Usage of INVOIC-message for goods in leasing contracts.
+-- >       395 Consignment invoice
+-- >              Commercial invoice that covers a transaction other than
+-- >              one involving a sale.
+-- >       396 Factored credit note
+-- >              Credit note related to assigned invoice(s).
+-- >       409 Instructions for bank transfer
+-- >              Document/message containing instructions from a customer
+-- >              to his bank to pay an amount in a specified currency to a
+-- >              nominated party in another country by a method either
+-- >              specified (e.g. teletransmission, air mail) or left to
+-- >              the discretion of the bank.
+-- >       412 Application for banker's draft
+-- >              Application by a customer to his bank to issue a banker's
+-- >              draft stating the amount and currency of the draft, the
+-- >              name of the payee and the place and country of payment.
+-- >       425 Collection payment advice
+-- >              Document/message whereby a bank advises that a collection
+-- >              has been paid, giving details and methods of funds
+-- >              disposal.
+-- >       426 Documentary credit payment advice
+-- >              Document/message whereby a bank advises payment under a
+-- >              documentary credit.
+-- >       427 Documentary credit acceptance advice
+-- >              Document/message whereby a bank advises acceptance under
+-- >              a documentary credit.
+-- >       428 Documentary credit negotiation advice
+-- >              Document/message whereby a bank advises negotiation under
+-- >              a documentary credit.
+-- >       429 Application for banker's guarantee
+-- >              Document/message whereby a customer requests his bank to
+-- >              issue a guarantee in favour of a nominated party in
+-- >              another country, stating the amount and currency and the
+-- >              specific conditions of the guarantee.
+-- >       430 Banker's guarantee
+-- >              Document/message in which a bank undertakes to pay out a
+-- >              limited amount of money to a designated party, on
+-- >              conditions stated therein (other than those laid down in
+-- >              the Uniform Customs Practice).
+-- >       431 Documentary credit letter of indemnity
+-- >              Document/message in which a beneficiary of a documentary
+-- >              credit accepts responsibility for non-compliance with the
+-- >              terms and conditions of the credit, and undertakes to
+-- >              refund the money received under the credit, with interest
+-- >              and charges accrued.
+-- >       435 Preadvice of a credit
+-- >              Preadvice indicating a credit to happen in the future.
+-- >       447 Collection order
+-- >              Document/message whereby a bank is instructed (or
+-- >              requested) to handle financial and/or commercial
+-- >              documents in order to obtain acceptance and/or payment,
+-- >              or to deliver documents on such other terms and
+-- >              conditions as may be specified.
+-- >       448 Documents presentation form
+-- >              Document/message whereby a draft or similar instrument
+-- >              and/or commercial documents are presented to a bank for
+-- >              acceptance, discounting, negotiation, payment or
+-- >              collection, whether or not against a documentary credit.
+-- >       450 Payment order
+-- >              Document/message containing information needed to
+-- >              initiate the payment. It may cover the financial
+-- >              settlement for one or more commercial trade transactions.
+-- >              A payment order is an instruction to the ordered bank to
+-- >              arrange for the payment of one specified amount to the
+-- >              beneficiary.
+-- >       451 Extended payment order
+-- >              Document/message containing information needed to
+-- >              initiate the payment. It may cover the financial
+-- >              settlement for several commercial trade transactions,
+-- >              which it is possible to specify in a special payments
+-- >              detail part. It is an instruction to the ordered bank to
+-- >              arrange for the payment of one specified amount to the
+-- >              beneficiary.
+-- >       452 Multiple payment order
+-- >              Document/message containing a payment order with one
+-- >              debit account and several credit accounts.
+-- >       454 Credit advice
+-- >              Document/message sent by an account servicing institution
+-- >              to one of its account owners, to inform the account owner
+-- >              of an entry which has been or will be credited to its
+-- >              account for a specified amount on the date indicated.
+-- >       455 Extended credit advice
+-- >              Document/message sent by an account servicing institution
+-- >              to one of its account owners, to inform the account owner
+-- >              of an entry that has been or will be credited to its
+-- >              account for a specified amount on the date indicated. It
+-- >              provides extended commercial information concerning the
+-- >              relevant remittance advice.
+-- >       456 Debit advice
+-- >              Advice on a debit.
+-- >       457 Reversal of debit
+-- >              Reversal of debit accounting entry by bank.
+-- >       458 Reversal of credit
+-- >              Reversal of credit accounting entry by bank.
+-- >       460 Documentary credit application
+-- >              Document/message whereby a bank is requested to issue a
+-- >              documentary credit on the conditions specified therein.
+-- >       465 Documentary credit
+-- >              Document/message in which a bank states that it has
+-- >              issued a documentary credit under which the beneficiary
+-- >              is to obtain payment, acceptance or negotiation on
+-- >              compliance with certain terms and conditions and against
+-- >              presentation of stipulated documents and such drafts as
+-- >              may be specified. The credit may or may not be confirmed
+-- >              by another bank.
+-- >       466 Documentary credit notification
+-- >              Document/message issued by an advising bank in order to
+-- >              transmit a documentary credit to a beneficiary, or to
+-- >              another advising bank.
+-- >       467 Documentary credit transfer advice
+-- >              Document/message whereby a bank advises that (part of) a
+-- >              documentary credit is being or has been transferred in
+-- >              favour of a second beneficiary.
+-- >       468 Documentary credit amendment notification
+-- >              Document/message whereby a bank advises that the terms
+-- >              and conditions of a documentary credit have been amended.
+-- >       469 Documentary credit amendment
+-- >              Document/message whereby a bank notifies a beneficiary of
+-- >              the details of an amendment to the terms and conditions
+-- >              of a documentary credit.
+-- >       481 Remittance advice
+-- >              Document/message advising of the remittance of payment.
+-- >       485 Banker's draft
+-- >              Draft drawn in favour of a third party either by one bank
+-- >              on another bank, or by a branch of a bank on its head
+-- >              office (or vice versa) or upon another branch of the same
+-- >              bank. In either case, the draft should comply with the
+-- >              specifications laid down for cheques in the country in
+-- >              which it is to be payable.
+-- >       490 Bill of exchange
+-- >              Document/message, issued and signed in conformity with
+-- >              the applicable legislation, which contains an
+-- >              unconditional order whereby the drawer directs the drawee
+-- >              to pay a definite sum of money to the payee or to his
+-- >              order, on demand or at a definite time, against the
+-- >              surrender of the document itself.
+-- >       491 Promissory note
+-- >              Document/message, issued and signed in conformity with
+-- >              the applicable legislation, which contains an
+-- >              unconditional promise whereby the maker undertakes to pay
+-- >              a definite sum of money to the payee or to his order, on
+-- >              demand or at a definite time, against the surrender of
+-- >              the document itself.
+-- >       492 Financial statement of account
+-- >              Statement giving the status of a financial account.
+-- >       493 Statement of account message
+-- >              Usage of STATAC-message.
+-- >       520 Insurance certificate
+-- >              Document/message issued to the insured certifying that
+-- >              insurance has been effected and that a policy has been
+-- >              issued. Such a certificate for a particular cargo is
+-- >              primarily used when good are insured under the terms of a
+-- >              floating or an open policy; at the request of the insured
+-- >              it can be exchanged for a policy.
+-- >       530 Insurance policy
+-- >              Document/message issued by the insurer evidencing an
+-- >              agreement to insure and containing the conditions of the
+-- >              agreement concluded whereby the insurer undertakes for a
+-- >              specific fee to indemnify the insured for the losses
+-- >              arising out of the perils and accidents specified in the
+-- >              contract.
+-- >       550 Insurance declaration sheet (bordereau)
+-- >              A document/message used when an insured reports to his
+-- >              insurer details of individual shipments which are covered
+-- >              by an insurance contract - an open cover or a floating
+-- >              policy - between the parties.
+-- >       575 Insurer's invoice
+-- >              Document/message issued by an insurer specifying the cost
+-- >              of an insurance which has been effected and claiming
+-- >              payment therefore.
+-- >       580 Cover note
+-- >              Document/message issued by an insurer (insurance broker,
+-- >              agent, etc.) to notify the insured that his insurance
+-- >              have been carried out.
+-- >       610 Forwarding instructions
+-- >              Document/message issued to a freight forwarder, giving
+-- >              instructions regarding the action to be taken by the
+-- >              forwarder for the forwarding of goods described therein.
+-- >       621 Forwarder's advice to import agent
+-- >              Document/message issued by a freight forwarder in an
+-- >              exporting country advising his counterpart in an
+-- >              importing country about the forwarding of goods described
+-- >              therein.
+-- >       622 Forwarder's advice to exporter
+-- >              Document/message issued by a freight forwarder informing
+-- >              an exporter of the action taken in fulfilment of
+-- >              instructions received.
+-- >       623 Forwarder's invoice
+-- >              Invoice issued by a freight forwarder specifying services
+-- >              rendered and costs incurred and claiming payment
+-- >              therefore.
+-- >       624 Forwarder's certificate of receipt
+-- >              Non-negotiable document issued by a forwarder to certify
+-- >              that he has assumed control of a specified consignment,
+-- >              with irrevocable instructions to send it to the consignee
+-- >              indicated in the document or to hold it at his disposal.
+-- >              E.g. FIATA-FCR.
+-- >       630 Shipping note
+-- >              Document/message provided by the shipper or his agent to
+-- >              the carrier, multimodal transport operator, terminal or
+-- >              other receiving authority, giving information about
+-- >              export consignments offered for transport, and providing
+-- >              for the necessary receipts and declarations of liability.
+-- >              (Sometimes a multipurpose cargo handling document also
+-- >              fulfilling the functions of document 632, 633, 650 and
+-- >              655).
+-- >       631 Forwarder's warehouse receipt
+-- >              Document/message issued by a forwarder acting as
+-- >              Warehouse Keeper acknowledging receipt of goods placed in
+-- >              a warehouse, and stating or referring to the conditions
+-- >              which govern the warehousing and the release of goods.
+-- >              The document contains detailed provisions regarding the
+-- >              rights of holders-by-endorsement, transfer of ownership,
+-- >              etc. E.g. FIATA-FWR.
+-- >       632 Goods receipt
+-- >              Document/message issued by a port, warehouse/shed, or
+-- >              terminal operator acknowledging receipt of goods
+-- >              specified therein on conditions stated or referred to in
+-- >              the document.
+-- >       633 Port charges documents
+-- >              Documents/messages specifying services rendered, storage
+-- >              and handling costs, demurrage and other charges due to
+-- >              the owner of goods described therein.
+-- >       635 Warehouse warrant
+-- >              Negotiable receipt document, issued by a Warehouse Keeper
+-- >              to a person placing goods in a warehouse and conferring
+-- >              title to the goods stored.
+-- >       640 Delivery order
+-- >              Document/message issued by a party entitled to authorize
+-- >              the release of goods specified therein to a named
+-- >              consignee, to be retained by the custodian of the goods.
+-- >       650 Handling order
+-- >              Document/message issued by a cargo handling organization
+-- >              (port administration, terminal operator, etc.) for the
+-- >              removal or other handling of goods under their care.
+-- >       655 Gate pass
+-- >              Document/message authorizing goods specified therein to
+-- >              be brought out of a fenced-in port or terminal area.
+-- >       700 Waybill
+-- >              Non-negotiable document evidencing the contract for the
+-- >              transport of cargo.
+-- >       701 Universal (multipurpose) transport document
+-- >              Document/message evidencing a contract of carriage
+-- >              covering the movement of goods by any mode of transport,
+-- >              or combination of modes, for national as well as
+-- >              international transport, under any applicable
+-- >              international convention or national law and under the
+-- >              conditions of carriage of any carrier or transport
+-- >              operator undertaking or arranging the transport referred
+-- >              to in the document.
+-- >       702 Goods receipt, carriage
+-- >              Document/message issued by a carrier or a carrier's
+-- >              agent, acknowledging receipt for carriage of goods
+-- >              specified therein on conditions stated or referred to in
+-- >              the document, enabling the carrier to issue a transport
+-- >              document.
+-- >       703 House waybill
+-- >              The document made out by an agent/consolidator which
+-- >              evidences the contract between the shipper and the
+-- >              agent/consolidator for the arrangement of carriage of
+-- >              goods.
+-- >       704 Master bill of lading
+-- >              A bill of lading issued by the master of a vessel (in
+-- >              actuality the owner or charterer of the vessel). It could
+-- >              cover a number of house bills.
+-- >       705 Bill of lading
+-- >              Negotiable document/message which evidences a contract of
+-- >              carriage by sea and the taking over or loading of goods
+-- >              by carrier, and by which carrier undertakes to deliver
+-- >              goods against surrender of the document. A provision in
+-- >              the document that goods are to be delivered to the order
+-- >              of a named person, or to order, or to bearer, constitutes
+-- >              such an undertaking.
+-- >       706 Bill of lading original
+-- >              The original of the bill of lading issued by a transport
+-- >              company. When issued by the maritime industry it could
+-- >              signify ownership of the cargo.
+-- >       707 Bill of lading copy
+-- >              A copy of the bill of lading issued by a transport
+-- >              company.
+-- >       708 Empty container bill
+-- >              Bill of lading indicating an empty container.
+-- >       709 Tanker bill of lading
+-- >              Document which evidences a transport of liquid bulk
+-- >              cargo.
+-- >       710 Sea waybill
+-- >              Non-negotiable document which evidences a contract for
+-- >              the carriage of goods by sea and the taking over of the
+-- >              goods by the carrier, and by which the carrier undertakes
+-- >              to deliver the goods to the consignee named in the
+-- >              document.
+-- >       711 Inland waterway bill of lading
+-- >              Negotiable transport document made out to a named person,
+-- >              to order or to bearer, signed by the carrier and handed
+-- >              to the sender after receipt of the goods.
+-- >       712 Non-negotiable maritime transport document (generic)
+-- >              Non-negotiable document which evidences a contract for
+-- >              the carriage of goods by sea and the taking over or
+-- >              loading of the goods by the carrier, and by which the
+-- >              carrier undertakes to deliver the goods to the consignee
+-- >              named in the document. E.g. Sea waybill. Remark:
+-- >              Synonymous with "straight" or "non-negotiable Bill of
+-- >              lading" used in certain countries, e.g. Canada.
+-- >       713 Mate's receipt
+-- >              Document/message issued by a ship's officer to
+-- >              acknowledge that a specified consignment has been
+-- >              received on board a vessel, and the apparent condition of
+-- >              the goods; enabling the carrier to issue a Bill of
+-- >              lading.
+-- >       714 House bill of lading
+-- >              The bill of lading issued not by the carrier but by the
+-- >              freight forwarder/consolidator known by the carrier.
+-- >       715 Letter of indemnity for non-surrender of bill of lading
+-- >              Document/message issued by a commercial party or a bank
+-- >              of an insurance company accepting responsibility to the
+-- >              beneficiary of the indemnity in accordance with the terms
+-- >              thereof.
+-- >       716 Forwarder's bill of lading
+-- >              Non-negotiable document issued by a freight forwarder
+-- >              evidencing a contract for the carriage of goods by sea
+-- >              and the taking over or loading of the goods by the
+-- >              freight forwarder, and by which the freight forwarder
+-- >              undertakes to deliver the goods to the consignee named in
+-- >              the document.
+-- >       720 Rail consignment note (generic term)
+-- >              Transport document constituting a contract for the
+-- >              carriage of goods between the sender and the carrier (the
+-- >              railway). For international rail traffic, this document
+-- >              must conform to the model prescribed by the international
+-- >              conventions concerning carriage of goods by rail, e.g.
+-- >              CIM Convention, SMGS Convention.
+-- >       722 Road list-SMGS
+-- >              Accounting document, one copy of which is drawn up for
+-- >              each consignment note; it accompanies the consignment
+-- >              over the whole route and is a rail transport document.
+-- >       723 Escort official recognition
+-- >              Document/message which gives right to the owner to exert
+-- >              all functions normally transferred to a guard in a train
+-- >              by which an escorted consignment is transported.
+-- >       724 Recharging document
+-- >              Fictitious transport document regarding a previous
+-- >              transport, enabling a carrier's agent to give to another
+-- >              carrier's agent (in a different country) the possibility
+-- >              to collect charges relating to the original transport
+-- >              (rail environment).
+-- >       730 Road consignment note
+-- >              Transport document/message which evidences a contract
+-- >              between a carrier and a sender for the carriage of goods
+-- >              by road (generic term). Remark: For international road
+-- >              traffic, this document must contain at least the
+-- >              particulars prescribed by the convention on the contract
+-- >              for the international carriage of goods by road (CMR).
+-- >       740 Air waybill
+-- >              Document/message made out by or on behalf of the shipper
+-- >              which evidences the contract between the shipper and
+-- >              carrier(s) for carriage of goods over routes of the
+-- >              carrier(s) and which is identified by the airline prefix
+-- >              issuing the document plus a serial (IATA).
+-- >       741 Master air waybill
+-- >              Document/message made out by or on behalf of the
+-- >              agent/consolidator which evidences the contract between
+-- >              the agent/consolidator and carrier(s) for carriage of
+-- >              goods over routes of the carrier(s) for a consignment
+-- >              consisting of goods originated by more than one shipper
+-- >              (IATA).
+-- >       743 Substitute air waybill
+-- >              A temporary air waybill which contains only limited
+-- >              information because of the absence of the original.
+-- >       744 Crew's effects declaration
+-- >              Declaration to Customs regarding the personal effects of
+-- >              crew members aboard the conveyance; equivalent to IMO FAL
+-- >              4.
+-- >       745 Passenger list
+-- >              Declaration to Customs regarding passengers aboard the
+-- >              conveyance; equivalent to IMO FAL 6.
+-- >       746 Delivery notice (rail transport)
+-- >              Document/message created by the consignor or by the
+-- >              departure station, joined to the transport or sent to the
+-- >              consignee, giving the possibility to the consignee or the
+-- >              arrival station to attest the delivery of the goods. The
+-- >              document must be returned to the consignor or to the
+-- >              departure station.
+-- >       750 Despatch note (post parcels)
+-- >              Document/message which, according to Article 106 of the
+-- >              "Agreement concerning Postal Parcels" under the UPU
+-- >              convention, is to accompany post parcels.
+-- >       760 Multimodal/combined transport document (generic)
+-- >              A transport document used when more than one mode of
+-- >              transportation is involved in the movement of cargo. It
+-- >              is a contract of carriage and receipt of the cargo for a
+-- >              multimodal transport. It indicates the place where the
+-- >              responsible transport company in the move takes
+-- >              responsibility for the cargo, the place where the
+-- >              responsibility of this transport company in the move ends
+-- >              and the conveyances involved.
+-- >       761 Through bill of lading
+-- >              Bill of lading which evidences a contract of carriage
+-- >              from one place to another in separate stages of which at
+-- >              least one stage is a sea transit, and by which the
+-- >              issuing carrier accepts responsibility for the carriage
+-- >              as set forth in the Through bill of lading.
+-- >       763 Forwarder's certificate of transport
+-- >              Negotiable document/message issued by a forwarder to
+-- >              certify that he has taken charge of a specified
+-- >              consignment for despatch and delivery in accordance with
+-- >              the consignor's instructions, as indicated in the
+-- >              document, and that he accepts responsibility for delivery
+-- >              of the goods to the holder of the document through the
+-- >              intermediary of a delivery agent of his choice. E.g.
+-- >              FIATA-FCT.
+-- >       764 Combined transport document (generic)
+-- >              Negotiable or non-negotiable document evidencing a
+-- >              contract for the performance and/or procurement of
+-- >              performance of combined transport of goods and bearing on
+-- >              its face either the heading "Negotiable combined
+-- >              transport document issued subject to Uniform Rules for a
+-- >              Combined Transport Document (ICC Brochure No. 298)" or
+-- >              the heading "Non-negotiable Combined Transport Document
+-- >              issued subject to Uniform Rules for a Combined Transport
+-- >              Document (ICC Brochure No. 298)".
+-- >       765 Multimodal transport document (generic)
+-- >              Document/message which evidences a multimodal transport
+-- >              contract, the taking in charge of the goods by the
+-- >              multimodal transport operator, and an undertaking by him
+-- >              to deliver the goods in accordance with the terms of the
+-- >              contract. (International Convention on Multimodal
+-- >              Transport of Goods).
+-- >       766 Combined transport bill of lading/multimodal bill of lading
+-- >              Document which evidences a multimodal transport contract,
+-- >              the taking in charge of the goods by the multimodal
+-- >              transport operator, and an undertaking by him to deliver
+-- >              the goods in accordance with the terms of the contract.
+-- >       770 Booking confirmation
+-- >              Document/message issued by a carrier to confirm that
+-- >              space has been reserved for a consignment in means of
+-- >              transport.
+-- >       775 Calling forward notice
+-- >              Instructions for release or delivery of goods.
+-- >       780 Freight invoice
+-- >              Document/message issued by a transport operation
+-- >              specifying freight costs and charges incurred for a
+-- >              transport operation and stating conditions of payment.
+-- >       781 Arrival notice (goods)
+-- >              Notification from the carrier to the consignee in
+-- >              writing, by telephone or by any other means (express
+-- >              letter, message, telegram, etc.) informing him that a
+-- >              consignment addressed to him is being or will shortly be
+-- >              held at his disposal at a specified point in the place of
+-- >              destination.
+-- >       782 Notice of circumstances preventing delivery (goods)
+-- >              Request made by the carrier to the sender, or, as the
+-- >              case may be, the consignee, for instructions as to the
+-- >              disposal of the consignment when circumstances prevent
+-- >              delivery and the return of the goods has not been
+-- >              requested by the consignor in the transport document.
+-- >       783 Notice of circumstances preventing transport (goods)
+-- >              Request made by the carrier to the sender, or, the
+-- >              consignee as the case may be, for instructions as to the
+-- >              disposal of the goods when circumstances prevent
+-- >              transport before departure or en route, after acceptance
+-- >              of the consignment concerned.
+-- >       784 Delivery notice (goods)
+-- >              Notification in writing, sent by the carrier to the
+-- >              sender, to inform him at his request of the actual date
+-- >              of delivery of the goods.
+-- >       785 Cargo manifest
+-- >              Listing of goods comprising the cargo carried in a means
+-- >              of transport or in a transport-unit. The cargo manifest
+-- >              gives the commercial particulars of the goods, such as
+-- >              transport document numbers, consignors, consignees,
+-- >              shipping marks, number and kind of packages and
+-- >              descriptions and quantities of the goods.
+-- >       786 Freight manifest
+-- >              Document/message containing the same information as a
+-- >              cargo manifest, and additional details on freight
+-- >              amounts, charges, etc.
+-- >       787 Bordereau
+-- >              Document/message used in road transport, listing the
+-- >              cargo carried on a road vehicle, often referring to
+-- >              appended copies of Road consignment note.
+-- >       788 Container manifest (unit packing list)
+-- >              Document/message specifying the contents of particular
+-- >              freight containers or other transport units, prepared by
+-- >              the party responsible for their loading into the
+-- >              container or unit.
+-- >       789 Charges note
+-- >              Document used by the rail organization to indicate
+-- >              freight charges or additional charges in each case where
+-- >              the departure station is not able to calculate the
+-- >              charges for the total voyage (e.g. tariff not yet
+-- >              updated, part of voyage not covered by the tariff). This
+-- >              document must be considered as joined to the transport.
+-- >       790 Advice of collection
+-- >              Document that is joined to the transport or sent by
+-- >              separate means, giving to the departure rail organization
+-- >              the proof that the cash-on delivery amount has been
+-- >              encashed by the arrival rail organization before
+-- >              reimbursement of the consignor.
+-- >       791 Safety of ship certificate
+-- >              Document certifying a ship's safety to a specified date.
+-- >       792 Safety of radio certificate
+-- >              Document certifying the safety of a ship's radio
+-- >              facilities to a specified date.
+-- >       793 Safety of equipment certificate
+-- >              Document certifying the safety of a ship's equipment to a
+-- >              specified date.
+-- >       794 Civil liability for oil certificate
+-- >              Document declaring a ship owner's liability for oil
+-- >              propelling or carried on a vessel.
+-- >       795 Loadline document
+-- >              Document specifying the limit of a ship's legal
+-- >              submersion under various conditions.
+-- >       796 Derat document
+-- >              Document certifying that a ship is free of rats, valid to
+-- >              a specified date.
+-- >       797 Maritime declaration of health
+-- >              Document certifying the health condition on board a
+-- >              vessel, valid to a specified date.
+-- >       798 Certificate of registry
+-- >              Official certificate stating the vessel's registry.
+-- >       799 Ship's stores declaration
+-- >              Declaration to Customs regarding the contents of the
+-- >              ship's stores (equivalent to IMO FAL 3) i.e. goods
+-- >              intended for consumption by passengers/crew on board
+-- >              vessels, aircraft or trains, whether or not sold or
+-- >              landed; goods necessary for operation/maintenance of
+-- >              conveyance, incl. fuel/lubricants, excl. spare
+-- >              parts/equipment (IMO).
+-- >       810 Export licence, application for
+-- >              Application for a permit issued by a government authority
+-- >              permitting exportation of a specified commodity subject
+-- >              to specified conditions as quantity, country of
+-- >              destination, etc.
+-- >       811 Export licence
+-- >              Permit issued by a government authority permitting
+-- >              exportation of a specified commodity subject to specified
+-- >              conditions as quantity, country of destination, etc.
+-- >              Synonym: Embargo permit.
+-- >       812 Exchange control declaration, export
+-- >              Document/message completed by an exporter/seller as a
+-- >              means whereby the competent body may control that the
+-- >              amount of foreign exchange accrued from a trade
+-- >              transaction is repatriated in accordance with the
+-- >              conditions of payment and exchange control regulations in
+-- >              force.
+-- >       820 Despatch note model T
+-- >              European community transit declaration.
+-- >       821 Despatch note model T1
+-- >              Transit declaration for goods circulating under internal
+-- >              community transit procedures (between ECE countries).
+-- >       822 Despatch note model T2
+-- >              Ascertainment that the declared goods were originally
+-- >              produced in an ECE country.
+-- >       823 Control document T5
+-- >              Control document (export declaration) used particularly
+-- >              in case of re-sending without use with only VAT
+-- >              collection, refusal, unconformity with contract etc.
+-- >       824 Re-sending consignment note
+-- >              Rail consignment note prepared by the consignor for the
+-- >              facilitation of an eventual return to the origin of the
+-- >              goods.
+-- >       825 Despatch note model T2L
+-- >              Ascertainment that the declared goods were originally
+-- >              produced in an EC country. May only be used for goods
+-- >              that are loaded on one single means of transport in one
+-- >              single departure point for one single delivery point.
+-- >       830 Goods declaration for exportation
+-- >              Document/message by which goods are declared for export
+-- >              Customs clearance, conforming to the layout key set out
+-- >              at Appendix I to Annex C.1 concerning outright
+-- >              exportation to the Kyoto convention (CCC). Within a
+-- >              Customs union, "for despatch" may have the same meaning
+-- >              as "for exportation".
+-- >       833 Cargo declaration (departure)
+-- >              Generic term, sometimes referred to as Freight
+-- >              declaration, applied to the documents providing the
+-- >              particulars required by the Customs concerning the cargo
+-- >              (freight) carried by commercial means of transport (CCC).
+-- >       840 Application for goods control certificate
+-- >              Document/message submitted to a competent body by party
+-- >              requesting a Goods control certificate to be issued in
+-- >              accordance with national or international standards, or
+-- >              conforming to legislation in the importing country, or as
+-- >              specified in the contract.
+-- >       841 Goods control certificate
+-- >              Document/message issued by a competent body evidencing
+-- >              the quality of the goods described therein, in accordance
+-- >              with national or international standards, or conforming
+-- >              to legislation in the importing country, or as specified
+-- >              in the contract.
+-- >       850 Application for phytosanitary certificate
+-- >              Document/message submitted to a competent body by party
+-- >              requesting a Phytosanitary certificate to be issued.
+-- >       851 Phytosanitary certificate
+-- >              Document/message issued by the competent body in the
+-- >              exporting country evidencing that plants, fruit, or
+-- >              vegetables are free from disease and fit for consumption
+-- >              and giving details on fumigation or other treatment to
+-- >              which they may have been subjected.
+-- >       852 Sanitary certificate
+-- >              Document/message issued by the competent authority in the
+-- >              exporting country evidencing that alimentary and animal
+-- >              products, including dead animals, are fit for human
+-- >              consumption, and giving details, when relevant, of
+-- >              controls undertaken.
+-- >       853 Veterinary certificate
+-- >              Document/message issued by the competent authority in the
+-- >              exporting country evidencing that live animals or birds
+-- >              are not infested or infected with disease, and giving
+-- >              details regarding their provenance, and of vaccinations
+-- >              and other treatment to which they have been subjected.
+-- >       855 Application for inspection certificate
+-- >              Document/message submitted to a competent body by a party
+-- >              requesting an Inspection certificate to be issued in
+-- >              accordance with national or international standards, or
+-- >              conforming to legislation in the country in which it is
+-- >              required, or as specified in the contract.
+-- >       856 Inspection certificate
+-- >              Document/message issued by a competent body evidencing
+-- >              that the goods described therein have been inspected in
+-- >              accordance with national or international standards, in
+-- >              conformity with legislation in the country in which the
+-- >              inspection is required, or as specified in the contract.
+-- >       860 Certificate of origin, application for
+-- >              Document/message submitted to a competent body by an
+-- >              interested party requesting a Certificate of origin to be
+-- >              issued in accordance with relevant criteria, and on the
+-- >              basis of evidence of the origin of the goods.
+-- >       861 Certificate of origin
+-- >              Document/message identifying goods, in which the
+-- >              authority or body authorized to issue it certifies
+-- >              expressly that the goods to which the certificate relates
+-- >              originate in a specific country. The word "country" may
+-- >              include a group of countries, a region or a part of a
+-- >              country. This certificate may also include a declaration
+-- >              by the manufacturer, producer, supplier, exporter or
+-- >              other competent person.
+-- >       862 Declaration of origin
+-- >              Appropriate statement as to the origin of the goods, made
+-- >              in connection with their exportation by the manufacturer,
+-- >              producer, supplier, exporter or other competent person on
+-- >              the Commercial invoice or any other document relating to
+-- >              the goods (CCC).
+-- >       863 Regional appellation certificate
+-- >              Certificate drawn up in accordance with the rules laid
+-- >              down by an authority or approved body, certifying that
+-- >              the goods described therein qualify for a designation
+-- >              specific to the given region (e.g. champagne, port wine,
+-- >              Parmesan cheese).
+-- >       864 Preference certificate of origin
+-- >              Description to be provided.
+-- >       865 Certificate of origin form GSP
+-- >              Specific form of certificate of origin for goods
+-- >              qualifying for preferential treatment under the
+-- >              generalized system of preferences (includes a combined
+-- >              declaration of origin and certificate, form A).
+-- >       870 Consular invoice
+-- >              Document/message to be prepared by an exporter in his
+-- >              country and presented to a diplomatic representation of
+-- >              the importing country for endorsement and subsequently to
+-- >              be presented by the importer in connection with the
+-- >              import of the goods described therein.
+-- >       890 Dangerous goods declaration
+-- >              Document/message issued by a consignor in accordance with
+-- >              applicable conventions or regulations, describing
+-- >              hazardous goods or materials for transport purposes, and
+-- >              stating that the latter have been packed and labelled in
+-- >              accordance with the provisions of the relevant
+-- >              conventions or regulations.
+-- >       895 Statistical document, export
+-- >              Document/message in which an exporter provides
+-- >              information about exported goods required by the body
+-- >              responsible for the collection of international trade
+-- >              statistics.
+-- >       896 INTRASTAT declaration
+-- >              Document/message in which a declarant provides
+-- >              information about goods required by the body responsible
+-- >              for the collection of trade statistics.
+-- >       901 Delivery verification certificate
+-- >              Document/message whereby an official authority (Customs
+-- >              or governmental) certifies that goods have been
+-- >              delivered.
+-- >       910 Import licence, application for
+-- >              Document/message in which an interested party applies to
+-- >              the competent body for authorization to import either a
+-- >              limited quantity of articles subject to import
+-- >              restrictions, or an unlimited quantity of such articles
+-- >              during a limited period, and specifies the kind of
+-- >              articles, their origin and value, etc.
+-- >       911 Import licence
+-- >              Document/message issued by the competent body in
+-- >              accordance with import regulations in force, by which
+-- >              authorization is granted to a named party to import
+-- >              either a limited quantity of designated articles or an
+-- >              unlimited quantity of such articles during a limited
+-- >              period, under conditions specified in the document.
+-- >       913 Customs declaration without commercial detail
+-- >              CUSDEC transmission that does not include data from the
+-- >              commercial detail section of the message.
+-- >       914 Customs declaration with commercial and item detail
+-- >              CUSDEC transmission that includes data from both the
+-- >              commercial detail and item detail sections of the
+-- >              message.
+-- >       915 Customs declaration without item detail
+-- >              CUSDEC transmission that does not include data from the
+-- >              item detail section of the message.
+-- >       916 Related document
+-- >              Description to be provided.
+-- >       917 Receipt (Customs)
+-- >              Receipt for Customs duty/tax/fee paid.
+-- >       925 Application for exchange allocation
+-- >              Document/message whereby an importer/buyer requests the
+-- >              competent body to allocate an amount of foreign exchange
+-- >              to be transferred to an exporter/seller in payment for
+-- >              goods.
+-- >       926 Foreign exchange permit
+-- >              Document/message issued by the competent body authorizing
+-- >              an importer/buyer to transfer an amount of foreign
+-- >              exchange to an exporter/seller in payment for goods.
+-- >       927 Exchange control declaration (import)
+-- >              Document/message completed by an importer/buyer as a
+-- >              means for the competent body to control that a trade
+-- >              transaction for which foreign exchange has been allocated
+-- >              has been executed and that money has been transferred in
+-- >              accordance with the conditions of payment and the
+-- >              exchange control regulations in force.
+-- >       929 Goods declaration for importation
+-- >              Document/message by which goods are declared for import
+-- >              Customs clearance [sister entry of 830].
+-- >       930 Goods declaration for home use
+-- >              Document/message by which goods are declared for import
+-- >              Customs clearance according to Annex B.1 (concerning
+-- >              clearance for home use) to the Kyoto convention (CCC).
+-- >       931 Customs immediate release declaration
+-- >              Document/message issued by an importer notifying Customs
+-- >              that goods have been removed from an importing means of
+-- >              transport to the importer's premises under a Customs-
+-- >              approved arrangement for immediate release, or requesting
+-- >              authorization to do so.
+-- >       932 Customs delivery note
+-- >              Document/message whereby a Customs authority releases
+-- >              goods under its control to be placed at the disposal of
+-- >              the party concerned. Synonym: Customs release note.
+-- >       933 Cargo declaration (arrival)
+-- >              Generic term, sometimes referred to as Freight
+-- >              declaration, applied to the documents providing the
+-- >              particulars required by the Customs concerning the cargo
+-- >              (freight) carried by commercial means of transport (CCC).
+-- >       934 Value declaration
+-- >              Document/message in which a declarant (importer) states
+-- >              the invoice or other price (e.g. selling price, price of
+-- >              identical goods), and specifies costs for freight,
+-- >              insurance and packing, etc., terms of delivery and
+-- >              payment, any relationship with the trading partner, etc.,
+-- >              for the purpose of determining the Customs value of goods
+-- >              imported.
+-- >       935 Customs invoice
+-- >              Document/message required by the Customs in an importing
+-- >              country in which an exporter states the invoice or other
+-- >              price (e.g. selling price, price of identical goods), and
+-- >              specifies costs for freight, insurance and packing, etc.,
+-- >              terms of delivery and payment, for the purpose of
+-- >              determining the Customs value in the importing country of
+-- >              goods consigned to that country.
+-- >       936 Customs declaration (post parcels)
+-- >              Document/message which, according to Article 106 of the
+-- >              "Agreement concerning Postal Parcels" under the UPU
+-- >              Convention, must accompany post parcels and in which the
+-- >              contents of such parcels are specified.
+-- >       937 Tax declaration (value added tax)
+-- >              Document/message in which an importer states the
+-- >              pertinent information required by the competent body for
+-- >              assessment of value-added tax.
+-- >       938 Tax declaration (general)
+-- >              Document/message containing a general tax declaration.
+-- >       940 Tax demand
+-- >              Document/message containing the demand of tax.
+-- >       941 Embargo permit
+-- >              Document/message giving the permission to export
+-- >              specified goods.
+-- >       950 Goods declaration for Customs transit
+-- >              Document/message by which the sender declares goods for
+-- >              Customs transit according to Annex E.1 (concerning
+-- >              Customs transit) to the Kyoto convention (CCC).
+-- >       951 TIF form
+-- >              International Customs transit document by which the
+-- >              sender declares goods for carriage by rail in accordance
+-- >              with the provisions of the 1952 International Convention
+-- >              to facilitate the crossing of frontiers for goods carried
+-- >              by rail (TIF Convention of UIC).
+-- >       952 TIR carnet
+-- >              International Customs document (International Transit by
+-- >              Road), issued by a guaranteeing association approved by
+-- >              the Customs authorities, under the cover of which goods
+-- >              are carried, in most cases under Customs seal, in road
+-- >              vehicles and/or containers in compliance with the
+-- >              requirements of the Customs TIR Convention of the
+-- >              International Transport of Goods under cover of TIR
+-- >              Carnets (UN/ECE).
+-- >       953 EC carnet
+-- >              EC customs transit document issued by EC customs
+-- >              authorities for transit and/or temporary user of goods
+-- >              within the EC.
+-- >       954 EUR 1 certificate of origin
+-- >              Customs certificate used in preferential goods
+-- >              interchanges between EC countries and EC external
+-- >              countries.
+-- >       955 ATA carnet
+-- >              International Customs document (Admission Temporaire /
+-- >              Temporary Admission) which, issued under the terms of the
+-- >              ATA Convention (1961), incorporates an internationally
+-- >              valid guarantee and may be used, in lieu of national
+-- >              Customs documents and as security for import duties and
+-- >              taxes, to cover the temporary admission of goods and,
+-- >              where appropriate, the transit of goods. If accepted for
+-- >              controlling the temporary export and reimport of goods,
+-- >              international guarantee does not apply (CCC).
+-- >       960 Single administrative document
+-- >              A set of documents, replacing the various (national)
+-- >              forms for Customs declaration within the EC, implemented
+-- >              on 01-01-1988.
+-- >       961 General response (Customs)
+-- >              General response message to permit the transfer of data
+-- >              from Customs to the transmitter of the previous message.
+-- >       962 Document response (Customs)
+-- >              Document response message to permit the transfer of data
+-- >              from Customs to the transmitter of the previous message.
+-- >       963 Error response (Customs)
+-- >              Error response message to permit the transfer of data
+-- >              from Customs to the transmitter of the previous message.
+-- >       964 Package response (Customs)
+-- >              Package response message to permit the transfer of data
+-- >              from Customs to the transmitter of the previous message.
+-- >       965 Tax calculation/confirmation response (Customs)
+-- >              Tax calculation/confirmation response message to permit
+-- >              the transfer of data from Customs to the transmitter of
+-- >              the previous message.
+-- >       966 Quota prior allocation certificate
+-- >              Document/message issued by the competent body for prior
+-- >              allocation of a quota.
+-- >       990 End use authorization
+-- >              Description to be provided.
+-- >       991 Government contract
+-- >              Description to be provided.
+-- >       995 Statistical document, import
+-- >              Description to be provided.
+-- >       996 Application for documentary credit
+-- >              Message with application for opening of a documentary
+-- >              credit.
+-- >       998 Previous Customs document/message
+-- >              Indication of the previous Customs document/message
+-- >              concerning the same transaction.
+simple1001 :: Parser Value
+simple1001 = simple "1001" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1004.hs b/specification/src/Text/Edifact/D96A/Simples/S1004.hs
new file mode 100644
index 0000000..5381b20
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1004.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1004
+  ( simple1004
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1004  Document/message number
+-- >
+-- >    Desc: Reference number assigned to the document/message by the
+-- >          issuer.
+-- >
+-- >    Repr: an..35
+simple1004 :: Parser Value
+simple1004 = simple "1004" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1082.hs b/specification/src/Text/Edifact/D96A/Simples/S1082.hs
new file mode 100644
index 0000000..5b0b07d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1082.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1082
+  ( simple1082
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1082  Line item number
+-- >
+-- >    Desc: Serial number designating each separate item within a series
+-- >          of articles.
+-- >
+-- >    Repr: n..6
+simple1082 :: Parser Value
+simple1082 = simple "1082" (numeric `upTo` 6)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1131.hs b/specification/src/Text/Edifact/D96A/Simples/S1131.hs
new file mode 100644
index 0000000..dc84502
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1131.hs
@@ -0,0 +1,347 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1131
+  ( simple1131
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 1131  Code list qualifier
+-- >
+-- >   Desc: Identification of a code list.
+-- >
+-- >   Repr: an..3
+-- >
+-- >        12 Telephone directory
+-- >              Self explanatory.
+-- >        16 Postcode directory
+-- >              [3251] Code defining postal zones or addresses.
+-- >        23 Clearing house automated payment
+-- >              Self explanatory.
+-- >        25 Bank identification
+-- >              Code for identification of banks.
+-- >        35 Rail additional charges
+-- >              Self explanatory.
+-- >        36 Railways networks
+-- >              Self explanatory.
+-- >        37 Railway locations
+-- >              Code identifying a location in railway environment.
+-- >        38 Rail customers
+-- >              Self explanatory.
+-- >        39 Rail unified nomenclature of goods
+-- >              Self explanatory.
+-- >        42 Business function
+-- >              Self explanatory.
+-- >        43 Clearing House Interbank Payment System Participants ID
+-- >              Participants identification of the automated clearing
+-- >              house of the New York Clearing House Association (CHIPS).
+-- >        44 Clearing House Interbank Payment System Universal ID
+-- >              Universal identification of the automated clearing house
+-- >              of the New York Clearing House Association (CHAPS).
+-- >        52 Value added tax identification
+-- >              Value added tax identification code.
+-- >        53 Passport number
+-- >              Number assigned to a passport.
+-- >        54 Statistical object
+-- >              A statistical object such as a statistical concept, array
+-- >              structure component or statistical nomenclature.
+-- >        55 Quality conformance
+-- >              A code list specifying the quality standard a product
+-- >              complies with, e.g. ISO9000, BS5750, etc.
+-- >        56 Safety regulation
+-- >              A code list specifying the safety regulations which apply
+-- >              to a product, such as UK COSHH (control of substances
+-- >              hazardous to health) regulations.
+-- >        57 Product code
+-- >              Code assigned to a specific product by a controlling
+-- >              agency.
+-- >        58 Business account number
+-- >              An identifying number or code assigned by issuing
+-- >              authorities to manage business activities.
+-- >        59 Railway services harmonized code
+-- >              Services provided by the different railway organizations.
+-- > +      60 Type of financial account
+-- >              Identification of the type of financial account.
+-- > +      61 Type of assets and liabilities
+-- >              Identification of the type of assets and liabilities.
+-- > +      62 Requirements indicator
+-- >              A code list which specifies various requirements that a
+-- >              customer may have when fulfilling a purchase order.
+-- > +      63 Handling action
+-- >              Codes for handling action.
+-- > +      64 Freight forwarder
+-- >              Codes for freight forwarders.
+-- > +      65 Shipping agent
+-- >              Codes for shipping agents.
+-- > +      67 Type of package
+-- >              Indication of the type of package codes.
+-- > +      68 Type of industrial activity
+-- >              Identification of the type of industrial activity.
+-- > +      69 Type of survey question
+-- >              Identification of the type of survey question.
+-- > +      70 Customs inspection type
+-- >              A code to indicate the type of inspection performed by
+-- >              customs.
+-- > +      71 Nature of transaction
+-- >              Identification of the nature of the transaction.
+-- >       100 Enhanced party identification
+-- >              Self explanatory.
+-- >       101 Air carrier
+-- >              Self explanatory.
+-- >       102 Size and type
+-- >              Self explanatory.
+-- >       103 Call sign directory
+-- >              Self explanatory.
+-- >       104 Customs area of transaction
+-- >              Customs code to indicate the different types of
+-- >              declarations according to the countries involved in the
+-- >              transaction (e.g. box 1/1 of SAD: inter EC Member States,
+-- >              EC-EFTA, EC-third countries, etc.).
+-- >       105 Customs declaration type
+-- >              Customs code to indicate the type of declaration
+-- >              according to the different Customs procedures requested
+-- >              (e.g.: import, export, transit).
+-- > |     106 Incoterms 1980
+-- >              (4110) Code to indicate applicable Incoterm (1980
+-- >              edition) under which seller undertakes to deliver
+-- >              merchandise to buyer (ICC). Incoterms 1990: use 4053
+-- >              only.
+-- >       107 Excise duty
+-- >              Customs or fiscal authorities code to identify a specific
+-- >              or ad valorem levy on a specific commodity, applied
+-- >              either domestically or at time of importation.
+-- >       108 Tariff schedule
+-- >              Self explanatory.
+-- >       109 Customs indicator
+-- >              Customs code for circumstances where only an indication
+-- >              is needed.
+-- >       110 Customs special codes
+-- >              Customs code to indicate an exemption to a regulation or
+-- >              a special Customs treatment.
+-- >       112 Statistical nature of transaction
+-- >              Indication of the type of contract under which goods are
+-- >              supplied.
+-- >       113 Customs office
+-- >              Customs administrative unit competent for the performance
+-- >              of Customs formalities, and the premises or other areas
+-- >              approved for the purpose by the competent authorities
+-- >              (CCC).
+-- >       114 Railcar letter marking
+-- >              Codes for all marking codes (in letters) for railcars
+-- >              specifying the type, series, order number, check digit
+-- >              and some technical characteristics.
+-- >       115 Examination facility
+-- >              Building or location where merchandise is examined by
+-- >              Customs.
+-- >       116 Customs preference
+-- >              Customs code to identify a specific tariff preference.
+-- >       117 Customs procedure
+-- >              (9380) Customs code to identify goods which are subject
+-- >              to Customs control (e.g. home use, Customs warehousing,
+-- >              temporary admission, Customs transit).
+-- >       118 Government agency procedure
+-- >              Treatment applied by a government agency other than
+-- >              Customs to merchandise under their control.
+-- >       119 Customs simplified procedure
+-- >              Customs code to indicate the type of simplified Customs
+-- >              procedure requested by a declarant (CCC).
+-- >       120 Customs status of goods
+-- >              Customs code to specify the status accorded by Customs to
+-- >              a consignment e.g. release without further formality,
+-- >              present supporting documents for inspection, etc (CCC).
+-- >       121 Shipment description
+-- >              Code to indicate whether a shipment is a total, part or
+-- >              split consignment.
+-- >       122 Commodity
+-- >              (7357) Code identifying types of goods for Customs,
+-- >              transport or statistical purposes (generic term).
+-- >       123 Entitlement
+-- >              Code to indicate the recipient of a charge amount (IATA).
+-- >       125 Customs transit guarantee
+-- >              Customs code to identify the type of guarantee used in a
+-- >              transit movement.
+-- >       126 Accounting information identifier
+-- >              Identification of a specific kind of accounting
+-- >              information.
+-- >       127 Customs valuation method
+-- >              Customs code to identify the valuation method used to
+-- >              determine the dutiable value of the declared goods.
+-- >       128 Service
+-- >              Identification of services.
+-- >       129 Customs warehouse
+-- >              Identification and/or location of the Customs warehouse
+-- >              in which goods will be or have been deposited (CCC).
+-- >       130 Special handling
+-- >              Code to indicate that the nature of the consignment may
+-- >              necessitate use of special handling procedures (IATA).
+-- >       131 Free zone
+-- >              Code identifying the zone within a state where any goods
+-- >              introduced are generally regarded, insofar as import
+-- >              duties and taxes are concerned, as being outside the
+-- >              Customs territory and are not subject to the usual
+-- >              Customs control.
+-- >       132 Charge
+-- >              Identification of a type of charge.
+-- >       133 Financial regime
+-- >              Nature and methods of a transaction from financial
+-- >              viewpoint.
+-- >       134 Duty, tax or fee payment method
+-- >              [4390] Method by which a duty or tax is paid to the
+-- >              relevant administration.
+-- >       135 Rate class
+-- >              Code to identify a specific rate category.
+-- >       136 Restrictions/prohibitions on re-use of certain wagons
+-- >              Self explanatory.
+-- >       137 Rail harmonized codification of tariffs
+-- >              Self explanatory.
+-- >       139 Port
+-- >              A location having facilities for means of transport to
+-- >              load or discharge cargo.
+-- >       140 Area
+-- >              Codes for specific geographic areas e.g. seas, straits,
+-- >              basins etc.
+-- >       141 Forwarding restrictions
+-- >              Self explanatory.
+-- >       142 Train identification
+-- >              Self explanatory.
+-- >       143 Removable accessories and special equipment on railcars
+-- >              Self explanatory.
+-- >       144 Rail routes
+-- >              Self explanatory.
+-- >       145 Airport/city
+-- >              As described and published by IATA.
+-- >       146 Means of transport identification
+-- >              Code identifying the name or number of a means of
+-- >              transport (vessel, vehicle).
+-- >       147 Document requested by Customs
+-- >              Customs code to identify documents requested by Customs
+-- >              in an information interchange.
+-- >       148 Customs release notification
+-- >              Authorisation given by Customs to move the goods or not
+-- >              move the goods from the place of registration.
+-- >       149 Customs transit type
+-- >              Customs code to indicate the different kinds of transit
+-- >              movement of the goods (e.g. Box 1/3 of the SAD).
+-- >       150 Financial routing
+-- >              Self explanatory.
+-- >       151 Locations for tariff calculation
+-- >              Self explanatory.
+-- >       152 Materials
+-- >              Self explanatory.
+-- >       153 Methods of payment
+-- >              Identification of methods of payment.
+-- >       154 Bank branch sorting identification
+-- >              Identification of a specific branch of a bank.
+-- >       155 Automated clearing house
+-- >              Identification of automated clearing houses.
+-- >       156 Location of goods
+-- >              (3384) Indication of the place where goods are located
+-- >              and where they are available for examination.
+-- >       157 Clearing code
+-- >              Identification of the responsible bank/clearing house
+-- >              which has cleared or is ordered to do the clearing.
+-- >       158 Terms of delivery
+-- >              Code to identify terms of delivery.
+-- >       160 Party identification
+-- >              Identification of parties, corporates, etc.
+-- >       161 Goods description
+-- >              Identification of a type of goods description.
+-- >       162 Country
+-- >              Identification of a country.
+-- >       163 Country sub-entity
+-- >              (3228) Identification of country sub-entity (region,
+-- >              department, state, province) defined by appropriate
+-- >              authority.
+-- >       164 Member organizations
+-- >              Identification of member organizations.
+-- >       165 Amendment code (Customs)
+-- >              Customs code indicating the reason for transmitting an
+-- >              amendment to Customs.
+-- >       166 Social security identification
+-- >              Code assigned by the authority competent to issue social
+-- >              security identification to identify a person.
+-- >       167 Tax party identification
+-- >              Code assigned by a tax authority to identify a party.
+-- >       168 Rail document names
+-- >              Rail specific identifications of documents.
+-- >       169 Harmonized system
+-- >              Identification of commodities according to the Harmonized
+-- >              System.
+-- >       170 Bank securities code
+-- >              Self explanatory.
+-- >       172 Carrier code
+-- >              Self explanatory.
+-- >       173 Export requirements
+-- >              Identification of requirements and regulations
+-- >              established by relevant authorities concerning
+-- >              exportation.
+-- >       174 Citizen identification
+-- >              Self explanatory.
+-- >       175 Account analysis codes
+-- >              Account service charges list.
+-- >       176 Flow of the goods
+-- >              List of statistical codes covering the movement of the
+-- >              goods to be declared (e.g. despatch, arrival).
+-- >       177 Statistical procedures
+-- >              Indication of the statistical procedure to which the
+-- >              goods are subject.
+-- >       178 Standard text according US embargo regulations
+-- >              US government regulations prescribe specific standard
+-- >              text usage. Using codes from this code list prevents full
+-- >              text transmission.
+-- >       179 Standard text for export according national prescriptions
+-- >              National export regulations prescribe specific standard
+-- >              text usage. Using codes from this code list prevents full
+-- >              text transmission.
+-- >       180 Airport terminal
+-- >              Code identifying terminals or other sub-locations at
+-- >              airports.
+-- >       181 Activity
+-- >              Code identifying activities.
+-- >       182 Combiterms 1990
+-- >              Code to indicate the applicable Combiterm (1990 edition),
+-- >              used for the purpose of cost distribution between seller
+-- >              according to Incoterms 1990.
+-- >       183 Dangerous goods packing type
+-- >              Identification of package types for the description
+-- >              related to dangerous goods.
+-- >       184 Tax assessment method
+-- >              A code to identify the tax assessment method.
+-- >       185 Item type
+-- >              A code list defining the level of elaboration of a item
+-- >              such as raw material, component, tooling, etc.
+-- >       186 Product supply condition
+-- >              A code list specifying the rules according to which a
+-- >              product is supplied, e.g. from stock, available on
+-- >              demand, make on order, etc.
+-- >       187 Supplier's stock turnover
+-- >              A code list giving an indication about the level of the
+-- >              supplier's stock turnover.
+-- >       188 Article status
+-- >              A code list defining the status of an article from the
+-- >              procurement point of view, e.g. new article, critical
+-- >              article, etc.
+-- >       189 Quality control code
+-- >              A code list specifying how the article is classified
+-- >              according to the quality control point of view, e.g.
+-- >              safety item, subject to regulation, etc.
+-- >       190 Item sourcing category
+-- >              A code list to specify details related to the sourcing of
+-- >              the corresponding item such as provided by the buyer,
+-- >              from a mandatory source, etc.
+-- >       191 Dumping or countervailing assessment method
+-- >              A code to identify the method used to determine the
+-- >              dumping or countervailing duty.
+-- >       192 Dumping specification
+-- >              Code list to identify types of goods for dumping
+-- >              purposes.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple1131 :: Parser Value
+simple1131 = simple "1131" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1153.hs b/specification/src/Text/Edifact/D96A/Simples/S1153.hs
new file mode 100644
index 0000000..7aea6b6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1153.hs
@@ -0,0 +1,1201 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1153
+  ( simple1153
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 1153  Reference qualifier
+-- >
+-- >   Desc: Code giving specific meaning to a reference segment or a
+-- >         reference number.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AAA    Acknowledgement of order number
+-- >              [1018] Reference number assigned by the seller to his
+-- >              acknowledgement of an order.
+-- >    AAB    Proforma invoice number
+-- >              [1088] Reference number assigned by the seller to a
+-- >              Proforma Invoice.
+-- >    AAC    Documentary credit number
+-- >              [1172] Reference number assigned by issuing bank to a
+-- >              Documentary credit.
+-- >    AAD    Contract addendum number
+-- >              [1318] Reference number assigned by the issuer to a
+-- >              Contract Addendum.
+-- >    AAE    Goods declaration number
+-- >              Reference number assigned to a goods declaration.
+-- >    AAG    Offer number
+-- >              Reference number assigned by issuing party to an offer.
+-- >    AAJ    Delivery order number
+-- >              Reference number assigned by issuer to a delivery order.
+-- >    AAK    Despatch advice number
+-- >              Reference number assigned by issuing party to a despatch
+-- >              advice.
+-- >    AAL    Drawing number
+-- >              Reference number identifying a specific product drawing.
+-- >    AAM    Waybill number
+-- >              Reference number assigned to a waybill, see: 1001 = 700.
+-- >    AAN    Delivery schedule number
+-- >              Reference number assigned by buyer to a delivery
+-- >              schedule.
+-- >    AAO    Consignee's shipment reference number
+-- >              [1362] Reference assigned by the consignee to a shipment.
+-- >    AAP    Part consignment number
+-- >              [1310] Reference to a specific consignment forming part
+-- >              of a contract allowing part deliveries.
+-- >    AAQ    Unit load device (e.g. container) identification number
+-- >              [8260] Marks (letters and/or numbers) which identify a
+-- >              unit load device e.g. freight container.
+-- >    AAS    Transport document number
+-- >              [1188] Reference assigned by the carrier or his agent to
+-- >              the transport document.
+-- >    AAT    Master label number
+-- >              Identifies the master label number of any package type.
+-- >    AAU    Despatch note number
+-- >              [1128] Reference number assigned by the seller to a
+-- >              Despatch Note.
+-- >    AAV    Enquiry number
+-- >              Reference number assigned to an enquiry.
+-- >    AAY    Carrier's agent reference number
+-- >              Reference number assigned by the carriers agent to a
+-- >              transaction.
+-- >    AAZ    Standard Carrier Alpha Code (SCAC) number
+-- >              For maritime shipments, this code qualifies a Standard
+-- >              Alpha Carrier Code (SCAC) as issued by the United Stated
+-- >              National Motor Traffic Association Inc.
+-- >    ABA    Customs valuation decision number
+-- >              Reference by an importing party to a previous decision
+-- >              made by a Customs administration regarding the valuation
+-- >              of goods.
+-- >    ABB    End use authorization number
+-- >              Reference issued by a Customs administration authorizing
+-- >              a preferential rate of duty if a product is used for a
+-- >              specified purpose, see: 1001 = 990.
+-- >    ABC    Anti-dumping case number
+-- >              Reference issued by a Customs administration pertaining
+-- >              to a past or current investigation of goods "dumped" at a
+-- >              price lower than the exporter's domestic market price.
+-- >    ABD    Customs tariff number
+-- >              [7282] Code number of the goods in accordance with the
+-- >              tariff nomenclature system of classification in use where
+-- >              the Customs declaration is made.
+-- >    ABE    Declarant's reference number
+-- >              Unique reference number assigned to a document or a
+-- >              message by the declarant for identification purposes.
+-- >    ABG    Customs decision request number
+-- >              Reference issued by Customs pertaining to a pending
+-- >              tariff classification decision requested by an importer
+-- >              or agent.
+-- >    ABH    Sub-house bill of lading number
+-- >              Reference assigned to a sub-house bill of lading.
+-- >    ABI    Deferred payment reference
+-- >              [1168] Reference or indication of the deferred payment of
+-- >              duty/tax.
+-- >    ABJ    Quota number
+-- >              Reference number allocated by a government authority to
+-- >              identify a quota.
+-- >    ABK    Transit (onward carriage) guarantee (bond) number
+-- >              Reference number to identify the guarantee or security
+-- >              provided for Customs transit operation (CCC).
+-- >    ABL    Customs guarantee number
+-- >              Reference assigned to a Customs guarantee.
+-- >    ABO    Originator's reference
+-- >              Self explanatory.
+-- >    ABP    Declarant's Customs identity number
+-- >              Reference to the party whose posted bond or security is
+-- >              being declared in order to accept responsibility for a
+-- >              goods declaration and the applicable duties and taxes.
+-- >    ABQ    Importer reference number
+-- >              Reference number assigned by the importer to identify a
+-- >              particular shipment for his own purposes.
+-- >    ABR    Export clearance instruction reference number
+-- >              Reference number of the clearance instructions given by
+-- >              the consignor through different means.
+-- >    ABS    Import clearance instruction reference number
+-- >              Reference number of the import clearance instructions
+-- >              given by the consignor/consignee through different means.
+-- >    ABT    Customs declaration number
+-- >              [1426] Number, assigned or accepted by Customs, to
+-- >              identify a Goods declaration.
+-- >    ABU    Article number
+-- >              Self explanatory.
+-- >    ABW    Stock keeping unit number
+-- >              Self explanatory.
+-- > +  ABX    Text Element Identifier deletion reference
+-- >              The reference used within a given TEI (Text Element
+-- >              Identifier) which is to be deleted.
+-- >    ABY    Allotment identification (Air)
+-- >              Reference assigned to guarantied capacity on one or more
+-- >              specific flights on specific date(s) to third parties as
+-- >              agents and other airlines.
+-- > +  ABZ    Vehicle licence number
+-- >              Number of the licence issued for a vehicle by an agency
+-- >              of government.
+-- >    AC     Air cargo transfer manifest
+-- >              Description to be provided.
+-- >    ACB    US government agency number
+-- >              Description to be provided.
+-- >    ACC    Shipping unit identification
+-- >              Identifying marks on the outermost unit that is used to
+-- >              transport merchandise.
+-- >    ACD    Additional reference number
+-- >              Reference number provided in addition to another given
+-- >              reference.
+-- >    ACE    Related document number
+-- >              Description to be provided.
+-- >    ACF    Addressee reference
+-- >              Description to be provided.
+-- >    ACG    ATA carnet number
+-- >              Reference number assigned to an ATA carnet.
+-- >    ACH    Packaging unit identification
+-- >              Identifying marks on packing units.
+-- >    ACI    Outerpackaging unit identification
+-- >              (7070) Identifying marks on packing units contained
+-- >              within an outermost shipping unit.
+-- >    ACJ    Customer material specification number
+-- >              Number for a material specification given by customer.
+-- >    ACK    Bank reference
+-- >              Cross reference issued by financial institution.
+-- >    ACL    Principal reference number
+-- >              Description to be provided.
+-- >    ACM    Unique REINAC reference number of the sender
+-- >              Description to be provided.
+-- >    ACN    Advice of collection number
+-- >              [1030] Number of the Advice of Collection attached to the
+-- >              Rail Consignment Note (CIM 75).
+-- >    ACO    Iron charge number
+-- >              Number attributed to the iron charge for the production
+-- >              of steel products.
+-- >    ACP    Hot roll number
+-- >              Number attributed to a hot roll coil.
+-- >    ACQ    Cold roll number
+-- >              Number attributed to a cold roll coil.
+-- >    ACR    Railway wagon number
+-- >              (8320) Registered identification initials and numbers of
+-- >              railway wagon. Synonym: Rail car number.
+-- >    ACS    Unique CURRAC reference number of the sender
+-- >              Description to be provided.
+-- >    ACT    Unique claims reference number of the sender
+-- >              Description to be provided.
+-- >    ACU    Loss/event number
+-- >              To reference to the unique number that is assigned to
+-- >              each major loss hitting the reinsurance industry.
+-- >    ACW    Reference number to previous message
+-- >              Reference number assigned to the message which was
+-- >              previously issued (e.g. in the case of a cancellation,
+-- >              the primary reference of the message to be cancelled will
+-- >              be quoted in this element).
+-- >    ACX    Banker's acceptance
+-- >              Reference number for banker's acceptance issued by the
+-- >              accepting financial institution.
+-- > +  ACY    Duty memo number
+-- >              Reference number assigned by customs to a duty memo.
+-- > +  ACZ    Equipment transport charge number
+-- >              Reference assigned to a specific equipment transportation
+-- >              charge.
+-- > +  ADA    Buyer's item number
+-- >              Reference number assigned by the buyer to an item.
+-- >    ADB    Matured certificate of deposit
+-- >              Reference number for certificate of deposit allocated by
+-- >              issuing financial institution.
+-- >    ADC    Loan
+-- >              Reference number for loan allocated by lending financial
+-- >              institution.
+-- >    ADD    Analysis number/test number
+-- >              Number given to a specific analysis or test operation.
+-- > |  ADE    Account number
+-- >              Identification number of an account.
+-- >    ADF    Treaty number
+-- >              Self explanatory.
+-- >    ADG    Catastrophe number
+-- >              Self explanatory.
+-- >    ADH    PCS Catastrophe
+-- >              Description to be provided.
+-- >    ADI    Bureau signing (statement reference)
+-- >              Description to be provided.
+-- >    ADJ    Company / syndicate reference 1
+-- >              Description to be provided.
+-- >    ADK    Company / syndicate reference 2
+-- >              Description to be provided.
+-- >    ADP    Statement number
+-- >              Description to be provided.
+-- >    ADQ    Unique market reference
+-- >              Description to be provided.
+-- >    ADR    Bureau signing (original FDO reference)
+-- >              Description to be provided.
+-- >    ADS    Original FDO transaction reference
+-- >              Description to be provided.
+-- >    ADT    Group accounting
+-- >              Description to be provided.
+-- >    ADU    Broker reference 1
+-- >              Description to be provided.
+-- >    ADV    Broker reference 2
+-- >              Description to be provided.
+-- >    ADW    Lloyd's claims office reference
+-- >              Self explanatory.
+-- >    ADY    Report number
+-- >              Reference to a report to Customs by a carrier at the
+-- >              point of entry, encompassing both conveyance and
+-- >              consignment information.
+-- >    ADZ    Trader account number
+-- >              Number assigned by a Customs authority which uniquely
+-- >              identifies a trader (i.e. importer, exporter or
+-- >              declarant) for Customs purposes.
+-- >    AE     Authorization for expense (AFE) number
+-- >              Description to be provided.
+-- >    AEA    Government agency reference number
+-- >              Coded reference number that pertains to the business of a
+-- >              government agency.
+-- >    AEB    Assembly number
+-- >              Self explanatory.
+-- >    AEC    Symbol number
+-- >              Self explanatory.
+-- >    AED    Commodity number
+-- >              Self explanatory.
+-- >    AEE    Eur 1 certificate number
+-- >              Reference number assigned to a Eur 1 certificate.
+-- >    AEF    Customer process specification number
+-- >              Retrieval number for a process specification defined by
+-- >              customer.
+-- >    AEG    Customer specification number
+-- >              Retrieval number for a specification defined by customer.
+-- >    AEH    Applicable instructions or standards
+-- >              Instructions or standards applicable for the whole
+-- >              message or a message line item. These instructions or
+-- >              standards may be published by a neutral organization or
+-- >              authority or another party concerned.
+-- >    AEI    Registration number of previous Customs declaration
+-- >              Registration number of the Customs declaration lodged for
+-- >              the previous Customs procedure.
+-- >    AEJ    Post-entry reference
+-- >              Reference to a message related to a post-entry.
+-- >    AEK    Payment order number
+-- >              Self explanatory.
+-- >    AEL    Delivery number (transport)
+-- >              Reference number by which a haulier/carrier will announce
+-- >              himself at the container terminal or depot when
+-- >              delivering equipment.
+-- >    AEM    Transport route
+-- >              A predefined and identified sequence of points where
+-- >              goods are collected, agreed between partners, e.g. the
+-- >              party in charge of organizing the transport and the
+-- >              parties where goods will be collected. The same
+-- >              collecting points may be included in different transport
+-- >              routes, but in a different sequence.
+-- >    AEN    Customer's unit inventory number
+-- >              Number assigned by customer to a unique unit for
+-- >              inventory purposes.
+-- >    AEO    Product reservation number
+-- >              Number assigned by seller to identify reservation of
+-- >              specified products.
+-- >    AEP    Project number
+-- >              Reference number assigned to a project.
+-- >    AEQ    Drawing list number
+-- >              Reference number identifying a drawing list.
+-- >    AER    Project specification number
+-- >              Reference number identifying a project specification.
+-- >    AES    Primary reference
+-- >              Description to be provided.
+-- >    AET    Request for cancellation number
+-- >              Self explanatory.
+-- >    AEU    Supplier's control number
+-- >              Reference to a file regarding a control of the supplier
+-- >              carried out on departure of the goods.
+-- >    AEV    Shipping note number
+-- >              Reference number assigned to a shipping note, see: 1001 =
+-- >              630.
+-- >    AEW    Empty container bill number
+-- >              Reference number assigned to an empty container bill,
+-- >              see: 1001 = 708.
+-- >    AEX    Non-negotiable maritime transport document number
+-- >              Reference number assigned to a sea waybill, see: 1001 =
+-- >              712.
+-- >    AEY    Substitute air waybill number
+-- >              Reference number assigned to a substitute air waybill,
+-- >              see: 1001 = 743.
+-- >    AEZ    Despatch note (post parcels) number
+-- >              (1128) Reference number assigned to a despatch note (post
+-- >              parcels), see: 1001 = 750.
+-- >    AF     Airlines flight identification number
+-- >              (8110) Identification of a commercial flight by carrier
+-- >              code and number as assigned by the airline (IATA).
+-- >    AFA    Through bill of lading number
+-- >              Reference number assigned to a through bill of lading,
+-- >              see: 1001 = 761.
+-- >    AFB    Cargo manifest number
+-- >              Reference number assigned to a cargo manifest, see: 1001
+-- >              = 785.
+-- >    AFC    Bordereau number
+-- >              Reference number assigned to a bordereau, see: 1001 =
+-- >              787.
+-- >    AFD    Customs item number
+-- >              Number (1496 in CST) assigned by the declarant to an
+-- >              item.
+-- >    AFE    Export Control Commodity number (ECCN)
+-- >              Reference number to relevant item within Commodity
+-- >              Control List covering actual products change
+-- >              functionality.
+-- >    AFF    Marking/label reference
+-- >              Reference where marking/label information derives from.
+-- >    AFG    Tariff number
+-- >              Self explanatory.
+-- >    AFI    Immediate transportation no. for in bond movement
+-- >              Self explanatory.
+-- >    AFJ    Transportation exportation no. for in bond movement
+-- >              Self explanatory.
+-- >    AFK    Immediate exportation no. for in bond movement
+-- >              Self explanatory.
+-- >    AFL    Associated invoices
+-- >              Self explanatory.
+-- >    AFM    Secondary Customs reference
+-- >              Self explanatory.
+-- >    AFN    Account party's reference
+-- >              Reference of the account party.
+-- >    AFO    Beneficiary's reference
+-- >              Reference of the beneficiary.
+-- >    AFP    Second beneficiary's reference
+-- >              Reference of the second beneficiary.
+-- >    AFQ    Applicant's bank reference
+-- >              Reference number of the applicant's bank.
+-- >    AFR    Issuing bank's reference
+-- >              Reference number of the issuing bank.
+-- >    AFS    Beneficiary's bank reference
+-- >              Reference number of the beneficiary's bank.
+-- >    AFT    Direct payment valuation number
+-- >              Reference number assigned to a direct payment valuation.
+-- >    AFU    Direct payment valuation request number
+-- >              Reference number assigned to a direct payment valuation
+-- >              request.
+-- >    AFV    Quantity valuation number
+-- >              Reference number assigned to a quantity valuation.
+-- >    AFW    Quantity valuation request number
+-- >              Reference number assigned to a quantity valuation
+-- >              request.
+-- >    AFX    Bill of quantities number
+-- >              Reference number assigned to a bill of quantities.
+-- >    AFY    Payment valuation number
+-- >              Reference number assigned to a payment valuation.
+-- >    AFZ    Situation number
+-- >              Common reference number given to documents concerning a
+-- >              determined period of works.
+-- >    AGA    Agreement to pay number
+-- >              Self explanatory.
+-- >    AGB    Contract party reference number
+-- >              Reference number assigned to a party for a particular
+-- >              contract.
+-- >    AGC    Account party's bank reference
+-- >              Reference number of the account party's bank.
+-- >    AGD    Agent's bank reference
+-- >              Reference number issued by the agent's bank.
+-- >    AGE    Agent's reference
+-- >              Reference number of the agent.
+-- >    AGF    Applicant's reference
+-- >              Reference number of the applicant.
+-- >    AGG    Dispute number
+-- >              Reference number to a dispute notice.
+-- >    AGH    Credit rating agency's reference number
+-- >              Reference number assigned by a credit rating agency to a
+-- >              debtor.
+-- >    AGI    Request number
+-- >              Self explanatory.
+-- >    AGJ    Single transaction sequence number
+-- >              Self explanatory.
+-- >    AGK    Application reference number
+-- >              Self explanatory.
+-- >    AGL    Delivery verification certificate
+-- >              Formal identification of delivery verification
+-- >              certificate which is a formal document from Customs etc.
+-- >              confirming that physical goods have been delivered. It
+-- >              may be needed to support a tax reclaim based on an
+-- >              invoice.
+-- >    AGM    Number of temporary importation document
+-- >              Number assigned by customs to identify consignment in
+-- >              transit.
+-- >    AGN    Reference number quoted on statement
+-- >              Reference number quoted on the statement sent to the
+-- >              beneficiary for information purposes.
+-- >    AGO    Sender's reference to the original message
+-- >              The reference provided by the sender of the original
+-- >              message.
+-- >    AGP    Company issued equipment ID
+-- >              Owner/operator, non-government issued equipment reference
+-- >              number.
+-- >    AGQ    Domestic flight number
+-- >              Airline flight number assigned to a flight originating
+-- >              and terminating within the same country.
+-- >    AGR    International flight number
+-- >              Airline flight number assigned to a flight originating
+-- >              and terminating across national borders.
+-- >    AGS    Employer identification number of service bureau
+-- >              Reference number assigned by a service/processing bureau
+-- >              to an employer.
+-- >    AGT    Service group identification number
+-- >              Identification used for a group of services.
+-- >    AGU    Member number
+-- >              Reference number assigned to a person as a member of a
+-- >              group of persons or a service scheme.
+-- >    AGV    Previous member number
+-- >              Reference number previously assigned to a member.
+-- >    AGW    Scheme/plan number
+-- >              Reference number assigned to a service scheme or plan.
+-- >    AGX    Previous scheme/plan number
+-- >              Reference number previously assigned to a service scheme
+-- >              or plan.
+-- >    AGY    Receiving party's member identification
+-- >              Identification used by the receiving party for a member
+-- >              of a service scheme or group of persons.
+-- >    AGZ    Payroll number
+-- >              Reference number assigned to the payroll of an
+-- >              organisation.
+-- >    AHA    Packaging specification number
+-- >              Reference number of documentation specifying the
+-- >              technical detail of packaging requirements.
+-- >    AHB    Authority issued equipment identification
+-- >              Identification issued by an authority, e.g. government,
+-- >              airport authority.
+-- >    AHC    Training flight number
+-- >              Non-revenue producing airline flight for training
+-- >              purposes.
+-- >    AHD    Fund code number
+-- >              Reference number to identify appropriation and branch
+-- >              chargeable for item.
+-- >    AHE    Signal code number
+-- >              Reference number to identify a signal.
+-- >    AHF    Major force program number
+-- >              Reference number according to Major Force Program (US).
+-- >    AHG    Nomination number
+-- >              Reference number assigned by a shipper to a request/
+-- >              commitment-to-ship on a pipeline system.
+-- >    AHH    Laboratory registration number
+-- >              Reference number is the official registration number of
+-- >              the laboratory.
+-- >    AHI    Transport contract reference number
+-- >              Reference number of a transport contract.
+-- >    AHJ    Payee's reference number
+-- >              Reference number of the party to be paid.
+-- >    AHK    Payer's reference number
+-- >              Reference number of the party who pays.
+-- >    AHL    Creditor's reference number
+-- >              Reference number of the party to whom a debt is owed.
+-- >    AHM    Debtor's reference number
+-- >              Reference number of the party who owes an amount of
+-- >              money.
+-- >    AHN    Joint venture reference number
+-- >              Reference number assigned to a joint venture agreement.
+-- >    AHO    Chamber of Commerce registration number
+-- >              The registration number by which a company/organization
+-- >              is known to the Chamber of Commerce.
+-- >    AHP    Tax registration number
+-- >              The registration number by which a company/organization
+-- >              is identified with the tax administration.
+-- >    AHQ    Wool identification number
+-- >              Shipping Identification Mark (SIM) allocated to a wool
+-- >              consignment by a shipping company.
+-- >    AHR    Wool tax reference number
+-- >              Reference or indication of the payment of wool tax.
+-- >    AHS    Meat processing establishment registration number
+-- >              Registration number allocated to a registered meat
+-- >              packing establishment by the local quarantine and
+-- >              inspection authority.
+-- >    AHT    Quarantine/treatment status reference number
+-- >              Coded quarantine/treatment status of a container and its
+-- >              cargo and packing materials, generated by a shipping
+-- >              company based upon declarations presented by a shipper.
+-- >    AHU    Request for quote number
+-- >              Reference number assigned by the requestor to a request
+-- >              for quote.
+-- >    AHV    Manual processing authority number
+-- >              Number allocated to allow the manual processing of an
+-- >              entity.
+-- >    AHW    Import permit number
+-- >              Reference number assigned by the issuing authority to an
+-- >              import permit for goods.
+-- >    AHX    Rate note number
+-- >              Reference assigned to a specific rate.
+-- >    AHY    Freight Forwarder number
+-- >              An identification code of a Freight Forwarder.
+-- >    AHZ    Customs release code
+-- >              A code associated to a requirement that must be presented
+-- >              to gain the release of goods by Customs.
+-- >    AIA    Compliance code number
+-- >              Number assigned to indicate regulatory compliance.
+-- >    AIB    Department of transportation bond number
+-- >              Number of a bond assigned by the department of
+-- >              transportation.
+-- >    AIC    Export establishment number
+-- >              Number to identify export establishment.
+-- >    AID    Certificate of conformity
+-- >              Certificate certifying the conformity to predefined
+-- >              definitions.
+-- >    AIE    Ministerial certificate of homologation
+-- >              Certificate of approval for components which are subject
+-- >              to legal restrictions and must be approved by the
+-- >              government.
+-- >    AIF    Previous delivery instruction number
+-- >              The identification of a previous delivery instruction.
+-- >    AIG    Passport number
+-- >              Number assigned to a passport.
+-- >    AIH    Common transaction reference number
+-- >              Reference number applicable to different underlying
+-- >              individual transactions.
+-- >    AII    Bank's common transaction reference number
+-- >              Bank's reference number allocated by the bank to
+-- >              different underlying individual transactions.
+-- >    AIJ    Customer's individual transaction reference number
+-- >              Customer's reference number allocated by the customer to
+-- >              one specific transaction.
+-- >    AIK    Bank's individual transaction reference number
+-- >              Bank's reference number allocated by the bank to one
+-- >              specific transaction.
+-- >    AIL    Customer's common transaction reference number
+-- >              Customer's reference number allocated by the customer to
+-- >              different underlying individual transactions.
+-- >    AIM    Individual transaction reference number
+-- >              Reference number applying to one specific transaction.
+-- >    AIN    Product sourcing agreement number
+-- >              Reference number assigned to a product sourcing
+-- >              agreement.
+-- >    AIO    Customs transhipment number
+-- >              Approval number issued by Customs for cargo to be
+-- >              transhipped under Customs control.
+-- >    AIP    Customs preference inquiry number
+-- >              The number assigned by Customs to a preference inquiry.
+-- >    AIQ    Packing plant number
+-- >              Number to identify packing establishment.
+-- >    AIR    Original certificate number
+-- >              Number giving reference to an original certificate
+-- >              number.
+-- >    AIS    Processing plant number
+-- >              Number to identify processing plant.
+-- >    AIT    Slaughter plant number
+-- >              Number to identify slaughter plant.
+-- >    AIU    Charge card account number
+-- >              Number to identify charge card account.
+-- >    AIV    Event reference number
+-- >              A number identifying an event.
+-- >    AIW    Transport section reference number
+-- >              A number identifying a transport section.
+-- >    AIX    Referred product for mechanical analysis
+-- >              A product number identifying the product which is used
+-- >              for mechanical analysis considered valid for a group of
+-- >              products.
+-- >    AIY    Referred product for chemical analysis
+-- >              A product number identifying the product which is used
+-- >              for chemical analysis considered valid for a group of
+-- >              products.
+-- > +  ALA    Procurement budget number
+-- >              The number which identifies the budget to which a
+-- >              purchase is allocated.
+-- > +  ALB    Domestic inventory management code
+-- >              Code to identify the management of domestic inventory.
+-- > +  ALC    Previous balance of payment information customer reference
+-- >           number
+-- >              Identification number of the previous balance of payments
+-- >              information from customer message.
+-- > +  ALD    Previous credit advice reference number
+-- >              Reference number of the previous "Credit advice" message.
+-- > +  ALE    Reporting form number
+-- >              Reference number assigned to the reporting form.
+-- > +  ALF    Authorization number for exception to dangerous goods
+-- >           regulations
+-- >              Reference number allocated by an authority. This number
+-- >              contains an approval concerning exceptions on the
+-- >              existing dangerous goods regulations.
+-- > +  ALG    Dangerous goods security number
+-- >              Reference number allocated by an authority in order to
+-- >              control the dangerous goods on board of a specific means
+-- >              of transport for dangerous goods security purposes.
+-- > +  ALH    Dangerous goods transport licence number
+-- >              Licence number allocated by an authority as to the
+-- >              permission of carrying dangerous goods by a specific
+-- >              means of transport.
+-- > +  ALI    Previous rental agreement number
+-- >              Number to identify the previous rental agreement number.
+-- > +  ALJ    Next rental agreement reason number
+-- >              Number to identify the reason for the next rental
+-- >              agreement.
+-- > +  ALK    Consignee's invoice number
+-- >              The invoice number assigned by a consignee.
+-- > +  ALL    Message batch number
+-- >              A batch number identifying a batch of messages.
+-- > +  ALM    Previous delivery schedule number
+-- >              A reference number identifying a previous delivery
+-- >              schedule number.
+-- > +  ALN    Physical inventory recount reference number
+-- >              A reference to a re-count of physically held inventory.
+-- > +  ALO    Receiving advice number
+-- >              A reference number to a receiving advice.
+-- > +  ALP    Returnable container reference number
+-- >              A reference number identifying a returnable container.
+-- > +  ALQ    Returns notice number
+-- >              A reference number to a returns notice.
+-- > +  ALR    Sales forecast number
+-- >              A reference number identifying a sales forecast.
+-- > +  ALS    Sales report number
+-- >              A reference number identifying a sales report.
+-- > +  ALT    Previous tax control number
+-- >              A reference number identifying a previous tax control
+-- >              number.
+-- > +  ALU    AGERD (Aerospace Ground Equipment Requirement Data) number
+-- >              Identifies the equipment required to conduct maintenance.
+-- > +  ALV    Registered capital reference
+-- >              Registered capital reference of a company.
+-- > +  ALW    Standard number of inspection document
+-- >              Code identifying the standard number of the inspection
+-- >              document supplied.
+-- > +  ALX    Model
+-- >              A reference used to identify a model.
+-- > +  ALY    Financial management reference
+-- >              A financial management reference.
+-- > +  ALZ    NOTIfication for COLlection number (NOTICOL)
+-- >              A reference assigned by a consignor to a notification
+-- >              document which indicates the availability of goods for
+-- >              collection.
+-- > +  AMA    Previous request for metered reading reference number
+-- >              Number to identify a previous request for a recording or
+-- >              reading of a measuring device (e.g. meter).
+-- > +  AMB    Next rental agreement number
+-- >              Number to identify the next rental agreement.
+-- > +  AMC    Reference number of a request for metered reading
+-- >              Number to identify a request for a recording or reading
+-- >              of a measuring device (e.g. meter) to be taken.
+-- >    AP     Accounts receivable number
+-- >              Reference number assigned by accounts receivable
+-- >              department to the account of a specific debtor.
+-- >    ASC    Assuming company
+-- >              Description to be provided.
+-- >    AU     Authorization to meet competition No.
+-- >              A number assigned by a requestor to an offer incoming
+-- >              following request for quote.
+-- >    AV     Account payable number
+-- >              Reference number assigned by accounts payable department
+-- >              to the account of a specific creditor.
+-- >    AWB    Air waybill number
+-- >              Reference number assigned to an air waybill, see: 1001 =
+-- >              740.
+-- >    BA     Beginning meter reading actual
+-- >              Meter reading at the beginning of an invoicing period.
+-- >    BC     Buyer's contract number
+-- >              Reference number assigned by buyer to a contract.
+-- >    BD     Bid number
+-- >              Number assigned by a submitter of a bid to his bid.
+-- >    BE     Beginning meter reading estimated
+-- >              Meter reading at the beginning of an invoicing period
+-- >              where an actual reading is not available.
+-- >    BH     House bill of lading number
+-- >              Reference number assigned to a house bill of lading, see:
+-- >              1001 = 714.
+-- >    BM     Bill of lading number
+-- >              Reference number assigned to a bill of lading, see: 1001
+-- >              = 705.
+-- >    BN     Booking reference number
+-- >              [1016] Reference number assigned by the carrier or his
+-- >              agent when cargo space is reserved prior to loading.
+-- >    BO     Blanket order number
+-- >              Reference number assigned by the order issuer to a
+-- >              blanket order.
+-- >    BR     Broker or sales office number
+-- >              Self explanatory.
+-- >    BT     Batch number/lot number
+-- >              Reference number assigned by manufacturer to a series of
+-- >              similar products or goods produced under similar
+-- >              conditions.
+-- >    BW     Blended with number
+-- >              The batch/lot/package number a product is blended with.
+-- >    CAS    IATA Cargo Agent CASS Address number
+-- >              Code issued by IATA to identify agent locations for CASS
+-- >              billing purposes.
+-- >    CD     Credit note number
+-- >              Reference number assigned to a credit note.
+-- >    CEC    Ceding company
+-- >              Company selling obligations to a third party.
+-- >    CFE    Consignee's further order
+-- >              Reference of an order given by the consignee after
+-- >              departure of the means of transport.
+-- >    CFO    Consignor's further order
+-- >              Reference of an order given by the consignor after
+-- >              departure of the means of transport.
+-- >    CG     Consignee's order number
+-- >              Self explanatory.
+-- > #  CH     Customer catalogue number
+-- >              Number identifying a catalogue for customer's usage.
+-- >    CK     Cheque number
+-- >              Unique number assigned to one specific cheque.
+-- >    CKN    Checking number
+-- >              Number assigned by checking party to one specific check
+-- >              action.
+-- >    CM     Credit memo number
+-- >              Reference number assigned by issuer to a credit memo.
+-- >    CMR    Road consignment note number
+-- >              Reference number assigned to a road consignment note,
+-- >              see: 1001 = 730.
+-- >    CN     Carrier's reference number
+-- >              Reference number assigned by carrier to a consignment.
+-- >    CNO    Charge note reference number
+-- >              [1070] Indication in pre-printed form that a Charges note
+-- >              has been established and is attached to the Rail
+-- >              Consignment Note (CIM 76).
+-- >    CO     Buyers order number
+-- >              [1022] Reference number assigned by the buyer to an
+-- >              order.
+-- >    COF    Call off order number
+-- >              Self explanatory.
+-- >    CP     Condition of purchase document number
+-- >              Reference number identifying the conditions of purchase
+-- >              relevant to a purchase.
+-- >    CR     Customer reference number
+-- >              Reference number assigned by the customer to a
+-- >              transaction.
+-- >    CRN    Conveyance reference number
+-- >              [8028] Unique reference given by the carrier to a certain
+-- >              journey or departure of a means of transport (generic
+-- >              term).
+-- >    CS     Condition of sale document number
+-- >              Reference number identifying the conditions of sale
+-- >              relevant to a sale.
+-- >    CST    Team assignment number
+-- >              Team number assigned to a group that is responsible for
+-- >              working a particular transaction.
+-- >    CT     Contract number
+-- >              Reference number of a contract concluded between parties.
+-- >    CU     Consignor's reference number
+-- >              [1140] Reference number assigned by a consignor to a
+-- >              particular shipment for his own purposes or for those of
+-- >              the consignee.
+-- >    CV     Container operators reference number
+-- >              Reference number assigned by the party operating or
+-- >              controlling the transport container to a transaction or
+-- >              consignment.
+-- >    CW     Package number
+-- >              (7070) Reference number identifying a package or carton
+-- >              within a consignment.
+-- >    CZ     Cooperation contract number
+-- >              Number issued by a party concerned given to a contract on
+-- >              cooperation of two or more parties.
+-- >    DA     Deferment approval number
+-- >              Number assigned by authorities to a party to approve
+-- >              deferment of payment of tax or duties.
+-- >    DAN    Debit account number
+-- >              Reference number assigned by issuer to a debit account.
+-- >    DB     Buyer's debtor number
+-- >              Reference number assigned to a debtor.
+-- >    DI     Distributor invoice number
+-- >              Reference number assigned by issuer to a distributor
+-- >              invoice.
+-- >    DL     Debit note number
+-- >              Reference number assigned by issuer to a debit note.
+-- >    DM     Document number
+-- >              [1004] Reference number assigned to the document by the
+-- >              issuer.
+-- >    DQ     Delivery note number
+-- >              Reference number assigned by the issuer to a delivery
+-- >              note.
+-- >    DR     Dock receipt number
+-- >              Number of the cargo receipt submitted when cargo is
+-- >              delivered to a marine terminal.
+-- >    EA     Ending meter reading actual
+-- >              Meter reading at the end of an invoicing period.
+-- >    EB     Embargo permit number
+-- >              Reference number assigned by issuer to an embargo permit.
+-- >    ED     Export declaration
+-- >              Number assigned by the exporter to his export declaration
+-- >              number submitted to an authority.
+-- >    EE     Ending meter reading estimated
+-- >              Meter reading at the end of an invoicing period where an
+-- >              actual reading is not available.
+-- >    EI     Employer's identification number
+-- >              Number issued by an authority to identify an employer.
+-- >    EN     Embargo number
+-- >              Number assigned to specific goods or a family of goods in
+-- >              a classification of embargo measures.
+-- >    EP     Export permit number
+-- >              Reference number assigned by issuing authority to an
+-- >              export permit for products.
+-- >    EQ     Equipment number
+-- >              Number assigned by the manufacturer to specific
+-- >              equipment.
+-- >    ER     Container/equipment receipt number
+-- >              Number of the Equipment Interchange Receipt issued for
+-- >              full or empty equipment received.
+-- >    ERN    Exporter's reference number
+-- >              Reference to a party exporting goods.
+-- >    ET     Excess transportation number
+-- >              Number assigned to excess transport.
+-- >    EX     Export licence number
+-- >              [1208] Reference number assigned by issuing authority to
+-- >              an Export Licence.
+-- >    FC     Fiscal number
+-- >              Tax payer's number. Number assigned to individual persons
+-- >              as well as to corporates by a public institution; this
+-- >              number is different from the VAT registration number.
+-- >    FF     Freight forwarder's reference number
+-- >              [1460] Reference number assigned to the consignment by
+-- >              the freight forwarder.
+-- >    FI     File line identifier
+-- >              Number assigned by the file issuer or sender to identify
+-- >              a specific line.
+-- >    FLW    Flow reference number
+-- >              Number given to a usual sender which has regular
+-- >              expeditions of the same goods, to the same destination,
+-- >              defining all general conditions of the transport.
+-- >    FN     Freight bill number
+-- >              Reference number assigned by issuing party to a freight
+-- >              bill.
+-- >    FO     Foreign exchange
+-- >              Exchange of two currencies at an agreed rate.
+-- >    FS     Final sequence number
+-- >              Self explanatory.
+-- >    FT     Free zone identifier
+-- >              Identifier to specify the territory of a State where any
+-- >              goods introduced are generally regarded, insofar as
+-- >              import duties and taxes are concerned, as being outside
+-- >              the Customs territory and are not subject to usual
+-- >              Customs control (CCC).
+-- >    FV     File version number
+-- >              Number given to a version of an identified file.
+-- >    FX     Foreign exchange contract number
+-- >              Reference number identifying a foreign exchange contract.
+-- >    GA     Standard's number
+-- >              Number to identify a standardization description (e.g.
+-- >              ISO 9375).
+-- >    GC     Government contract number
+-- >              Number assigned to a specific government/public contract.
+-- >    GD     Standard's code number
+-- >              Number to identify a specific parameter within a
+-- >              standardization description (e.g. M5 for screws or DIN A4
+-- >              for paper).
+-- >    GDN    General declaration number
+-- >              Number of the declaration of incoming goods out of a
+-- >              vessel.
+-- >    GN     Government reference number
+-- >              Description to be provided.
+-- >    HS     Harmonised system number
+-- >              Number specifying the goods classification under the
+-- >              Harmonised Commodity Description and Coding System of the
+-- >              Customs Co-operation Council (CCC).
+-- >    HWB    House waybill number
+-- >              Reference number assigned to a house waybill, see: 1001 =
+-- >              703.
+-- >    IA     Internal vendor number
+-- >              Number identifying the company-internal vending
+-- >              department/unit.
+-- >    IB     In bond number
+-- >              Customs assigned number that is used to control the
+-- >              movement of imported cargo prior to its formal Customs
+-- >              clearing.
+-- >    ICA    IATA cargo agent code number
+-- >              Code issued by IATA identify each IATA Cargo Agent whose
+-- >              name is entered on the Cargo Agency List.
+-- >    ICE    Insurance certificate reference number
+-- >              Self explanatory.
+-- >    ICO    Insurance contract reference number
+-- >              Self explanatory.
+-- >    II     Initial sample inspection report number
+-- >              Inspection report number given to the initial sample
+-- >              inspection.
+-- >    IL     Internal order number
+-- >              Number assigned to an order for internal handling/follow
+-- >              up.
+-- >    INB    Intermediary broker
+-- >              Description to be provided.
+-- >    INN    Interchange number new
+-- >              Number assigned by the interchange sender to identify one
+-- >              specific interchange. This number points to the actual
+-- >              interchange.
+-- >    INO    Interchange number old
+-- >              Number assigned by the interchange sender to identify one
+-- >              specific interchange. This number points to the previous
+-- >              interchange.
+-- >    IP     Import licence number
+-- >              [1106] Reference number assigned by the issuing authority
+-- >              to an Import Licence.
+-- >    IS     Invoice number suffix
+-- >              An invoice number add on to split for detailed
+-- >              specification purposes.
+-- >    IT     Internal customer number
+-- >              Number assigned by a seller, supplier etc. to identify a
+-- >              customer within his enterprise.
+-- >    IV     Invoice number
+-- >              [1334] Reference number assigned by the seller to a
+-- >              Commercial Invoice.
+-- >    JB     Job number
+-- >              Identifies a piece of work.
+-- >    JE     Ending job sequence number
+-- >              Description to be provided.
+-- >    LA     Shipping label serial number
+-- >              Self explanatory.
+-- >    LAN    Loading authorization number
+-- >              [4092] A number assigned to the loading authorization
+-- >              granted by the forwarding station when the consignment is
+-- >              subject to traffic limitations (CIM 43).
+-- >    LAR    Lower article number of range
+-- >              Lower serial number in a range for declaration of
+-- >              incoming goods.
+-- >    LB     Lockbox
+-- >              Type of cash management system offered by financial
+-- >              institutions to provide for collection of customers
+-- >              'receivables'.
+-- >    LC     Letter of credit number
+-- >              Reference number identifying the letter of credit
+-- >              document.
+-- >    LI     Line item reference number
+-- >              (1156) Reference number identifying a particular line in
+-- >              a document.
+-- >    LO     Load planning number
+-- >              Self explanatory.
+-- >    LS     Bar coded label serial number
+-- >              Self explanatory.
+-- >    MA     Ship notice/manifest number
+-- >              Self explanatory.
+-- >    MB     Master bill of lading number
+-- >              Reference number assigned to a master bill of lading,
+-- >              see: 1001 = 704.
+-- >    MF     Manufacturer's part number
+-- >              Reference number assigned by the manufacturer to his
+-- >              product or part.
+-- >    MG     Meter unit number
+-- >              Number identifying a unique meter unit.
+-- >    MH     Manufacturing order number
+-- >              Reference number assigned by manufacturer for a given
+-- >              production quantity of products.
+-- >    MR     Message recipient
+-- >              Self explanatory.
+-- >    MRN    Mailing reference number
+-- >              Identifies the party designated by the importer to
+-- >              receive certain customs correspondence in lieu of its
+-- >              being mailed directly to the importer.
+-- >    MS     Message sender
+-- >              Self explanatory.
+-- >    MSS    Manufacturer's material safety data sheet number
+-- >              Self explanatory.
+-- >    MWB    Master air waybill number
+-- >              Reference number assigned to a master air waybill, see:
+-- >              1001 = 741.
+-- >    NA     North American hazardous goods classification number
+-- >              Reference to materials designated as hazardous for
+-- >              purposes of transportation in North American commerce.
+-- >    OH     Current invoice number
+-- >              Reference number identifying the current invoice.
+-- >    OI     Previous invoice number
+-- >              Reference number identifying a previously issued invoice.
+-- >    ON     Order number (purchase)
+-- >              [1022] Reference number assigned by the buyer to an
+-- >              order.
+-- >    OP     Original purchase order
+-- >              Reference to the order previously sent.
+-- >    OR     General order number
+-- >              Customs number assigned to imported merchandise that has
+-- >              been left unclaimed and subsequently moved to a Customs
+-- >              bonded warehouse for storage.
+-- >    PB     Payer's financial institution account number
+-- >              Originated company account number (ACH transfer), check,
+-- >              draft or wire.
+-- >    PC     Production code
+-- >              Number assigned by the manufacturer to a specified
+-- >              article or batch to identify the manufacturing date etc.
+-- >              for subsequent reference.
+-- >    PD     Promotion deal number
+-- >              Number assigned by a vendor to a special promotion
+-- >              activity.
+-- >    PE     Plant number
+-- >              Description to be provided.
+-- >    PF     Prime contractor contract number
+-- >              Reference number assigned by the client to the contract
+-- >              of the prime contractor.
+-- >    PI     Price list version number
+-- >              Self explanatory.
+-- >    PK     Packing list number
+-- >              (1014) Reference number assigned to a packing list, see:
+-- >              1001 = 271.
+-- >    PL     Price list number
+-- >              Reference number assigned to a price list.
+-- >    POR    Purchase order response number
+-- >              Reference number assigned by the seller to an order
+-- >              response.
+-- >    PP     Purchase order change number
+-- >              Reference number assigned by a buyer for a revision of a
+-- >              purchase order.
+-- >    PQ     Payment reference
+-- >              Reference number assigned to a payment.
+-- >    PR     Price quote number
+-- >              Reference number assigned by the seller to a quote.
+-- >    PS     Purchase order number suffix
+-- >              Purchase order number add on to split for detailed
+-- >              specification purposes.
+-- >    PW     Prior purchase order number
+-- >              Reference number of a purchase order previously sent to
+-- >              the supplier.
+-- >    PY     Payee's financial institution account number
+-- >              Receiving company account number (ACH transfer), check,
+-- >              draft or wire.
+-- >    RA     Remittance advice number
+-- >              Self explanatory.
+-- >    RC     Rail/road routing code
+-- >              International Western and Eastern European route code
+-- >              used in all rail organizations and specified in the
+-- >              international tariffs (rail tariffs) known by the
+-- >              customers.
+-- >    RCN    Railway consignment note number
+-- >              Reference number assigned to a rail consignment note,
+-- >              see: 1001 = 720.
+-- >    RE     Release number
+-- >              Reference number assigned to identify a release of a set
+-- >              of rules, conventions, conditions, etc.
+-- >    REN    Received number
+-- >              [1150] Number assigned to a rail consignment upon its
+-- >              arrival at its destination station (CIM 84).
+-- >    RF     Export reference number
+-- >              Reference number given to an export shipment.
+-- >    RR     Payer's financial institution transit routing No.(ACH
+-- >           transfers)
+-- >              ODFI (ACH transfer).
+-- >    RT     Payee's financial institution transit routing No.
+-- >              RDFI Transit routing number (ACH transfer).
+-- >    SA     Sales person number
+-- >              Identification number of a sales person.
+-- >    SB     Sales region number
+-- >              Description to be provided.
+-- >    SD     Sales department number
+-- >              Description to be provided.
+-- >    SE     Serial number
+-- >              Identification number of an item which distinguishes this
+-- >              specific item out of an number of identical items.
+-- >    SF     Ship from
+-- >              Description to be provided.
+-- >    SH     Previous highest schedule number
+-- >              Number of the latest schedule of a previous period
+-- >              (ODETTE DELINS).
+-- >    SI     SID (Shipper's identifying number for shipment)
+-- >              Description to be provided.
+-- >    SM     Sales office number
+-- >              Description to be provided.
+-- >    SN     Seal number
+-- >              [9308] Identification number on Customs or other seals
+-- >              affixed to containers or other transport units.
+-- >    SP     Scan line
+-- >              Description to be provided.
+-- >    SQ     Container sequence number
+-- >              Description to be provided.
+-- >    SRN    Shipment reference number
+-- >              [1140] Reference number assigned by a consignor to a
+-- >              particular shipment for his own purposes or for those of
+-- >              the consignee.
+-- >    SS     Sellers reference number
+-- >              Reference number assigned to a transaction by the seller.
+-- >    STA    Station reference number
+-- >              International UIC code assigned to every European rail
+-- >              station (CIM convention).
+-- >    SW     Swap order number
+-- >              Number assigned by the seller to a swap order (see
+-- >              definition of DE 1001, code 229).
+-- >    SZ     Specification number
+-- >              Number assigned by the issuer to his specification.
+-- >    TB     Trucker's bill of lading
+-- >              A cargo list/description issued by a motor carrier of
+-- >              freight.
+-- >    TE     Telex message number
+-- >              Reference number identifying a telex message.
+-- >    TF     Transfer number
+-- >              An extra number assigned to goods or a container which
+-- >              functions as a reference number or as an authorization
+-- >              number to get the goods or container released from a
+-- >              certain party.
+-- >    TI     TIR carnet number
+-- >              Reference number assigned to a TIR carnet.
+-- >    TL     Tax exemption licence number
+-- >              Number assigned by the tax authorities to a party
+-- >              indicating its tax exemption authorization. This number
+-- >              could relate to a specified business type, a specified
+-- >              local area or a class of products.
+-- >    TN     Transaction reference number
+-- >              Reference applied to a transaction between two or more
+-- >              parties over a defined life cycle; e.g. number applied by
+-- >              importer or broker to obtain release from Customs, may
+-- >              then used to control declaration through final accounting
+-- >              (synonyms: declaration, entry number).
+-- >    TP     Test report number
+-- >              Reference number identifying a test report document
+-- >              relevant to the product.
+-- >    UAR    Upper serial number of range
+-- >              Upper serial number in a range for declaration of
+-- >              incoming goods.
+-- >    UC     Ultimate customer's reference number
+-- >              The originator's reference number as forwarded in a
+-- >              sequence of parties involved.
+-- >    UCN    Unique consignment reference number
+-- >              (1202) Unique reference of a consignment (UCRN) used for
+-- >              identification purposes in documents and messages
+-- >              exchanged between parties in international trade. See
+-- >              also: Unique Identifier Code (UNIC) in UN/ECE
+-- >              Recommendation No. 8, March 1992.
+-- >    UN     United Nations dangerous goods (UNDG) number
+-- >              [7124] Unique serial number assigned within the United
+-- >              Nations to substances and articles contained in a list of
+-- >              the dangerous goods most commonly carried.
+-- >    UO     Ultimate customer's order number
+-- >              The originator's order number as forwarded in a sequence
+-- >              of parties involved.
+-- >    VA     VAT registration number
+-- >              Unique number assigned by the relevant tax authority to
+-- >              identify a party for use in relation to Value Added Tax
+-- >              (VAT).
+-- >    VC     Vendor contract number
+-- >              Number assigned by the vendor to a contract.
+-- >    VM     Vessel identification
+-- >              (8123) Reference identifying a vessel (UN/ECE
+-- >              Recommendation No 10).
+-- >    VN     Order number (vendor)
+-- >              Reference number assigned by supplier to a buyer's
+-- >              purchase order.
+-- >    VON    Voyage number
+-- >              [8228] Reference number assigned by the carrier or his
+-- >              agent to the voyage of the vessel.
+-- >    VP     Vendor product number
+-- >              Number assigned by vendor to another manufacturer's
+-- >              product.
+-- >    VR     Vendor ID number
+-- >              Description to be provided.
+-- >    VS     Vendor order number suffix
+-- >              Description to be provided.
+-- >    VT     Motor vehicle identification number
+-- >              (Reference identifying a motor vehicle used for
+-- >              transport) normally is the vehicle registration number.
+-- >    VV     Voucher number
+-- >              Reference number identifying a voucher.
+-- >    WE     Warehouse entry number
+-- >              Entry number under which imported merchandise was placed
+-- >              in a Customs bonded warehouse.
+-- >    WM     Weight agreement number
+-- >              Description to be provided.
+-- >    WN     Well number
+-- >              Description to be provided.
+-- >    WR     Warehouse receipt number
+-- >              Self explanatory.
+-- >    WS     Warehouse storage location number
+-- >              Self explanatory.
+-- >    WY     Rail waybill number
+-- >              Self explanatory.
+-- >    XA     Company/place registration number
+-- >              Company registration and place as legally required.
+-- >    XC     Cargo control number
+-- >              Reference used to identify and control a carrier and
+-- >              consignment from initial entry into a country until
+-- >              release of the cargo by Customs.
+-- >    XP     Previous cargo control number
+-- >              Where a consignment is deconsolidated and/or transferred
+-- >              to the control of another carrier or freight forwarder
+-- >              (e.g. housebill, abstract) this references the previous
+-- >              (e.g. master) cargo control number.
+-- >    ZZZ    Mutually defined reference number
+-- >              Number based on party agreement.
+simple1153 :: Parser Value
+simple1153 = simple "1153" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1154.hs b/specification/src/Text/Edifact/D96A/Simples/S1154.hs
new file mode 100644
index 0000000..f870044
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1154.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1154
+  ( simple1154
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1154  Reference number
+-- >
+-- >    Desc: Identification number the nature and function of which can be
+-- >          qualified by an entry in data element 1153 Reference
+-- >          qualifier.
+-- >
+-- >    Repr: an..35
+simple1154 :: Parser Value
+simple1154 = simple "1154" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1156.hs b/specification/src/Text/Edifact/D96A/Simples/S1156.hs
new file mode 100644
index 0000000..e3afcc3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1156.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1156
+  ( simple1156
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1156  Line number
+-- >
+-- >    Desc: Number of the line in the document/message referenced in 1154
+-- >          Reference number.
+-- >
+-- >    Repr: an..6
+simple1156 :: Parser Value
+simple1156 = simple "1156" (alphaNumeric `upTo` 6)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1218.hs b/specification/src/Text/Edifact/D96A/Simples/S1218.hs
new file mode 100644
index 0000000..c72f95b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1218.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1218
+  ( simple1218
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1218  Number of originals of document required
+-- >
+-- >    Desc: Specification of the number of originals of a stipulated
+-- >          document that are required.
+-- >
+-- >    Repr: n..2
+simple1218 :: Parser Value
+simple1218 = simple "1218" (numeric `upTo` 2)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1220.hs b/specification/src/Text/Edifact/D96A/Simples/S1220.hs
new file mode 100644
index 0000000..81a0493
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1220.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1220
+  ( simple1220
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1220  Number of copies of document required
+-- >
+-- >    Desc: Number of originals or copies of a document stipulated or
+-- >          referred to as being required.
+-- >
+-- >    Repr: n..2
+simple1220 :: Parser Value
+simple1220 = simple "1220" (numeric `upTo` 2)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1222.hs b/specification/src/Text/Edifact/D96A/Simples/S1222.hs
new file mode 100644
index 0000000..10f3e5c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1222.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1222
+  ( simple1222
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1222  Configuration level
+-- >
+-- >    Desc: Number indicating the level of an object which is in a
+-- >          hierarchy.
+-- >
+-- >    Repr: n..2
+simple1222 :: Parser Value
+simple1222 = simple "1222" (numeric `upTo` 2)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1225.hs b/specification/src/Text/Edifact/D96A/Simples/S1225.hs
new file mode 100644
index 0000000..4839174
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1225.hs
@@ -0,0 +1,161 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1225
+  ( simple1225
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 1225  Message function, coded
+-- >
+-- >   Desc: Code indicating the function of the message.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Cancellation
+-- >              Message cancelling a previous transmission for a given
+-- >              transaction.
+-- >         2 Addition
+-- >              Message containing items (e.g. line items, goods items,
+-- >              Customs items, equipment items) to be added to a
+-- >              previously sent message.
+-- >         3 Deletion
+-- >              Message containing items (e.g. line items, goods items,
+-- >              Customs items, equipment items) to be deleted from a
+-- >              previously sent message.
+-- >         4 Change
+-- >              Message containing items (e.g. line items, goods items,
+-- >              Customs items, equipment items) to be changed in a
+-- >              previously sent message.
+-- >         5 Replace
+-- >              Message replacing a previous message.
+-- >         6 Confirmation
+-- >              Message confirming the details of a previous transmission
+-- >              where such confirmation is required or recommended under
+-- >              the terms of a trading partner agreement.
+-- >         7 Duplicate
+-- >              The message is a duplicate of a previously generated
+-- >              message.
+-- >         8 Status
+-- >              Description to be provided.
+-- >         9 Original
+-- >              Initial transmission related to a given transaction.
+-- >        10 Not found
+-- >              Message whose reference number is not filed.
+-- >        11 Response
+-- >              Message responding to a previous message or document.
+-- >        12 Not processed
+-- >              Message indicating that the referenced message was
+-- >              received but not yet processed.
+-- >        13 Request
+-- >              Self explanatory.
+-- >        14 Advance notification
+-- >              Self explanatory.
+-- >        15 Reminder
+-- >              Repeated message transmission for reminding purposes.
+-- >        16 Proposal
+-- >              Message content is a proposal.
+-- >        17 Cancel, to be reissued
+-- >              Referenced transaction cancelled, reissued message will
+-- >              follow.
+-- >        18 Reissue
+-- >              New issue of a previous message (maybe cancelled).
+-- >        19 Seller initiated change
+-- >              Change information submitted by buyer but initiated by
+-- >              seller.
+-- >        20 Replace heading section only
+-- >              Message to replace the heading of a previous message.
+-- >        21 Replace item detail and summary only
+-- >              Message to replace item detail and summary of a previous
+-- >              message.
+-- >        22 Final transmission
+-- >              Final message in a related series of messages together
+-- >              making up a commercial, administrative or transport
+-- >              transaction.
+-- >        23 Transaction on hold
+-- >              Message not to be processed until further release
+-- >              information.
+-- >        24 Delivery instruction
+-- >              Delivery schedule message only used to transmit short-
+-- >              term delivery instructions.
+-- >        25 Forecast
+-- >              Delivery schedule message only used to transmit long-term
+-- >              schedule information.
+-- >        26 Delivery instruction and forecast
+-- >              Combination of codes '24' and '25'.
+-- >        27 Not accepted
+-- >              Message to inform that the referenced message is not
+-- >              accepted by the recipient.
+-- >        28 Accepted, with amendment in heading section
+-- >              Message accepted but amended in heading section.
+-- >        29 Accepted without amendment
+-- >              Referenced message is entirely accepted.
+-- >        30 Accepted, with amendment in detail section
+-- >              Referenced message is accepted but amended in detail
+-- >              section.
+-- >        31 Copy
+-- >              Indicates that the message is a copy of an original
+-- >              message that has been sent, e.g. for action or
+-- >              information.
+-- >        32 Approval
+-- >              A message releasing an existing referenced message for
+-- >              action to the receiver.
+-- >        33 Change in heading section
+-- >              Message changing the referenced message heading section.
+-- >        34 Accepted with amendment
+-- >              The referenced message is accepted but amended.
+-- >        35 Retransmission
+-- >              Change-free transmission of a message previously sent.
+-- >        36 Change in detail section
+-- >              Message changing referenced detail section.
+-- >        37 Reversal of a debit
+-- >              Reversal of a previously posted debit.
+-- >        38 Reversal of a credit
+-- >              Reversal of a previously posted credit.
+-- >        39 Reversal for cancellation
+-- >              Description to be provided.
+-- >        40 Request for deletion
+-- >              The message is given to inform the recipient to delete
+-- >              the referenced transaction.
+-- >        41 Finishing/closing order
+-- >              Last of series of call-offs.
+-- >        42 Confirmation via specific means
+-- >              Message confirming a transaction previously agreed via
+-- >              other means (e.g. phone).
+-- >        43 Additional transmission
+-- >              Message already transmitted via another communication
+-- >              channel. This transmission is to provide electronically
+-- >              processable data only.
+-- >        44 Accepted without reserves
+-- >              Message accepted without reserves.
+-- >        45 Accepted with reserves
+-- >              Message accepted with reserves.
+-- >        46 Provisional
+-- >              Message content is provisional.
+-- >        47 Definitive
+-- >              Message content is definitive.
+-- >        48 Accepted, contents rejected
+-- >              Message to inform that the previous message is received,
+-- >              but it cannot be processed due to regulations, laws, etc.
+-- >        49 Settled dispute
+-- >              The reported dispute is settled.
+-- >        50 Withdraw
+-- >              Message withdrawing a previously approved message.
+-- >        51 Authorisation
+-- >              Message authorising a message or transaction(s).
+-- >        52 Proposed amendment
+-- >              A code used to indicate an amendment suggested by the
+-- >              sender.
+-- >        53 Test
+-- >              Code indicating the message is to be considered as a
+-- >              test.
+-- > +      54 Extract
+-- >              A subset of the original.
+simple1225 :: Parser Value
+simple1225 = simple "1225" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1229.hs b/specification/src/Text/Edifact/D96A/Simples/S1229.hs
new file mode 100644
index 0000000..59e3f63
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1229.hs
@@ -0,0 +1,75 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1229
+  ( simple1229
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 1229  Action request/notification, coded
+-- >
+-- >   Desc: Code specifying the action to be taken or already taken.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Added
+-- >              This line item is added to the referenced message.
+-- >         2 Deleted
+-- >              This line item is deleted from the referenced message.
+-- >         3 Changed
+-- >              This line item is changed in the referenced message.
+-- >         4 No action
+-- >              This line item is not affected by the actual message.
+-- >         5 Accepted without amendment
+-- >              This line item is entirely accepted by the seller.
+-- >         6 Accepted with amendment
+-- >              This line item is accepted but amended by the seller.
+-- >         7 Not accepted
+-- >              This line item is not accepted by the seller.
+-- >         8 Schedule only
+-- >              Self explanatory.
+-- >         9 Amendments
+-- >              Self explanatory.
+-- >        10 Not found
+-- >              This line item is not found in the referenced message.
+-- >        11 Not amended
+-- >              This line is not amended by the buyer.
+-- >        12 Line item numbers changed
+-- >              Self explanatory.
+-- >        13 Buyer has deducted amount
+-- >              Buyer has deducted amount from payment.
+-- >        14 Buyer claims against invoice
+-- >              Buyer has a claim against an outstanding invoice.
+-- >        15 Charge back by seller
+-- >              Factor has been requested to charge back the outstanding
+-- >              item.
+-- >        16 Seller will issue credit note
+-- >              Seller agrees to issue a credit note.
+-- >        17 Terms changed for new terms
+-- >              New settlement terms have been agreed.
+-- >        18 Abide outcome of negotiations
+-- >              Factor agrees to abide by the outcome of negotiations
+-- >              between seller and buyer.
+-- >        19 Seller rejects dispute
+-- >              Seller does not accept validity of dispute.
+-- >        20 Settlement
+-- >              The reported situation is settled.
+-- >        21 No delivery
+-- >              Code indicating that no delivery will be required.
+-- >        22 Call-off delivery
+-- >              A request for delivery of a particular quantity of goods
+-- >              to be delivered on a particular date (or within a
+-- >              particular period).
+-- >        23 Proposed amendment
+-- >              A code used to indicate an amendment suggested by the
+-- >              sender.
+-- > +      24 Accepted with amendment, no confirmation required
+-- >              Accepted with changes which require no confirmation.
+simple1229 :: Parser Value
+simple1229 = simple "1229" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1312.hs b/specification/src/Text/Edifact/D96A/Simples/S1312.hs
new file mode 100644
index 0000000..168fa00
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1312.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1312
+  ( simple1312
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1312  Consignment load sequence number
+-- >
+-- >    Desc: To indicate the sequence of loading in which the consignments
+-- >          are loaded in a piece of equipment or in a means of transport
+-- >          (e.g. truck).
+-- >
+-- >    Repr: n..4
+simple1312 :: Parser Value
+simple1312 = simple "1312" (numeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1366.hs b/specification/src/Text/Edifact/D96A/Simples/S1366.hs
new file mode 100644
index 0000000..63e8c2a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1366.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1366
+  ( simple1366
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1366  Document/message source
+-- >
+-- >    Desc: Indication of the source from which the printed information
+-- >          is to be or has been obtained.
+-- >
+-- >    Repr: an..35
+simple1366 :: Parser Value
+simple1366 = simple "1366" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1373.hs b/specification/src/Text/Edifact/D96A/Simples/S1373.hs
new file mode 100644
index 0000000..72ea8c7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1373.hs
@@ -0,0 +1,91 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1373
+  ( simple1373
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 1373  Document/message status, coded
+-- >
+-- >   Desc: To identify the status of a document/message.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Accepted
+-- >              Self explanatory.
+-- >         2 Accompanying goods
+-- >              Notice that a specific document will be accompanying the
+-- >              goods.
+-- >         3 Conditionally accepted
+-- >              Self explanatory.
+-- >         4 To arrive by separate EDI message
+-- >              Notice that a specific document/message will be
+-- >              transmitted via a separate EDI message.
+-- >         5 Information only
+-- >              Notice that the specific document or message is for
+-- >              information only.
+-- >         6 To arrive by manual means
+-- >              Notice that a specific document or message will not be
+-- >              sent via EDI.
+-- >         7 To be raised and sent
+-- >              Request for a specific message to be formatted and
+-- >              transmitted or a request for a specific document to be
+-- >              raised and sent.
+-- >         8 Rejected
+-- >              Self explanatory.
+-- >         9 To be printed
+-- >              The document or message is to be printed.
+-- > +      10 Document currently valid
+-- >              Specific document is currently valid.
+-- >        11 Document not available
+-- >              Specified document is not available.
+-- >        12 Document exhausted by declaration and attached
+-- >              Customs declaration to which the document is related
+-- >              completed or exhaust the allowance stated on the
+-- >              document. The document is attached to the Customs
+-- >              declaration.
+-- >        13 Document not exhausted by declaration and attached
+-- >              Customs declaration to which the document is related does
+-- >              not complete or exhaust the allowance stated on the
+-- >              document . The document is not attached to the
+-- >              declaration but has already been lodged in the Customs
+-- >              station.
+-- >        14 Document exhausted by declaration and previously lodged
+-- >              Customs declaration to which the document is related
+-- >              completed or exhaust the allowance stated on the
+-- >              document. The usage of the document is complete. The
+-- >              document is not attached to the declaration but has
+-- >              already been lodged in the Customs station.
+-- >        15 Document not exhausted by declaration and previously lodged
+-- >              Customs declaration to which the document is related does
+-- >              not complete or exhaust the allowance stated on the
+-- >              document. The document can continue to be used for future
+-- >              declarations until the allowance is exhausted.
+-- >              The document is not attached to the declaration but has
+-- >              already been lodged in the Customs station.
+-- >        16 Document not attached
+-- >              Specified document is not or cannot be attached.
+-- >        17 Document with the goods
+-- >              Document not attached to the Customs declaration but is
+-- >              attached to the goods.
+-- >        18 Document attached, to be returned after endorsement
+-- >              Specified document is attached to the Customs declaration
+-- >              and will be required to be returned to the declarant
+-- >              after Customs endorsement.
+-- >        19 Document applied for
+-- >              Application has been submitted for that document.
+-- >        20 Received for shipment
+-- >              Indicates that the document has legal validity from the
+-- >              date of receival of the cargo.
+-- >        21 Shipped on board
+-- >              Indicates that the document has legal validity from the
+-- >              date that cargo is loaded on board a vessel.
+simple1373 :: Parser Value
+simple1373 = simple "1373" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1490.hs b/specification/src/Text/Edifact/D96A/Simples/S1490.hs
new file mode 100644
index 0000000..2c0b056
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1490.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1490
+  ( simple1490
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1490  Consolidation item number
+-- >
+-- >    Desc: Serial number differentiating each separate consignment
+-- >          included in the consolidation.
+-- >
+-- >    Repr: n..4
+simple1490 :: Parser Value
+simple1490 = simple "1490" (numeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S1496.hs b/specification/src/Text/Edifact/D96A/Simples/S1496.hs
new file mode 100644
index 0000000..38bc6a9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S1496.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S1496
+  ( simple1496
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    1496  Goods item number
+-- >
+-- >    Desc: Serial number differentiating each separate goods item entry
+-- >          of a consignment as contained in one document/declaration.
+-- >
+-- >    Repr: n..5
+simple1496 :: Parser Value
+simple1496 = simple "1496" (numeric `upTo` 5)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S2005.hs b/specification/src/Text/Edifact/D96A/Simples/S2005.hs
new file mode 100644
index 0000000..ea3b1e2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S2005.hs
@@ -0,0 +1,799 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S2005
+  ( simple2005
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 2005  Date/time/period qualifier
+-- >
+-- >   Desc: Code giving specific meaning to a date, time or period.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         2 Delivery date/time, requested
+-- >              Date on which buyer requests goods to be delivered.
+-- >         3 Invoice date/time
+-- >              [2376] Date when a Commercial Invoice is issued.
+-- >         4 Order date/time
+-- >              [2010] Date when an order is issued.
+-- >         7 Effective date/time
+-- >              Date and/or time at which specified event or document
+-- >              becomes effective.
+-- >         8 Order received date/time
+-- >              Date/time when the purchase order is received by the
+-- >              seller.
+-- >         9 Processing date/time
+-- >              Date/time of processing.
+-- >        10 Shipment date/time, requested
+-- >              Date on which goods should be shipped or despatched by
+-- >              the supplier.
+-- > #|     11 Despatch date and or time
+-- >              (2170) Date/time on which the goods are or are expected
+-- >              to be despatched or shipped.
+-- >        12 Terms discount due date/time
+-- >              Date by which payment should be made if discount terms
+-- >              are to apply.
+-- >        13 Terms net due date
+-- >              Date by which payment must be made.
+-- >        14 Payment date/time, deferred
+-- >              Date/time when instalments are due.
+-- >        15 Promotion start date/time
+-- >              Date/time when promotion activities begin.
+-- >        16 Promotion end date/time
+-- >              Date/time when promotion activities end.
+-- >        17 Delivery date/time, estimated
+-- >              Date and/or time when the shipper of the goods expects
+-- >              delivery will take place.
+-- >        18 Installation date/time/period
+-- >              Self explanatory.
+-- >        20 Cheque date/time
+-- >              Date/time when cheque is issued.
+-- >        21 Charge back date/time
+-- >              Description to be provided.
+-- >        22 Freight bill date/time
+-- >              Date/time when freight bill is issued.
+-- >        35 Delivery date/time, actual
+-- >              Date/time on which goods or consignment are delivered at
+-- >              their destination.
+-- >        36 Expiry date
+-- >              Date of expiry of the validity of a referenced document,
+-- >              price information or any other referenced data element
+-- >              with a limited validity period.
+-- >        37 Ship not before date/time
+-- >              Goods should not be shipped before given date/time.
+-- >        38 Ship not later than date/time
+-- >              Date/time by which the goods should have been shipped.
+-- >        39 Ship week of date
+-- >              Date identifying the week during which goods should be
+-- >              shipped.
+-- >        42 Superseded date/time
+-- >              Date/time being overlaid by a date given elsewhere.
+-- >        44 Availability
+-- >              Date/time when received item is available.
+-- >        45 Compilation date and time
+-- >              Date and time of the compilation.
+-- >        46 Cancellation date
+-- >              Date on which a document or message has been cancelled.
+-- >        47 Statistical time series date
+-- >              Date for statistical time series purposes.
+-- >        48 Duration
+-- >              Duration.
+-- >        49 Deliver not before and not after dates
+-- >              Deliver not before and not after a specific date range.
+-- >        50 Goods receipt date/time
+-- >              Date/time upon which the goods were received by a given
+-- >              party.
+-- >        51 Cumulative quantity start date
+-- >              First Date for accumulation of delivery quantities.
+-- >        52 Cumulative quantity end date
+-- >              Last Date for accumulation of delivery quantities.
+-- >        53 Buyer's local time
+-- >              Time at the buyers location.
+-- >        54 Seller's local time
+-- >              Time at the sellers location.
+-- >        55 Confirmed date/time
+-- >              Date/time which has been confirmed.
+-- >        58 Clearance date (Customs)
+-- >              (3080) Date on which Customs formalities necessary to
+-- >              allow goods to be exported, to enter home use, or to be
+-- >              placed under another Customs procedure has been
+-- >              accomplished (CCC).
+-- > #|     59 Inbond movement authorization date
+-- >              Inland movement authorization date.
+-- >        60 Engineering change level date
+-- >              Date the engineering level of goods is changed.
+-- >        61 Cancel if not delivered by this date
+-- >              Self explanatory.
+-- > |      63 Delivery date/time, latest
+-- >              Date identifying a point of time after which goods shall
+-- >              not or will not be delivered.
+-- > |      64 Delivery date/time, earliest
+-- >              Date identifying a point in time before which the goods
+-- >              shall not be delivered.
+-- >        65 Delivery date/time, 1st schedule
+-- >              Self explanatory.
+-- >        67 Delivery date/time, current schedule
+-- >              Delivery Date deriving from actual schedule.
+-- >        69 Delivery date/time, promised for
+-- >              [2138] Date by which, or period within which, the
+-- >              merchandise should be delivered to the buyer, as agreed
+-- >              between the seller and the buyer (generic term).
+-- > |      71 Delivery date/time, requested for (after and including)
+-- >              Delivery is requested to happen after or on given date.
+-- >        72 Delivery date/time, promised for (after and including)
+-- >              Delivery might take place earliest at given date.
+-- > |      74 Delivery date/time, requested for (prior to and including)
+-- >              Delivery is requested to happen prior to or including the
+-- >              given date.
+-- >        75 Delivery date/time, promised for (prior to and including)
+-- >              Delivery might take place latest at given date.
+-- >        76 Delivery date/time, scheduled for
+-- >              Self explanatory.
+-- >        79 Shipment date/time, promised for
+-- >              Shipment might happen at given date/time.
+-- >        81 Shipment date/time, requested for (after and including)
+-- >              Shipment should happen earliest at given date.
+-- >        84 Shipment date/time, requested for (prior to and including)
+-- >              Shipment should take place latest at given date.
+-- >        85 Shipment date/time, promised for (prior to and including)
+-- >              Shipment might take place latest at given date.
+-- >        89 Inquiry date
+-- >              Self explanatory.
+-- >        90 Report start date
+-- >              Self explanatory.
+-- >        91 Report end date
+-- >              Self explanatory.
+-- >        92 Contract effective date
+-- >              Date when a contract becomes valid.
+-- >        93 Contract expiry date
+-- >              Date when a contract expires.
+-- >        94 Production/manufacture date
+-- >              Date on which goods are produced.
+-- >        95 Bill of lading date
+-- >              Date as specified on the bill of lading.
+-- >        96 Discharge date/time
+-- >              Date/time when goods should, might or have been
+-- >              discharged from the means of transport.
+-- >        97 Transaction creation date
+-- >              Self explanatory.
+-- >       101 Production date, no schedule established as of
+-- >              Date as of there is no valid production schedule.
+-- >       107 Deposit date/time
+-- >              Self explanatory.
+-- >       108 Postmark date/time
+-- >              Self explanatory.
+-- >       109 Receive at lockbox date
+-- >              Self explanatory.
+-- >       110 Ship date, originally scheduled
+-- >              Self explanatory.
+-- >       111 Manifest/ship notice date
+-- >              Self explanatory.
+-- >       113 Sample required date
+-- >              Date as of a sample has to be available customer defined.
+-- >       114 Tooling required date
+-- >              Date as of a tool has to be available customer defined.
+-- >       115 Sample available date
+-- >              Date as of a sample will be available seller defined.
+-- >       117 Delivery date/time, first
+-- >              First possible date/time for delivery.
+-- >       119 Test completion date
+-- >              Date when a test has been completed.
+-- >       123 Documentary credit expiry date/time
+-- >              The latest date/time for presentation of the documents to
+-- >              the bank where the credit expires.
+-- >       124 Despatch note date
+-- >              [2218] Date when a Despatch Note is issued.
+-- >       125 Import licence date
+-- >              [2292] Date when Import Licence is issued.
+-- >       126 Contract date
+-- >              [2326] Date when a Contract is agreed.
+-- > |     128 Delivery date/time, last
+-- >              Date when the last delivery should be or has been
+-- >              accomplished.
+-- >       129 Exportation date
+-- >              Date when imported vessel/merchandise last left the
+-- >              country of export for the country of import.
+-- >       131 Tax point date
+-- >              Date on which tax is due or calculated.
+-- >       132 Arrival date/time, estimated
+-- >              (2348) Date/time when carrier estimates that a means of
+-- >              transport should arrive at the port of discharge or place
+-- >              of destination.
+-- >       133 Departure date/time, estimated
+-- >              Date/time when carrier estimates that a means of
+-- >              transport should depart at the place of departure.
+-- >       134 Rate of exchange date/time
+-- >              Date/time on which the exchange rate was fixed.
+-- >       135 Telex date
+-- >              Date identifying when a telex message was sent.
+-- >       136 Departure date/time
+-- >              [2280] Date (and time) of departure of means of
+-- >              transport.
+-- >       137 Document/message date/time
+-- >              (2006) Date/time when a document/message is issued. This
+-- >              may include authentication.
+-- >       138 Payment date
+-- >              [2034] Date on which an amount due is made available to
+-- >              the creditor, in accordance with the terms of payment.
+-- >       140 Payment due date
+-- >              Date/time at which funds should be made available.
+-- >       141 Presentation date of Goods declaration (Customs)
+-- >              [2032] Date on which a Goods declaration is presented or
+-- >              lodged with Customs.
+-- >       143 Acceptance date/time of goods
+-- >              [2126] Date on which the goods are taken over by the
+-- >              carrier at the place of acceptance (CMR 4).
+-- >       144 Quota date
+-- >              Description to be provided.
+-- >       146 Entry date, estimated (Customs)
+-- >              Date on which the official date of Customs entry is
+-- >              anticipated.
+-- >       147 Expiry date of export licence
+-- >              [2078] Date of expiry of the validity of an Export
+-- >              Licence.
+-- >       148 Acceptance date of Goods declaration (Customs)
+-- >              [2036] Date on which a Goods declaration is accepted by
+-- >              Customs in accordance with Customs legislation.
+-- >       149 Invoice date, required
+-- >              Date required for invoice issue.
+-- >       150 Declaration/presentation date
+-- >              Date when item has been or has to be declared/presented.
+-- >       151 Importation date
+-- >              Date on which goods are imported, as determined by the
+-- >              governing Customs administration.
+-- >       152 Exportation date for textiles
+-- >              Date when imported textiles last left the country of
+-- >              origin for the country of importation.
+-- >       153 Cancellation date/time, latest
+-- >              The latest date/time on which cancellation of the payment
+-- >              order may be requested.
+-- >       154 Acceptance date of document
+-- >              Self explanatory.
+-- >       155 Accounting period start date
+-- >              Self explanatory.
+-- >       156 Accounting period end date
+-- >              Self explanatory.
+-- >       157 Validity start date
+-- >              Self explanatory.
+-- >       158 Horizon start date
+-- >              The first date of a period forming a horizon.
+-- >       159 Horizon end date
+-- >              The last date of a period forming a horizon.
+-- >       160 Authorization date
+-- >              Date when an authorization was given.
+-- >       161 Release date of customer
+-- >              Date the customer authorised the goods' release.
+-- >       162 Release date of supplier
+-- >              Date when the supplier released goods.
+-- >       163 Processing start date/time
+-- >              Date/Time when a specific process starts.
+-- >       164 Processing end date/time
+-- >              Date/Time when a specific process ends.
+-- >       165 Tax period start date
+-- >              Date when a tax period begins.
+-- >       166 Tax period end date
+-- >              Date when a tax period ends.
+-- >       167 Charge period start date
+-- >              The charge period's first date.
+-- >       168 Charge period end date
+-- >              The charge period's last date.
+-- >       169 Lead time
+-- >              Time required between order entry till earliest goods
+-- >              delivery.
+-- >       170 Settlement due date
+-- >              More generic than 'payment due date' and therefore more
+-- >              apt for reinsurance/insurance business.
+-- >       171 Reference date/time
+-- >              Date/time on which the reference was issued.
+-- >       172 Hired from date
+-- >              Date from which an item has been or will be hired.
+-- >       173 Hired until date
+-- >              Date until which an item has been or will be hired.
+-- >       174 Advise after date/time
+-- >              The information must be advised after the date/time
+-- >              indicated.
+-- >       175 Advise before date/time
+-- >              The information must be advised before the date/time
+-- >              indicated.
+-- >       176 Advise completed date/time
+-- >              The advise has been completed at the date indicated.
+-- >       177 Advise on date/time
+-- >              The information must be advised on the date/time
+-- >              indicated.
+-- >       178 Arrival date/time, actual
+-- >              [2106] Date (and time) of arrival of means of transport.
+-- >       179 Booking date/time
+-- >              Date at which the booking was made.
+-- >       180 Closing date/time
+-- >              Final date for delivering cargo to a liner ship.
+-- >       181 Positioning date/time of equipment
+-- >              Date/time when equipment is positioned.
+-- >       182 Issue date
+-- >              Date when a document/message has been or will be issued.
+-- >       183 Date, as at
+-- >              Date related to a given context.
+-- >       184 Notification date/time
+-- >              Date/time of notification.
+-- >       185 Commenced tank cleaning date/time
+-- >              The date/and or time tank cleaning was started.
+-- >       186 Departure date/time, actual
+-- >              (2280) Date (and time) of departure of means of
+-- >              transport.
+-- >       187 Authentication date/time of document
+-- >              Date/time when the document is signed or otherwise
+-- >              authenticated.
+-- >       188 Previous current account date
+-- >              Self explanatory.
+-- >       189 Departure date/time, scheduled
+-- >              Date (and time) of scheduled departure of means of
+-- >              transport.
+-- >       190 Transhipment date/time
+-- >              Date and time of the transfer of the goods from one means
+-- >              of transport to another.
+-- >       191 Delivery date/time, expected
+-- >              Date/time on which goods are expected to be delivered.
+-- >       192 Expiration date/time of customs document
+-- >              Date on which validity of a customs document expires.
+-- >       193 Execution date
+-- >              The date when ordered bank initiated the transaction.
+-- >       194 Start date/time
+-- >              Date/time on which a period starts.
+-- >       195 Expiry date of import licence
+-- >              [2272] Date of expiry of the validity of an Import
+-- >              Licence.
+-- >       196 Departure date/time, earliest
+-- >              Date/time of earliest departure of means of transport.
+-- >       197 Laytime first day
+-- >              First of a number of days allowed in a charter party of
+-- >              the loading and discharging of cargo.
+-- >       198 Laytime last day
+-- >              Last of a number of days allowed in a charter party for
+-- >              the loading and discharging of cargo.
+-- >       199 Positioning date/time of goods
+-- >              The date and/or time the goods have to be or have been
+-- >              positioned.
+-- >       200 Pick-up/collection date/time of cargo
+-- >              Date/time at which the cargo is picked up.
+-- >       201 Pick-up date/time of equipment
+-- >              Date/time at which the equipment is picked up.
+-- >       202 Posting date
+-- >              The date when an entry is posted to an account.
+-- >       203 Execution date/time, requested
+-- >              The date/time on which the ordered bank is requested to
+-- >              initiate the payment order, as specified by the
+-- >              originator (e.g. the date of the debit).
+-- >       204 Release date (Customs)
+-- >              Date on which Customs releases merchandise to the carrier
+-- >              or importer.
+-- >       205 Settlement date
+-- >              Date for settlement of financial transaction e.g.
+-- >              foreign exchange securities.
+-- >       206 End date/time
+-- >              Date/time on which a period (from - to) ends.
+-- >       207 Commenced pumping ballast date/time
+-- >              Date/time on which the intake of materials to be carried
+-- >              to improve the trim and the stability of the means of
+-- >              transport, was commenced.
+-- >       208 Departure date/time, ultimate
+-- >              Date/time at which a means of transport has to depart
+-- >              ultimately.
+-- >       209 Value date
+-- >              Date on which the funds are at the disposal of the
+-- >              beneficiary or cease to be at the disposal of the
+-- >              ordering customer.
+-- >       210 Reinsurance current account period
+-- >              Description to be provided.
+-- >       211 360/30
+-- >              Calculation is based on year of 360 days, month of 30
+-- >              days.
+-- >       212 360/28-31
+-- >              Calculation is based on year of 360 days, month of 28-31
+-- >              days.
+-- >       213 365-6/30
+-- >              Calculation is based on year of 365-6 days, month of 30
+-- >              days.
+-- >       214 365-6/28-31
+-- >              Calculation is based on year of 365-6 days, month of 28-
+-- >              31 days.
+-- >       215 365/28-31
+-- >              Calculation is based on year of 365 days, month of 28-31
+-- >              days.
+-- >       216 365/30
+-- >              Calculation is based on year of 365 days, month of 30
+-- >              days.
+-- >       218 Authentication/validation date/time
+-- >              Self explanatory.
+-- >       219 Crossborder date/time
+-- >              Date/time at which goods are transferred across a country
+-- >              border.
+-- >       221 Interest period
+-- >              Number of days used for the calculation of interests.
+-- >       222 Presentation date, latest
+-- >              Latest date for presentation of a document.
+-- >       223 Delivery date/time, deferred
+-- >              New date and time of delivery calculated on basis of a
+-- >              consignee's requirement (chargeable).
+-- >       224 Permit to admit date
+-- >              Date on which permission was granted to move merchandise
+-- >              into a bonded warehouse or free trade zone.
+-- >       225 Certification of weight date/time
+-- >              Date/time at which the carrier proceeds to the weighting
+-- >              of the goods.
+-- >       226 Discrepancy date/time
+-- >              Date/time at which a discrepancy has been found.
+-- >       227 Beneficiary's banks due date
+-- >              Date on which funds should be made available to the
+-- >              beneficiary's bank.
+-- >       228 Debit value date, requested
+-- >              Date on which the account owner wants the debit value to
+-- >              his account.
+-- >       229 Hoses connected date/time
+-- >              The date and/or time hoses were connected.
+-- >       230 Hoses disconnected date/time
+-- >              The date and/or time hoses were disconnected.
+-- >       231 Arrival date/time, earliest
+-- >              Date/time of earliest arrival of means of transport.
+-- >       232 Arrival date/time, scheduled
+-- >              Date (and time) of scheduled arrival of means of
+-- >              transport.
+-- >       233 Arrival date/time, ultimate
+-- >              Date (and time) of ultimate arrival of means of
+-- >              transport.
+-- >       234 Collection date/time, earliest
+-- >              The transport order may be issued before the goods are
+-- >              ready for picking up. This date/time indicates from when
+-- >              on the carrier can have access to the consignment.
+-- >       235 Collection date/time, latest
+-- >              In relation with the arrangements agreed between buyer
+-- >              and seller or between sender and main transport it may be
+-- >              necessary to specify the latest collection date/time.
+-- >       236 Completed pumping ballast date/time
+-- >              Date/time at which the intake of materials, to be carried
+-- >              to improve the trim and the stability of the means of
+-- >              transport, was completed.
+-- >       237 Completed tank cleaning date/time
+-- >              The date and/or time tank cleaning was completed.
+-- >       238 Tanks accepted date/time
+-- >              The date and/or time the tanks are to be or have been
+-- >              accepted.
+-- >       239 Tanks inspected date/time
+-- >              The date and/or time the tanks are to be or have been
+-- >              inspected.
+-- >       240 Reinsurance accounting period
+-- >              To identify a reinsurance account period via start and
+-- >              end dates. Note: This period is not the same as
+-- >              "reinsurance current account period".
+-- >       242 Preparation date/time of document
+-- >              Self explanatory.
+-- >       243 Transmission date/time of document
+-- >              Self explanatory.
+-- >       244 Settlement date, planned
+-- >              Self explanatory.
+-- >       245 Underwriting year
+-- >              Year in which the treaty was commenced.
+-- >       246 Accounting year
+-- >              Year considered for accounting of the treaty or portion
+-- >              of the treaty.
+-- >       247 Year of occurrence
+-- >              Year in which a specific event (e.g. a loss) took place.
+-- >       248 Loss date
+-- >              Date on which a referenced (major) loss occurred.
+-- >       249 Cash call date
+-- >              Date on which a cash call was made for a loss suffered
+-- >              and covered.
+-- >       250 Re-exportation date
+-- >              Re-export in case of temporary admission.
+-- >       251 Re-importation date
+-- >              Re-import in case of temporary admission.
+-- >       252 Arrival date/time at initial port
+-- >              Date/time that the conveyance arrives at the initial port
+-- >              in the country of destination.
+-- >       253 Departure date/time from last port of call
+-- >              Date/time that conveyance departed from the last foreign
+-- >              port of call.
+-- >       254 Registration date of previous Customs declaration
+-- >              Registration date of the Customs declaration for the
+-- >              previous Customs procedure either in the same or another
+-- >              country.
+-- >       255 Availability due date
+-- >              Date when ordered items should be available at a
+-- >              specified location.
+-- >       257 Calculation date
+-- >              Self explanatory.
+-- >       258 Guarantee date (Customs)
+-- >              Date when guarantee is placed with Customs.
+-- >       259 Conveyance registration date
+-- >              Date when a vessel, vehicle or other means of transport
+-- >              was registered by a competent authority.
+-- >       260 Valuation date (Customs)
+-- >              Date when Customs valuation was made.
+-- >       261 Release date/time
+-- >              Date/time assigned to identify the release of a set of
+-- >              rules, conditions, conventions, productions, etc.
+-- >       262 Closure date/time/period
+-- >              Date/time/period when an enterprise is closed.
+-- >       263 Invoicing period
+-- >              Period for which an invoice is issued.
+-- >       264 Release frequency
+-- >              Frequency of a release.
+-- >       265 Due date
+-- >              Self explanatory.
+-- >       266 Validation date
+-- >              Self explanatory.
+-- >       267 Rate/price date/time
+-- >              Date/time on which a rate/price is determined.
+-- >       268 Transit time/limits
+-- >              Description to be provided.
+-- >       270 Ship during date
+-- >              The date identifying the period during or in which the
+-- >              goods should be shipped.
+-- >       271 Ship on or about date
+-- >              Date on or about which goods should be shipped.
+-- >       272 Documentary credit presentation period
+-- >              The specification of the period of time, expressed in
+-- >              number of days, after the date of issuance of the
+-- >              transport document(s) within which the documents must be
+-- >              presented.
+-- >       273 Validity period
+-- >              Dates (from/to)/period referenced documents are valid.
+-- >       274 From date of order receipt to sample ready
+-- >              Lead time is the defined timespan.
+-- >       275 From date of tooling authorization to sample ready
+-- >              Lead time is the defined timespan.
+-- >       276 From date of receipt of tooling aids to sample ready
+-- >              Lead time is the defined timespan.
+-- >       277 From date of sample approval to first product shipment
+-- >              Lead time is the defined timespan.
+-- >       278 From date of order receipt to shipment
+-- >              Lead time is the defined timespan.
+-- >       279 From date of order receipt to delivery
+-- >              Lead time is the defined timespan.
+-- >       280 From last booked order to delivery
+-- >              Lead time is the defined timespan.
+-- >       281 Date of order lead time
+-- >              Lead time is referenced to the date of order.
+-- >       282 Confirmation date lead time
+-- >              Lead time is referenced to the date of confirmation.
+-- >       283 Arrival date/time of transport lead time
+-- >              Lead time is referenced to the date a transport will
+-- >              arrive or has arrived.
+-- >       284 Before inventory is replenished based on stock check lead
+-- >           time
+-- >              Lead time is the defined timespan.
+-- >       285 Invitation to tender date/time
+-- >              Date/time on which the invitation to tender has been made
+-- >              available to relevant parties.
+-- >       286 Tender submission date/time
+-- >              Date/time on which the tender was submitted.
+-- >       287 Contract award date/time
+-- >              Date/time on which the contract is awarded to a tenderer.
+-- >       288 Price base date/time
+-- >              Base date/time of prices.
+-- >       290 Contractual start date/time
+-- >              Date/time on which activities stated in the contract must
+-- >              start.
+-- >       291 Start date/time, planned
+-- >              Self explanatory.
+-- >       292 Works completion date/time, planned
+-- >              Self explanatory.
+-- >       293 Works completion date/time, actual
+-- >              Self explanatory.
+-- >       294 Hand over date/time, planned
+-- >              Date/time on which hand over (i.e. the transfer of
+-- >              responsibility for an object or activity such as
+-- >              documentation, system etc. from one party to another) is
+-- >              planned to take place.
+-- >       295 Hand over date/time, actual
+-- >              Date/time on which hand over (i.e. the transfer of
+-- >              responsibility for an object or activity such as
+-- >              documentation, system etc. from one party to another)
+-- >              actually takes place.
+-- >       296 Retention release date/time
+-- >              Date/time on which the retention is released.
+-- >       297 Retention release date/time, partial
+-- >              Date/time on which the retention is partially released.
+-- >       298 Escalation start date
+-- >              Value date of the indexes appearing as denominators in an
+-- >              escalation formula.
+-- >       299 Price adjustment start date
+-- >              Value date of the indexes appearing as denominators in a
+-- >              price adjustment formula.
+-- >       300 Price adjustment limit date
+-- >              Limit value date of indexes used as numerators in a price
+-- >              adjustment formula.
+-- >       301 Value date of index
+-- >              Date of validity of index values.
+-- >       302 Publication date
+-- >              Self explanatory.
+-- >       303 Escalation date
+-- >              Value date of indexes appearing as numerators in an
+-- >              escalation formula.
+-- >       304 Price adjustment date
+-- >              Value date of indexes appearing as numerators in a price
+-- >              adjustment formula.
+-- >       305 Latest price adjustment date
+-- >              Date on which the latest price adjustment took place.
+-- >       306 Work period
+-- >              Period of execution of works.
+-- >       307 Payment instruction date/time
+-- >              Date/time on which a payment instruction was given.
+-- >       308 Payment valuation presentation date/time
+-- >              Date/time on which the payment valuation is presented.
+-- >       309 Blanks value date
+-- >              The date on which the funds are at the disposal of the
+-- >              receiving bank.
+-- >       310 Received date/time
+-- >              Date/time of receipt.
+-- >       311 On
+-- >              Fixed maturity day for deferred payment or time draft(s).
+-- >       312 Ship not before and not after date/time
+-- >              Shipment(s) of goods is/are to be made not before the
+-- >              first specified date/time and not after the second
+-- >              specified date/time.
+-- >       313 Order to proceed date
+-- >              Issue date of an instruction to start work.
+-- >       314 Planned duration of works
+-- >              Self explanatory.
+-- >       315 Agreement to pay date
+-- >              Date on which the debtor agreed to pay.
+-- >       316 Valuation date/time
+-- >              Date/time of valuation.
+-- >       317 Reply date
+-- >              Self explanatory.
+-- >       318 Request date
+-- >              Self explanatory.
+-- >       319 Customer value date
+-- >              Date at which funds are taken into account for interest
+-- >              calculation (in debit or credit).
+-- >       320 Declaration reference period
+-- >              Reference period of a set of items reported on the same
+-- >              declaration.
+-- >       321 Promotion date/period
+-- >              Date/period relevant for specific promotion activities.
+-- >       322 Accounting period
+-- >              Self-explanatory.
+-- >       323 Horizon period
+-- >              Period forming a (planning) horizon.
+-- >       324 Processing date/period
+-- >              Date/period a specific process happened/will happen.
+-- >       325 Tax period
+-- >              Period a tax rate/tax amount etc. is applicable.
+-- >       326 Charge period
+-- >              Period a specified charge is valid for.
+-- >       327 Instalment payment due date
+-- >              Self-explanatory.
+-- >       328 Payroll deduction date/time
+-- >              Date/time of a monetary deduction made from the salary of
+-- >              a person on a payroll.
+-- >       329 Birth date/time
+-- >              Date/time when a person was born.
+-- >       330 Joined employer date
+-- >              Date when a person joins an employer.
+-- >       331 Contributions ceasing date/time
+-- >              Date/time when contributions cease.
+-- >       332 Contribution period end date/time
+-- >              Date/time when a contribution period ends.
+-- >       333 Part-time working change date/time
+-- >              Date/time when the proportion of part-time work changes.
+-- >       334 Status change date/time
+-- >              Date/time when a status changes.
+-- >       335 Contribution period start date/time
+-- >              Date/time when a contribution period commences.
+-- >       336 Salary change effective date
+-- >              Date when a change in salary becomes effective.
+-- >       337 Left employer date
+-- >              Date when a person leaves an employer.
+-- >       338 Benefit change date/time
+-- >              Date/time when a benefit provided by a service provider
+-- >              is changed.
+-- >       339 Category change date/time
+-- >              Date/time when a change of category is made.
+-- >       340 Joined fund date/time
+-- >              Date/time when a person joins a fund.
+-- >       341 Waiting time
+-- >              The period of time between the moment at which one wants
+-- >              an activity to begin and the moment at which this
+-- >              activity can actually begin.
+-- >       342 On-board date
+-- >              The date goods have been loaded on board of a conveyance.
+-- >       343 Date/time of discount termination
+-- >              Date/time when the deduction from an amount comes to an
+-- >              end.
+-- >       344 Date/time of interest due
+-- >              Date/time when the interest has to be paid.
+-- >       345 Days of operation
+-- >              Week days of operation.
+-- >       346 Latest check-in time
+-- >              Latest time of check-in.
+-- >       347 Slaughtering start date
+-- >              Date on which slaughtering commenced.
+-- >       348 Packing start date
+-- >              Date on which packing commenced.
+-- >       349 Packing end date
+-- >              Date on which packing completed.
+-- >       350 Test start date
+-- >              Date when a test has been started.
+-- >       351 Inspection date
+-- >              Date of inspection.
+-- >       352 Slaughtering end date
+-- >              Date on which slaughtering completed.
+-- >       353 Accounting transaction date
+-- >              Date to which an accounting transaction refers.
+-- >       354 Activity period date range
+-- >              A specific date range associated with an activity.
+-- > +     355 Contractual delivery date
+-- >              The date of delivery contractually agreed between
+-- >              parties.
+-- > +     356 Sales date, and or time, and or period
+-- >              The date, and or time, and or period on which a sale took
+-- >              place.
+-- > +     357 Cancel if not published by this date
+-- >              Cancel if not published by this date.
+-- > +     358 Scheduled for delivery on or after
+-- >              Scheduled for delivery on or after the specified date,
+-- >              and or time.
+-- > +     359 Scheduled for delivery on or before
+-- >              Scheduled for delivery on or before specified date and or
+-- >              time.
+-- > +     360 Sell by date
+-- >              The date by which a product should be sold.
+-- > +     361 Best before date
+-- >              The best before date.
+-- > +     362 End availability date
+-- >              The end date of availability.
+-- > +     363 Total shelf life period
+-- >              A period indicating the total shelf life of a product.
+-- > +     364 Minimum shelf life remaining at time of despatch period
+-- >              Period indicating the minimum shelf life remaining for a
+-- >              product at the time of leaving the supplier.
+-- > +     365 Packaging date
+-- >              The date on which the packaging of a product took place.
+-- > +     366 Inventory report date
+-- >              Date on which a inventory report is made.
+-- > +     367 Previous meter reading date
+-- >              Date on which the previous reading of a meter took place.
+-- > +     368 Latest meter reading date
+-- >              Date on which the latest reading of a meter took place.
+-- > +     369 Date and or time of handling, estimated
+-- >              The date and or time when the handling action is
+-- >              estimated to take place.
+-- > +     370 Container equipment domestication date
+-- >              The date on which foreign-built container equipment has
+-- >              entered into the commerce of another country and has
+-- >              become domestic equipment.
+-- > +     371 Hydrotest date
+-- >              The date equipment has been hydrotested.
+-- > +     372 Equipment pre-trip date
+-- >              The date on which equipment is pre-tripped.
+-- > +     373 Mooring, date and time
+-- >              Date and time of mooring.
+-- > +     374 Road fund tax expiry date
+-- >              The date of expiry of the road fund tax.
+-- > +     375 Date of first registration
+-- >              Date of first registration.
+-- > +     376 Bi-annual terminal inspection date
+-- >              The date on which a bi-annual inspection of a terminal
+-- >              has taken or will take place.
+-- > +     377 Federal HighWay Administration (FHWA) inspection date
+-- >              The date on which container equipment is to be or has
+-- >              been inspected in accordance with the requirements of the
+-- >              U.S. Federal Highway Administration.
+-- > +     378 Container Safety Convention (CSC) inspection date
+-- >              The date on which container equipment is to be or has
+-- >              been inspected as per the Container Safety Convention
+-- >              (CSC).
+-- > +     379 Periodic inspection date
+-- >              The date on which a periodic inspection has to take
+-- >              place.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple2005 :: Parser Value
+simple2005 = simple "2005" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S2379.hs b/specification/src/Text/Edifact/D96A/Simples/S2379.hs
new file mode 100644
index 0000000..9bcb1c3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S2379.hs
@@ -0,0 +1,193 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S2379
+  ( simple2379
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   2379  Date/time/period format qualifier
+-- >
+-- >   Desc: Specification of the representation of a date, a date and time
+-- >         or of a period.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         2 DDMMYY
+-- >              Calendar date: D = Day; M = Month; Y = Year.
+-- >         3 MMDDYY
+-- >              Calendar date: M = Month; D = Day; Y = Year.
+-- >       101 YYMMDD
+-- >              Calendar date: Y = Year; M = Month; D = Day.
+-- >       102 CCYYMMDD
+-- >              Calendar date: C = Century ; Y = Year ; M = Month ; D =
+-- >              Day.
+-- >       103 YYWWD
+-- >              Calendar week day: Y = Year ; W = Week ; D = Day Week
+-- >              number 01 is always first week of January Day number 1 is
+-- >              always Monday.
+-- >       105 YYDDD
+-- >              Calendar day: Y = Year ; D = Day January the first = Day
+-- >              001 Always start numbering the days of the year from
+-- >              January 1st through December 31st.
+-- >       106 MMDD
+-- >              Day of a month: M = Month; D = Day.
+-- >       107 DDD
+-- >              Day's number within a specific year: D = Day.
+-- >       108 WW
+-- >              Week's number within a specific year: W = Week.
+-- >       109 MM
+-- >              Month's number within a specific year: M = Month.
+-- >       110 DD
+-- >              Day's number within is a specific month: D = Day.
+-- >       201 YYMMDDHHMM
+-- >              Calendar date including time without seconds: Y = Year; M
+-- >              = Month; D = Day; H = Hour; M = Minute.
+-- >       202 YYMMDDHHMMSS
+-- >              Calendar date including time with seconds: Y = Year; M =
+-- >              Month; D = Day; H = Hour; m = Minutes = Seconds.
+-- >       203 CCYYMMDDHHMM
+-- >              Calendar date including time with minutes: C=Century;
+-- >              Y=Year; M=Month; D=Day; H=Hour; M=Minutes.
+-- >       204 CCYYMMDDHHMMSS
+-- >              Calendar date including time with seconds:
+-- >              C=Century;Y=Year; M=Month;D=Day;H=Hour;M=Minute;S=Second.
+-- >       301 YYMMDDHHMMZZZ
+-- >              See 201 + Z = Time zone.
+-- >       302 YYMMDDHHMMSSZZZ
+-- >              See 202 + Z = Time zone.
+-- >       303 CCYYMMDDHHMMZZZ
+-- >              See 203 plus Z=Time zone.
+-- >       304 CCYYMMDDHHMMSSZZZ
+-- >              See 204 plus Z=Time zone.
+-- >       305 MMDDHHMM
+-- >              Month, day, hours, minutes;
+-- >              M = Month; D = Day; H = Hour; M = Minute.
+-- >       306 DDHHMM
+-- >              Day, hours, minutes;
+-- >              D = Day; H = Hour; M = Minute.
+-- >       401 HHMM
+-- >              Time without seconds: H = Hour; m = Minute.
+-- >       402 HHMMSS
+-- >              Time with seconds: H = Hour; m = Minute; s = Seconds.
+-- >       404 HHMMSSZZZ
+-- >              See 402 plus Z=Time zone.
+-- >       405 MMMMSS
+-- >              Time without hours: m=minutes, s=seconds.
+-- >       501 HHMMHHMM
+-- >              Time span without seconds: H = Hour; m = Minute;.
+-- >       502 HHMMSS-HHMMSS
+-- >              Format of period to be given without hyphen.
+-- >       503 HHMMSSZZZ-HHMMSSZZZ
+-- >              Format of period to be given without hyphen.
+-- >       600 CC
+-- >              Century.
+-- >       601 YY
+-- >              Calendar year: Y = Year.
+-- >       602 CCYY
+-- >              Calendar year including century: C = Century; Y = Year.
+-- >       603 YYS
+-- >              Semester in a calendar year: Y = Year; S = Semester.
+-- >       604 CCYYS
+-- >              Semester in a calendar year: C = Century; Y = Year; S =
+-- >              Semester.
+-- >       608 CCYYQ
+-- >              Quarter in a calendar year: C = Century; Y = Year; Q =
+-- >              Quarter.
+-- >       609 YYMM
+-- >              Month within a calendar year: Y = Year; M = Month.
+-- >       610 CCYYMM
+-- >              Month within a calendar year: CC = Century; Y = Year; M =
+-- >              Month.
+-- >       613 YYMMA
+-- >              Format of period to be given without hyphen (A = ten days
+-- >              period).
+-- >       614 CCYYMMA
+-- >              Format of period to be given without hyphen (A = ten days
+-- >              period).
+-- >       615 YYWW
+-- >              Week within a calendar year: Y = Year; W = Week 1st week
+-- >              of January = week 01.
+-- >       616 CCYYWW
+-- >              Week within a calendar year: CC = Century; Y = Year; W =
+-- >              Week (1st week of January = week 01).
+-- >       701 YY-YY
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       702 CCYY-CCYY
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       703 YYS-YYS
+-- >              Format of period to be given without hyphen.
+-- >       704 CCYYS-CCYYS
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       705 YYPYYP
+-- >              Format of period to be given without hyphen (P = period
+-- >              of 4 months).
+-- >       706 CCYYP-CCYYP
+-- >              Format of period to be given without hyphen (P = period
+-- >              of 4 months).
+-- >       707 YYQ-YYQ
+-- >              Format of period to be given without hyphen.
+-- >       708 CCYYQ-CCYYQ
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       709 YYMM-YYMM
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       710 CCYYMM-CCYYMM
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       711 CCYYMMDD-CCYYMMDD
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       713 YYMMDDHHMM-YYMMDDHHMM
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       715 YYWW-YYWW
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       716 CCYYWW-CCYYWW
+-- >              Format of period to be given without hyphen.
+-- >       717 YYMMDD-YYMMDD
+-- >              Format of period to be given in actual message without
+-- >              hyphen.
+-- >       718 CCYYMMDD-CCYYMMDD
+-- >              Format of period to be given without hyphen.
+-- >       801 Year
+-- >              To indicate a quantity of years.
+-- >       802 Month
+-- >              To indicate a quantity of months.
+-- >       803 Week
+-- >              To indicate a quantity of weeks.
+-- >       804 Day
+-- >              To indicate a quantity of days.
+-- >       805 Hour
+-- >              To indicate a quantity of hours.
+-- >       806 Minute
+-- >              To indicate a quantity of minutes.
+-- >       807 Second
+-- >              To indicate a quantity of seconds.
+-- >       808 Semester
+-- >              To indicate a quantity of semesters (six months).
+-- >       809 Four months period
+-- >              To indicate a quantity of four months periods.
+-- >       810 Trimester
+-- >              To indicate a quantity of trimesters (three months).
+-- >       811 Half month
+-- >              To indicate a quantity of half months.
+-- >       812 Ten days
+-- >              To indicate a quantity of ten days periods.
+-- >       813 Day of the week
+-- >              Numeric representation of the day (Monday = 1).
+-- >       814 Working days
+-- >              Number of working days.
+simple2379 :: Parser Value
+simple2379 = simple "2379" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S2380.hs b/specification/src/Text/Edifact/D96A/Simples/S2380.hs
new file mode 100644
index 0000000..bc38477
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S2380.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S2380
+  ( simple2380
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    2380  Date/time/period
+-- >
+-- >    Desc: The value of a date, a date and time, a time or of a period
+-- >          in a specified representation.
+-- >
+-- >    Repr: an..35
+simple2380 :: Parser Value
+simple2380 = simple "2380" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3035.hs b/specification/src/Text/Edifact/D96A/Simples/S3035.hs
new file mode 100644
index 0000000..6fc0e7a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3035.hs
@@ -0,0 +1,806 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3035
+  ( simple3035
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 3035  Party qualifier
+-- >
+-- >   Desc: Code giving specific meaning to a party.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Party to be billed (AAR Accounting rule 11)
+-- >              Party to be billed in accordance with AAR Accounting rule
+-- >              11.
+-- >    AB     Buyer's agent/representative
+-- >              Third party who arranged the purchase of merchandise on
+-- >              behalf of the actual buyer.
+-- >    AE     Declarant's agent/representative
+-- >              Any natural or legal person who makes a declaration to an
+-- >              official body on behalf of another natural or legal
+-- >              person, where legally permitted (CCC).
+-- >    AF     Transit principal
+-- >              Natural or legal person responsible for the satisfactory
+-- >              performance of a Customs transit operation. Source: CCC.
+-- >    AG     Agent/representative
+-- >              (3196) Party authorized to act on behalf of another
+-- >              party.
+-- >    AH     Transit principal's agent/representative
+-- >              Agent acting on behalf of the transit principal (CCC).
+-- >    AI     Successful job applicant
+-- >              Person who has been chosen for a job.
+-- > +  AJ     Party issuing mutually agreed codes
+-- >              The party which has issued all mutually agreed codes used
+-- >              in the message.
+-- >    AK     Acknowledgement recipient
+-- >              Party to whom acknowledgement should be sent.
+-- >    AL     Principal
+-- >              (3340) Party accepting liability for goods held or moving
+-- >              (e.g. transit) under a Customs authorization and - when
+-- >              applicable - a guarantee.
+-- >    AM     Authorized official
+-- >              Employee of a company or firm authorized to act on behalf
+-- >              of that company or firm e.g. to make a Customs
+-- >              declaration.
+-- >    AN     Approved importer
+-- >              Person or company which is authorised by the relevant
+-- >              Customs authority to import goods without payment all
+-- >              taxes or specific taxes at the point of entry into the
+-- >              country.
+-- >    AO     Account of
+-- >              Party account is assigned to.
+-- >    AP     Accepting party
+-- >              (3352) Party accepting goods, products, services etc.
+-- >    AQ     Approved consignor
+-- >              Person or company approved by the relevant authority in
+-- >              the country to pack and export specific goods under
+-- >              Customs supervision.
+-- >    AR     Authorized exporter
+-- >              Exporter authorized/approved by Customs for special
+-- >              Customs procedures e.g. simplified procedure.
+-- >    AT     Authorized importer
+-- >              Importer authorized/approved by Customs for special
+-- >              Customs procedures e.g. simplified procedure.
+-- >    AU     Authorized trader (transit)
+-- >              Trader authorized/approved by Customs for special transit
+-- >              procedures e.g. simplified procedure.
+-- >    AV     Authorizing official
+-- >              Party that has delegated the authority to take a certain
+-- >              action on behalf of a company or agency.
+-- >    AW     Applicant's bank
+-- >              Financial institution which is requested to issue the
+-- >              documentary credit.
+-- >    AX     Authenticating party
+-- >              Party which certifies that a document is authentic.
+-- >    AZ     Issuing bank
+-- >              Financial institution which issues the documentary
+-- >              credit, if the applicant's bank is not acting as the
+-- >              issuing bank.
+-- >    B1     Contact bank 1
+-- >              Identifies an additional bank which must be informed of
+-- >              certain aspects of the message.
+-- >    B2     Contact bank 2
+-- >              Identifies an additional bank which must be informed of
+-- >              certain aspects of the message.
+-- >    BA     Booking agent
+-- >              Party acting as a booking office for transport and
+-- >              forwarding services.
+-- >    BB     Buyer's bank
+-- >              [3420] Bank employed by the buyer to make payment.
+-- >    BC     Negotiating bank
+-- >              Financial institution to whom a negotiable documentary
+-- >              credit is directed.
+-- >    BD     Documentary credit reimbursing bank
+-- >              Self-explanatory.
+-- >    BE     Beneficiary
+-- >              The ultimate recipient of the funds. Normally the account
+-- >              owner who is reimbursed by the payor.
+-- >    BF     Beneficiary's bank
+-- >              Identifies the account servicer for the beneficiary or
+-- >              the payee.
+-- >    BG     Employer
+-- >              Self-explanatory.
+-- >    BH     Previous employer
+-- >              Previous employer of a person(s).
+-- >    BI     Buyer's financial institution
+-- >              Financial institution designated by buyer to make
+-- >              payment.
+-- >    BK     Financial institution
+-- >              Party acting as financial institution.
+-- >    BL     Bill of lading recipient
+-- >              Party to receive B/L.
+-- >    BM     Insured
+-- >              Party which is the object of an insurance contract.
+-- >    BN     Insurance beneficiary
+-- >              Party which benefits from insurance coverage.
+-- >    BO     Broker or sales office
+-- >              Party acting in the name of the seller as broker or as
+-- >              sales office.
+-- >    BP     Building site purchaser
+-- >              Party at the building site responsible for the purchasing
+-- >              of goods and services for that particular site.
+-- >    BQ     Cheque drawn bank
+-- >              Identifies the bank on which the cheque should be drawn,
+-- >              as instructed by the ordering customer.
+-- >    BS     Bill and ship to
+-- >              Party receiving goods and relevant invoice.
+-- >    BT     Party to be billed for other than freight (bill to)
+-- >              Party receiving invoice excluding freight costs.
+-- >    BU     Service bureau
+-- >              Party carrying out service bureau processing work, (e.g.
+-- >              a payroll bureau).
+-- >    BV     Member
+-- >              Member of a group (e.g. of a group of persons or a
+-- >              service scheme).
+-- >    BW     Borrower
+-- >              Self explanatory.
+-- >    BX     Building site engineer
+-- >              Party at the building site responsible for engineering
+-- >              matters for that particular site.
+-- >    BY     Buyer
+-- >              (3002) Party to which merchandise is sold.
+-- >    BZ     Building site forwarder
+-- >              Party at the building site responsible for forwarding the
+-- >              received goods on that particular site.
+-- >    C1     In care of party no. 1
+-- >              Description to be provided.
+-- >    C2     In care of party no. 2
+-- >              Description to be provided.
+-- >    CA     Carrier
+-- >              (3126) Party undertaking or arranging transport of goods
+-- >              between named points.
+-- >    CB     Customs broker
+-- >              Agent or representative or a professional Customs
+-- >              clearing agent who deals directly with Customs on behalf
+-- >              of the importer or exporter (CCC).
+-- >    CC     Claimant
+-- >              Party who claims goods or insurance.
+-- >    CD     Agent's bank
+-- >              Bank of the agent.
+-- >    CE     Ceding company
+-- >              Description to be provided.
+-- >    CF     Container operator/lessee
+-- >              Party to whom the possession of specified property (e.g.
+-- >              container) has been conveyed for a period of time in
+-- >              return for rental payments.
+-- >    CG     Carrier's agent
+-- >              Party authorized to act for or on behalf of carrier.
+-- >    CH     Connecting carrier
+-- >              Owner or operator of a transportation conveyance to which
+-- >              goods in a given transaction will be transferred.
+-- >    CI     Commission processor
+-- >              Party who provides extra treatment to goods on commission
+-- >              base.
+-- >    CJ     Previous member
+-- >              Previous member of a group of persons or a service
+-- >              scheme.
+-- >    CK     Empty equipment despatch party
+-- >              Party from whose premises empty equipment will be or has
+-- >              been despatched.
+-- >    CL     Container location party
+-- >              Party from whose premises container will be or has been
+-- >              despatched.
+-- >    CM     Customs
+-- >              Identification of customs authority relevant to the
+-- >              transaction or shipment.
+-- >    CN     Consignee
+-- >              (3132) Party to which goods are consigned.
+-- >    CO     Corporate office
+-- >              Identification of the Head Office within a company.
+-- >    COP    Convoying party
+-- >              Party designated to escort the transported goods.
+-- >    CP     Party to receive certificate of compliance
+-- >              Party acting for or on behalf of seller in matters
+-- >              concerning compliance.
+-- >    CPD    Charges payer at destination
+-- >              Party, other than the ordering party, which has to pay
+-- >              the charges concerning the destination operations.
+-- >    CQ     Cheque order
+-- >              Party to which the cheque will be ordered, when different
+-- >              from the beneficiary.
+-- >    CR     Empty equipment return party
+-- >              Party to whose premises empty equipment will be or has
+-- >              been returned.
+-- >    CS     Consolidator
+-- >              Party consolidating various consignments, payments etc.
+-- >    CT     Consignee to be specified
+-- >              Description to be provided.
+-- >    CU     Container return company
+-- >              Description to be provided.
+-- >    CV     Consignee of vessel
+-- >              Description to be provided.
+-- >    CW     Equipment owner
+-- >              Owner of equipment (container, etc.).
+-- >    CX     Consignee's agent
+-- >              Party authorized to act on behalf of the consignee.
+-- >    CY     Commissionable agent
+-- >              IATA cargo agent entitled to commission.
+-- >    CZ     Consignor
+-- >              (3336) Party which, by contract with a carrier, consigns
+-- >              or sends goods with the carrier, or has them conveyed by
+-- >              him. Synonym: shipper, sender.
+-- >    DA     Available with bank (documentary credits)
+-- >              Financial institution with whom the documentary credit is
+-- >              available.
+-- >    DB     Distributor branch
+-- >              The affiliate of a retailer or distributor.
+-- >    DC     Deconsolidator
+-- >              Party that splits up a large consignment composed of
+-- >              separate consignments of goods. The smaller consignments
+-- >              of goods were grouped together into that large
+-- >              consignment for carriage as a larger unit in order to
+-- >              obtain a reduced rate.
+-- >    DCP    Despatch charge payer
+-- >              Party, other than the ordering party, which has to pay
+-- >              the charges concerning the despatch operations.
+-- >    DD     Documentary credit account party's bank
+-- >              Bank of the documentary credit account party.
+-- >    DE     Depositor
+-- >              Party depositing goods, financial payments or documents.
+-- >    DF     Documentary credit applicant
+-- >              Party at whose request the applicant's bank/issuing bank
+-- >              is to issue a documentary credit.
+-- >    DG     Documentary credit beneficiary
+-- >              Party in whose favour the documentary credit is to be
+-- >              issued and the party that must comply with the credit's
+-- >              terms and conditions.
+-- >    DH     Documentary credit account party
+-- >              Party which is responsible for the payment settlement of
+-- >              the documentary credit with the applicant's bank/issuing
+-- >              bank, if different from the documentary credit applicant.
+-- >    DI     Documentary credit second beneficiary
+-- >              Party to whom the documentary credit can be transferred.
+-- >    DJ     Party according to documentary credit transaction
+-- >              Party related to documentary credit transaction.
+-- >    DK     Documentary credit beneficiary's bank
+-- >              Financial institution with which the beneficiary of the
+-- >              documentary credit maintains an account.
+-- >    DL     Factor
+-- >              Company offering a financial service whereby a firm sells
+-- >              or transfers title to its accounts receivable to the
+-- >              factoring company.
+-- >    DM     Party to whom documents are to be presented
+-- >              Self explanatory.
+-- >    DN     Owner of operation
+-- >              Owner of the operation.
+-- >    DO     Document recipient
+-- >              (1370) Party which should receive a specified document.
+-- >    DP     Delivery party
+-- >              (3144) Party to which goods should be delivered, if not
+-- >              identical with consignee.
+-- >    DQ     Owner's agent
+-- >              Person acting on delegation of powers of the owner.
+-- >    DR     Driver
+-- >              Person who drives a means of transport.
+-- >    DS     Distributor
+-- >              Party distributing goods, financial payments or
+-- >              documents.
+-- >    DT     Declarant
+-- >              (3140) Party who makes a declaration to an official body
+-- >              or - where legally permitted - in whose name, or on whose
+-- >              behalf, a declaration to an official body is made.
+-- >    DU     Owner's representative
+-- >              Person commissioned by the owner to represent him in
+-- >              certain circumstances.
+-- >    DV     Project management office
+-- >              Party commissioned by the owner to follow through the
+-- >              execution of all works.
+-- >    DW     Drawee
+-- >              Party on whom drafts must be drawn.
+-- >    DX     Engineer (construction)
+-- >              Party representing the contractor to advise and supervise
+-- >              engineering aspects of the works.
+-- >    DY     Engineer, resident (construction)
+-- >              Party commissioned by the owner to advise and supervise
+-- >              engineering aspects of the works.
+-- >    DZ     Architect
+-- >              Self explanatory.
+-- >    EA     Architect-designer
+-- >              Designer of the construction project.
+-- >    EB     Building inspectorate
+-- >              Party controlling the conformity of works to legal and
+-- >              regulation rules.
+-- >    EC     Exchanger
+-- >              Party exchanging currencies or goods.
+-- >    ED     Engineer, consultant
+-- >              Party providing professional engineering services.
+-- >    EE     Location of goods for customs examination before clearance
+-- >              SE.
+-- >    EF     Project coordination office
+-- >              Party responsible for technical coordination of works.
+-- >    EG     Surveyor, topographical
+-- >              Party responsible for topographical measurements.
+-- >    EH     Engineer, measurement
+-- >              Party responsible for quantity measurements.
+-- >    EI     Controller, quality
+-- >              Party controlling the quality of goods and workmanship
+-- >              for the project.
+-- >    EJ     Surveyor, quantity
+-- >              Party responsible for the quantification and valuation of
+-- >              the works on behalf of the contractor.
+-- >    EK     Surveyor (professional), quantity
+-- >              Party responsible to the owner for the quantification and
+-- >              valuation of the works.
+-- >    EL     Project
+-- >              Party responsible for a project, e.g. a construction
+-- >              project.
+-- >    EM     Party to receive electronic memo of invoice
+-- >              Party being informed about invoice issue (via EDI).
+-- >    EN     Tenderer
+-- >              Firm answering an invitation to tender.
+-- >    EO     Owner of equipment
+-- >              Self explanatory.
+-- >    EP     Equipment drop-off party
+-- >              Self explanatory.
+-- >    EQ     Empty container responsible party
+-- >              Party responsible for the empty container.
+-- >    ER     Empty container return agent
+-- >              Party, designated by owner of containers, responsible for
+-- >              their collection as agreed between the owner and
+-- >              customer/ consignee.
+-- >    ES     Contractor, lead
+-- >              Leader representing a grouping of co-contractors.
+-- >    ET     Co-contractor
+-- >              Member of a grouping of co-contractors.
+-- >    EU     Contractor, general
+-- >              Single contractor for the whole construction project,
+-- >              working by his own or with subcontractors.
+-- >    EV     Subcontractor
+-- >              Firm carrying out a part of the works for a contractor.
+-- >    EW     Subcontractor with direct payment
+-- >              Subcontractor benefiting from direct payments.
+-- >    EX     Exporter
+-- >              (3030) Party who makes - or on whose behalf a Customs
+-- >              clearing agent or other authorized person makes - an
+-- >              export declaration. This may include a manufacturer,
+-- >              seller or other person. Within a Customs union, consignor
+-- >              may have the same meaning as exporter.
+-- >    EY     Subcontractor, nominated
+-- >              Subcontractor authorized by the owner after having been
+-- >              proposed.
+-- >    EZ     Operator, essential services
+-- >              Operator of essential services e.g. water, sewerage
+-- >              system, power.
+-- >    FA     Operator, communication channel
+-- >              Operator of a communication channel.
+-- >    FB     Nominated freight company
+-- >              Party nominated to act as transport company or carrier
+-- >              for the goods.
+-- >    FC     Contractor, main
+-- >              Firm or grouping of co-contractors which has been awarded
+-- >              the contract.
+-- >    FD     Buyer's parent company
+-- >              Parent company, e.g. holding company.
+-- >    FE     Credit rating agency
+-- >              Self explanatory.
+-- >    FF     Factor, correspondent
+-- >              Factoring company engaged by another factoring company to
+-- >              assist the letter with the services provided to the
+-- >              clients (sellers).
+-- >    FG     Buyer as officially registered
+-- >              Buying party as officially registered with government.
+-- >    FH     Seller as officially registered
+-- >              Selling party as officially registered with government.
+-- >    FJ     Trade Union
+-- >              Organisation representing employees.
+-- >    FK     Previous Trade Union
+-- >              Employee organisation who previously represented an
+-- >              employee .
+-- >    FL     Passenger
+-- >              A person conveyed by a means of transport, other than the
+-- >              crew.
+-- >    FM     Crew member
+-- >              A person manning a means of transport.
+-- >    FN     Tariff issuer
+-- >              The issuer of a tariff, e.g. a freight tariff.
+-- >    FO     Party performing inspection
+-- >              Self explanatory.
+-- >    FP     Freight/charges payer
+-- >              Party responsible for the payment of freight.
+-- >    FR     Message from
+-- >              Party where the message comes from.
+-- >    FT     Party responsible for financial settlement
+-- >              (3450) Party responsible for either the transfer or
+-- >              repatriation of the funds relating to a transaction.
+-- >    FW     Freight forwarder
+-- >              Party arranging forwarding of goods.
+-- >    FX     Current receiver
+-- >              Current receiver of the goods in a multi-step
+-- >              transportation process (indirect flow) involving at least
+-- >              one grouping centre.
+-- >    FY     Current sender
+-- >              Current sender of the goods in a multi-step
+-- >              transportation process (indirect flow) involving at least
+-- >              one grouping centre.
+-- >    FZ     Grouping centre
+-- >              A party in charge of groupage, including degroupage and
+-- >              regroupage.
+-- >    GA     Road carrier
+-- >              A road carrier moving cargo.
+-- >    GB     Chamber of commerce
+-- >              Name of the Chamber of Commerce of the town where the
+-- >              company is registered.
+-- >    GC     Goods custodian
+-- >              (3024) Party responsible for the keeping of goods.
+-- >    GD     Producer
+-- >              Party or person who has produced the produce.
+-- >    GE     Registration tribunal
+-- >              Name of the tribunal where the company is registered.
+-- >    GF     Slot charter party
+-- >              An identification code of a participant or user that
+-- >              books slots (space) on a ship, more likely on a long term
+-- >              basis on a series of sailings. He pays for the space
+-- >              whether he uses it or not.
+-- >    GG     Warehouse
+-- >              The name of the warehouse where product is held.
+-- >    GH     Applicant for job
+-- >              A person who applied for a job.
+-- >    GI     Spouse
+-- >              Person is a spouse.
+-- >    GJ     Mother
+-- >              Person is a mother.
+-- >    GK     Father
+-- >              Person is a father.
+-- >    GL     Socially insured person
+-- >              A person who is registered in a social security scheme.
+-- >    GM     Inventory controller
+-- >              To specifically identify the party in charge of inventory
+-- >              control.
+-- >    GN     Processor
+-- >              Party or person who has or will apply a process.
+-- >    GO     Goods owner
+-- >              The party which owns the goods.
+-- >    GP     Packer
+-- >              Party or person who has undertaken or will undertake
+-- >              packing.
+-- >    GQ     Slaughterer
+-- >              Party or person who has undertaken or will undertake a
+-- >              slaughter.
+-- >    GR     Goods releaser
+-- >              (3026) Party entitled to authorize release of goods from
+-- >              custodian.
+-- >    GS     Consignor's representative
+-- >              Party authorised to represent the consignor.
+-- >    GT     Rail carrier
+-- >              A carrier moving cargo, including containers, via rail.
+-- > +  GU     Originator of article number
+-- >              A code identifying the party which created a specific
+-- >              article number.
+-- > +  GV     Procurement responsibility for order
+-- >              A code used to identify the organization which is
+-- >              responsible for the procurement.
+-- > +  GW     Party fulfilling all operations
+-- >              Code indicating the fact that the party identified
+-- >              carries out all operations within that company's
+-- >              activities.
+-- > +  GX     Central catalogue party
+-- >              Party controlling a central catalogue.
+-- > +  GY     Inventory reporting party
+-- >              Party reporting inventory information.
+-- > +  GZ     Substitute supplier
+-- >              Party which may be in a position to supply products or
+-- >              services should the main usual supplier be unable to do
+-- >              so.
+-- >    I1     Intermediary bank 1
+-- >              A financial institution between the ordered bank and the
+-- >              beneficiary's bank.
+-- >    I2     Intermediary bank 2
+-- >              A financial institution between the ordered bank and the
+-- >              beneficiary's bank.
+-- >    IB     Intermediary/broker
+-- >              Description to be provided.
+-- >    IC     Intermediate consignee
+-- >              The intermediate consignee.
+-- > +  ID     Replacing manufacturer
+-- >              A code used to identify a party who replaces the previous
+-- >              party for the manufacture of an article.
+-- > +  IE     Non-resident third party company with whom financial account
+-- >           is held
+-- >              Identifies the non-resident third party company with whom
+-- >              the financial account is held.
+-- > +  IF     Non-resident group company with whom financial account is
+-- >           held
+-- >              Identifies the non-resident group company with whom the
+-- >              financial account is held.
+-- > +  IG     Non-resident beneficiary
+-- >              The ultimate non-resident recipient of the funds.
+-- >              Normally the account owner who is reimbursed by the
+-- >              payor.
+-- > +  IH     Resident beneficiary
+-- >              The ultimate resident recipient of the funds. Normally
+-- >              the account owner who is reimbursed by the payor.
+-- >    II     Issuer of invoice
+-- >              (3028) Party issuing an invoice.
+-- > +  IJ     Non-resident instructing party
+-- >              Indentifies the non-resident party originating the
+-- >              instruction.
+-- > +  IL     Resident instructing party
+-- >              Identifies the resident party originating the
+-- >              instruction.
+-- >    IM     Importer
+-- >              (3020) Party who makes - or on whose behalf a Customs
+-- >              clearing agent or other authorized person makes - an
+-- >              import declaration. This may include a person who has
+-- >              possession of the goods or to whom the goods are
+-- >              consigned.
+-- >    IN     Insurer
+-- >              Description to be provided.
+-- >    IO     Insurance company
+-- >              Description to be provided.
+-- >    IP     Insurance claim adjuster
+-- >              Description to be provided.
+-- > +  IQ     Domestic financial institution
+-- >              Domestic party acting as financial institution.
+-- > +  IR     Non-domestic financial institution
+-- >              Non-domestic party acting as financial institution.
+-- >    IS     Party to receive certified inspection report
+-- >              Party (at buyer) to receive certified inspection report.
+-- >    IT     Installation on site
+-- >              Description to be provided.
+-- > +  IU     Non-resident debtor
+-- >              Non-resident party who makes the payment or against whom
+-- >              a claim exists.
+-- >    IV     Invoicee
+-- >              (3006) Party to whom an invoice is issued.
+-- > +  IW     Non-resident creditor
+-- >              Non-resident party receiving the payment or against whom
+-- >              a liability exists.
+-- >    LA     Party designated to provide living animal care
+-- >              Party responsible to take care of transported living
+-- >              animals.
+-- > +  LB     Coproducer
+-- >              A code used to identify a party who participates in
+-- >              production.
+-- >    LN     Lender
+-- >              Party lending goods or equipments.
+-- >    LP     Loading party
+-- >              Party responsible for the loading when other than
+-- >              carrier.
+-- >    MA     Party for whom item is ultimately intended
+-- >              Self explanatory.
+-- >    MF     Manufacturer of goods
+-- >              Party who manufactures the goods.
+-- >    MG     Party designated to execute re-icing
+-- >              Party designated to execute re-icing, selected in the
+-- >              official list of mandatories competent for this kind of
+-- >              operation.
+-- >    MI     Planning schedule/material release issuer
+-- >              Self explanatory.
+-- >    MP     Manufacturing plant
+-- >              Self explanatory.
+-- >    MR     Message recipient
+-- >              Self explanatory.
+-- >    MS     Document/message issuer/sender
+-- >              Issuer of a document and/or sender of a message.
+-- >    MT     Party designated to execute sanitary procedures
+-- >              Self explanatory.
+-- >    N1     Notify party no. 1
+-- >              Self explanatory.
+-- >    N2     Notify party no. 2
+-- >              Self explanatory.
+-- >    NI     Notify party
+-- >              (3180) Party to be notified of arrival of goods.
+-- >    OA     Break bulk berth operator
+-- >              Party who offers facilities for berthing of vessels,
+-- >              handling and storage of break bulk cargo.
+-- >    OB     Ordered by
+-- >              Party who issued an order.
+-- >    OF     On behalf of
+-- >              Party on behalf of which an action is executed.
+-- >    OI     Outside inspection agency
+-- >              Third party inspecting goods or equipment.
+-- >    OO     Order of shipper
+-- >              Description to be provided.
+-- >    OP     Operator of property or unit
+-- >              Self explanatory.
+-- >    OR     Ordered bank
+-- >              Identifies the account servicer for the ordering customer
+-- >              or payor.
+-- >    OS     Original shipper
+-- >              The original supplier of the goods.
+-- >    OT     Outside test agency
+-- >              Third party testing goods, equipment or services.
+-- >    OV     Owner of means of transport
+-- >              (3126) Party owning the means of transport. No synonym of
+-- >              carrier = CA.
+-- >    OY     Ordering customer
+-- >              Identifies the originator of the instruction.
+-- >    P1     Contact party 1
+-- >              First party to contact.
+-- >    P2     Contact party 2
+-- >              Second party to contact.
+-- >    P3     Contact party 3
+-- >              Third party to contact.
+-- >    P4     Contact party 4
+-- >              Fourth party to contact.
+-- >    PA     Party to receive inspection report
+-- >              Party to whom the inspection report should be sent.
+-- >    PB     Paying financial institution
+-- >              Financial institution designated to make payment.
+-- >    PC     Actual purchaser's customer
+-- >              Party the purchaser within the actual message is selling
+-- >              the ordered goods or services to.
+-- >    PD     Purchaser's department buyer
+-- >              Purchasing department of buyer.
+-- >    PE     Payee
+-- >              Identifies the credit party when other than the
+-- >              beneficiary.
+-- >    PF     Party to receive freight bill
+-- >              Party to whom the freight bill should be sent.
+-- >    PG     Prime contractor
+-- >              Party responsible for the whole project if other than the
+-- >              buyer.
+-- >    PH     Payer's financial institution
+-- >              Self explanatory.
+-- >    PI     Payee's company name/ID
+-- >              Receiving company name/ID (ACH transfers).
+-- >    PJ     Party to receive correspondence
+-- >              Second party designated by a first party to receive
+-- >              certain correspondence in lieu of it being mailed
+-- >              directly to this first party.
+-- >    PK     Contact party
+-- >              Party to contact.
+-- >    PL     Payor
+-- >              Identifies the debit party when other than the ordering
+-- >              customer (for banking purposes).
+-- >    PM     Party to receive paper memo of invoice
+-- >              Party being informed about invoice issue (via paper).
+-- >    PN     Party to receive shipping notice
+-- >              Description to be provided.
+-- >    PO     Ordering party
+-- >              To be used only if ordering party and buyer are not
+-- >              identical.
+-- >    PQ     Certifying party
+-- >              Self explanatory.
+-- >    PR     Payer
+-- >              (3308) Party initiating payment.
+-- >    PS     Payer's company name/ID (Check, Draft or Wire)
+-- >              Self explanatory.
+-- >    PT     Party to receive test report
+-- >              Self explanatory.
+-- >    PW     Despatch party
+-- >              (3282) Party where goods are collected or taken over by
+-- >              the carrier (i.e. if other than consignor).
+-- >    PX     Party to receive all documents
+-- >              Self explanatory.
+-- >    PY     Checking party
+-- >              Party or contact designated on behalf of carrier or his
+-- >              agent to establish the actual figures for quantities,
+-- >              weight, volume and/or (cube) measurements of goods or
+-- >              containers which are to appear in the transport contract
+-- >              and on which charges will be based.
+-- >    PZ     Party to print some document
+-- >              The party that is to print a specific document.
+-- >    RA     Central bank or regulatory authority
+-- >              Identifies central bank or regulatory authority which
+-- >              must be informed of certain aspects of a message.
+-- >    RB     Receiving financial institution
+-- >              Financial institution designated to receive payment.
+-- >    RE     Party to receive commercial invoice remittance
+-- >              Party to whom payment for a commercial invoice or bill
+-- >              should be remitted.
+-- >    RF     Received from
+-- >              Name of a person or department which actually delivers
+-- >              the goods.
+-- >    RH     Seller's financial institution
+-- >              Financial institution designated by seller to receive
+-- >              payment. RDFI (ACH transfers).
+-- >    RI     Reinsurance intermediary/broker
+-- >              Intermediary party between ceding company and
+-- >              reinsurance.
+-- >    RL     Reporting carrier (Customs)
+-- >              Party who makes the cargo report to Customs.
+-- >    RM     Reporting carrier's nominated agent/representative (Customs)
+-- >              Agent who formally makes a cargo report to Customs on
+-- >              behalf of the carrier.
+-- >    RP     Routing party
+-- >              Party responsible for the selection of the carrier(s).
+-- >    RS     Party to receive statement of account
+-- >              Party to whom the statement of account should be sent.
+-- >    RV     Receiver of cheque
+-- >              Identifies the party which is to receive the actual
+-- >              cheque, when different from the receiver of funds.
+-- >    RW     Issuer of waybill
+-- >              Party issuing the contract (waybill) for carriage.
+-- >    SB     Sales responsibility
+-- >              Description to be provided.
+-- >    SE     Seller
+-- >              (3346) Party selling merchandise to a buyer.
+-- >    SF     Ship from
+-- >              Identification of the party from where goods will be or
+-- >              have been shipped.
+-- >    SG     Store group
+-- >              Description to be provided.
+-- >    SI     Shipping schedule issuer
+-- >              Self explanatory.
+-- >    SK     Plant
+-- >              Self explanatory.
+-- >    SN     Store keeper
+-- >              Self explanatory.
+-- >    SO     Sold to if different than bill to
+-- >              Self explanatory.
+-- >    SR     Seller's agent/representative
+-- >              (3254) Party representing the seller for the purpose of
+-- >              the trade transaction.
+-- >    SS     Social securities collector's office
+-- >              Party collecting social securities premiums.
+-- >    ST     Ship to
+-- >              Identification of the party to where goods will be or
+-- >              have been shipped.
+-- >    SU     Supplier
+-- >              (3280) Party which manufactures or otherwise has
+-- >              possession of goods, and consigns or makes them available
+-- >              in trade.
+-- >    SX     Surety for additions
+-- >              Natural of legal person (generally a bank of insurance
+-- >              company) who accepts responsibility in due legal form for
+-- >              the financial guarantee to Customs of the payment of
+-- >              additional duties or fees that become due against a
+-- >              particular shipment, which have not previously been
+-- >              covered by surety.
+-- >    SY     Surety
+-- >              Natural or legal person (generally a bank or insurance
+-- >              company) who accepts responsibility in due legal form for
+-- >              the financial consequences of non-fulfilment of another's
+-- >              obligations to the Customs (CCC).
+-- >    SZ     Surety for antidumping/countervailing duty
+-- >              Natural or legal person that has been contracted by the
+-- >              importer to guarantee to Customs the payment of
+-- >              antidumping and/or countervailing duties that become due
+-- >              against a particular shipment.
+-- >    TC     Tax collector's office
+-- >              Party collecting taxes.
+-- >    TCP    Transit charge payer
+-- >              Party, other than the ordering party, which has to pay
+-- >              the charges concerning the transit operations.
+-- >    TD     Party to receive technical documentation
+-- >              Party to whom technical documentation should be sent.
+-- >    TR     Terminal operator
+-- >              A party which handles the loading and unloading of marine
+-- >              vessels.
+-- >    TS     Party to receive certified test results
+-- >              Party to whom the certified test results should be sent.
+-- >    TT     Transfer to
+-- >              Self-explanatory.
+-- >    UC     Ultimate consignee
+-- >              Party who has been designated on the invoice or packing
+-- >              list as the final recipient of the stated merchandise.
+-- >    UD     Ultimate customer
+-- >              The final recipient of goods.
+-- >    UHP    Unexpected handling party
+-- >              Party authorized (during a voyage) to apply unexpected
+-- >              handling procedures or party having applied these
+-- >              procedures.
+-- >    UP     Unloading party
+-- >              Description to be provided.
+-- >    VN     Vendor
+-- >              Party vending goods or services.
+-- >    WD     Warehouse depositor
+-- >              (3004) Party depositing goods in a warehouse.
+-- >    WH     Warehouse keeper
+-- >              (3022) Party taking responsibility for goods entered into
+-- >              a warehouse.
+-- >    WM     Works manager
+-- >              Self explanatory.
+-- >    WPA    Weighting party
+-- >              Party designated (legally accepted) to ascertain the
+-- >              weight.
+-- >    WS     Wholesaler
+-- >              Seller of articles, often in large quantities, to be
+-- >              retailed by others.
+-- >    XX     No heading
+-- >              Description to be provided.
+-- >    ZZZ    Mutually defined
+-- >              Party specification mutually agreed between interchanging
+-- >              parties.
+simple3035 :: Parser Value
+simple3035 = simple "3035" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3036.hs b/specification/src/Text/Edifact/D96A/Simples/S3036.hs
new file mode 100644
index 0000000..dfdbebf
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3036.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3036
+  ( simple3036
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3036  Party name
+-- >
+-- >    Desc: Name of a party involved in a transaction.
+-- >
+-- >    Repr: an..35
+simple3036 :: Parser Value
+simple3036 = simple "3036" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3039.hs b/specification/src/Text/Edifact/D96A/Simples/S3039.hs
new file mode 100644
index 0000000..59f8e25
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3039.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3039
+  ( simple3039
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3039  Party id. identification
+-- >
+-- >    Desc: Code identifying a party involved in a transaction.
+-- >
+-- >    Repr: an..35
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple3039 :: Parser Value
+simple3039 = simple "3039" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3042.hs b/specification/src/Text/Edifact/D96A/Simples/S3042.hs
new file mode 100644
index 0000000..ba46eb3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3042.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3042
+  ( simple3042
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3042  Street and number/p.o. box
+-- >
+-- >    Desc: Street and number in plain language, or Post Office Box No.
+-- >
+-- >    Repr: an..35
+simple3042 :: Parser Value
+simple3042 = simple "3042" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3045.hs b/specification/src/Text/Edifact/D96A/Simples/S3045.hs
new file mode 100644
index 0000000..a40989a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3045.hs
@@ -0,0 +1,30 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3045
+  ( simple3045
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   3045  Party name format, coded
+-- >
+-- >   Desc: Specification of the representation of a party name.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Name components in sequence as defined in description below
+-- >              Name component 1: Family name Name component 2: Given
+-- >              name or initials Name component 3: Given name or initials
+-- >              Name component 4: Maiden name Name component 5: Title
+-- >              Group of name components transmitted in sequence with
+-- >              name component 1 transmitted first. The maiden name is
+-- >              the family name given at birth of a female. Other names
+-- >              are self-explanatory.
+simple3045 :: Parser Value
+simple3045 = simple "3045" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3055.hs b/specification/src/Text/Edifact/D96A/Simples/S3055.hs
new file mode 100644
index 0000000..66d33ea
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3055.hs
@@ -0,0 +1,414 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3055
+  ( simple3055
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 3055  Code list responsible agency, coded
+-- >
+-- >   Desc: Code identifying the agency responsible for a code list.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 CCC (Customs Co-operation Council)
+-- >              Self explanatory.
+-- >         2 CEC (Commission of the European Communities)
+-- >              Generic: see also 140, 141, 142, 162.
+-- >         3 IATA (International Air Transport Association)
+-- >              Self explanatory.
+-- >         4 ICC (International Chamber of Commerce)
+-- >              Self explanatory.
+-- >         5 ISO (International Organization for Standardization)
+-- >              Self explanatory.
+-- >         6 UN/ECE (United Nations - Economic Commission for Europe)
+-- >              Self explanatory.
+-- >         7 CEFIC (Conseil Europeen des Federations de l'Industrie
+-- >           Chimique)
+-- >              EDI project for chemical industry.
+-- >         8 EDIFICE
+-- >              EDI Forum for companies with Interest in Computing and
+-- >              Electronics (EDI project for EDP/ADP sector).
+-- >         9 EAN (International Article Numbering association)
+-- >              Self explanatory.
+-- >        10 ODETTE
+-- >              Organization for Data Exchange through Tele-Transmission
+-- >              in Europe (European automotive industry project).
+-- >        11 Lloyd's register of shipping
+-- >              Self explanatory.
+-- >        12 UIC (International union of railways)
+-- >              Western and Eastern European railways association (35
+-- >              networks). UIC with its legal body (CIT) produce codes
+-- >              and reglementations that are internationally recognized
+-- >              and accepted by all European railways and official
+-- >              bodies.
+-- >        13 ICAO (International Civil Aviation Organisation)
+-- >              Self explanatory.
+-- >        14 ICS (International Chamber of Shipping)
+-- >              Self explanatory.
+-- >        15 RINET (Reinsurance and Insurance Network)
+-- >              Self explanatory.
+-- >        16 DUNS (Dun & Bradstreet)
+-- >              Self explanatory.
+-- >        17 S.W.I.F.T.
+-- >              Society for Worldwide Interbank Financial
+-- >              Telecommunications s.c.
+-- >        18 Conventions on SAD and transit (EC and EFTA)
+-- >              SAD = Single Administrative Document.
+-- >        19 FRRC (Federal Reserve Routing Code)
+-- >              Self explanatory.
+-- >        20 BIC (Bureau International des Containeurs)
+-- >              Self explanatory.
+-- >        21 Assigned by transport company
+-- >              Codes assigned by a transport company.
+-- >        22 US, ISA (Information Systems Agreement)
+-- >              Codes assigned by the ISA for use by its members.
+-- >        23 FR, EDITRANSPORT
+-- >              French association developing EDI in transport logistics.
+-- >        24 AU, ROA (Railways of Australia)
+-- >              Maintains code lists which are accepted by Australian
+-- >              government railways.
+-- >        25 EDITEX (Europe)
+-- >              EDI group for the textile and clothing industry.
+-- >        26 NL, Foundation Uniform Transport Code
+-- >              Foundation Uniform Transport Code is the EDI organisation
+-- >              for shippers, carriers and other logistic service
+-- >              providers in the Netherlands.
+-- >        27 US, FDA (Food and Drug Administration)
+-- >              U.S. food and drug administration.
+-- >        28 EDITEUR (European book sector electronic data interchange
+-- >           group)
+-- >              Code identifying the pan European user group for the book
+-- >              industry as an organisation responsible for code values
+-- >              in the book industry.
+-- >        29 GB, FLEETNET
+-- >              Association of fleet vehicle hiring and leasing companies
+-- >              in the UK.
+-- >        30 GB, ABTA (Association of British Travel Agencies)
+-- >              ABTA, Association of British Travel Agencies.
+-- >        31 FI, Finish State Railway
+-- >              Finish State Railway.
+-- >        32 PL, Polish State Railway
+-- >              Polish State Railway.
+-- >        33 BG, Bulgaria State Railway
+-- >              Bulgaria State Railway.
+-- >        34 RO, Rumanian State Railway
+-- >              Rumanian State Railway.
+-- >        35 CZ, Tchechian State Railway
+-- >              Tchechian State Railway.
+-- >        36 HU, Hungarian State Railway
+-- >              Hungarian State Railway.
+-- >        37 GB, British Railways
+-- >              British Railways.
+-- >        38 ES, Spanish National Railway
+-- >              Spanish National Railway.
+-- >        39 SE, Swedish State Railway
+-- >              Swedish State Railway.
+-- >        40 NO, Norwegian State Railway
+-- >              Norwegian State Railway.
+-- >        41 DE, German Railway
+-- >              German Railway.
+-- >        42 AT, Austrian Federal Railways
+-- >              Austrian Federal Railways.
+-- >        43 LU, Luxembourg National Railway Company
+-- >              Luxembourg National Railway Company.
+-- >        44 IT, Italian State Railways
+-- >              Italian State Railways.
+-- >        45 NL, Netherlands Railways
+-- >              Netherlands Railways.
+-- >        46 CH, Swiss Federal Railways
+-- >              Swiss Federal Railways.
+-- >        47 DK, Danish State Railways
+-- >              Danish State Railways.
+-- >        48 FR, French National Railway Company
+-- >              French National Railway Company.
+-- >        49 BE, Belgian National Railway Company
+-- >              Belgian National Railway Company.
+-- >        50 PT, Portuguese Railways
+-- >              Portuguese Railways.
+-- >        51 SK, Slovacian State Railways
+-- >              Slovacian State Railways.
+-- >        52 IE, Irish Transport Company
+-- >              Irish Transport Company.
+-- >        53 FIATA (International Federation of Freight Forwarders
+-- >           Associations)
+-- >              International Federation of Freight Forwarders
+-- >              Associations.
+-- >        54 IMO (International Maritime Organisation)
+-- >              International Maritime Organisation.
+-- >        55 US, DOT (United States Department of Transportation)
+-- >              United States Department of Transportation.
+-- > |      56 TW, Trade-van
+-- >              Trade-van is an EDI/VAN service centre for customs,
+-- >              transport, and insurance in national and international
+-- >              trade.
+-- >        57 TW, Chinese Taipei Customs
+-- >              Customs authorities of Chinese Taipei responsible for
+-- >              collecting import duties and preventing smuggling.
+-- >        58 EUROFER
+-- >              European steel organisation - EDI project for the
+-- >              European steel industry.
+-- >        59 DE, EDIBAU
+-- >              National body responsible for the German codification in
+-- >              the construction area.
+-- > +      60 Assigned by national trade agency
+-- >              The code list is from a national agency.
+-- > +      61 Association Europeenne des Constructeurs de Materiel
+-- >           Aerospatial (AECMA)
+-- >              A code to identify the Association Europeenne des
+-- >              Constructeurs de Materiel Aeropsatial (European
+-- >              Association of Aerospace Products Manufacturers) as an
+-- >              authorizing agency for code lists.
+-- > +      62 US, DIstilled Spirits Council of the United States (DISCUS)
+-- >              United States DIstilled Spirits Council of the United
+-- >              States (DISCUS).
+-- > +      63 North Atlantic Treaty Organization (NATO)
+-- >              A code to identify the North Atlantic Treaty Organization
+-- >              (NATO) as an authorizing agency for code lists.
+-- > +      64 FR, EDIFRANCE
+-- >              French association responsible for coordination and
+-- >              promotion of EDI application in France.
+-- > +      65 FR, GENCOD
+-- >              French organization responsible for EDI and Barcoding
+-- >              application in the retail sector.
+-- > +      66 MY, Malaysian Customs and Excise
+-- >              Malaysia Royal Customs and Excise.
+-- > +      67 MY, Malaysia Central Bank
+-- >              Malaysia Central Bank is a regulatory body set up by the
+-- >              government to charge with promoting economic monetary and
+-- >              credit condition favourable to commercial and industrial
+-- >              activity.
+-- > +      68 US, Bureau of Alcohol, Tobacco and Firearms (BATF)
+-- >              United States Bureau of Alcohol, Tobacco and Firearms
+-- >              (BATF).
+-- > +      69 US, National Alcohol Beverage Control Association (NABCA)
+-- >              United States National Alcohol Beverage Control
+-- >              Association (NABCA).
+-- > +      70 MY, Dagang.Net
+-- >              Malaysia, Dagang.Net is a national clearing house which
+-- >              provide EDI/VAN service for customs, transport, retail
+-- >              and financial and other industries in the national and
+-- >              international trade.
+-- >        86 Assigned by party originating the message
+-- >              Codes assigned by the party originating the message.
+-- >        87 Assigned by carrier
+-- >              Codes assigned by the carrier.
+-- >        88 Assigned by owner of operation
+-- >              Assigned by owner of operation (e.g. used in
+-- >              construction).
+-- >        89 Assigned by distributor
+-- >              Self explanatory.
+-- >        90 Assigned by manufacturer
+-- >              Self explanatory.
+-- >        91 Assigned by seller or seller's agent
+-- >              Self explanatory.
+-- >        92 Assigned by buyer or buyer's agent
+-- >              Self explanatory.
+-- >        93 AT, Austrian Customs
+-- >              Self explanatory.
+-- >        94 AT, Austrian PTT
+-- >              Self explanatory.
+-- >        95 AU, Australian Customs Services
+-- >              Self explanatory.
+-- >        96 CA, Revenue Canada, Customs and Excise
+-- >              Self explanatory.
+-- >        97 CH, Administration federale des contributions
+-- >              Indirect taxation (e.g. turn-over/sales taxes).
+-- >        98 CH, Direction generale des douanes
+-- >              Customs (incl. ISO alpha 2 country code).
+-- >        99 CH, Division des importations et exportations, OFAEE
+-- >              Import and export licences.
+-- >       100 CH, Entreprise des PTT
+-- >              Telephone (voice/data) + telex numbers, postcodes, postal
+-- >              account numbers.
+-- >       101 CH, Carbura
+-- >              Centrale suisse pour l'importation de carburants et
+-- >              combustibles liquides (Oil products).
+-- >       102 CH, Centrale suisse pour l'importation du charbon
+-- >              Coal.
+-- >       103 CH, Office fiduciaire des importateurs de denrees
+-- >           alimentaires
+-- >              Foodstuff.
+-- >       104 CH, Association suisse code des articles
+-- >              Swiss article numbering association.
+-- >       105 DK, Ministry of taxation, Central Customs and Tax
+-- >           Administration
+-- >              Danish Customs administration.
+-- >       106 FR, Direction generale des douanes et droits indirects
+-- >              French Customs.
+-- >       107 FR, INSEE
+-- >              Institut National de la Statistique et des Etudes
+-- >              Economiques.
+-- >       108 FR, Banque de France
+-- >              Self explanatory.
+-- >       109 GB, H.M. Customs & Excise
+-- >              Self explanatory.
+-- >       110 IE, Revenue Commissionners, Customs AEP project
+-- >              Self explanatory.
+-- >       111 US, U.S. Customs Service
+-- >              Self explanatory.
+-- >       112 US, U.S. Census Bureau
+-- >              The Bureau of the Census of the U.S. Dept. of Commerce.
+-- >       113 US, UPC (Uniform product code)
+-- >              Self explanatory.
+-- >       114 US, ABA (American Bankers Association)
+-- >              Self explanatory.
+-- >       115 US, DODAAC (Department Of Defense Active Agency Code)
+-- >              Self explanatory.
+-- >       116 US, ANSI ASC X12
+-- >              American National Standards Institute ASC X12.
+-- >       117 AT, Geldausgabeautomaten-Service Gesellschaft m.b.H.
+-- >              Description to be provided.
+-- >       118 SE, Svenska Bankfoereningen
+-- >              Swedish bankers association.
+-- >       119 IT, Associazione Bancaria Italiana
+-- >              Self explanatory.
+-- >       120 IT, Socieata' Interbancaria per l'Automazione
+-- >              Self explanatory.
+-- >       121 CH, Telekurs AG
+-- >              Self explanatory.
+-- >       122 CH, Swiss Securities Clearing Corporation
+-- >              Self explanatory.
+-- >       123 NO, Norwegian Interbank Research Organization
+-- >              Self explanatory.
+-- >       124 NO, Norwegian Bankers Ass.
+-- >              Self explanatory.
+-- >       125 FI, The Finnish Bankers' Association
+-- >              Self explanatory.
+-- >       126 US, NCCMA (Account Analysis Codes)
+-- >              Self explanatory.
+-- >       128 BE, Belgian Bankers' Association
+-- >              Self explanatory.
+-- >       129 BE, Belgian Ministry of Finance
+-- >              VAT numbers.
+-- >       130 DK, PBS (Pengainstitutternes Betalings Service)
+-- >              Self explanatory.
+-- >       131 DE, German Bankers Association
+-- >              Self explanatory.
+-- >       132 GB, BACS Limited
+-- >              Self explanatory.
+-- >       133 GB, Association for Payment Clearing Services
+-- >              Self explanatory.
+-- >       134 GB, CHAPS and Town Clearing Company Ltd.
+-- >              Self explanatory.
+-- >       135 GB, The Clearing House
+-- >              Self explanatory.
+-- > |     136 GB, Article Number Association (UK) Limited
+-- >              EAN bar-coding.
+-- >       137 AT, Verband oesterreichischer Banken und Bankiers
+-- >              Austrian bankers association.
+-- >       138 FR, CFONB (Comite francais d'organ. et de normalisation
+-- >           bancaires)
+-- >              National body responsible for the french codification in
+-- >              banking activity.
+-- >       139 UPU (Universal Postal Union)
+-- >              (a..3 country code).
+-- >       140 CEC (Commission of the European Communities), DG/XXI-01
+-- >              (Computerization within Customs area).
+-- >       141 CEC (Commission of the European Communities), DG/XXI-B-1
+-- >              Description to be provided.
+-- >       142 CEC (Commission of the European Communities), DG/XXXIV
+-- >              Statistical Office of the European Communities: e.g.
+-- >              Geonomenclature.
+-- >       143 NZ, New Zealand Customs
+-- >              Self explanatory.
+-- >       144 NL, Netherlands Customs
+-- >              Self explanatory.
+-- >       145 SE, Swedish Customs
+-- >              Self explanatory.
+-- >       146 DE, German Customs
+-- >              Self explanatory.
+-- >       147 BE, Belgian Customs
+-- >              Self explanatory.
+-- >       148 ES, Spanish Customs
+-- >              Self explanatory.
+-- >       149 IL, Israel Customs
+-- >              Self explanatory.
+-- >       150 HK, Hong Kong Customs
+-- >              Self explanatory.
+-- >       151 JP, Japan Customs
+-- >              Self explanatory.
+-- >       152 SA, Saudi Arabia Customs
+-- >              Self explanatory.
+-- >       153 IT, Italian Customs
+-- >              Self explanatory.
+-- >       154 GR, Greek Customs
+-- >              Self explanatory.
+-- >       155 PT, Portuguese Customs
+-- >              Self explanatory.
+-- >       156 LU, Luxembourg Customs
+-- >              Self explanatory.
+-- >       157 NO, Norwegian Customs
+-- >              Self explanatory.
+-- >       158 FI, Finnish Customs
+-- >              Self explanatory.
+-- >       159 IS, Iceland Customs
+-- >              Self explanatory.
+-- >       160 LI, Liechtenstein authority
+-- >              (Identification of relevant responsible agency for e.g.
+-- >              banking/financial matters still pending. For e.g.
+-- >              Customs, currency, post/telephone: see relevant CH
+-- >              entry).
+-- >       161 UNCTAD (United Nations - Conference on Trade And
+-- >           Development)
+-- >              Self explanatory.
+-- >       162 CEC (Commission of the European Communities), DG/XIII-D-5
+-- >              (TEDIS - incl. CEBIS -, INSIS and CADDIA projects).
+-- >       163 US, FMC (Federal Maritime Commission)
+-- >              Self explanatory.
+-- >       164 US, DEA (Drug Enforcement Agency)
+-- >              Self explanatory.
+-- >       165 US, DCI (Distribution Codes, INC.)
+-- >              Self explanatory.
+-- >       166 US, National Motor Freight Classification Association
+-- >              Self explanatory.
+-- >       167 US, AIAG (Automotive Industry Action Group)
+-- >              Self explanatory.
+-- >       168 US, FIPS (Federal Information Publishing Standard)
+-- >              Self explanatory.
+-- >       169 CA, SCC (Standards Council of Canada)
+-- >              Self explanatory.
+-- >       170 CA, CPA (Canadian Payment Association)
+-- >              Self explanatory.
+-- >       171 NL, Bank Girocentrale BV
+-- >              Self explanatory.
+-- >       172 NL, BEANET BV
+-- >              Self explanatory.
+-- >       173 NO, NORPRO
+-- >              Self explanatory.
+-- >       174 DE, DIN (Deutsches Institut fuer Normung)
+-- >              German standardization institute.
+-- >       175 FCI (Factors Chain International)
+-- >              Self explanatory.
+-- >       176 BR, Banco Central do Brazil
+-- >              Self-explanatory.
+-- >       177 AU, LIFA (Life Insurance Federation of Australia)
+-- >              Life Insurance Federation of Australia.
+-- >       178 AU, SAA (Standards Association of Australia)
+-- >              Standards Association of Australia.
+-- >       179 US, Air transport association of America
+-- >              U.S. -based trade association representing the major
+-- >              North American scheduled airlines.
+-- >       181 Edibuild
+-- >              EDI organization for companies in the construction
+-- >              industry.
+-- >       182 US, Standard Carrier Alpha Code (Motor)
+-- >              Organisation maintaining the SCAC lists and
+-- >              transportation operating in North America.
+-- >       183 US, American Petroleum Institute
+-- >              US-based trade association representing oil and natural
+-- >              gas producers, shippers, refineries, marketers, and major
+-- >              suppliers to the industry.
+-- >       184 AU, ACOS (Australian Chamber of Shipping)
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple3055 :: Parser Value
+simple3055 = simple "3055" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3124.hs b/specification/src/Text/Edifact/D96A/Simples/S3124.hs
new file mode 100644
index 0000000..5cbf2e0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3124.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3124
+  ( simple3124
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3124  Name and address line
+-- >
+-- >    Desc: Free form name and address description.
+-- >
+-- >    Repr: an..35
+simple3124 :: Parser Value
+simple3124 = simple "3124" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3127.hs b/specification/src/Text/Edifact/D96A/Simples/S3127.hs
new file mode 100644
index 0000000..8165d2e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3127.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3127
+  ( simple3127
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3127  Carrier identification
+-- >
+-- >    Desc: Identification of party undertaking or arranging transport of
+-- >          goods between named points.
+-- >
+-- >    Repr: an..17
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple3127 :: Parser Value
+simple3127 = simple "3127" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3128.hs b/specification/src/Text/Edifact/D96A/Simples/S3128.hs
new file mode 100644
index 0000000..36f979b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3128.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3128
+  ( simple3128
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3128  Carrier name
+-- >
+-- >    Desc: Name of party undertaking or arranging transport of goods
+-- >          between named points.
+-- >
+-- >    Repr: an..35
+simple3128 :: Parser Value
+simple3128 = simple "3128" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3139.hs b/specification/src/Text/Edifact/D96A/Simples/S3139.hs
new file mode 100644
index 0000000..50ffe3f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3139.hs
@@ -0,0 +1,246 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3139
+  ( simple3139
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   3139  Contact function, coded
+-- >
+-- >   Desc: Code specifying the function of a contact (e.g. department or
+-- >         person).
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Insurance contact
+-- >              Department/person to contact for matters regarding
+-- >              insurance.
+-- >    AB     Workshop contact
+-- >              Department/person to contact for matters regarding the
+-- >              workshop.
+-- >    AC     Accepting contact
+-- >              Department/person in charge of accepting incoming goods.
+-- >    AD     Accounting contact
+-- >              Department/person responsible for the accounts payable
+-- >              function within a corporation.
+-- >    AE     Contract contact
+-- >              Department/person to contact for matters regarding
+-- >              contracts.
+-- >    AF     Land registry contact
+-- >              Department/person to contact for matters regarding land
+-- >              registry.
+-- >    AG     Agent
+-- >              Department/person of the agent which acts on behalf of
+-- >              another party.
+-- >    AH     Coordination contact
+-- >              Department/person to contact for matters regarding
+-- >              technical coordination of works.
+-- >    AI     Project management contact
+-- >              Department/person to contact for matters regarding
+-- >              project management on behalf of the contractor.
+-- >    AJ     Investment contact
+-- >              Department/person to contact for matters regarding
+-- >              investments.
+-- >    AK     Works management contact
+-- >              Department/person to contact for matters regarding
+-- >              management of works on behalf of the owner.
+-- >    AL     Personnel contact
+-- >              Department/person to contact for matters regarding
+-- >              personnel (human resources).
+-- >    AM     Claims contact
+-- >              Department/person to contact for matters regarding
+-- >              claims.
+-- >    AN     Laboratory contact
+-- >              Department/person to contact for laboratory matters.
+-- >    AO     Plant/equipment contact
+-- >              Department/person to contact for matters regarding
+-- >              plant/equipment.
+-- >    AP     Accounts payable contact
+-- >              Department/person responsible for the accounts payable
+-- >              function within a corporation.
+-- >    AQ     Quantity surveyor contact
+-- >              Department/person to contact for matters regarding
+-- >              quantity surveying.
+-- >    AR     Accounts receivable contact
+-- >              Department/person responsible for the accounts receivable
+-- >              within a corporation.
+-- >    AS     Public relations contact
+-- >              Department/person to contact for matters regarding public
+-- >              relations.
+-- >    AT     Technical contact
+-- >              Department/person to contact for matters regarding
+-- >              technical issues.
+-- >    AU     City works authority contact
+-- >              Department/person to contact for matters regarding city
+-- >              works.
+-- >    AV     Maintenance contact
+-- >              Department/person to contact for matters regarding
+-- >              maintenance.
+-- >    AW     Town planning contact
+-- >              Department/person to contact for matters regarding town `
+-- >              planning.
+-- >    AX     Traffic authority contact
+-- >              Department/person to contact for matters regarding
+-- >              traffic.
+-- >    AY     Electricity supply contact
+-- >              Department/person to contact for matters regarding
+-- >              electricity supply.
+-- >    AZ     Gas supply contact
+-- >              Department/person to contact for matters regarding gas
+-- >              supply.
+-- >    BA     Water supply contact
+-- >              Department/person to contact for matters regarding water
+-- >              supply.
+-- >    BB     Telecommunications network contact
+-- >              Department/person to contact for matters regarding
+-- >              telecommunications network.
+-- >    BC     Banking contact
+-- >              Contact person for bank.
+-- >    BD     New developments contact
+-- >              Department/person to contact for matters regarding new
+-- >              developments (e.g. construction).
+-- >    BE     Transport infrastructure authority
+-- >              Department/person to contact for matters regarding
+-- >              transport infrastructure.
+-- >    BF     Service contact
+-- >              Department/person to be contacted in service matters.
+-- >    BU     Ultimate consignee
+-- >              Department/designated on the invoice or packing list as
+-- >              the final recipient of the stated merchandise.
+-- >    CA     Carrier
+-- >              (3126) Party undertaking or arranging transport of goods
+-- >              between named points.
+-- >    CB     Changed by
+-- >              Person who made the change.
+-- >    CC     Responsible person for information production
+-- >              Responsible person to contact for matters regarding the
+-- >              production of information.
+-- >    CD     Responsible person for information dissemination
+-- >              Responsible person to contact for matters regarding
+-- >              information dissemination.
+-- >    CE     Head of unit for computer data processing
+-- >              Head of unit to contact for matters regarding computer
+-- >              data processing.
+-- >    CF     Head of unit for information production
+-- >              Head of unit to contact for matters regarding the
+-- >              production of information.
+-- >    CG     Head of unit for information dissemination
+-- >              Head of unit to contact for matters regarding
+-- >              dissemination of information.
+-- >    CN     Consignee
+-- >              (3132) Party to which goods are consigned.
+-- >    CO     Consignor
+-- >              (3336) Party which, by contract with a carrier, consigns
+-- >              or sends goods with the carrier, or has them conveyed by
+-- >              him. Synonym: shipper/sender.
+-- >    CP     Responsible person for computer data processing
+-- >              Responsible person to contact for matters regarding
+-- >              computer data processing.
+-- >    CR     Customer relations
+-- >              Individual responsible for customer relations.
+-- >    CW     Confirmed with
+-- >              Person with whom the contents of the purchase order has
+-- >              been discussed and agreed (e.g. by telephone) prior to
+-- >              the sending of this message.
+-- >    DE     Department/employee to execute export procedures
+-- >              Self explanatory.
+-- >    DI     Department/employee to execute import procedures
+-- >              Self explanatory.
+-- >    DL     Delivery contact
+-- >              Department/person responsible for delivery.
+-- >    EB     Entered by
+-- >              Name of an individual who made the entry.
+-- >    EC     Education coordinator
+-- >              Person in charge of coordination of education.
+-- >    ED     Engineering contact
+-- >              Department/person to contact for matters regarding
+-- >              engineering.
+-- >    EX     Expeditor
+-- >              Party to be contacted where goods are (to be) expedited.
+-- >    GR     Goods receiving contact
+-- >              Department/person responsible for receiving the goods at
+-- >              the place of delivery.
+-- >    HE     Emergency dangerous goods contact
+-- >              Party who is to be contacted to intervene in case of
+-- >              emergency.
+-- >    HG     Dangerous goods contact
+-- >              Department/person to be contacted for details about the
+-- >              transportation of dangerous goods/hazardous material.
+-- >    HM     Hazardous material contact
+-- >              Department/person responsible for hazardous material
+-- >              control.
+-- >    IC     Information contact
+-- >              Department/person to contact for questions regarding
+-- >              transactions.
+-- >    IN     Insurer contact
+-- >              Self explanatory.
+-- >    LB     Place of delivery contact
+-- >              Self explanatory.
+-- >    LO     Place of collection contact
+-- >              Self explanatory.
+-- >    MC     Material control contact
+-- >              Department/person responsible for the
+-- >              controlling/inspection of goods.
+-- >    MD     Material disposition contact
+-- >              Department/person responsible for the
+-- >              disposition/scheduling of goods.
+-- >    MH     Material handling contact
+-- >              Self explanatory.
+-- >    MR     Message recipient contact
+-- >              Self explanatory.
+-- >    MS     Message sender contact
+-- >              Self explanatory.
+-- >    NT     Notification contact
+-- >              Self explanatory.
+-- >    OC     Order contact
+-- >              An individual to contact for questions regarding this
+-- >              order.
+-- >    PA     Prototype coordinator
+-- >              Description to be provided.
+-- >    PD     Purchasing contact
+-- >              Department/person responsible for issuing this purchase
+-- >              order.
+-- >    PE     Payee contact
+-- >              Self explanatory.
+-- >    PM     Product management contact
+-- >              Department/person to contact for questions regarding this
+-- >              order.
+-- >    QA     Quality assurance contact
+-- >              Quality assurance contact within an organization.
+-- >    QC     Quality coordinator contact
+-- >              Quality coordinator contact within an organization.
+-- >    RD     Receiving dock contact
+-- >              The receiving dock contact within an organization.
+-- >    SA     Sales administration
+-- >              Name of the sales administration contact within a
+-- >              corporation.
+-- >    SC     Schedule contact
+-- >              Name of the scheduling contact within a corporation.
+-- >    SD     Shipping contact
+-- >              The shipping department contact within an organization.
+-- >    SR     Sales representative or department
+-- >              The sales representative or department contact within an
+-- >              organization.
+-- >    SU     Supplier contact
+-- >              Department/person to be contacted at the supplier.
+-- >    TA     Traffic administrator
+-- >              The traffic administrator contact within an organization.
+-- >    TD     Test contact
+-- >              Department/person responsible for testing contact.
+-- >    TI     Technical documentation recipient
+-- >              Department/person to receive technical documentation.
+-- >    TR     Transport contact
+-- >              Department/person in charge of transportation.
+-- >    WH     Warehouse
+-- >              The warehouse contact within an organization.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple3139 :: Parser Value
+simple3139 = simple "3139" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3148.hs b/specification/src/Text/Edifact/D96A/Simples/S3148.hs
new file mode 100644
index 0000000..3b7ee09
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3148.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3148
+  ( simple3148
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > *| 3148  Communication number
+-- >
+-- > |  Desc: The communication number.
+-- >
+-- >    Repr: an..512
+simple3148 :: Parser Value
+simple3148 = simple "3148" (alphaNumeric `upTo` 512)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3153.hs b/specification/src/Text/Edifact/D96A/Simples/S3153.hs
new file mode 100644
index 0000000..5f938af
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3153.hs
@@ -0,0 +1,85 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3153
+  ( simple3153
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   3153  Communication channel identifier, coded
+-- >
+-- >   Desc: Code identifying the type of communication channel being used.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Circuit switching
+-- >              A process that, on demand, connects two or more data
+-- >              terminal equipments and permits the exclusive use of a
+-- >              data circuit between them until the connection is
+-- >              released (ISO).
+-- >    AB     SITA
+-- >              Communications number assigned by Societe Internationale
+-- >              de Telecommunications Aeronautiques (SITA).
+-- >    AC     ARINC
+-- >              Communications number assigned by Aeronautical Radio Inc.
+-- >    CA     Cable address
+-- >              Self explanatory.
+-- >    EI     EDI transmission
+-- >              Number identifying the service and service user.
+-- >    EM     Electronic mail
+-- >              Creating/sending/receiving of unstructured free text
+-- >              messages or documents using computer network, a mini-
+-- >              computer or an attached modem and regular telephone line
+-- >              or other electronic transmission media.
+-- >    EX     Extension
+-- >              Telephone extension.
+-- >    FT     File transfer access method
+-- >              According to ISO.
+-- >    FX     Telefax
+-- >              Device used for transmitting and reproducing fixed
+-- >              graphic material (as printing) by means of signals over
+-- >              telephone lines or other electronic transmission media.
+-- >    GM     GEIS (General Electric Information Service) mailbox
+-- >              Self explanatory.
+-- >    IE     IBM information exchange
+-- >              Self explanatory.
+-- >    IM     Internal mail
+-- >              Internal mail address/number.
+-- >    MA     Mail
+-- >              Postal service document delivery.
+-- >    PB     Postbox no.
+-- >              Self explanatory.
+-- >    PS     Packet switching
+-- >              The process of routing and transferring data by means of
+-- >              addressed packets so that a channel is occupied only
+-- >              during the transmission; upon completion of the
+-- >              transmission the channel is made available for the
+-- >              transfer of other packets (ISO).
+-- >    SW     S.W.I.F.T.
+-- >              Communications address assigned by Society for Worldwide
+-- >              Interbank Financial Telecommunications s.c.
+-- >    TE     Telephone
+-- >              Voice/data transmission by telephone.
+-- >    TG     Telegraph
+-- >              Text transmission via telegraph.
+-- >    TL     Telex
+-- >              Transmission of text/data via telex.
+-- >    TM     Telemail
+-- >              Transmission of text/data via telemail.
+-- >    TT     Teletext
+-- >              Transmission of text/data via teletext.
+-- >    TX     TWX
+-- >              Communication service involving Teletypewriter machines
+-- >              connected by wire or electronic transmission media.
+-- >              Teletypewriter machines are the devices used to send and
+-- >              receive signals and produce hardcopy from them.
+-- >    XF     X.400
+-- >              CCITT Message handling system.
+simple3153 :: Parser Value
+simple3153 = simple "3153" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3155.hs b/specification/src/Text/Edifact/D96A/Simples/S3155.hs
new file mode 100644
index 0000000..edfabbb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3155.hs
@@ -0,0 +1,89 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3155
+  ( simple3155
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   3155  Communication channel qualifier
+-- >
+-- >   Desc: Code identifying the type of communication channel being used.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Circuit switching
+-- >              A process that, on demand, connects two or more data
+-- >              terminal equipments and permits the exclusive use of a
+-- >              data circuit between them until the connection is
+-- >              released (ISO).
+-- >    AB     SITA
+-- >              Communications number assigned by Societe Internationale
+-- >              de Telecommunications Aeronautiques (SITA).
+-- >    AC     ARINC
+-- >              Communications number assigned by Aeronautical Radio Inc.
+-- >    AD     AT&T mailbox
+-- >              AT&T mailbox identifier.
+-- >    AE     Peripheral device
+-- >              Peripheral device identification.
+-- >    CA     Cable address
+-- >              Self explanatory.
+-- >    EI     EDI transmission
+-- >              Number identifying the service and service user.
+-- >    EM     Electronic mail
+-- >              Creating/sending/receiving of unstructured free text
+-- >              messages or documents using computer network, a mini-
+-- >              computer or an attached modem and regular telephone line
+-- >              or other electronic transmission media.
+-- >    EX     Extension
+-- >              Telephone extension.
+-- >    FT     File transfer access method
+-- >              According to ISO.
+-- >    FX     Telefax
+-- >              Device used for transmitting and reproducing fixed
+-- >              graphic material (as printing) by means of signals over
+-- >              telephone lines or other electronic transmission media.
+-- >    GM     GEIS (General Electric Information Service) mailbox
+-- >              Self explanatory.
+-- >    IE     IBM information exchange
+-- >              Self explanatory.
+-- >    IM     Internal mail
+-- >              Internal mail address/number.
+-- >    MA     Mail
+-- >              Postal service document delivery.
+-- >    PB     Postbox number
+-- >              Self explanatory.
+-- >    PS     Packet switching
+-- >              The process of routing and transferring data by means of
+-- >              addressed packets so that a channel is occupied only
+-- >              during the transmission; upon completion of the
+-- >              transmission the channel is made available for the
+-- >              transfer of other packets (ISO).
+-- >    SW     S.W.I.F.T.
+-- >              Communications address assigned by Society for Worldwide
+-- >              Interbank Financial Telecommunications s.c.
+-- >    TE     Telephone
+-- >              Voice/data transmission by telephone.
+-- >    TG     Telegraph
+-- >              Text transmission via telegraph.
+-- >    TL     Telex
+-- >              Transmission of text/data via telex.
+-- >    TM     Telemail
+-- >              Transmission of text/data via telemail.
+-- >    TT     Teletext
+-- >              Transmission of text/data via teletext.
+-- >    TX     TWX
+-- >              Communication service involving Teletypewriter machines
+-- >              connected by wire or electronic transmission media.
+-- >              Teletypewriter machines are the devices used to send and
+-- >              receive signals and produce hardcopy from them.
+-- >    XF     X.400
+-- >              CCITT Message handling system.
+simple3155 :: Parser Value
+simple3155 = simple "3155" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3164.hs b/specification/src/Text/Edifact/D96A/Simples/S3164.hs
new file mode 100644
index 0000000..e8c8525
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3164.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3164
+  ( simple3164
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3164  City name
+-- >
+-- >    Desc: Name of a city (a town, a village) for addressing purposes.
+-- >
+-- >    Repr: an..35
+simple3164 :: Parser Value
+simple3164 = simple "3164" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3207.hs b/specification/src/Text/Edifact/D96A/Simples/S3207.hs
new file mode 100644
index 0000000..6ba52ff
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3207.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3207
+  ( simple3207
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3207  Country, coded
+-- >
+-- >    Desc: Identification of the name of a country or other geographical
+-- >          entity as specified in ISO 3166.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Use ISO 3166 two alpha country code.
+simple3207 :: Parser Value
+simple3207 = simple "3207" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3222.hs b/specification/src/Text/Edifact/D96A/Simples/S3222.hs
new file mode 100644
index 0000000..eee6834
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3222.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3222
+  ( simple3222
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3222  Related place/location one
+-- >
+-- >    Desc: Specification of the first related place/location by name.
+-- >
+-- >    Repr: an..70
+simple3222 :: Parser Value
+simple3222 = simple "3222" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3223.hs b/specification/src/Text/Edifact/D96A/Simples/S3223.hs
new file mode 100644
index 0000000..5d9e5fb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3223.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3223
+  ( simple3223
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3223  Related place/location one identification
+-- >
+-- >    Desc: Specification of the first related place/location by code.
+-- >
+-- >    Repr: an..25
+-- >
+-- >    Note: Use UN/ECE Recommendation No. 16: UNLOCODE.  If not
+-- >          applicable, use appropriate code set in combination with
+-- >          1131/3055.
+simple3223 :: Parser Value
+simple3223 = simple "3223" (alphaNumeric `upTo` 25)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3224.hs b/specification/src/Text/Edifact/D96A/Simples/S3224.hs
new file mode 100644
index 0000000..4a851df
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3224.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3224
+  ( simple3224
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > *  3224  Place/location
+-- >
+-- >    Desc: Name of place/location, other than 3164 City name.
+-- >
+-- >    Repr: an..70
+simple3224 :: Parser Value
+simple3224 = simple "3224" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3225.hs b/specification/src/Text/Edifact/D96A/Simples/S3225.hs
new file mode 100644
index 0000000..cdd564d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3225.hs
@@ -0,0 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3225
+  ( simple3225
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3225  Place/location identification
+-- >
+-- >    Desc: Identification of the name of place/location, other than 3164
+-- >          City name.
+-- >
+-- >    Repr: an..25
+-- >
+-- >    Note: Use UN/ECE Recommendation No. 16: UNLOCODE.  If not
+-- >          applicable, use appropriate code set in combination with
+-- >          1131/3055.
+simple3225 :: Parser Value
+simple3225 = simple "3225" (alphaNumeric `upTo` 25)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3227.hs b/specification/src/Text/Edifact/D96A/Simples/S3227.hs
new file mode 100644
index 0000000..956cecb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3227.hs
@@ -0,0 +1,524 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3227
+  ( simple3227
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 3227  Place/location qualifier
+-- >
+-- >   Desc: Code identifying the function of a location.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Place of terms of delivery
+-- >              (3018) Point or port of departure, shipment or
+-- >              destination, as required under the applicable terms of
+-- >              delivery, e.g. Incoterms.
+-- >         2 Payment place
+-- >              Place where funds are to be, or have been made available
+-- >              to the creditor.
+-- >         4 Goods receipt place
+-- >              Place at which the goods have been received by the
+-- >              consignee.
+-- >         5 Place of departure
+-- >              (3214) Port, airport or other location from which a means
+-- >              of transport is scheduled to depart or has departed.
+-- >         7 Place of delivery
+-- >              (3246) Place to which the goods are to be finally
+-- >              delivered under transport contract terms (operational
+-- >              term).
+-- >         8 Place of destination
+-- >              Port, airport or other location to which a means of
+-- >              transport is destined.
+-- >         9 Place/port of loading
+-- >              (3334 + 3230) Seaport, airport, freight terminal, rail
+-- >              station or other place at which the goods (cargo) are
+-- >              loaded on to the means of transport being used for their
+-- >              carriage.
+-- >        10 Place of acceptance
+-- >              (3348) Place at which the goods are taken over by the
+-- >              carrier.
+-- >        11 Place/port of discharge
+-- >              (3392 + 3414) Seaport, airport, freight terminal, rail
+-- >              station or other place at which the goods (cargo) are
+-- >              unloaded from the means of transport having been used for
+-- >              their carriage.
+-- >        12 Port of discharge
+-- >              Port at which the goods are discharged from the vessel
+-- >              used for their transport.
+-- >        13 Place of transhipment
+-- >              (3424) Place where goods are transferred from one means
+-- >              of transport to another (operational term).
+-- >        14 Location of goods
+-- >              (3384) Place where goods are located and where they are
+-- >              available for examination.
+-- >        15 Place of transfer responsibility
+-- >              Place where the responsibility for the goods under
+-- >              transport is transferred.
+-- >        16 Place of transfer of ownership
+-- >              Place where the ownership of the goods is transferred.
+-- >        17 Border crossing place
+-- >              Place where goods are transported across a country
+-- >              border.
+-- >        18 Warehouse
+-- >              (3156) Warehouse where a particular consignment has been
+-- >              stored.
+-- >        19 Factory/plant
+-- >              Factory/plant relevant for a particular consignment.
+-- >        20 Place of ultimate destination of goods
+-- >              Place where goods will ultimately be delivered.
+-- >        21 Terms of sale place
+-- >              Place of departure, shipment or destination as specified
+-- >              in the terms of sale agreed between the parties.
+-- >        22 Customs office of clearance
+-- >              (3080) Place where Customs clearance procedure occur
+-- >              (CCC).
+-- >        23 Port of release
+-- >              Port where goods are released from Customs custody.
+-- >        24 Port of entry
+-- >              Port where final documentation is filed for Customs Entry
+-- >              processing.
+-- >        25 Country
+-- >              Country relevant for a particular transaction.
+-- >        26 City
+-- >              City or town relevant for a particular transaction or
+-- >              consignment.
+-- >        27 Country of origin
+-- >              [3238] Country in which the goods have been produced or
+-- >              manufactured, according to criteria laid down for the
+-- >              purposes of application of the Customs tariff, of
+-- >              quantitative restrictions, or of any other measure
+-- >              related to trade.
+-- >        28 Country of destination of goods
+-- >              Country to which the goods are to be delivered.
+-- >        29 Railway station
+-- >              Name or identification of a railway station/yard relevant
+-- >              to a particular consignment.
+-- >        30 Country of source
+-- >              Country in which raw material or components were
+-- >              originally produced prior to manufacture or assembly in
+-- >              another country.
+-- >        31 Building
+-- >              A building or part thereof relevant to a particular
+-- >              consignment or transaction.
+-- >        32 Beginning of chargeable section
+-- >              First rail station in a predefined section of the
+-- >              chargeable voyage. A complete voyage may be divided in
+-- >              sections, even within one country, that are separately
+-- >              chargeable using different tariff rules (split tariffs).
+-- >        33 Baseport of discharge
+-- >              The port of discharge according to the tariff as opposed
+-- >              to the operational port of discharge. The goods may or
+-- >              may not be actually discharged at that port on the main
+-- >              transport.
+-- >        34 Baseport of loading
+-- >              The port of loading according to the tariff as opposed to
+-- >              the operational port of loading. The goods may or may not
+-- >              be actually loaded at that port on the main transport.
+-- >        35 Country of exportation/despatch
+-- >              (3220) Country from which the goods were initially
+-- >              exported to the importing country without any commercial
+-- >              transaction taking place in intermediate countries.
+-- >              Syn.: country whence consigned. Country of despatch:
+-- >              country from which goods are despatched between countries
+-- >              of a Customs union.
+-- >        36 Country of ultimate destination
+-- >              (3216) Country known to the consignor or his agent at the
+-- >              time of despatch to be the final country to which the
+-- >              goods are to be delivered.
+-- >        37 Country of last consignment
+-- >              [3331] Country where the goods are loaded onto the means
+-- >              of transport used for their importation.
+-- >        38 Country of first destination
+-- >              [3219] Country where the goods are offloaded from the
+-- >              means of transport used for their exportation.
+-- >        39 Country of production
+-- >              Country where item has been or will be produced.
+-- >        40 Country of trading
+-- >              Country where item has been or will be traded.
+-- >        41 Customs office of entry
+-- >              [3088] Customs office at which the goods enter the
+-- >              country of destination.
+-- >        42 Customs office of exit
+-- >              [3096] Customs office at which the goods leave the
+-- >              country of dispatch/export.
+-- >        43 Place of Customs examination
+-- >              Place where Customs undertakes a physical inspection of
+-- >              goods to satisfy themselves that the goods' nature,
+-- >              origin, condition, quantity and value are in accordance
+-- >              with the particulars furnished on the goods declaration
+-- >              (CCC).
+-- >        44 Place of authentication of document
+-- >              (3410) Place where document is signed or otherwise
+-- >              authenticated. Synonym: Place of issue of document.
+-- >        45 Customs office of destination (transit)
+-- >              (3086) Customs office at which a transit operation is
+-- >              terminated. Synonym: Customs office of transit
+-- >              termination.
+-- >        46 Region of despatch
+-- >              Region from which goods are despatched between countries
+-- >              of a Customs union.
+-- >        47 Region of destination
+-- >              Region known to the consignor or his agent at the time of
+-- >              despatch to be the final region to which the goods are to
+-- >              be delivered.
+-- >        48 Region of production
+-- >              Region where item has been or will be produced.
+-- >        49 Country of transit
+-- >              Country through which goods transit.
+-- >        50 Customs office of transit
+-- >              [3106] Customs office which is competent for transit
+-- >              formalities en route.
+-- >        51 Country of invalid transit guarantee
+-- >              Country in which the security or guarantee for the
+-- >              movement of goods under a transit procedure is not valid.
+-- >        52 Country of destination (transit)
+-- >              Country at which a Customs transit operation is
+-- >              terminated. Synonym: Country of transit termination.
+-- >        53 Charge and freight due from
+-- >              Place or point from which charges and freight are
+-- >              charged.
+-- >        54 Manufacturing department
+-- >              A department within the manufacturing area (e.g.
+-- >              lacquering, assembly).
+-- >        55 Charges and freight payable to
+-- >              [3274] Name of place up to which freight charges and
+-- >              other charges are to be paid.
+-- >        56 End of chargeable section
+-- >              Last rail station in a predefined section of the
+-- >              chargeable voyage. A complete voyage may be divided in
+-- >              sections, even within one country, that are separately
+-- >              chargeable using different tariff rules (split tariffs).
+-- >        57 Place of payment
+-- >              Name of the location at which freight and charges for
+-- >              main transport are payable.
+-- >        58 Full track loading or unloading
+-- >              Identification of the station proceeding to the loading
+-- >              or unloading of a rail wagon on a full track site. (Used
+-- >              only when a rail station is obliged to transfer the load
+-- >              on another wagon for technical reasons - e.g. damage).
+-- >        60 Place of arrival
+-- >              Place at which the transport means arrives.
+-- >        61 Next port of call
+-- >              Next port which the vessel is going to call upon.
+-- >        62 On-carriage port
+-- >              Port of discharge at which the cargo is discharged from
+-- >              the vessel, used for transport after the main transport
+-- >              (transit port).
+-- >        64 First optional place of discharge
+-- >              The first optional place or port of discharge as
+-- >              mentioned on the transport document where cargo can be
+-- >              discharged at the option of the shipper.
+-- >        66 Express railway station
+-- >              Railway station offering express transportation services.
+-- >        67 Mixed cargo railway station
+-- >              Railway station offering mixed cargo transportation
+-- >              services .
+-- >        68 Second optional place of discharge
+-- >              The second optional place or port of discharge as
+-- >              mentioned on the transport document where cargo can be
+-- >              discharged at the option of shipper.
+-- >        69 Next non-discharge port of call
+-- >              A code to identify the next port of call for a vessel
+-- >              where no cargo will be discharged.
+-- >        70 Third optional place of discharge
+-- >              The third optional place or port of discharge as
+-- >              mentioned on the transport document where cargo can be
+-- >              discharged at the option of the shipper.
+-- >        71 Reconsolidation point
+-- >              A place where cargo is reconsolidated.
+-- >        72 Fourth optional place of discharge
+-- >              The fourth optional place or port of discharge as
+-- >              mentioned on the transport document where cargo can be
+-- >              discharged at the option of the shipper.
+-- >        73 Bill of lading release office
+-- >              A location where bills of lading are released to
+-- >              customers.
+-- >        74 Transhipment excluding this place
+-- >              Place/location where a transhipment from a means of
+-- >              transport to another means of transport is not
+-- >              authorised.
+-- >        75 Transhipment limited to this place
+-- >              Only place/location where a transhipment from a means of
+-- >              transport to another means of transport is authorised.
+-- >        76 Original port of loading
+-- >              The port where the goods were first loaded on a vessel.
+-- >        77 First port of call - non-discharging
+-- >              Port in the country of destination where the conveyance
+-- >              initially arrives from the 'last place/port of call of
+-- >              conveyance' and where a conveyance will not be
+-- >              discharging cargoes.
+-- >        78 First port of call - discharging
+-- >              Port in the country of destination where the conveyance
+-- >              initially arrives from the 'last place/port of call of
+-- >              conveyance' and where a conveyance will be discharging
+-- >              cargoes.
+-- >        79 Place/port of first entry
+-- >              Place or port where final documentation is filed for
+-- >              Customs Entry processing.
+-- >        80 Place of despatch
+-- >              Place at which the goods are taken over for carriage
+-- >              (operational term), if different from the transport
+-- >              contract place of acceptance (see: 10). Synonym: Place of
+-- >              origin of carriage.
+-- >        81 Fifth optional place of discharge
+-- >              The fifth optional place or port of discharge as
+-- >              mentioned on the transport document where cargo can be
+-- >              discharged at the option of the shipper.
+-- >        82 Pre-carriage port
+-- >              Port of loading at which the cargo is loaded on the pre-
+-- >              carriage vessel used for the transport prior to the main
+-- >              transport.
+-- >        83 Place of delivery (by on carriage)
+-- >              Place to which the goods are to be finally delivered.
+-- >        84 Transport contract place of acceptance
+-- >              Place at which the goods are taken over by the carrier
+-- >              according to the contract of carriage.
+-- >        85 Transport contract place of destination
+-- >              Place to which the goods are destined.
+-- >        86 Country of valid transit guarantee
+-- >              Country in which the security or guarantee for the
+-- >              movement of goods under a transit procedure is valid.
+-- >        87 Place/port of conveyance initial arrival
+-- >              Place/port in the country of destination where the
+-- >              conveyance initially arrives from the "Last place/port of
+-- >              call of conveyance" (125).
+-- >        88 Place of receipt
+-- >              Identification of the location at which the cargo is
+-- >              actually received.
+-- >        89 Place of registration
+-- >              Place where a means of transport is officially
+-- >              registered.
+-- >        90 Place/location where special treatments have happened or
+-- >           must happen
+-- >              Self explanatory.
+-- >        91 Place of document issue
+-- >              The place or location where a document is issued.
+-- >        92 Routing
+-- >              Indication of a routing place.
+-- >        93 Station of application of additional costs
+-- >              Rail station where, according to the transport contract,
+-- >              some chargeable operations must happen (re-weighting, re-
+-- >              fixing of the load, control on equipment and on
+-- >              consignment, etc.).
+-- >        96 Place of lodgement of documents
+-- >              Customs station where, required documents for Customs
+-- >              declarations, have been lodged.
+-- >        97 Optional place of discharge
+-- >              The optional place or port of discharge as mentioned on
+-- >              the bill of lading where cargo is discharged at the
+-- >              option of the shipper.
+-- >        98 Place of empty equipment despatch
+-- >              The location from which empty equipment is despatched.
+-- >        99 Place of empty equipment return
+-- >              The location to which empty equipment is returned.
+-- >       100 Place/port of warehouse entry
+-- >              Location (e.g. district) within a Customs territory where
+-- >              a warehouse entry was filed to enter merchandise into a
+-- >              Customs bonded warehouse.
+-- >       101 Country of first sale
+-- >              Name of country where firstly a sale took place.
+-- >       102 Country of purchase
+-- >              [3394] Country where the importer's co-contractor is
+-- >              domiciled or has his business.
+-- >       103 Place of transfer
+-- >              Place at which goods are transferred from one carrier to
+-- >              another (contractual term).
+-- >       104 Place of deconsolidation
+-- >              Place where a large consignment is de-grouped into
+-- >              smaller consignments.
+-- >       105 Place of consumption
+-- >              Place/location where goods enter the marketplace
+-- >              (commerce) of the importing country.
+-- >       106 Region of origin
+-- >              Region in which the goods have been produced or
+-- >              manufactured according to the criteria laid down for the
+-- >              purposes of the application of the Customs tariff, of
+-- >              quantitative restrictions or of any other measures
+-- >              related to trade (see: 3238).
+-- >       107 Place of consolidation
+-- >              Place where smaller consignments of goods are grouped
+-- >              together into a large consignment to be transported as a
+-- >              larger unit.
+-- >       108 Rate combination point
+-- >              Point over which sector rates are combined.
+-- >       109 Place of prolongation decision of delivery delay
+-- >              Place where it has been decided to prolong the delivery
+-- >              delay.
+-- >       110 Recharging place/location
+-- >              Place/location where a consignment has been changed of
+-- >              destination and is subject to a recharge note.
+-- >              (Complementary orders to modify the routing of the
+-- >              transport may be given, upon which a new charge
+-- >              calculation may be applied by the carrier).
+-- >       111 Customs office of despatch
+-- >              Customs office from which goods are despatched between
+-- >              countries of a Customs union.
+-- >       113 Country of despatch
+-- >              Country from which goods are despatched within a Customs
+-- >              union.
+-- >       114 Customs office of export
+-- >              Customs office from which goods are taken out of the
+-- >              Customs territory (CCC).
+-- >       115 Free zone of export
+-- >              Foreign free zone (desc: see 1131 = 131) from which goods
+-- >              are exported to the country of importation.
+-- >       116 Region of export/despatch
+-- >              Region from which the goods were initially exported to
+-- >              the importing country without any commercial transaction
+-- >              taking place in intermediate countries. Region of
+-- >              despatch: region from which goods are despatched between
+-- >              countries of a Customs union.
+-- >       118 Customs office of departure
+-- >              Customs office at which a Customs transit operation
+-- >              commences (CCC).
+-- >       119 Customs office of transit guarantee
+-- >              [3110] Customs office at which a security or guarantee
+-- >              for the movement of goods under a transit procedure is
+-- >              lodged.
+-- >       120 Country of transhipment
+-- >              Country where goods are transferred under Customs control
+-- >              from the importing means of transport to the exporting
+-- >              means of transport within the area of one Customs office
+-- >              which is the office of both importation and exportation
+-- >              (CCC).
+-- >       121 Country of sale
+-- >              [3116] Country where exporter's co-contractor is
+-- >              domiciled or has his business.
+-- >       122 Customs office of destination
+-- >              Customs office where the goods are to be cleared (CCC).
+-- >       123 Wagon-load railway station
+-- >              Self explanatory (railway environment).
+-- >       124 Siding
+-- >              Self explanatory.
+-- >       125 Last place/port of call of conveyance
+-- >              Conveyance departed from this last foreign place/port of
+-- >              call to go to "Place/port of conveyance initial arrival"
+-- >              (87).
+-- >       126 Country of previous Customs procedure
+-- >              Country in which the Customs declaration for the previous
+-- >              Customs procedure has been lodged.
+-- >       127 Customs office of registration of previous Customs
+-- >           declaration
+-- >              Customs office where the previous Customs declaration has
+-- >              been lodged.
+-- >       128 Participant sender location
+-- >              Place where a participant in the movement of goods is
+-- >              located and can be contacted.
+-- >       129 Wage negotiation district
+-- >              The district to which workers belong for the purposes of
+-- >              union wage negotiation.
+-- >       130 Place of ultimate destination of conveyance
+-- >              Seaport, airport, freight terminal, rail station or other
+-- >              place to which a means of transport is ultimately
+-- >              destined.
+-- >       131 Place of loading of empty equipment
+-- >              Seaport, airport, freight terminal, rail station or other
+-- >              place where empty equipment (e.g. containers) was loaded
+-- >              onto means of transport.
+-- >       132 Place of discharge of empty equipment
+-- >              Seaport, airport, freight terminal, rail station or other
+-- >              place where empty equipment (e.g. containers) was
+-- >              unloaded from means of transport.
+-- >       133 Region of delivery
+-- >              (3246) Region to which the goods are to be finally
+-- >              delivered under transport contract terms (operational
+-- >              term).
+-- >       134 Petroleum warehouse
+-- >              Bonded petroleum warehouse or the supplier source.
+-- >       135 Place of entry (Customs)
+-- >              Place at which the goods enter the Customs territory.
+-- >       136 Living animals care place
+-- >              Place where living animal cares are provided.
+-- >       137 Re-icing place
+-- >              Place where re-icing must be executed.
+-- >       138 Weighting place
+-- >              Place where weight can be ascertained.
+-- >       139 Marshalling yard
+-- >              Station where the wagons are disconnected and reconnected
+-- >              to form a new train.
+-- >       140 Shopping station
+-- >              Station where the train must stop or is stopped for
+-- >              unexpected handling.
+-- >       141 Loading dock
+-- >              Platform specially equipped for loading and unloading of
+-- >              rail wagons.
+-- >       142 Port connection
+-- >              Track connecting a rail station to a dock.
+-- >       143 Place of expiry
+-- >              Place where the documentary credit expires for
+-- >              presentation of required documents.
+-- >       144 Place of negotiation
+-- >              Place where the documentary credit is to be presented for
+-- >              negotiation.
+-- >       145 Claims payable place
+-- >              Place where insurance claims are payable.
+-- >       146 Documentary credit available in
+-- >              Place where the documentary credit is available with any
+-- >              bank.
+-- >       147 Stowage cell
+-- >              Location on a vessel where units can be stowed.
+-- >       148 For transportation to
+-- >              Place/country where goods are to be transported to.
+-- >       149 Loading on board/despatch/taking in charge at/from
+-- >              Place/country where goods have to be loaded on board,
+-- >              despatched or taken in charge.
+-- >       151 Private box
+-- >              A private box used for pick-up and delivery of packages,
+-- >              e.g. of express packages.
+-- >       152 Next port of discharge
+-- >              Next port at which goods are discharged from the vessel
+-- >              used for their transport.
+-- >       153 Port of call
+-- >              Port where a vessel has called upon or will call upon.
+-- >       154 Place/location of on-hire
+-- >              Place/location where an object is contracted for use.
+-- >       155 Place/location of off-hire
+-- >              Place/location where an object's contract for use ends.
+-- >       156 Other carriers terminal
+-- >              A carrier terminal belonging to a carrier other than the
+-- >              original carrier.
+-- >       157 Country of Value Added Tax (VAT) jurisdiction
+-- >              The country governing the VAT regulation to which the
+-- >              transaction is subject.
+-- >       158 Contact location
+-- >              The site where a contact is located.
+-- >       159 Additional internal destination
+-- >              Any location within the consignee's premises where the
+-- >              goods are moved to.
+-- >       160 Foreign port of call
+-- >              A code to identify the foreign port where the vessel
+-- >              calls at or will call at.
+-- >       161 Maintenance location
+-- >              A location where maintenance has been or will be
+-- >              performed.
+-- > +     162 Place or location of sale
+-- >              Place or location at which the sale takes place.
+-- > +     163 Direct investment country
+-- >              Country in which a direct investment is made or
+-- >              withdrawn.
+-- > +     164 Berth
+-- >              Place or location in a port where a vessel is moored.
+-- > +     165 Construction country
+-- >              Country in which the construction work is made.
+-- > +     166 Donation acting country
+-- >              Country acting in the donation of aid.
+-- > +     167 Payment transaction country
+-- >              Country of the foreign counterpart of the payment
+-- >              transaction.
+-- > +     168 Physical place of return of item
+-- >              Physical place at which the item is returned, i.e. the
+-- >              location where the supplier receives the item form the
+-- >              customer.
+-- >    ZZZ    Mutually defined
+-- >              Place or location as agreed between the relevant parties.
+simple3227 :: Parser Value
+simple3227 = simple "3227" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3229.hs b/specification/src/Text/Edifact/D96A/Simples/S3229.hs
new file mode 100644
index 0000000..ebb1072
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3229.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3229
+  ( simple3229
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3229  Country sub-entity identification
+-- >
+-- >    Desc: Identification of the name of sub-entities (state, province)
+-- >          defined by appropriate governmental agencies.
+-- >
+-- >    Repr: an..9
+-- >
+-- >    Note: Use code defined by appropriate national authority.
+simple3229 :: Parser Value
+simple3229 = simple "3229" (alphaNumeric `upTo` 9)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3232.hs b/specification/src/Text/Edifact/D96A/Simples/S3232.hs
new file mode 100644
index 0000000..f5fbccb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3232.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3232
+  ( simple3232
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3232  Related place/location two
+-- >
+-- >    Desc: Specification of a second related place/location by name.
+-- >
+-- >    Repr: an..70
+simple3232 :: Parser Value
+simple3232 = simple "3232" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3233.hs b/specification/src/Text/Edifact/D96A/Simples/S3233.hs
new file mode 100644
index 0000000..db185d0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3233.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3233
+  ( simple3233
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3233  Related place/location two identification
+-- >
+-- >    Desc: Specification of a second related place/location by code.
+-- >
+-- >    Repr: an..25
+-- >
+-- >    Note: Use UN/ECE Recommendation No. 16: UNLOCODE.  If not
+-- >          applicable, use appropriate code set in combination with
+-- >          1131/3055.
+simple3233 :: Parser Value
+simple3233 = simple "3233" (alphaNumeric `upTo` 25)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3239.hs b/specification/src/Text/Edifact/D96A/Simples/S3239.hs
new file mode 100644
index 0000000..5e6e55c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3239.hs
@@ -0,0 +1,28 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3239
+  ( simple3239
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3239  Country of origin, coded
+-- >
+-- >    Desc: Country in which the goods have been produced or
+-- >          manufactured, according to criteria laid down for the
+-- >          purposes of application of the Customs tariff, of
+-- >          quantitative restrictions, or of any other measure related to
+-- >          trade.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: See Country and currency codes (UNTDED) or ISO 3166 two alpha
+-- >          country code (Code set 3207).
+simple3239 :: Parser Value
+simple3239 = simple "3239" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3251.hs b/specification/src/Text/Edifact/D96A/Simples/S3251.hs
new file mode 100644
index 0000000..fc19ce0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3251.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3251
+  ( simple3251
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3251  Postcode identification
+-- >
+-- >    Desc: Code defining postal zones or addresses.
+-- >
+-- >    Repr: an..9
+-- >
+-- >    Note: Use code defined by appropriate national authority.
+simple3251 :: Parser Value
+simple3251 = simple "3251" (alphaNumeric `upTo` 9)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3412.hs b/specification/src/Text/Edifact/D96A/Simples/S3412.hs
new file mode 100644
index 0000000..69b2208
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3412.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3412
+  ( simple3412
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3412  Department or employee
+-- >
+-- >    Desc: The department or person within an organizational entity.
+-- >
+-- >    Repr: an..35
+simple3412 :: Parser Value
+simple3412 = simple "3412" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3413.hs b/specification/src/Text/Edifact/D96A/Simples/S3413.hs
new file mode 100644
index 0000000..4d4b1be
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3413.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3413
+  ( simple3413
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3413  Department or employee identification
+-- >
+-- >    Desc: Internal identification code.
+-- >
+-- >    Repr: an..17
+-- >
+-- >    Note: Code specified by organisation concerned.
+simple3413 :: Parser Value
+simple3413 = simple "3413" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3453.hs b/specification/src/Text/Edifact/D96A/Simples/S3453.hs
new file mode 100644
index 0000000..ab4d0ca
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S3453.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S3453
+  ( simple3453
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    3453  Language, coded
+-- >
+-- >    Desc: Code of language (ISO 639-1988).
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Use ISO 639-1988.
+simple3453 :: Parser Value
+simple3453 = simple "3453" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4000.hs b/specification/src/Text/Edifact/D96A/Simples/S4000.hs
new file mode 100644
index 0000000..b88c68e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4000.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4000
+  ( simple4000
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4000  Reference version number
+-- >
+-- >    Desc: To uniquely identify a reference by its revision number.
+-- >
+-- >    Repr: an..35
+simple4000 :: Parser Value
+simple4000 = simple "4000" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4052.hs b/specification/src/Text/Edifact/D96A/Simples/S4052.hs
new file mode 100644
index 0000000..b542230
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4052.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4052
+  ( simple4052
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4052  Terms of delivery or transport
+-- >
+-- >    Desc: Terms agreed between two parties (e.g. seller/buyer,
+-- >          shipper/carrier) under which a product or service is
+-- >          provided.
+-- >
+-- >    Repr: an..70
+simple4052 :: Parser Value
+simple4052 = simple "4052" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4053.hs b/specification/src/Text/Edifact/D96A/Simples/S4053.hs
new file mode 100644
index 0000000..d6d0b63
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4053.hs
@@ -0,0 +1,27 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4053
+  ( simple4053
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4053  Terms of delivery or transport, coded
+-- >
+-- >    Desc: Identification of the terms agreed between two parties (e.g.
+-- >          seller/buyer, shipper/carrier) under which a product or
+-- >          service is provided.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Use UN/ECE Recommendation No. 5 Incoterms 1990.  If not
+-- >          applicable, use appropriate code set in combination with
+-- >          1131/3055.
+simple4053 :: Parser Value
+simple4053 = simple "4053" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4055.hs b/specification/src/Text/Edifact/D96A/Simples/S4055.hs
new file mode 100644
index 0000000..6ac2e09
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4055.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4055
+  ( simple4055
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4055  Terms of delivery or transport function, coded
+-- >
+-- >   Desc: Indication whether the terms relate to e.g. price conditions,
+-- >         delivery conditions, transport conditions, or a combination of
+-- >         these.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Price condition
+-- >              Description to be provided.
+-- >         2 Despatch condition
+-- >              Condition requested by the customer under which the
+-- >              supplier shall deliver: Extent of freight costs, means of
+-- >              transport.
+-- >         3 Price and despatch condition
+-- >              Description to be provided.
+-- >         4 Collected by customer
+-- >              Indicates that the customer will pick up the goods at the
+-- >              supplier. He will take care of the means of transport.
+-- >         5 Transport condition
+-- >              Specifies the conditions under which the transport takes
+-- >              place under the responsibility of the carrier.
+-- >         6 Delivery condition
+-- >              Specifies the conditions under which the goods must be
+-- >              delivered to the consignee.
+simple4055 :: Parser Value
+simple4055 = simple "4055" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4065.hs b/specification/src/Text/Edifact/D96A/Simples/S4065.hs
new file mode 100644
index 0000000..aaf4329
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4065.hs
@@ -0,0 +1,138 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4065
+  ( simple4065
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4065  Contract and carriage condition, coded
+-- >
+-- >   Desc: Code to identify the conditions of contract and carriage.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 AVC conditions
+-- >              General conditions of transport 1983, latest revision
+-- >              laid down by the Stichting Vervoeradres The Hague.
+-- >         2 Special agreement for parcels transport
+-- >              Appliance of a non published special agreement signed
+-- >              between a customer and the carrier (mandatory requested
+-- >              by the consignor) for parcels transport.
+-- >         3 Special agreement for full loading transport
+-- >              Appliance of a non published special agreement signed
+-- >              between a customer and the carrier (mandatory requested
+-- >              by the consignor) for full load transport.
+-- >         4 Combined transport
+-- >              A transport which involves more than one mode of
+-- >              transportation.
+-- >         5 FIATA combined transport bill of lading
+-- >              Standard conditions of a combined transport bill of
+-- >              lading issued by FIATA.
+-- >         6 Freight forwarders national conditions
+-- >              Self explanatory.
+-- >         7 Normal tariff, parcels transport
+-- >              Appliance of the published legal tariff in case of
+-- >              parcels transport (required or not by the consignor.
+-- >         8 Normal tariff, full loading transport
+-- >              Appliance of the published legal tariff in case of full
+-- >              load transport (required or not by the consignor).
+-- >         9 Ordinary
+-- >              Carrier will choose the cheapest tariff in the legally
+-- >              published tariffs for parcels or full load transports (no
+-- >              tariff required by the consignor).
+-- >        10 Port to port
+-- >              The transport will only be port to port, no inland
+-- >              transport would have to be provided under the contract.
+-- >        11 CMR carnet
+-- >              Conditions in accordance with the convention of the
+-- >              contract for the international carriage of goods by road.
+-- >        12 Special tariff, parcels transport
+-- >              Appliance of the legally published "special" tariff in
+-- >              case or parcels transport (tariff requested by the
+-- >              consignor).
+-- >        13 Special tariff, full transport
+-- >              Appliance of the legally published "special tariff" in
+-- >              case of full load transport (tariff requested by the
+-- >              consignor).
+-- >        14 Through transport
+-- >              The transport that is contracted not only from port to
+-- >              port, but from one inland location to another inland
+-- >              location.
+-- >        15 Cancel space allocation
+-- >              Indication that space previously allocated on a flight is
+-- >              to be cancelled.
+-- >        16 Report sale of space
+-- >              Indication that a sale has been made against a space
+-- >              allocation on a specific flight.
+-- >        17 Alternative space allocation
+-- >              Indication that space is being requested for a specific
+-- >              flight and that an alternative is acceptable.
+-- >        18 No alternative space allocation
+-- >              Indication that space is being requested for a specific
+-- >              flight and that an alternative is not acceptable.
+-- >        19 Allotment sale
+-- >              Indication that space is being sold against a space
+-- >              allocation allotment on a specific flight.
+-- >        20 Confirmation of space
+-- >              Indication that space requested has been confirmed on a
+-- >              specific flight.
+-- >        21 Unable to confirm
+-- >              Indication that airline is unable to confirm the space
+-- >              allocation on a specific flight.
+-- >        22 Non-operative flight
+-- >              Indication that airline is unable to confirm space on a
+-- >              specific flight since the flight does not operate.
+-- >        23 Wait list
+-- >              Indication that the space allocation request has been
+-- >              assigned to a wait list.
+-- >        24 Prior space allocation request
+-- >              Indication that a space allocation on a specific flight
+-- >              has already been requested.
+-- >        25 Holding confirmed space allocation
+-- >              Indication that space is being held as confirmed on a
+-- >              specific flight.
+-- >        26 Holding wait list
+-- >              Indication that space allocation request on a specific
+-- >              flight has been assigned to a wait list.
+-- >        27 Door-to-door
+-- >              The carrier is responsible for the intermodal carriage of
+-- >              cargo including both the pre-carriage and the
+-- >              on-carriage.
+-- >        28 Door-to-pier
+-- >              The carrier is responsible for the intermodal carriage of
+-- >              cargo including the pre-carriage, but excluding the on-
+-- >              carriage.
+-- >        29 Pier-to-door
+-- >              The carrier is responsible for the intermodal carriage of
+-- >              cargo including the on-carriage, but excluding the
+-- >              pre-carriage.
+-- >        30 Pier-to-pier
+-- >              The carrier of intermodal cargo is only responsible for
+-- >              the main carriage.
+-- >        31 Space cancellation noted
+-- >              Indication that space previously allocated on a means of
+-- >              transport has been cancelled.
+-- >        32 Mini landbridge service
+-- >              Cargo moving from a coastal port for delivery at an
+-- >              inland location or cargo received at an inland location
+-- >              moving to a coastal port for subsequent ocean
+-- >              transportation.
+-- >        33 Space cancellation noted
+-- >              Indication that space previously allocated on a flight
+-- >              has been cancelled.
+-- >        34 Speed level - required
+-- >              Maximum speed required on an itinerary or part of this
+-- >              itinerary to be able to assume some services.
+-- >        35 Speed level - adopted
+-- >              Real speed used on an itinerary or part of this itinerary
+-- >              (for technical reasons, some limitation can be imposed or
+-- >              some higher speed could be used).
+simple4065 :: Parser Value
+simple4065 = simple "4065" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4078.hs b/specification/src/Text/Edifact/D96A/Simples/S4078.hs
new file mode 100644
index 0000000..fefbeac
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4078.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4078
+  ( simple4078
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4078  Handling instructions
+-- >
+-- >    Desc: Instructions on how specified goods, packages or containers
+-- >          should be handled.
+-- >
+-- >    Repr: an..70
+simple4078 :: Parser Value
+simple4078 = simple "4078" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4079.hs b/specification/src/Text/Edifact/D96A/Simples/S4079.hs
new file mode 100644
index 0000000..896d532
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4079.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4079
+  ( simple4079
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4079  Handling instructions, coded
+-- >
+-- >    Desc: Identification of the instructions on how specified goods,
+-- >          packages or containers should be handled.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.  See also UNTDED 5.9 p.2 CIMP.
+simple4079 :: Parser Value
+simple4079 = simple "4079" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4183.hs b/specification/src/Text/Edifact/D96A/Simples/S4183.hs
new file mode 100644
index 0000000..d31f20a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4183.hs
@@ -0,0 +1,284 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4183
+  ( simple4183
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 4183  Special conditions, coded
+-- >
+-- >   Desc: Indication of a specific condition.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Item for national preference
+-- >              Item concerned is applicable to national preference
+-- >              calculation.
+-- >         2 Item qualifying for payment discount
+-- >              Item concerned is applicable for settlement/payment
+-- >              discount calculation.
+-- >         3 Item not qualifying for payment discount
+-- >              Item concerned is not applicable for settlement/payment
+-- >              discount calculation.
+-- >         5 Item not to be included in bonus calculation
+-- >              Item concerned is not applicable for bonus calculation.
+-- >         6 Subject to bonus
+-- >              Item concerned is applicable for bonus calculation.
+-- >         7 Subject to commission
+-- >              Item concerned is applicable for commission calculation.
+-- >         8 Subject to discount
+-- >              Item concerned is applicable for discount calculation.
+-- >         9 Freely available in EEC
+-- >              Self explanatory.
+-- >        10 Subject to settlement discount
+-- >              Item concerned is applicable for the overall settlement
+-- >              discount.
+-- >        11 Price includes excise
+-- >              Self explanatory.
+-- >        12 Price includes tax
+-- >              Self explanatory.
+-- >        13 Price include duty
+-- >              Self explanatory.
+-- >        14 Not subject to commission
+-- >              Item concerned is not applicable for commission
+-- >              calculation.
+-- >        15 Not subject to discount
+-- >              Item concerned is not applicable for discount
+-- >              calculation.
+-- >        16 Subject to embargo restriction
+-- >              Item concerned is subject to embargo restriction.
+-- >        17 Item not subject to embargo restrictions
+-- >              Item concerned is not subject to embargo restriction.
+-- >        18 Item subject to national export restrictions
+-- >              Item concerned requires export declaration.
+-- >        19 Item not subject to national export restrictions
+-- >              Item concerned does not require export declaration.
+-- >        20 Item subject to import restrictions
+-- >              Item concerned is liable to import restrictions defined
+-- >              by relevant national authority.
+-- >        21 Item not subject to import restrictions
+-- >              Item concerned is not liable to import restrictions
+-- >              defined by relevant national authority.
+-- >        22 Signed
+-- >              Document has to be signed.
+-- >        23 Authenticated
+-- >              Document/message has to have official or regulatory
+-- >              approval.
+-- >        24 Original(s) to be certified
+-- >              Original document/message is to be certified by an
+-- >              official, or otherwise qualified, organization or person.
+-- >        25 Original(s) to be legalized
+-- >              Original document/message is to be issued under the legal
+-- >              requirements of a governmental authority.
+-- >        26 Quote documentary credit number
+-- >              The documentary credit number of the issuing bank must be
+-- >              quoted on the document.
+-- >        27 Full set bill of lading
+-- >              Full set of bill of lading is required.
+-- >        28 Full set bill of lading less one original
+-- >              Full set of bill of lading, less one original bill of
+-- >              lading, is required.
+-- >        29 Full set bill of lading less two originals
+-- >              Full set of bill of lading, less two originals bill of
+-- >              lading, is required.
+-- >        30 Shipped on board
+-- >              Transport document is to be marked "shipped on board".
+-- >        31 Freight prepaid to be marked
+-- >              Transport document is to be marked "freight prepaid".
+-- >        32 Freight collect to be marked
+-- >              Transport document is to be marked "freight collect".
+-- >        33 Issued to order and blank endorsed
+-- >              Document is to be issued to order and must be blank
+-- >              endorsed.
+-- >        34 Issued and endorsed to the order of
+-- >              Document is to be issued and endorsed to the order of a
+-- >              specified party.
+-- >        35 Consigned to
+-- >              Transport document is to be consigned to a specified
+-- >              party.
+-- >        36 Notify
+-- >              Transport document is to be marked "notify party".
+-- >        37 Issued by
+-- >              Document is to be issued by a specified party.
+-- >        38 Charter party allowed
+-- >              Charter party bill of lading is allowed.
+-- >        39 Loading on deck allowed
+-- >              Loading of goods on deck is allowed.
+-- >        40 Quote actual flight date and flight number
+-- >              Document/message must evidence the actual flight date and
+-- >              the flight number certifying air transportation and
+-- >              countersigned by the respective airline company.
+-- >        41 House AWB allowed
+-- >              House air waybill is allowed.
+-- >        42 Express post receipt
+-- >              Express post receipt is required.
+-- >        43 Air parcel post receipt
+-- >              Air parcel post receipt is required.
+-- >        44 Parcel post receipt
+-- >              Parcel post receipt is required.
+-- >        45 Issued to bearer
+-- >              Document is to be issued to bearer.
+-- >        46 Full set of insurance certificate
+-- >              Full set of insurance certificate is required.
+-- >        47 Full set of insurance policy
+-- >              Full set of insurance policy is required.
+-- >        48 Addressed to
+-- >              Document is to be addressed to a specified party.
+-- >        49 Transmission by telecommunication
+-- >              Document is to be transmitted by telecommunication.
+-- >        50 Bill of exchange drawn on
+-- >              Bill of exchange is to be drawn on "party".
+-- >        51 Bill of exchange in duplicate
+-- >              Bill of exchange is to be issued as drawn in duplicate.
+-- >        52 Insurance certificate alternative
+-- >              Alternative to insurance certificate.
+-- >        53 Insurance policy alternative
+-- >              Alternative to insurance policy.
+-- >        54 Original(s) and copies to be certified
+-- >              Original and copies of document/message is to be
+-- >              certified by an official, or otherwise qualified,
+-- >              organization or person.
+-- >        55 Original(s) and copies to be legalized
+-- >              Original and copies of document/message is to be issued
+-- >              under the legal requirements or a governmental authority.
+-- >        56 Consolidators AWB allowed
+-- >              Consolidators air waybill is allowed.
+-- >        57 Full set
+-- >              Full set of a document is required.
+-- >        58 Full set less one original
+-- >              Full set of a document, less one original, is required.
+-- >        59 Full set less two originals
+-- >              Full set of a document, less two originals, is required.
+-- >        60 Goods despatched to
+-- >              Document must show that the goods have been despatched to
+-- >              a specified party.
+-- >        61 Insurance certificate allowed
+-- >              Presentation of an insurance certificate instead of an
+-- >              insurance policy is allowed.
+-- >        62 Issued to
+-- >              Document is to be issued to a specified party.
+-- >        63 Original(s) and copy(ies) signed
+-- >              Original(s) and copy(ies) of the document must be signed.
+-- >        64 Original(s) signed
+-- >              Original(s) of the document must be signed.
+-- >        65 No disposal clause
+-- >              The shipper hereby irrevocably renounces any right to
+-- >              vary the identity of the consignee of these goods during
+-- >              transit.
+-- >        66 Delivery without change of ownership
+-- >              There is no change of ownership of the goods after they
+-- >              are received by the consignee.
+-- >        67 Delivery with change of ownership
+-- >              There is a change of ownership of the goods after they
+-- >              are received by the consignee.
+-- >        68 Supply for outright purchase/sale
+-- >              Goods are supplied under outright purchase/sale
+-- >              condition.
+-- >        69 Supply for consignment
+-- >              Goods are supplied for consignment purposes.
+-- >        70 Supply for sale 'on approval' or after trial
+-- >              The sale of the goods will only be finalised after trial
+-- >              or approval.
+-- >        71 Exchange of goods compensated in kind
+-- >              Goods are delivered on the basis of a compensation
+-- >              kind.
+-- >        72 Sale for export by foreigner travelling in member state
+-- >           concerned
+-- >              A cross border delivery of goods to be sold by a
+-- >              foreigner travelling in the European Economic Community
+-- >              member state concerned.
+-- >        73 Samples
+-- >              The delivered goods are samples.
+-- >        74 Temporary export, loan or hire
+-- >              Loaned or hired goods delivered on a temporary export
+-- >              basis.
+-- >        75 Temporary export, leasing
+-- >              Leased goods delivered on a temporary export basis.
+-- >        76 Temporary export, operation for job processing
+-- >              Goods temporarily exported for operation for job
+-- >              processing.
+-- >        77 Temporary export, repair and maintenance against payment
+-- >              Goods temporarily exported for a chargeable repair or
+-- >              maintenance reason.
+-- >        78 Temporary export, repair and maintenance free of charge
+-- >              Goods temporarily exported for a free of charge repair or
+-- >              maintenance reason.
+-- >        79 Reimport following job processing
+-- >              Goods reimported after they have been used for job
+-- >              processing.
+-- >        80 Reimport following repair and maintenance against payment
+-- >              Goods reimported after a temporary export for a
+-- >              chargeable repair or maintenance reason.
+-- >        81 Reimport following repair and maintenance free of charge
+-- >              Goods reimported after a temporary export for a
+-- >              free of charge repair or maintenance reason.
+-- >        82 Supply of goods under joint production contract for defence
+-- >           purposes
+-- >              Goods supplied under joint production contact for
+-- >              defence purposes condition.
+-- >        83 Supply of goods under joint production contract for civil
+-- >           purposes
+-- >              Goods supplied under joint production contact for
+-- >              civil purposes condition.
+-- >        84 Supply of goods for warehousing for foreign account
+-- >              Goods supplied for warehousing for foreign account.
+-- >        85 Supply of goods as gifts by country of despatch and food aid
+-- >           under European Economic Community regulation
+-- >              Goods supplied as gifts by country of despatch and food
+-- >              aid under European Economic Community regulation.
+-- >        86 Supply of goods for disaster relief equipment
+-- >              Goods supplied as disaster relief equipment.
+-- >        87 Supply of goods as transactions without compensation
+-- >              Goods supplied as transactions without compensation
+-- >              (financial or otherwise) involving goods which will not
+-- >              be re-exported or compensated by the importation of
+-- >              equivalent goods.
+-- >        88 Supply of goods as returned consignment on which payment has
+-- >           been made
+-- >              Goods supplied as returned consignment on which payment
+-- >              has been made.
+-- >        89 Supply of goods as returned consignment on which no payment
+-- >           has been made
+-- >              Goods supplied as returned consignment on which no
+-- >              payment has been made.
+-- >        90 Supply of goods in standard exchange giving rise to payment
+-- >              Goods supplied in standard exchange giving rise to
+-- >              payment.
+-- >        91 Supply of goods in standard exchange not giving rise to
+-- >           payment
+-- >              Goods supplied in standard exchange not giving rise to
+-- >              payment.
+-- >        92 Supply of goods/services in standard exchange under warranty
+-- >              Goods/services provided in standard exchange under
+-- >              warranty.
+-- >        93 Goods
+-- >              The special conditions for the tax declaration are linked
+-- >              to the fact that the line item relates to goods.
+-- >        94 Service
+-- >              The special conditions for the tax declaration are linked
+-- >              to the fact that the line item is a service.
+-- >        95 Financial regulation
+-- >              The special conditions are linked to the fact that the
+-- >              line item is a financial regulation.
+-- > +      96 Promotional advertising
+-- >              A media press communication informing about a promotion.
+-- > +      97 Promotional price
+-- >              Reduction in price for a specified period of time for
+-- >              promotional purposes.
+-- > +      98 Promotional shelf display
+-- >              Product in promotion is displayed in a special shelf or
+-- >              display.
+-- > +      99 Safety data sheet required to accompany goods when moved
+-- >              Material safety data sheet is required to accompany the
+-- >              goods when they are moved.
+-- > +     100 Multiple delivery points
+-- >              An order that has more than one specified delivery point.
+simple4183 :: Parser Value
+simple4183 = simple "4183" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4215.hs b/specification/src/Text/Edifact/D96A/Simples/S4215.hs
new file mode 100644
index 0000000..d64517c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4215.hs
@@ -0,0 +1,82 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4215
+  ( simple4215
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4215  Transport charges method of payment, coded
+-- >
+-- >   Desc: Identification of method of payment for transport charges.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Account
+-- >              The charges are to be charged to an account.
+-- >    CA     Advance collect
+-- >              The amount of freight or other charge on a shipment
+-- >              advanced by one transportation line to another or to the
+-- >              shipper, to be collected from consignee.
+-- >    CC     Collect
+-- >              A shipment on which freight charges will be paid by
+-- >              consignee.
+-- >    CF     Collect, freight credited to payment customer
+-- >              Self explanatory.
+-- >    DF     Defined by buyer and seller
+-- >              Self explanatory.
+-- >    FO     FOB port of call
+-- >              Title and control of goods pass to the buyer at port of
+-- >              call. Responsibility for export taxes and cost of
+-- >              documents for overseas shipments have not been specified.
+-- >    IC     Information copy, no payment due
+-- >              Transaction set has been provided for information only.
+-- >    MX     Mixed
+-- >              Self explanatory.
+-- >    NC     Service freight, no charge
+-- >              Self explanatory.
+-- >    NS     Not specified
+-- >              Self explanatory.
+-- >    PA     Advance prepaid
+-- >              Costs have been paid in advance.
+-- >    PB     Customer pick-up/backhaul
+-- >              Buyer's private carriage picks up the goods as a return
+-- >              load to the buyer's facility.
+-- >    PC     Prepaid but charged to customer
+-- >              shipping charges have been paid in advance of shipment
+-- >              but are charged back to consignee usually as line item on
+-- >              invoice for the purchased goods.
+-- >    PE     Payable elsewhere
+-- >              Place of payment not known at the begin of conveyance.
+-- >    PO     Prepaid only
+-- >              Payment in advance of freight and/or other charges prior
+-- >              to delivery of shipment at destination, usually by
+-- >              shipper at point of origin.
+-- >    PP     Prepaid (by seller)
+-- >              Seller of goods makes payment to carrier for freight
+-- >              charges prior to shipment.
+-- >    PU     Pickup
+-- >              Customer is responsible for payment of pickup charges at
+-- >              shipping point.
+-- >    RC     Return container freight paid by customer
+-- >              Self explanatory.
+-- >    RF     Return container freight free
+-- >              Self explanatory.
+-- >    RS     Return container freight paid by supplier
+-- >              Self explanatory.
+-- >    TP     Third party pay
+-- >              A third party, someone other than buyer or seller, is
+-- >              identified as responsible for payment of shipping
+-- >              charges.
+-- >    WC     Weight condition
+-- >              Description to be provided.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple4215 :: Parser Value
+simple4215 = simple "4215" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4219.hs b/specification/src/Text/Edifact/D96A/Simples/S4219.hs
new file mode 100644
index 0000000..167406e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4219.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4219
+  ( simple4219
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4219  Transport priority, coded
+-- >
+-- >   Desc: Coded priority of requested transport service.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Express
+-- >              Express treatment (if by rail, legal express regime for
+-- >              parcels transport).
+-- >         2 High speed
+-- >              Transport under legal international rail convention (CIM)
+-- >              concluded between rail organizations and based on fast
+-- >              routing and specified timetables.
+-- >         3 Normal speed
+-- >              Transport under legal international rail convention (CIM)
+-- >              concluded between rail organizations.
+-- >         4 Post service
+-- >              Transport under conditions specified by UPU (Universal
+-- >              Postal Union) and Rail organizations (parcels transport
+-- >              only).
+simple4219 :: Parser Value
+simple4219 = simple "4219" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4221.hs b/specification/src/Text/Edifact/D96A/Simples/S4221.hs
new file mode 100644
index 0000000..23a7de2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4221.hs
@@ -0,0 +1,123 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4221
+  ( simple4221
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 4221  Discrepancy, coded
+-- >
+-- >   Desc: Code defining the disposition of any difference between the
+-- >         quantity ordered and invoiced, or shipped and invoiced for a
+-- >         line item or transaction.
+-- >
+-- >   Repr: an..3
+-- >
+-- > +  AA     Item discontinued by wholesaler
+-- >              The wholesaler no longer offers the ordered product.
+-- > +  AB     Item no longer produced
+-- >              The item ordered has been discontinued and is no longer
+-- >              in production.
+-- > +  AC     Over-shipped
+-- >              Code indicating that there was an excess quantity of
+-- >              goods in a shipment relative to the order.
+-- > +  AD     Item out of stock at manufacturer
+-- >              The item is out of stock at manufacturer.
+-- > +  AE     Delivered but not advised
+-- >              Shipment or goods have been delivered without any advance
+-- >              notification of delivery.
+-- > +  AF     Goods delivered damaged
+-- >              Part or all of the goods in a shipment were delivered
+-- >              damaged.
+-- > +  AG     Delivered too late
+-- >              Delivered but at a later date than the delivery date
+-- >              under the agreed conditions or stipulated in the order.
+-- >    AN     Available now - no shipping schedule
+-- >              Self explanatory.
+-- >    AS     Available now - scheduled to ship (date)
+-- >              Self explanatory.
+-- >    BK     Back ordered from previous order
+-- >              Self explanatory.
+-- >    BP     Shipment partial - back order to follow
+-- >              Self explanatory.
+-- >    CA     Customer inquiry - all items
+-- >              Self explanatory.
+-- >    CC     Shipment complete
+-- >              Self explanatory.
+-- >    CE     Shipment includes extra items to meet price break
+-- >              Self explanatory.
+-- >    CI     Customer inquiry - shipped items only
+-- >              Self explanatory.
+-- >    CK     Cancelled from previous order
+-- >              Self explanatory.
+-- >    CM     Shipment complete with additional quantity
+-- >              Self explanatory.
+-- >    CN     Next carrier, PVE - (date)
+-- >              Self explanatory.
+-- >    CO     Customer inquiry - unshipped items only
+-- >              Self explanatory.
+-- >    CP     Shipment partial - considered complete, no backorder
+-- >              Self explanatory.
+-- >    CS     Shipment complete with substitution
+-- >              Self explanatory.
+-- >    IC     Item cancelled
+-- >              Self explanatory.
+-- >    IS     Item represents substitution from original order
+-- >              Self explanatory.
+-- >    LS     Last shipment (date)
+-- >              Self explanatory.
+-- >    NF     Not yet published
+-- >              Self explanatory.
+-- >    NN     Not in process - no shipping schedule
+-- >              Self explanatory.
+-- >    NS     Not in process - schedule to ship (date)
+-- >              Self explanatory.
+-- >    OF     Order sent to factory for production (date)
+-- >              Self explanatory.
+-- >    OM     Item sent to factory for production (date)
+-- >              Self explanatory.
+-- >    OP     Out of print
+-- >              Self explanatory.
+-- >    OS     Item out of stock because of strike of force majeure
+-- >              Self explanatory.
+-- >    OW     Item out of stock at wholesaler
+-- >              Self explanatory.
+-- >    PA     Purchase order inquiry - all items
+-- >              Self explanatory.
+-- >    PD     Purchase order complete
+-- >              Self explanatory.
+-- >    PI     Purchase order inquiry - shipped items only
+-- >              Self explanatory.
+-- >    PK     Packed-to-date (date)
+-- >              Self explanatory.
+-- >    PN     In process - no shipping schedule
+-- >              Self explanatory.
+-- >    PO     Purchase order inquiry - unshipped items only
+-- >              Self explanatory.
+-- >    PP     Purchase order inquiry - specific items
+-- >              Self explanatory.
+-- >    PS     In process - scheduled to ship (date)
+-- >              Self explanatory.
+-- >    RA     Item rationed
+-- >              Self explanatory.
+-- >    SL     Shipped-to-date (date)
+-- >              Self explanatory.
+-- >    SP     Scheduled for production at factory
+-- >              Self explanatory.
+-- >    SS     Split shipment
+-- >              Shipment is only part of the ordered quantity.
+-- >    TW     Item temporary discontinued by wholesaler
+-- >              Self explanatory.
+-- >    UR     Unsolicited report
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple4221 :: Parser Value
+simple4221 = simple "4221" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4233.hs b/specification/src/Text/Edifact/D96A/Simples/S4233.hs
new file mode 100644
index 0000000..f288b86
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4233.hs
@@ -0,0 +1,90 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4233
+  ( simple4233
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 4233  Marking instructions, coded
+-- >
+-- >   Desc: Code indicating instructions on how specified packages or
+-- >         physical units should be marked.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Do not mark suppliers company name
+-- >              Self explanatory.
+-- >         2 Mark customers company name
+-- >              Self explanatory.
+-- >         3 Mark customers references
+-- >              Self explanatory.
+-- >         4 Mark additionally customers article description
+-- >              Self explanatory.
+-- >         5 Mark exclusively customers article description
+-- >              Self explanatory.
+-- >         6 Mark packages dimensions
+-- >              Self explanatory.
+-- >         7 Mark net weight
+-- >              Self explanatory.
+-- >         8 Mark gross weight
+-- >              Self explanatory.
+-- >         9 Mark tare weight
+-- >              Self explanatory.
+-- >        10 Mark batch number
+-- >              Self explanatory.
+-- >        11 Mark article number customer
+-- >              Self explanatory.
+-- >        12 Mark running number of packages
+-- >              Self explanatory.
+-- >        13 Mark date of production
+-- >              Self explanatory.
+-- >        14 Mark expiry date
+-- >              Self explanatory.
+-- >        15 Mark supplier number
+-- >              Self explanatory.
+-- >        16 Buyer's instructions
+-- >              Markings as specified by the buyer.
+-- >        17 Seller's instructions
+-- >              Markings as specified by the seller.
+-- >        18 Carrier's instructions
+-- >              Markings as specified by carrier.
+-- >        19 Legal requirements
+-- >              Markings as specified by law.
+-- >        20 Industry instructions
+-- >              Markings as specified by industry.
+-- >        21 Line item only
+-- >              Exclusive reference markings for this line.
+-- >        22 Premarked by buyer
+-- >              Self explanatory.
+-- >        23 Entire shipment
+-- >              Markings refer to the entire shipment.
+-- >        24 Shipper assigned
+-- >              Markings to identify a shipment, package or carton as
+-- >              assigned by shipper.
+-- >        25 Shipper assigned roll number
+-- >              Markings to identify a roll as assigned by the shipper.
+-- >        26 Shipper assigned skid number
+-- >              Markings used to identify a skid as assigned by shipper.
+-- >        27 Uniform Code Council (UCC) format
+-- >              Markings according to UCC format are required. System of
+-- >              coding products where by each item/multipack case type is
+-- >              uniquely identified. A unique manufacturer Id is assigned
+-- >              by the UCC.
+-- >        28 Mark free text
+-- >              Description to be provided.
+-- > +      29 Mark case number
+-- >              Case numbers to be used for marking.
+-- > +      30 Mark serial shipping container code
+-- >              Requests the marking of the serial shipping container
+-- >              code to the transport container or packaging.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple4233 :: Parser Value
+simple4233 = simple "4233" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4237.hs b/specification/src/Text/Edifact/D96A/Simples/S4237.hs
new file mode 100644
index 0000000..d3b6818
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4237.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4237
+  ( simple4237
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4237  Prepaid/collect indicator, coded
+-- >
+-- >   Desc: Code indicating whether freight item amount is prepaid or to
+-- >         be collected.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Payable elsewhere
+-- >              Responsibility for payment of transport charges unknown
+-- >              at time of departure.
+-- >    B      Third party to pay
+-- >              A third party to pay the freight bill is known at the
+-- >              time of shipment.
+-- >    C      Collect
+-- >              Charges are (to be) collected from the consignee at the
+-- >              destination.
+-- >    P      Prepaid
+-- >              Charges are (to be) prepaid before the transport actually
+-- >              leaves.
+simple4237 :: Parser Value
+simple4237 = simple "4237" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4294.hs b/specification/src/Text/Edifact/D96A/Simples/S4294.hs
new file mode 100644
index 0000000..62f0ff2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4294.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4294
+  ( simple4294
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4294  Change reason
+-- >
+-- >    Desc: Description of the reason for a change.
+-- >
+-- >    Repr: an..35
+simple4294 :: Parser Value
+simple4294 = simple "4294" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4295.hs b/specification/src/Text/Edifact/D96A/Simples/S4295.hs
new file mode 100644
index 0000000..36a8607
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4295.hs
@@ -0,0 +1,117 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4295
+  ( simple4295
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 4295  Change reason, coded
+-- >
+-- >   Desc: Identification of the reason for a change.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Member attribute change
+-- >              An attribute of a member of a group has changed.
+-- >    AB     Abroad
+-- >              In an other country.
+-- >    AC     Member category change
+-- >              The member or benefits category has changed.
+-- >    AD     Death
+-- >              Subject has died.
+-- >    AE     Disability
+-- >              Subject is disabled.
+-- >    AF     Early retirement
+-- >              Retirement before the normal retirement age.
+-- >    AG     Hardship
+-- >              Subject is incurring hardship.
+-- >    AH     Ill health
+-- >              Subject has ill health.
+-- >    AI     Leaving employer
+-- >              Subject is leaving employer.
+-- >    AJ     Leaving industry
+-- >              Person is leaving, or has left, an identified industry.
+-- >    AK     Level/rate table change
+-- >              The insurance level/rate table has changed.
+-- >    AL     Normal retirement
+-- >              Subject has retired at the normal retirement age.
+-- >    AM     Other
+-- >              Reason differs from any of the other coded values.
+-- >    AN     Retrenchment
+-- >              Subject has been retrenched from work.
+-- >    AO     Resignation
+-- >              Subject has resigned from work.
+-- >    AP     Member status change
+-- >              The member status has changed.
+-- >    AQ     Alternate quantity and unit of measurement
+-- >              Self explanatory.
+-- > +  AR     Article out of assortment for particular company
+-- >              Item normally part of a suppliers standard assortment but
+-- >              is unavailable for a specific buyer due to legal or
+-- >              commercial reasons.
+-- > +  AS     Article out of assortment
+-- >              Article normally part of a standard assortment is
+-- >              unavailable.
+-- > +  AT     Item not ordered
+-- >              Code indicating the item or product was not ordered.
+-- > +  AU     No delivery due to outstanding payments
+-- >              Delivery of an item was stopped due to outstanding
+-- >              deliveries which have not yet been paid.
+-- > +  AV     Out of inventory
+-- >              Item is out of inventory.
+-- >    BD     Blueprint deviation
+-- >              Self explanatory.
+-- >    BQ     Balancing quantity
+-- >              Amount needed to resolve difference between ordered and
+-- >              delivered quantity.
+-- >    DC     Date change
+-- >              Self explanatory.
+-- >    EV     Estimated quantity
+-- >              Self explanatory.
+-- >    GU     Gross volume per pack and unit of measure
+-- >              Self explanatory.
+-- >    GW     Gross weight per pack
+-- >              Self explanatory.
+-- >    LD     Length difference
+-- >              Self explanatory.
+-- >    MC     Pack/size measure difference
+-- >              Description to be provided.
+-- >    PC     Pack difference
+-- >              Self-explanatory.
+-- >    PD     Pack dimension difference
+-- >              Description to be provided.
+-- >    PQ     Pack quantity
+-- >              Self explanatory.
+-- >    PS     Product/services ID change
+-- >              Self explanatory.
+-- >    PW     Pack weight difference
+-- >              Self explanatory.
+-- >    PZ     Pack size difference
+-- >              Self-explanatory.
+-- >    QO     Quantity ordered
+-- >              Self explanatory.
+-- >    QP     Quantity based on price qualifier
+-- >              Self explanatory.
+-- >    QT     Quantity price break
+-- >              Self explanatory.
+-- >    SC     Size difference
+-- >              Self explanatory.
+-- >    UM     Unit of measure difference
+-- >              Self explanatory.
+-- >    UP     Unit price
+-- >              Self explanatory.
+-- >    WD     Width difference
+-- >              Self explanatory.
+-- >    WO     Weight qualifier/gross weight per package
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple4295 :: Parser Value
+simple4295 = simple "4295" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4343.hs b/specification/src/Text/Edifact/D96A/Simples/S4343.hs
new file mode 100644
index 0000000..3cf3cc9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4343.hs
@@ -0,0 +1,58 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4343
+  ( simple4343
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 4343  Response type, coded
+-- >
+-- >   Desc: Code specifying the type of acknowledgement required or
+-- >         transmitted.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Debit advice
+-- >              Receiver of the payment message needs to return a debit
+-- >              advice in response to the payment message.
+-- >    AB     Message acknowledgement
+-- >              Indicates that an acknowledge relating to receipt is
+-- >              required.
+-- >    AC     Acknowledge - with detail and change
+-- >              Acknowledge complete including changes.
+-- >    AD     Acknowledge - with detail, no change
+-- >              Acknowledge complete without changes.
+-- >    AF     Debit advice/message acknowledgement
+-- >              The sender wishes to receive both a Debit Advice and an
+-- >              acknowledgement of receipt for a payment message.
+-- >    AG     Authentication
+-- >              Authentication, by a party, of a document established for
+-- >              him by another party.
+-- > +  AI     Acknowledge only changes
+-- >              Acknowledgement of changes only is required.
+-- >    AP     Accepted
+-- >              Indication that the referenced offer or transaction
+-- >              (e.g., cargo booking or quotation request) has been
+-- >              accepted.
+-- >    CA     Conditionally accepted
+-- >              Indication that the referenced offer or transaction
+-- >              (e.g., cargo booking or quotation request) has been
+-- >              accepted under conditions indicated in this message.
+-- >    CO     Confirmation of measurements
+-- >              Indication that the message contains the physical
+-- >              measurements on which the charges will be based.
+-- > #  NA     No acknowledgement needed
+-- >              Self explanatory.
+-- >    RE     Rejected
+-- >              Indication that the referenced offer or transaction
+-- >              (e.g., cargo booking or quotation request) is not
+-- >              accepted.
+simple4343 :: Parser Value
+simple4343 = simple "4343" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4347.hs b/specification/src/Text/Edifact/D96A/Simples/S4347.hs
new file mode 100644
index 0000000..4e8b8ad
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4347.hs
@@ -0,0 +1,45 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4347
+  ( simple4347
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4347  Product id. function qualifier
+-- >
+-- >   Desc: Indication of the function of the product code.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Additional identification
+-- >              Information which specifies and qualifies product
+-- >              identifications.
+-- >         2 Identification for potential substitution
+-- >              The given item number(s) describe(s) a substituting
+-- >              product if the original product is not available.
+-- >         3 Substituted by
+-- >              The given item number is the number of the product that
+-- >              substitutes another one.
+-- >         4 Substituted for
+-- >              The given item number is the number of the original
+-- >              product substituted by another.
+-- >         5 Product identification
+-- >              Self explanatory.
+-- >         6 Successor product id
+-- >              Product id of the product that will follow the one
+-- >              currently in production/trade.
+-- >         7 Predecessor product id
+-- >              Product id of the predecessor of the product currently in
+-- >              production/trade.
+-- >         8 Expired/out of production
+-- >              The given item number is the expired item number of the
+-- >              product. It has been replaced.
+simple4347 :: Parser Value
+simple4347 = simple "4347" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4400.hs b/specification/src/Text/Edifact/D96A/Simples/S4400.hs
new file mode 100644
index 0000000..4e9af50
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4400.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4400
+  ( simple4400
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4400  Instruction
+-- >
+-- >    Desc: Description of an instruction.
+-- >
+-- >    Repr: an..35
+simple4400 :: Parser Value
+simple4400 = simple "4400" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4401.hs b/specification/src/Text/Edifact/D96A/Simples/S4401.hs
new file mode 100644
index 0000000..c5bd232
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4401.hs
@@ -0,0 +1,106 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4401
+  ( simple4401
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4401  Instruction, coded
+-- >
+-- >   Desc: Specification of an action to be taken by the receiver of the
+-- >         message.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Send credit note
+-- >              Self explanatory.
+-- >    AB     Change invoice
+-- >              Send invoice, taking into account specified
+-- >              discrepancies.
+-- >    AD     Advise
+-- >              Instruction to advise a party.
+-- > X  AE     Change invoice
+-- >              Send invoice, taking into account specified
+-- >              discrepancies. Use code value AB.
+-- >    AF     Stop delivery process
+-- >              Self-explanatory.
+-- >    AG     Send replacement
+-- >              The identified item must be sent for replacement.
+-- >    AH     Pick-up
+-- >              The identified item is to be picked up.
+-- >    AI     Advise by telecommunication
+-- >              Advise of documentary credit by telecommunication.
+-- >    AJ     Advise by fax
+-- >              Instruction to advise party by fax.
+-- >    AK     By registered airmail
+-- >              Issue documentary credit by registered airmail.
+-- >    AL     By registered airmail in one set
+-- >              Deliver documents in one set by registered airmail.
+-- >    AM     By registered airmail in two sets
+-- >              Deliver documents in two sets by registered airmail.
+-- >    AP     Advise by phone
+-- >              Instruction to advise party by phone.
+-- >    AT     Advise by telex
+-- >              Instruction to advise party by telex.
+-- >    CO     Convert
+-- >              Convert the message into other format.
+-- >    DA     Without
+-- >              The bank advising the documentary credit is not requested
+-- >              to confirm the credit.
+-- >    DB     May add
+-- >              The bank advising the documentary credit may add its
+-- >              confirmation to the documentary credit.
+-- >    DC     Confirm
+-- >              The bank advising the documentary credit is requested to
+-- >              confirm the credit.
+-- >    DD     By registered mail
+-- >              Issue documentary credit by registered mail.
+-- >    DE     By courier service
+-- >              Issue documentary credit by courier service.
+-- >    DF     By teletransmission
+-- >              Issue documentary credit by teletransmission.
+-- >    DG     Preadvice by teletransmission
+-- >              Preadvise documentary credit by teletransmission.
+-- >    DH     By courier service in one set
+-- >              Deliver documents in one set by courier service.
+-- >    DI     By courier service in two sets
+-- >              Deliver documents in two sets by courier service.
+-- >    DJ     By registered mail in one set
+-- >              Deliver documents in one set by registered mail.
+-- >    DK     By registered mail in two sets
+-- >              Deliver documents in two sets by registered mail.
+-- >    DN     Per teletransmission
+-- >              Deliver documents by teletransmission.
+-- >    DO     Advise beneficiary by phone
+-- >              Advise beneficiary of documentary credit by phone.
+-- >    DP     Late presentation of documents within D/C validity
+-- >           acceptable
+-- >              Late presentation of documents with the documentary
+-- >              credit validity is acceptable.
+-- >    EI     EDI
+-- >              Instructions to advise beneficiary by EDI.
+-- >    EM     Electronic mail
+-- >              Instructions to advise beneficiary by electronic mail.
+-- >    EX     Expedite
+-- >              Forward the information to requested party immediately.
+-- >    QC     Quality control held
+-- >              Goods to be held from distribution by stockholder until a
+-- >              quality control assessment is completed by the
+-- >              manufacturer.
+-- >    QE     Quality control embargo
+-- >              Quality control assessment is negative, goods are to be
+-- >              held from distribution by stockholder.
+-- >    RL     Released
+-- >              Goods are released by manufacturer for distribution by
+-- >              stockholder.
+-- >    SW     S.W.I.F.T.
+-- >              Instructions to advise beneficiary by S.W.I.F.T.
+simple4401 :: Parser Value
+simple4401 = simple "4401" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4403.hs b/specification/src/Text/Edifact/D96A/Simples/S4403.hs
new file mode 100644
index 0000000..523b8fb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4403.hs
@@ -0,0 +1,43 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4403
+  ( simple4403
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4403  Instruction qualifier
+-- >
+-- >   Desc: Code giving specific meaning to the type of instructions.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Action required
+-- >              Instruction requires action.
+-- >         2 Party instructions
+-- >              Self explanatory.
+-- >         3 Maximum value exceeded instructions
+-- >              Instruction how to act if maximum value will be or has
+-- >              been exceeded.
+-- >         4 Confirmation instructions
+-- >              Documentary credit confirmation instructions.
+-- >         5 Method of issuance
+-- >              Documentary credit confirmation of issuance.
+-- >         6 Pre-advice instructions
+-- >              Documentary credit pre-advice instructions.
+-- >         7 Documents delivery instruction
+-- >              Delivery instructions for documents required under a
+-- >              documentary credit.
+-- >         8 Additional terms and/or conditions documentary credit
+-- >              Additional terms and/or  conditions to the documentary
+-- >              credit.
+-- >         9 Investment instruction
+-- >              Instruction refers to an investment.
+simple4403 :: Parser Value
+simple4403 = simple "4403" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4405.hs b/specification/src/Text/Edifact/D96A/Simples/S4405.hs
new file mode 100644
index 0000000..fa997d8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4405.hs
@@ -0,0 +1,69 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4405
+  ( simple4405
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4405  Status, coded
+-- >
+-- >   Desc: Provides information regarding a status.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 To be done
+-- >              Remark that the requested service in the order remains
+-- >              outstanding.
+-- >         2 Done
+-- >              The instruction has been completed.
+-- >         3 Passed on
+-- >              The information has been passed on.
+-- >         4 Final
+-- >              The amount has the status of finality.
+-- >         5 Subject to final payment
+-- >              The amount is subject to finality.
+-- >         6 Minimum
+-- >              The amount quoted is a minimum tariff.
+-- >         7 Fixed
+-- >              The amount quoted is a fixed tariff.
+-- >         8 Maximum
+-- >              The amount quoted is a maximum tariff.
+-- >         9 Information
+-- >              The amount is quoted for information only, it is not part
+-- >              of the charges to be deducted or added.
+-- >        10 0 day available
+-- >              The amount is available today.
+-- >        11 1 day available
+-- >              The amount is available on the next banking office day
+-- >              after the booking date.
+-- >        12 2 days available
+-- >              The amount is available on the second banking office day
+-- >              after the booking date.
+-- >        13 3 days available
+-- >              The amount available on the third banking office day
+-- >              after the booking date.
+-- >        14 Uncollected funds
+-- >              Funds not collected by beneficiary.
+-- >        15 Nil
+-- >              Self explanatory.
+-- >        16 None advised
+-- >              Self explanatory.
+-- >        17 Requested
+-- >              Self explanatory.
+-- >        18 Free of charge
+-- >              Self explanatory.
+-- >        19 Rounded
+-- >              Self explanatory.
+-- >        20 Permanent
+-- >              Self-explanatory.
+-- >        21 Temporary
+-- >              Self-explanatory.
+simple4405 :: Parser Value
+simple4405 = simple "4405" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4440.hs b/specification/src/Text/Edifact/D96A/Simples/S4440.hs
new file mode 100644
index 0000000..a551e74
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4440.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4440
+  ( simple4440
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4440  Free text
+-- >
+-- >    Desc: Free text field available to the message sender for
+-- >          information.
+-- >
+-- >    Repr: an..70
+simple4440 :: Parser Value
+simple4440 = simple "4440" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4441.hs b/specification/src/Text/Edifact/D96A/Simples/S4441.hs
new file mode 100644
index 0000000..d0e8f31
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4441.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4441
+  ( simple4441
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    4441  Free text, coded
+-- >
+-- >    Desc: Free text in coded form.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple4441 :: Parser Value
+simple4441 = simple "4441" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4451.hs b/specification/src/Text/Edifact/D96A/Simples/S4451.hs
new file mode 100644
index 0000000..eb47981
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4451.hs
@@ -0,0 +1,486 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4451
+  ( simple4451
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 4451  Text subject qualifier
+-- >
+-- >   Desc: Code specifying subject of a free text.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AAA    Goods description
+-- >              [7002] Plain language description of the nature of the
+-- >              goods sufficient to identify them at the level required
+-- >              for banking, Customs, statistical or transport purposes,
+-- >              avoiding unnecessary detail (Generic term).
+-- >    AAB    Terms of payments
+-- >              [4276] Conditions of payment between the parties to a
+-- >              transaction (generic term).
+-- >    AAC    Dangerous goods additional information
+-- >              Additional information concerning dangerous goods.
+-- >    AAD    Dangerous goods, technical name
+-- >              Proper shipping name, supplemented as necessary with the
+-- >              correct technical name, by which a dangerous substance or
+-- >              article may be correctly identified or which is
+-- >              sufficiently informative to permit identification by
+-- >              reference to generally available literature.
+-- >    AAE    Acknowledgement description
+-- >              The content of an acknowledgement.
+-- >    AAF    Rate additional information
+-- >              Specific details applying to rates.
+-- >    AAG    Party instructions
+-- >              Indicates that the segment contains instructions to be
+-- >              passed on to the identified party.
+-- >    AAH    Customs information
+-- >              [4034] Information entered by Customs on the CIM.
+-- >    AAI    General information
+-- >              Self explanatory.
+-- >    AAJ    Additional conditions of sale/purchase
+-- >              Additional conditions specific to this order or project.
+-- >    AAK    Price conditions
+-- >              Information on the price conditions that are expected or
+-- >              given.
+-- >    AAL    Goods dimensions in characters
+-- >              Expression of a number in characters as length of ten
+-- >              meters.
+-- >    AAM    Equipment re-usage restrictions
+-- >              Technical or commercial reasons why a piece of equipment
+-- >              may not be re-used after the current transport
+-- >              terminates.
+-- >    AAN    Handling restriction
+-- >              Restrictions in handling depending on the technical
+-- >              characteristics of the piece of equipment or on the
+-- >              nature of the goods.
+-- >    AAO    Error description (free text)
+-- >              Error described by a free text.
+-- >    AAP    Response (free text)
+-- >              Free text of the response to a communication.
+-- >    AAQ    Package content's description
+-- >              Self explanatory.
+-- >    AAR    Terms of delivery
+-- >              (4053) Free text of the non Incoterms terms of delivery.
+-- >              For Incoterms, use: 4053.
+-- >    AAS    Bill of lading remarks
+-- >              Self explanatory.
+-- >    AAT    Mode of settlement information
+-- >              Free text information on an IATA Air Waybill to indicate
+-- >              means by which account is to be settled.
+-- >    AAU    Consignment invoice information
+-- >              Self explanatory.
+-- >    AAV    Clearance invoice information
+-- >              Self explanatory.
+-- >    AAW    Letter of credit information
+-- >              Self explanatory.
+-- >    AAX    License information
+-- >              Self explanatory.
+-- >    AAY    Certification statements
+-- >              Self explanatory.
+-- >    AAZ    Additional export information
+-- >              Self explanatory.
+-- >    ABA    Tariff statements
+-- >              Self explanatory.
+-- >    ABC    Conditions of sale or purchase
+-- >              Additional information regarding terms and conditions
+-- >              which apply to the transaction.
+-- >    ABD    Nature of transaction
+-- >              An indication for customs of the type of contract under
+-- >              which goods are supplied.
+-- >    ABE    Additional terms and/or conditions (documentary credit)
+-- >              Additional terms and/or conditions to the documentary
+-- >              credit.
+-- >    ABF    Instructions or information about standby documentary credit
+-- >              Instruction or information about a standby documentary
+-- >              credit.
+-- >    ABG    Instructions or information about partial shipment(s)
+-- >              Instructions or information about partial shipment(s).
+-- >    ABH    Instructions or information about transhipment(s)
+-- >              Instructions or information about transhipment(s).
+-- >    ABI    Additional handling instructions documentary credit
+-- >              Additional handling instructions for a documentary
+-- >              credit.
+-- >    ABJ    Domestic routing information
+-- >              Self explanatory.
+-- >    ABK    Chargeable category of equipment
+-- >              Equipment types are coded by category for financial
+-- >              purposes.
+-- >    ABL    Government information
+-- >              Self explanatory.
+-- >    ABM    Onward routing information
+-- >              Self explanatory.
+-- >    ABN    Accounting information
+-- >              Self explanatory.
+-- >    ABO    Discrepancy information
+-- >              Free text or coded information to indicate a specific
+-- >              discrepancy.
+-- >    ABP    Confirmation instructions
+-- >              Documentary credit confirmation instructions.
+-- >    ABQ    Method of issuance
+-- >              Method of issuance of documentary credit.
+-- >    ABR    Documents delivery instructions
+-- >              Delivery instructions for documents required under a
+-- >              documentary credit.
+-- >    ABS    Additional conditions
+-- >              Additional conditions to the issuance of a documentary
+-- >              credit.
+-- >    ABT    Information/instructions about additional amounts covered
+-- >              Additional amounts information/instruction.
+-- >    ABU    Deferred payment termed additional
+-- >              Additional terms concerning deferred payment.
+-- >    ABV    Acceptance terms additional
+-- >              Additional terms concerning acceptance.
+-- >    ABW    Negotiation terms additional
+-- >              Additional terms concerning negotiation.
+-- >    ABX    Document name and documentary requirements
+-- >              Document name and documentary requirements.
+-- >    ABY    Regulatory information
+-- >              The free text contains information for regulatory
+-- >              authority.
+-- >    ABZ    Instructions/information about revolving documentary credit
+-- >              Instructions/information about a revolving documentary
+-- >              credit.
+-- >    ACA    Documentary requirements
+-- >              Specification of the documentary requirements.
+-- >    ACB    Additional information
+-- >              Self explanatory.
+-- >    ACC    Factor assignment clause
+-- >              Assignment based on an agreement between seller and
+-- >              factor.
+-- >    ACD    Reason
+-- >              Reason for a request or response.
+-- >    ACE    Dispute
+-- >              A notice, usually from buyer to seller, that something
+-- >              was found wrong with goods delivered or the services
+-- >              rendered, or with the related invoice.
+-- >    ACF    Additional attribute information
+-- >              The text refers to information about an additional
+-- >              attribute not otherwise specified.
+-- >    ACG    Absence declaration
+-- >              A declaration on the reason of the absence.
+-- >    ACH    Aggregation statement
+-- >              A statement on the way a specific variable or set of
+-- >              variables has been aggregated.
+-- >    ACI    Compilation statement
+-- >              A statement on the compilation status of an array or
+-- >              other set of figures or calculations.
+-- >    ACJ    Definitional exception
+-- >              An exception to the agreed definition of a term, concept,
+-- >              formula or other object.
+-- >    ACK    Privacy statement
+-- >              A statement on the privacy or confidential nature of an
+-- >              object.
+-- >    ACL    Quality statement
+-- >              A statement on the quality of an object.
+-- >    ACM    Statistical description
+-- >              The description of a statistical object such as a value
+-- >              list, concept, or structure definition.
+-- >    ACN    Statistical definition
+-- >              The definition of a statistical object such as a value
+-- >              list, concept, or structure definition.
+-- >    ACO    Statistical name
+-- >              The name of a statistical object such as a value list,
+-- >              concept or structure definition.
+-- >    ACP    Statistical title
+-- >              The title of a statistical object such as a value list,
+-- >              concept, or structure definition.
+-- >    ACQ    Off-dimension information
+-- >              Information relating to differences between the actual
+-- >              transport dimensions and the normally applicable
+-- >              dimensions.
+-- >    ACR    Unexpected stops information
+-- >              Information relating to unexpected stops during a
+-- >              conveyance.
+-- >    ACS    Principles
+-- >              Text subject is principles section of the UN/EDIFACT
+-- >              rules for presentation of standardized message and
+-- >              directories documentation.
+-- >    ACT    Terms and definition
+-- >              Text subject is terms and definition section of the
+-- >              UN/EDIFACT rules for presentation of standardized message
+-- >              and directories documentation.
+-- >    ACU    Segment name
+-- >              Text subject is segment name.
+-- >    ACV    Simple data element name
+-- >              Text subject is name of simple data element.
+-- >    ACW    Scope
+-- >              Text subject is scope section of the UN/EDIFACT rules for
+-- >              presentation of standardized message and directories
+-- >              documentation.
+-- >    ACX    Message type name
+-- >              Text subject is name of message type.
+-- >    ACY    Introduction
+-- >              Text subject is introduction section of the UN/EDIFACT
+-- >              rules for presentation of standardized message and
+-- >              directories documentation.
+-- >    ACZ    Glossary
+-- >              Text subject is glossary section of the UN/EDIFACT rules
+-- >              for presentation of standardized message and directories
+-- >              documentation.
+-- >    ADA    Functional definition
+-- >              Text subject is functional definition section of the
+-- >              UN/EDIFACT rules for presentation of standardized message
+-- >              and directories documentation.
+-- >    ADB    Examples
+-- >              Text subject is examples as given in the example(s)
+-- >              section of the UN/EDIFACT rules for presentation of
+-- >              standardized message and directories documentation.
+-- >    ADC    Cover page
+-- >              Text subject is cover page of the UN/EDIFACT rules for
+-- >              presentation of standardized message and directories
+-- >              documentation.
+-- >    ADE    Code value name
+-- >              Text subject is name of code value.
+-- >    ADF    Code list name
+-- >              Text subject is name of code list.
+-- >    ADG    Clarification of usage
+-- >              Text subject is an explanation of the intended usage of a
+-- >              segment or segment group.
+-- >    ADH    Composite data element name
+-- >              Text subject is name of composite data element.
+-- >    ADI    Field of application
+-- >              Text subject is field of application of the UN/EDIFACT
+-- >              rules for presentation of standardized message and
+-- >              directories documentation.
+-- > +  ADJ    Type of assets and liabilities
+-- >              Information describing the type of assets and
+-- >              liabilities.
+-- > +  ADK    Promotion information
+-- >              The text contains information about a promotion.
+-- > +  ADL    Meter condition
+-- >              Description of the condition of a meter.
+-- > +  ADM    Meter reading information
+-- >              Information related to a particular reading of a meter.
+-- > +  ADN    Type of transaction reason
+-- >              Information describing the type of the reason of
+-- >              transaction.
+-- > +  ADO    Type of survey question
+-- >              Type of survey question.
+-- >    ALC    Allowance/charge information
+-- >              Information referring to allowance/charge.
+-- >    ALL    All documents
+-- >              The note implies to all documents.
+-- >    ARR    Arrival conditions
+-- >              Conditions under which arrival takes place.
+-- >    AUT    Authentication
+-- >              Name, code, password etc. given for authentication
+-- >              purposes.
+-- >    BLC    Bill of lading clause
+-- >              Clause on the bill of lading regarding the cargo being
+-- >              shipped.
+-- >    BLR    Transport document remarks
+-- >              Remarks concerning the complete consignment to be printed
+-- >              on the bill of lading.
+-- >    CCI    Customs clearance instructions
+-- >              Any coded or clear instruction agreed by customer and
+-- >              carrier regarding the declaration of the goods.
+-- >    CEX    Customs clearance instructions export
+-- >              Any coded or clear instruction agreed by customer and
+-- >              carrier regarding the export declaration of the goods.
+-- >    CHG    Change information
+-- >              Note contains change information.
+-- >    CIP    Customs clearance instruction import
+-- >              Any coded or clear instruction agreed by customer and
+-- >              carrier regarding the import declaration of the goods.
+-- >    CLP    Clearance place requested
+-- >              Name of the place where Customs clearance is asked to be
+-- >              executed as requested by the consignee/consignor.
+-- >    CLR    Loading remarks
+-- >              Instructions concerning the loading of the container.
+-- >    COI    Order information
+-- >              Additional information related to an order.
+-- >    CUR    Customer remarks
+-- >              Remarks from or for a supplier of goods or services.
+-- >    CUS    Customs declaration information
+-- >              Note contains customs declaration information.
+-- >    DAR    Damage remarks
+-- >              Remarks concerning damage on the cargo.
+-- >    DCL    Declaration
+-- >              [4020] Text of a declaration made by the issuer of the
+-- >              document (CIM 12).
+-- >    DEL    Delivery information
+-- >              Information about delivery.
+-- >    DIN    Delivery instructions
+-- >              Instructions regarding the delivery of the cargo.
+-- >    DOC    Documentation instructions
+-- >              Self explanatory.
+-- >    DUT    Duty declaration
+-- >              Self explanatory.
+-- >    EUR    Effective used routing
+-- >              Physical route effectively used for the movement of the
+-- >              means of transport.
+-- >    FBC    First block to be printed on the transport contract
+-- >              Self explanatory.
+-- >    GBL    Government bill of lading information
+-- >              Free text information on a transport document to indicate
+-- >              payment information by Government Bill of Lading.
+-- >    GEN    Entire transaction set
+-- >              Note is general in nature, applies to entire transaction
+-- >              segment.
+-- >    GS7    Further information concerning GGVS par. 7
+-- >              Special permission for road transport of certain goods in
+-- >              the German dangerous goods regulation for road transport.
+-- >    HAN    Handling instructions
+-- >              [4078] Instructions on how specified goods, packages or
+-- >              containers should be handled.
+-- >    HAZ    Hazard information
+-- >              Self explanatory.
+-- >    ICN    Information for consignee
+-- >              [4070] Any remark given for the information of the
+-- >              consignee (CIM 21).
+-- >    IIN    Insurance instructions
+-- >              Instructions regarding the cargo insurance.
+-- >    IMI    Invoice mailing instructions
+-- >              Instructions as to which freight and charges components
+-- >              have to be mailed to whom.
+-- >    IND    Commercial invoice item description
+-- >              Free text describing goods on a commercial invoice line.
+-- >    INS    Insurance information
+-- >              Specific note contains insurance information.
+-- >    INV    Invoice instruction
+-- >              Note contains invoice instructions.
+-- >    IRP    Information for railway purpose
+-- >              [4090] Date entered by railway stations when required,
+-- >              e.g. specified trains, additional sheets for freight
+-- >              calculations, special measures, etc.. (CIM 8).
+-- >    ITR    Inland transport details
+-- >              Information concerning the pre-carriage to the port of
+-- >              discharge if by other means than a vessel.
+-- >    ITS    Testing instructions
+-- >              Instructions regarding the testing that is required to be
+-- >              carried out on the items in the transaction.
+-- >    LIN    Line item
+-- >              Note contains line item information.
+-- >    LOI    Loading instruction
+-- >              Instructions where specified packages or containers are
+-- >              to be loaded on a means of transport.
+-- >    MCO    Miscellaneous charge order
+-- >              Free text accounting information on an IATA Air Waybill
+-- >              to indicate payment information by Miscellaneous charge
+-- >              order.
+-- >    MKS    Additional marks/numbers information
+-- >              Self explanatory.
+-- >    ORI    Order instruction
+-- >              Free text contains order instructions.
+-- >    OSI    Other service information
+-- >              General information created by the sender of general or
+-- >              specific value.
+-- >    PAC    Packing/marking information
+-- >              Information regarding the packaging and/or marking of
+-- >              goods.
+-- >    PAI    Payment instructions information
+-- >              The free text contains payment instructions information
+-- >              relevant to the message.
+-- >    PAY    Payables information
+-- >              Note contains payables information.
+-- >    PKG    Packaging information
+-- >              Note contains packaging instructions.
+-- >    PKT    Packaging terms information
+-- >              Self explanatory.
+-- >    PMD    Payment detail/remittance information
+-- >              The free text contains payment details.
+-- >    PMT    Payment information
+-- >              Note contains payments information.
+-- >    PRD    Product information
+-- >              Self explanatory.
+-- >    PRF    Price calculation formula
+-- >              Additional information regarding the price formula used
+-- >              for calculating the item price.
+-- >    PRI    Priority information
+-- >              Note contains priority information.
+-- >    PUR    Purchasing information
+-- >              Note contains purchasing information.
+-- >    QIN    Quarantine instructions
+-- >              Instructions regarding quarantine, i.e. the period during
+-- >              which an arriving vessel, including its equipment, cargo,
+-- >              crew or passengers, suspected to carry or carrying a
+-- >              contagious disease is detained in strict isolation to
+-- >              prevent the spread of such a disease.
+-- >    QQD    Quality demands/requirements
+-- >              Specification of the quality/performance expectations or
+-- >              standards to which the items must conform.
+-- >    QUT    Quotation instruction/information
+-- >              Note contains quotation information.
+-- >    RAH    Risk and handling information
+-- >              Information concerning risks induced by the goods and/or
+-- >              handling instruction.
+-- >    REG    Regulatory information
+-- >              The free text contains information for regulatory
+-- >              authority.
+-- >    RET    Return to origin information
+-- >              Free text information on an IATA Air Waybill to indicate
+-- >              consignment returned because of non delivery.
+-- >    REV    Receivables
+-- >              Description to be provided.
+-- >    RQR    Requested routes/routing instructions
+-- >              [3074] Names of places via which the consignor requests a
+-- >              consignment to be routed.
+-- >    RQT    Tariffs and route requested
+-- >              [4120] Stipulation of the tariffs to be applied showing,
+-- >              where applicable, special-agreement numbers or
+-- >              references; indication of routes by frontier points or by
+-- >              frontier stations and, when necessary, by transit
+-- >              stations between.
+-- >    SAF    Safety information
+-- >              Self explanatory.
+-- >    SIC    Sender's instruction to carrier
+-- >              [4284] Instructions given and declarations made by the
+-- >              sender to the carrier concerning Customs, insurance, and
+-- >              other formalities.
+-- >    SIN    Special instructions
+-- >              Special instructions like licence no, high value, handle
+-- >              with care, glass.
+-- >    SLR    Ship line requested
+-- >              Shipping line requested to be used for traffic between
+-- >              European continent and U.K. for Ireland.
+-- >    SPA    Special permission for transport, generally
+-- >              Statement that a special permission has been obtained for
+-- >              the transport (and/or routing) in general, and reference
+-- >              to such permission.
+-- >    SPG    Special permission concerning the goods to be transported
+-- >              Statement that a special permission has been obtained for
+-- >              the transport (and/or routing) of the goods specified,
+-- >              and reference to such permission.
+-- >    SPH    Special handling
+-- >              Note contains special handling information.
+-- >    SPP    Special permission concerning package
+-- >              Statement that a special permission has been obtained for
+-- >              the packaging, and reference to such permission.
+-- >    SPT    Special permission concerning transport means
+-- >              Statement that a special permission has been obtained for
+-- >              the use of the means transport, and reference to such
+-- >              permission.
+-- >    SRN    Subsidiary risk number (IATA/DGR)
+-- >              Number(s) of subsidiary risks, induced by the goods,
+-- >              according to the valid classification.
+-- >    SSR    Special service request
+-- >              Request for a special service concerning the transport of
+-- >              the goods.
+-- >    SUR    Supplier remarks
+-- >              Remarks from or for a supplier of goods or services.
+-- >    TCA    Tariff and class applied
+-- >              [5430] Specification of tariff applied (CIM 55).
+-- >    TDT    Transport details remarks
+-- >              Additional information related to transport details.
+-- >    TRA    Transportation information
+-- >              General information regarding the transport of the cargo.
+-- >    TRR    Requested tariff
+-- >              Stipulation of the tariffs to be applied showing, where
+-- >              applicable, special agreement numbers or references.
+-- >    TXD    Tax declaration
+-- >              Description to be provided.
+-- >    WHI    Warehouse instruction/information
+-- >              Note contains warehouse information.
+-- >    ZZZ    Mutually defined
+-- >              Note contains information mutually defined by trading
+-- >              partners.
+simple4451 :: Parser Value
+simple4451 = simple "4451" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4453.hs b/specification/src/Text/Edifact/D96A/Simples/S4453.hs
new file mode 100644
index 0000000..8e3b9fd
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4453.hs
@@ -0,0 +1,32 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4453
+  ( simple4453
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4453  Text function, coded
+-- >
+-- >   Desc: Code specifying how to handle the text.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Text for subsequent use
+-- >              The occurrence of this text does not affect message
+-- >              processing.
+-- >         2 Text replacing missing code
+-- >              Text description of a coded data item for which there is
+-- >              no currently available code.
+-- >         3 Text for immediate use
+-- >              Text must be read before actioning message.
+-- >         4 No action required
+-- >              Pass text on to later recipient.
+simple4453 :: Parser Value
+simple4453 = simple "4453" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4455.hs b/specification/src/Text/Edifact/D96A/Simples/S4455.hs
new file mode 100644
index 0000000..4af09da
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4455.hs
@@ -0,0 +1,35 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4455
+  ( simple4455
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4455  Back order, coded
+-- >
+-- >   Desc: Code to identify the back order agreement.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    B      Back order only if new item (book industry - not yet
+-- >           published only)
+-- >              Item on back order due to unpublished status.
+-- >    F      Factory ship
+-- >              Ship directly from factory to purchaser.
+-- >    N      No back order
+-- >              Back order is unacceptable.
+-- >    W      Warehouse ship
+-- >              Ship directly from warehouse.
+-- >    Y      Back order if out of stock
+-- >              Acceptable to put on back order if out of stock.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple4455 :: Parser Value
+simple4455 = simple "4455" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4457.hs b/specification/src/Text/Edifact/D96A/Simples/S4457.hs
new file mode 100644
index 0000000..689cc2c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4457.hs
@@ -0,0 +1,45 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4457
+  ( simple4457
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4457  Product/service substitution, coded
+-- >
+-- >   Desc: Code indicating product or service substitution conditions.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 No substitution allowed
+-- >              Notice to supplier to fill order exactly as specified.
+-- >         2 Supply any binding if edition ordered not available
+-- >              Indicates that substitute bindings are acceptable if the
+-- >              edition of a book originally ordered is unavailable.
+-- >         3 Supply paper binding if edition ordered not available
+-- >              Indicates that a paper back edition of a book is
+-- >              acceptable if the edition ordered is unavailable.
+-- >         4 Supply cloth binding if edition ordered not available
+-- >              Indicates that the cloth bound edition of a book is
+-- >              acceptable if the edition ordered is unavailable.
+-- >         5 Supply library binding if edition ordered not available
+-- >              Indicates that a library binding of a book is acceptable
+-- >              if the edition ordered is unavailable.
+-- >         6 Equivalent item substitution
+-- >              Indicates that an item of the same value and performance
+-- >              may be substituted for the item specified.
+-- >         7 Alternate item substitution allowed
+-- >              Indicates that an item of equal or greater value and
+-- >              performance may be substituted for the item specified.
+-- >    ZZZ    Mutually defined
+-- >              A code reserved for special trading partner requirements
+-- >              when pre-defined codes do not exist.
+simple4457 :: Parser Value
+simple4457 = simple "4457" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S4517.hs b/specification/src/Text/Edifact/D96A/Simples/S4517.hs
new file mode 100644
index 0000000..9324410
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S4517.hs
@@ -0,0 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S4517
+  ( simple4517
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   4517  Seal condition, coded
+-- >
+-- >   Desc: To indicate the condition of a seal.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 In right condition
+-- >              The seal is in right condition.
+-- >         2 Damaged
+-- >              The seal is damaged.
+simple4517 :: Parser Value
+simple4517 = simple "4517" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5004.hs b/specification/src/Text/Edifact/D96A/Simples/S5004.hs
new file mode 100644
index 0000000..e49ca06
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5004.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5004
+  ( simple5004
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5004  Monetary amount
+-- >
+-- >    Desc: Number of monetary units.
+-- >
+-- >    Repr: n..18
+simple5004 :: Parser Value
+simple5004 = simple "5004" (numeric `upTo` 18)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5025.hs b/specification/src/Text/Edifact/D96A/Simples/S5025.hs
new file mode 100644
index 0000000..0e05cbc
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5025.hs
@@ -0,0 +1,899 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5025
+  ( simple5025
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 5025  Monetary amount type qualifier
+-- >
+-- >   Desc: Indication of type of amount.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 VAT, 1st value
+-- >              First VAT value if, for the same rate of VAT, there are 1
+-- >              to 3 different ways to set this value.
+-- >         2 VAT, 2nd value
+-- >              Second VAT value if, for the same rate of VAT, there are
+-- >              2 or 3 different ways to set this value.
+-- >         3 VAT, 3rd value
+-- >              Third VAT value if, for the same rate of VAT, there are 3
+-- >              different ways to set this value.
+-- >         4 Additional royalties (Customs)
+-- >              Royalties relating to the imported goods that the buyer
+-- >              must pay, either directly or indirectly, as a condition
+-- >              of sale, to the extent that they are not included in the
+-- >              price actually paid or payable.
+-- >         5 Adjusted amount
+-- >              The amount specified is the adjusted amount.
+-- >         6 Amount reference currency
+-- >              The owing amount in the currency used as reference in the
+-- >              transaction.
+-- >         7 Agreed charge
+-- >              Charges which parties agreed upon.
+-- >         8 Allowance or charge amount
+-- >              [5422] Total amount of allowance or charge.
+-- >         9 Amount due/amount payable
+-- >              Amount to be paid.
+-- >        10 Amount in charge currency
+-- >              Indicates that the amount is based on the charged
+-- >              currency.
+-- >        11 Amount paid
+-- >              Self explanatory.
+-- >        12 Amount remitted
+-- >              Amount which was remitted (see remittance advice).
+-- >        13 Amount subject to total monetary discount
+-- >              Self explanatory.
+-- >        14 Amount target currency
+-- >              The amount in the currency in which the amount is paid or
+-- >              has to be paid.
+-- >        15 Average ledger balance
+-- >              The addition of the balance all accounts divided by the
+-- >              number of accounts.
+-- >        16 Bank release fee
+-- >              Self explanatory.
+-- >        17 Batch total
+-- >              The complete quantity of anything needed for or made in
+-- >              one operation or lot.
+-- >        18 Brokerage
+-- >              Fee charged by a broker for acting on behalf of a third
+-- >              party.
+-- >        19 Buying commission
+-- >              Commission paid by the importer to his/her agent for the
+-- >              service of representing him/her in the purchase.
+-- >        20 Data value on carrier media (Customs)
+-- >              Value of data contained on the carrier media (e.g.
+-- >              magnetic tape).
+-- >        21 Cash discount
+-- >              Cash discount given by the seller to the buyer where
+-- >              payment is made in advance of receipt of goods.
+-- >        22 Cash on delivery amount
+-- >              Amount to be collected by carrier upon delivery of goods.
+-- >              This amount represents approximately the value of the
+-- >              goods.
+-- >        23 Charge amount
+-- >              Self explanatory.
+-- >        24 Charge summary total
+-- >              Code to indicate the total charges relating to a
+-- >              consignment.
+-- >        25 Charge/allowance basis
+-- >              The amount specified is the basis for calculation of
+-- >              charges/allowance.
+-- >        26 Charges collect fee
+-- >              Self explanatory.
+-- >        27 Charges in destination currency
+-- >              Collect charges payable in the currency of the country of
+-- >              destination.
+-- >        28 Collect charge summary total
+-- >              Self explanatory.
+-- >        29 Collect charges in destination currency
+-- >              Collect charges payable in the currency of the country of
+-- >              destination.
+-- >        30 Collect freight charge including VAT
+-- >              This is the total amount that has to be collected from
+-- >              the consignee or other intermediary intervening party -
+-- >              Including VAT-.
+-- >        31 Collect freight charge without VAT
+-- >              For legal accounting reasons the amount without VAT has
+-- >              to be announced, together with the amount of VAT.
+-- >        32 Collect other charges due agent total
+-- >              Self explanatory.
+-- >        33 Collect taxes total
+-- >              Self explanatory.
+-- >        34 Collected balance required
+-- >              A certain sum of money that must be kept in an account.
+-- >        35 Container cost
+-- >              Description to be provided.
+-- >        36 Converted amount
+-- >              The amount is converted from another currency.
+-- >        37 Credit on consignment
+-- >              Credit deducted from the total invoice amount for the
+-- >              value of goods not included in a consignment but included
+-- >              in the invoice.
+-- >        38 Invoice item amount
+-- >              (5068) Total sum charged in respect of a single Invoice
+-- >              item in accordance with the terms of delivery.
+-- >        39 Invoice total amount
+-- >              [5444] Total sum charged in respect of one or more
+-- >              Invoices in accordance with the terms of delivery.
+-- >        40 Customs value
+-- >              (5032) Value declared for Customs purposes on those goods
+-- >              in a consignment which are subject to the same Customs
+-- >              procedure, and have the same tariff/statistical heading,
+-- >              country information and duty regime.
+-- >        41 Assigned Customs value
+-- >              Goods value assigned by Customs.
+-- >        42 Total cash payments received by factor
+-- >              Total allocated amount of cash payments received by a
+-- >              factor.
+-- >        43 Declared total Customs value
+-- >              [5070] Total value declared for Customs purposes of all
+-- >              goods in a consignment, whether or not they are subject
+-- >              to the same Customs procedure, or have the same
+-- >              tariff/statistical heading, country information, and duty
+-- >              regime.
+-- >        44 Declared value for carriage
+-- >              (5036) Value, declared by the shipper or his agent solely
+-- >              for the purpose of varying the carrier's level of
+-- >              liability from that provided in the contract of carriage,
+-- >              in case of loss or damage to goods or delayed delivery.
+-- >        45 Deductible after importation charges (Customs)
+-- >              Charges (e.g. construction, assembly, erection,
+-- >              maintenance or technical assistance) after importation,
+-- >              which are included in the total invoice price, that may
+-- >              be deducted to arrive at a Customs value.
+-- >        46 Deductions (Customs)
+-- >              [5020] Allowable deductions from the Customs value basis
+-- >              used.
+-- >        47 Delivery fee
+-- >              Fees incurred by delivery.
+-- >        48 Deposit total
+-- >              The whole amount of money that one entrusts for
+-- >              safekeeping.
+-- >        49 Development necessary for production of imported goods
+-- >           (Customs)
+-- >              Value of engineering, development, artwork, design work
+-- >              and plans and sketches carried out elsewhere than in the
+-- >              Customs territory and necessary for the production of the
+-- >              imported goods.
+-- >        50 Disbursements
+-- >              Amount of disbursements to be collected by the carrier
+-- >              according to the order given by the shipper.
+-- >        51 Disbursements fee
+-- >              Fee charged for the collection of disbursements.
+-- >        52 Discount amount
+-- >              The amount specified is the discount amount.
+-- >        53 Discount amount due
+-- >              Self explanatory.
+-- >        54 Distribution service fee
+-- >              Self explanatory.
+-- >        55 Duty amount
+-- >              Self explanatory.
+-- >        56 Duty/tax/fee basis amount
+-- >              The amount specified is the basis for duty/tax or fee.
+-- >        57 Equivalent amount
+-- >              This amount is equivalent to the amount to be
+-- >              transferred, but in another currency.
+-- >        58 Fee amount
+-- >              Self explanatory.
+-- >        59 Fees paid year to date
+-- >              Payments made for goods thus far.
+-- >        60 Final (posted) amount
+-- >              The amount posted to an account, finally, after
+-- >              charges/allowances.
+-- >        61 Float (e.g. "cash float")
+-- >              The status of funds in the process of collection.
+-- >        62 Total payments on account received by a factor
+-- >              Total unallocated amount of payments received by a
+-- >              factor.
+-- >        63 FOB value
+-- >              Identifies the value of the shipment free on board, named
+-- >              port of shipment (see FOB Incoterm of ICC).
+-- >        64 Freight charge
+-- >              Amount to be paid for moving goods, by whatever means,
+-- >              from one place to another, inclusive discounts,
+-- >              allowances, rebates, adjustment factors and additional
+-- >              cost relating to freight costs (UN/ECE Recommendation no
+-- >              23).
+-- >        65 Total indirect amount payments made to a seller or his agent
+-- >           instead of to a factor
+-- >              Total indirect amount of payments made to a seller or his
+-- >              agent instead of to a factor.
+-- >        66 Goods item total
+-- >              Net price x quantity for the line item.
+-- >        67 Insurance
+-- >              Self explanatory.
+-- >        68 Insurance and transport charges (Customs)
+-- >              (5488)+(5292) Sum total of transport and insurances
+-- >              charges (CCC).
+-- >        69 Insurance and transport charges incurred outside Customs
+-- >           territory
+-- >              (5488)+(5292) Insurance and transport charges incurred
+-- >              outside a Customs territory (or a Customs union).
+-- >        70 Insurance charges (Customs)
+-- >              [5488] Amount of premium payable to the insurance company
+-- >              to insure the goods to the port or place of importation.
+-- >        71 Insurance charges incurred outside of Customs territory
+-- >              (5488) Insurance charges incurred outside a Customs
+-- >              territory (or a Customs union).
+-- >        72 Internal charges (Customs)
+-- >              Charges incurred within a Customs territory (or a Customs
+-- >              union).
+-- >        73 Total amount of payments booked to the collateral account
+-- >              Total amount of payments booked to the collateral
+-- >              account.
+-- >        74 Amount to be paid in advance
+-- >              Amount which is to be paid before goods are delivered or
+-- >              the service is rendered.
+-- >        75 Registered capital
+-- >              Registered amount of equity of a company.
+-- >        76 Investable balance
+-- >              To put left over money in something offering profitable
+-- >              returns.
+-- >        77 Invoice amount
+-- >              [5068] Total sum charged in respect of a single Invoice
+-- >              in accordance with the terms of delivery.
+-- >        78 Landing charges
+-- >              The charges incurred in landing the goods into store in
+-- >              the country of importation, excluding Customs duties and
+-- >              taxes.
+-- >        79 Total line items amount
+-- >              The sum of all the line item amounts.
+-- >        80 Licence fees related to imported goods (Customs)
+-- >              Licence fees relating to the imported goods that the
+-- >              buyer must pay, either directly or indirectly, as a
+-- >              condition of sale, to the extent that they are not
+-- >              included in the price actually paid or payable.
+-- >        81 Loading and handling cost
+-- >              Cost incurred by loading and handling.
+-- >        82 Lock box total
+-- >              The complete amount of funds that customers mailed in to
+-- >              a specific location. Often times funds are sent to a post-
+-- >              office lock box in their city.
+-- >        83 Lumpsum
+-- >              An agreed sum of money, which is paid in full at one
+-- >              time. This term is often used in connection with charter
+-- >              parties.
+-- >        84 Material consumed in production of imported goods (Customs)
+-- >              Value of materials consumed in the production of the
+-- >              imported goods.
+-- >        85 Maximum charge
+-- >              Self explanatory.
+-- >        86 Message total monetary amount
+-- >              Self explanatory.
+-- >        87 Minimum charge
+-- >              Self explanatory.
+-- >        88 National preference basis amount
+-- >              Amount giving the basis for national preference
+-- >              calculation.
+-- >        89 Negative collected balance
+-- >              Having a quantity of less than zero in an account.
+-- >        90 Negative ledger balance
+-- >              For an asset account, this would be when the account had
+-- >              a credit balance. For liability and owner's equity
+-- >              accounts, it would be when the account had a debit
+-- >              balance.
+-- >        91 Net adjustment
+-- >              The end-of-the-period total amount which is left after
+-- >              recording appropriate adjusting entries.
+-- >        92 Net fee position
+-- >              The payments left over after deductions or allowances
+-- >              have been made.
+-- >        93 Net year to date excess (deficit)
+-- >              A negative amount of an item.
+-- >        94 No amount of insurance
+-- >              No amount of insurance has been declared for a
+-- >              consignment.
+-- >        95 No declared value for carriage
+-- >              No value has been declared for purposes of carriage.
+-- >        96 No declared value for Customs
+-- >              No value has been declared for Customs purposes.
+-- >        97 Offer amount
+-- >              [5210] Total amount of an offer.
+-- >        98 Original amount
+-- >              Original amount, without charges, allowances or
+-- >              adjustment.
+-- >        99 Other charges at destination
+-- >              Code to indicate charges levied at destination.
+-- >       100 Other charges due agent
+-- >              Code to indicate that certain charges accrue to an agent.
+-- >       101 Other charges due carrier
+-- >              Code to indicate that certain charges accrue to a
+-- >              carrier.
+-- >       102 Other commissions
+-- >              Other commissions paid by the importer to his/her agent
+-- >              in relation to the goods being imported.
+-- >       103 Other deductible charges
+-- >              Other charges deducted from the total invoice value.
+-- >       104 Other transport charges
+-- >              (5292) Other charges paid for transport.
+-- >       105 Other valuation charges (Customs)
+-- >              Other valuation charges which are payable by reason of
+-- >              the importation or sale of the goods in the Customs
+-- >              territory.
+-- > |     106 Packing cost
+-- >              Cost for packing concerning labour and/or material.
+-- >       107 Packing cost (Customs)
+-- >              [5448] Costs incurred for all containers and coverings of
+-- >              whatever nature which are considered as being one for
+-- >              Customs purposes with the goods, and the cost of packing
+-- >              whether for labour or material.
+-- >       108 Parts incorporated in imported goods (Customs)
+-- >              Materials, components, parts and similar items
+-- >              incorporated in the imported goods.
+-- >       109 Payment discount amount
+-- >              Self-explanatory.
+-- >       110 Pick-up fee
+-- >              Fee incurring if item has been or will be picked up.
+-- >       111 Positive collected balance
+-- >              Having a quantity of greater than zero in an account.
+-- >       112 Positive ledger balance
+-- >              For an asset account, this would be when the account had
+-- >              a debit balance. For liability and owner's equity
+-- >              accounts, it would be when the account had a credit
+-- >              balance.
+-- >       113 Prepaid amount
+-- >              (5302) Amount which has been prepaid in advance.
+-- >       114 Prepaid charge summary total
+-- >              Total of all prepaid charges.
+-- >       115 Prepaid taxes total
+-- >              Total of all prepaid taxes.
+-- >       116 Purchase amount
+-- >              The cost of buying goods or services.
+-- >       117 Quantity discount
+-- >              Discount given for purchase of goods in bulk.
+-- >       118 Quota value
+-- >              Description to be provided.
+-- >       119 Received amount
+-- >              The amount is what the bank received, and the one before
+-- >              charges/allowances.
+-- >       120 Sales tax
+-- >              Identifies the amount of sales tax payable.
+-- >       121 Shipment value in domestic currency
+-- >              The cost of transportation in domestic currency.
+-- >       122 Specific amount payable
+-- >              Amount that the consignor agrees to be invoiced or to
+-- >              pay. This amount is part of the total charges applied to
+-- >              the consignment.
+-- >       123 Statistical value
+-- >              [5218] Value declared for statistical purposes of those
+-- >              goods in a consignment which have the same statistical
+-- >              heading and country of origin.
+-- >       124 Tax amount
+-- >              Tax imposed by government or other official authority
+-- >              related to the weight/volume charge or valuation charge.
+-- >       125 Taxable amount
+-- >              Self explanatory.
+-- >       126 To collect
+-- >              Description to be provided.
+-- >       127 Tools used in production of imported goods (Customs)
+-- >              Tools, dies, moulds and similar items used in the
+-- >              production of the imported goods.
+-- >       128 Total amount
+-- >              The amount specified is the total amount.
+-- >       129 Total amount subject to payment discount
+-- >              Part of the invoice amount which is subject to payment
+-- >              discount.
+-- >       130 Total charge due
+-- >              Total amount of charges payable to the carrier.
+-- >       131 Total charges/allowances
+-- >              The amount specified is the total of all
+-- >              charges/allowances.
+-- >       132 Total collect charges
+-- >              Total charges to be collected.
+-- >       133 Total collect charges at destination
+-- >              Total charges to be collected at destination.
+-- >       134 Total declared
+-- >              Description to be provided.
+-- >       135 Total freight due
+-- >              Total amount of freight costs payable to the carrier.
+-- >       136 Total invoice additional amount
+-- >              (5140) Amount to be added to the sum of invoice line
+-- >              amounts to arrive at the total invoice amount.
+-- >       138 Total monetary discount amount
+-- >              Total of monetary discount amounts.
+-- >       139 Total payment amount
+-- >              A complete charge for goods or services rendered.
+-- >       140 Total service charge
+-- >              The complete payment owed to one who has performed work
+-- >              for another.
+-- >       141 Cost, insurance and freight (CIF) value
+-- >              Identifies the value of cost, insurance and freight.
+-- >              (Refer to ICC Incoterm CIF for an expanded definition).
+-- >       142 Trade discount
+-- >              Discount given to any purchaser at a particular
+-- >              commercial level e.g. at wholesale or retail level.
+-- >       143 Transfer amount
+-- >              The amount which has been transferred from buyer to the
+-- >              sellers bank.
+-- >       144 Transport charges (Customs)
+-- >              (5292) Cost incurred by shipper in moving goods, by
+-- >              whatever means, from one place to another under the terms
+-- >              of the contract of carriage, see UN/ECE Recommendation No
+-- >              23. Synonym: freight charges (Customs).
+-- >       145 Transport charges incurred outside Customs territory
+-- >              (5292) Transport charges incurred outside a Customs
+-- >              territory (or a Customs union).
+-- >       146 Unit price
+-- >              (5110) Reporting monetary amount is a "per unit" amount.
+-- >       147 Acceptable quotation fluctuation amount
+-- >              The maximum increase or decrease in constituent material
+-- >              fluctuation which will not result in an item price
+-- >              renegotiation.
+-- >       148 Total payments under guarantee
+-- >              Total amount paid under guarantee, such as under a
+-- >              factor's guarantee.
+-- >       149 Valuation charge
+-- >              A charge based on the value of goods or cargo.
+-- >       150 Value added tax
+-- >              [5490] Amount in national currency resulting from the
+-- >              application, at the appropriate rate, of value added tax
+-- >              (or similar tax) to the invoice amount subject to such
+-- >              tax.
+-- >       151 Value insured
+-- >              Representation in figures of the total sum covered by an
+-- >              insurance for a particular shipment.
+-- >       152 Subsequent resale of imported goods (Customs)
+-- >              Value of any part of the proceeds of any subsequent
+-- >              resale, disposal or use of the imported goods that
+-- >              accrues, directly or indirectly, to the seller.
+-- >       153 Weight charge
+-- >              A charge based on the weight of goods or cargo.
+-- >       154 Amount to be collected
+-- >              Self explanatory.
+-- >       155 Standard duty
+-- >              Standard Customs duty that would apply if special
+-- >              provisions did not apply.
+-- >       156 G-Amount
+-- >              Amount out of total invoice amount being paid into a
+-- >              blocked account.
+-- >       157 Insurance value
+-- >              (5010) Value for which the goods are insured.
+-- >       158 Insurance and transport charges incurred inside Customs
+-- >           territory
+-- >              (5488)+(5292) Charges to be paid for moving goods, by
+-- >              whatever means, from the point of entry into the Customs
+-- >              territory (within a Customs union: to the point of entry
+-- >              in the final destination country).
+-- >       159 Licence (value deducted)
+-- >              Amount in the currency of the licence to be written off
+-- >              from the total licence value.
+-- >       160 Other costs
+-- >              (5346) Costs, other than packing, freight and insurance
+-- >              costs, specified separately.
+-- >       161 Duty, tax or fee amount
+-- >              Amount of duty, tax or fee.
+-- >       162 Customs duty paid
+-- >              Amount which can be deducted from the stated invoice
+-- >              price where that price includes the Customs duty amount.
+-- >       163 Wage tax share
+-- >              Wage tax share of total amount to be paid directly to
+-- >              tax collector.
+-- >       164 Social securities premiums share
+-- >              Social securities share of total amount to be paid
+-- >              directly to the social securities collector.
+-- >       165 Adjustment amount
+-- >              Amount being the balance of the amount to be adjusted and
+-- >              the adjusted amount.
+-- >       166 Guarantee amount (Customs)
+-- >              Amount of the guarantee placed with Customs.
+-- >       167 Actual versus calculated price difference
+-- >              Difference between actual and calculated price.
+-- >       168 Tax sub-totals
+-- >              Self explanatory.
+-- >       169 Alternate currency total amount
+-- >              Self-explanatory.
+-- >       170 Document amount
+-- >              Description to be provided.
+-- >       171 Total reassignments of factored invoices
+-- >              Total amount of factored invoices and credit notes
+-- >              reassigned to the seller or to another factor.
+-- >       172 Stated amount
+-- >              Description to be provided.
+-- >       173 Minimum amount
+-- >              Lowest possible value; minimum.
+-- >       174 Balance brought forward
+-- >              Opening balance of the account brought forward from the
+-- >              prior accounting period.
+-- >       175 Message total additional amount
+-- >              Description to be provided.
+-- >       176 Message total duty/tax/fee amount
+-- >              Total of all duty/tax/fee amounts.
+-- >       177 Message total amount prepaid
+-- >              Total of all prepaid amounts within the message.
+-- >       178 Exact amount
+-- >              Specific amount.
+-- >       179 Maximum amount
+-- >              Highest possible value; maximum.
+-- >       180 Amount up to
+-- >              Highest possible value; up to.
+-- >       181 Amount not exceeding
+-- >              Highest possible value; not exceeding.
+-- >       182 Any other specification/tolerance
+-- >              Any further qualification of the amount.
+-- >       183 No specification/tolerance
+-- >              No further qualification of the amount.
+-- >       184 Final net acquisition cost
+-- >              Self explanatory.
+-- >       185 Labor cost
+-- >              Self explanatory.
+-- >       186 Material cost
+-- >              Self explanatory.
+-- >       187 Other cost
+-- >              Self explanatory.
+-- >       188 Overhead cost
+-- >              Self explanatory.
+-- >       189 Packaging cost
+-- >              Self explanatory.
+-- >       190 Prototype set up cost
+-- >              Self explanatory.
+-- >       192 Raw material per cart cost
+-- >              Self explanatory.
+-- >       193 Raw material per unit of measure cost
+-- >              Self explanatory.
+-- >       194 Total die model cost
+-- >              Self explanatory.
+-- >       195 Total gauge cost
+-- >              Self explanatory.
+-- >       196 Total material including purchased components cost
+-- >              Self explanatory.
+-- >       197 Total purchased components cost
+-- >              Self explanatory.
+-- >       198 Total tooling cost
+-- >              Self explanatory.
+-- >       199 Delivery limitation amount
+-- >              Self explanatory.
+-- >       200 Minimum amount due
+-- >              Self explanatory.
+-- >       201 Penalty amount
+-- >              Self explanatory.
+-- >       202 Interest amount
+-- >              Self explanatory.
+-- >       203 Line item amount
+-- >              Goods item total minus allowances plus charges for line
+-- >              item. See also Code 66.
+-- >       204 Allowance amount
+-- >              Self explanatory.
+-- >       205 Additional amount covered: freight costs
+-- >              Additional amount (freight costs) which is also covered
+-- >              under the documentary credit.
+-- >       206 Additional amount covered: inspection costs
+-- >              Additional amount (inspection costs) which is also
+-- >              covered under the documentary credit.
+-- >       207 Additional amount covered: insurance costs
+-- >              Additional amount (insurance costs) which is also covered
+-- >              under the documentary credit.
+-- >       208 Additional amount covered: interest
+-- >              Additional amount (interest) which is also covered under
+-- >              the documentary credit.
+-- >       209 Agent commission amount
+-- >              Amount which has to be paid to an agent.
+-- >       210 Credit note amount
+-- >              Amount of a credit note.
+-- >       211 Debit note amount
+-- >              Amount of a debit note.
+-- >       212 Documentary credit amount
+-- >              Amount of the documentary credit.
+-- >       213 Part of documentary credit amount
+-- >              Part of documentary credit amount subject to sight
+-- >              payment, deferred payment or acceptance when the
+-- >              documentary credit is available by mixed payment.
+-- >       214 Advance payment at the beginning of works
+-- >              Amount paid to the contractor at the beginning of works
+-- >              in the construction to be deducted later.
+-- >       215 Deduction of advance payment amount at the beginning of
+-- >           works
+-- >              Progressive deduction of advance payment, as works go on.
+-- >       216 Advance payment amount on building material
+-- >              Self explanatory.
+-- >       217 Deduction of the advance payment amount on building material
+-- >              Self explanatory.
+-- >       218 Advance payment amount on stock
+-- >              Self explanatory.
+-- >       219 Deduction of the advance payment amount on stock
+-- >              Self explanatory.
+-- >       220 Amount subject to guarantee retention
+-- >              Amount participating in the assessment basis of a
+-- >              guarantee retention.
+-- >       221 Amount not subject of guarantee retention
+-- >              Amount not participating in the assessment basis of a
+-- >              guarantee retention.
+-- >       222 Amount subject to contractual retention
+-- >              Amount participating in the assessment basis of a
+-- >              contractual retention.
+-- >       223 Works amount, initial
+-- >              Total amount of works in the initial contract.
+-- >       224 Works amount, variations
+-- >              Total amount of contract variations, not including the
+-- >              amount planned on initial contract.
+-- >       225 Works amount, total
+-- >              Total amount of works, including initial contract and
+-- >              variations.
+-- >       226 Retention amount
+-- >              Self explanatory.
+-- >       227 Deposit
+-- >              Part of the amount of retention, not covered by guarantee
+-- >              of retention, and thus deducted from the amount paid to
+-- >              the contractor until release of retention.
+-- >       228 Deposit refund
+-- >              Refund of deposit, due to an increase of the guarantee of
+-- >              retention amount, or a decrease of the amount of
+-- >              retention.
+-- >       229 Guarantee on retention refund
+-- >              Refund of deposit, due to partial or complete release of
+-- >              retention.
+-- >       230 Amount subject to escalation
+-- >              Amount which is used as the basis for the calculation of
+-- >              the escalation.
+-- >       231 Amount subject to escalation, initial
+-- >              Amount in the initial contract which is used as the basis
+-- >              for the calculation of the escalation.
+-- >       232 Amount of variations subject to escalation
+-- >              Amount of variations which is used as the basis for the
+-- >              calculation of the escalation.
+-- >       233 Amount not subject to escalation
+-- >              Amount which is not included in the calculation of the
+-- >              escalation.
+-- >       234 Amount not subject to escalation, initial
+-- >              Amount in the initial contract which is not included in
+-- >              the calculation of the escalation.
+-- >       235 Amount of variations not subject to escalation
+-- >              Amount of variations which is not included in the
+-- >              calculation of the escalation.
+-- >       236 Amount subject to price adjustment
+-- >              Amount which is used as the basis for price adjustment
+-- >              calculation.
+-- >       237 Amount subject to price adjustment, initial
+-- >              Amount in the initial contract which is used as the basis
+-- >              for the price adjustment calculation.
+-- >       238 Amount of variations subject to price adjustment
+-- >              Amount of variations which is used as the basis for price
+-- >              adjustment calculation.
+-- >       239 Amount not subject to price adjustment
+-- >              Amount which is not included in the calculation of the
+-- >              price adjustment.
+-- >       240 Amount not subject to price adjustment, initial
+-- >              Amount in the initial contract which is not included in
+-- >              the calculation of the price adjustment.
+-- >       241 Amount of variations not subject to price adjustment
+-- >              Amount of variations which is not included in the
+-- >              calculation of the price adjustment.
+-- >       242 Escalation amount
+-- >              Difference between initial amount and current amount.
+-- >       243 Provisional escalation amount
+-- >              Difference between initial amount and provisional current
+-- >              amount.
+-- >       244 Price adjustment amount
+-- >              Difference between initial amount and revised amount.
+-- >       245 Provisional price adjustment amount
+-- >              Difference between initial amount and provisional revised
+-- >              amount.
+-- >       246 Price revaluation amount
+-- >              Amount of escalation and price adjustment.
+-- >       247 Provisional price revaluation amount
+-- >              Provisional amount of escalation and price adjustment.
+-- >       248 Contractual retention amount total
+-- >              Retention on a basis contractually fixed.
+-- >       249 Valuation amount
+-- >              Amount of valuation.
+-- >       250 Deduction amount of direct payments to subcontractors
+-- >              Deduction of amounts directly paid to subcontractors.
+-- >       251 Amortization total amount
+-- >              Indication of final monetary amount for amortization.
+-- >       252 Amortization order amount
+-- >              Indication of actual share of the monetary amount for
+-- >              amortization.
+-- >       253 Amortization cumulated amount
+-- >              Indication of actual cumulated monetary amount of
+-- >              previous and actual amortization order amount.
+-- >       254 Current credit cover
+-- >              Limit for current credit cover.
+-- >       255 New credit cover
+-- >              Limit for new credit cover.
+-- >       256 Order cover
+-- >              Credit cover for an individual order or shipment.
+-- >       257 Amount subject to dispute
+-- >              The amount that is being disputed.
+-- >       258 Charge amount for information
+-- >              The stated charge amount is only for information. The
+-- >              amount will be debited due to agreement.
+-- >       259 Total charges
+-- >              Self-explanatory.
+-- >       260 Total allowances
+-- >              Self-explanatory.
+-- >       261 Alternate currency amount
+-- >              Self-explanatory.
+-- >       262 Instalment amount
+-- >              Amount paid or due for a single instalment of an
+-- >              instalment payment scheme.
+-- >       263 Outstanding amount
+-- >              Amount still remaining outstanding for payment.
+-- >       264 Gross contribution amount
+-- >              Gross amount contributed. This may include commissions or
+-- >              allowances.
+-- >       265 Commission amount
+-- >              Amount of any commission.
+-- >       266 Net contribution amount
+-- >              Amount contributed net of any commission or other
+-- >              allowances .
+-- >       267 Regular contribution amount
+-- >              Specified contribution amount regularly paid.
+-- >       268 Previous regular contribution amount
+-- >              Specified contribution amount regularly paid before a
+-- >              change .
+-- >       269 Variation amount
+-- >              Difference from a nominated amount.
+-- >       270 Notional salary
+-- >              A salary amount specified for a particular category of
+-- >              employees.
+-- >       271 Nominal salary
+-- >              The salary amount without special allowances or other
+-- >              cash benefits.
+-- >       272 Taxable salary
+-- >              The salary amount which is taxable.
+-- >       273 Superannuation salary
+-- >              Salary used for superannuation benefit/contribution
+-- >              purposes .
+-- >       274 Total remuneration
+-- >              The amount of the total value of a person's remuneration.
+-- >       275 Other salary
+-- >              The amount of other salary or allowances in addition to a
+-- >              base salary.
+-- >       276 Annual salary
+-- >              Self-explanatory.
+-- >       277 Total contributions amount
+-- >              Sum of individual contributions.
+-- >       278 Voluntary contribution amount
+-- >              The amount is for a non-compulsory contribution.
+-- >       279 Instalment first amount
+-- >              First of a number of due amounts if payment by instalment
+-- >              is agreed.
+-- >       280 Instalment current amount
+-- >              Current amount of a number of due amounts if payment by
+-- >              instalment is agreed.
+-- >       281 Instalment last amount
+-- >              Last of a number of due amounts if payment by instalment
+-- >              is agreed.
+-- >       282 Current maintenance fee
+-- >              Current amount of a number of amounts due on maintenance
+-- >              contract.
+-- >       283 Current leasing fee
+-- >              Current amount of a number of amounts due on lease
+-- >              contracts.
+-- >       284 Day works amount
+-- >              The amount of work calculated on the basis of manpower
+-- >              time and supply cost.
+-- >       285 Manufacturer's bonus
+-- >              Allowance given as a manufacturer's bonus.
+-- >       286 Administration charge
+-- >              Charge made for an administration activity.
+-- >       287 Fuel charge
+-- >              Charge relating to fuel supplied.
+-- >       288 Registration plate charge
+-- >              The charge relating to the normal supply of vehicle
+-- >              registration plates.
+-- >       289 Subtotal amount
+-- >              Total amount of money that is part of a complete amount.
+-- >       290 Dumping export value
+-- >              The export value calculated for the purposes of assessing
+-- >              dumping duty.
+-- >       291 Foreign inland freight
+-- >              The amount of inland freight incurred in delivering the
+-- >              goods to the place of export.
+-- >       292 Concession amount
+-- >              The amount of any concession. To allow the nomination of
+-- >              the difference between the amount of duty plus tax paid
+-- >              and the amount that would have been payable without an
+-- >              end-use security being applied.
+-- >       293 Chargeback
+-- >              Invoice amount charged back to seller.
+-- >       294 Charge per credit cover
+-- >              Unit charge per credit cover established.
+-- >       295 Charge per unused credit cover
+-- >              Unit charge per unused credit cover.
+-- >       296 Total authorised deduction
+-- >              Total amount of authorised deductions from payment of
+-- >              invoices.
+-- >       297 Total chargebacks
+-- >              Total amount charged back to the seller.
+-- >       298 Total offsets
+-- >              Total amount offset against other items on the seller's
+-- >              or buyer's account.
+-- > |     299 Total special entries
+-- >              Total amount to be treated as special booking entry by
+-- >              the beneficiary.
+-- >       300 Balance carried forward
+-- >              Closing balance of the account to be carried forward to
+-- >              the next accounting period.
+-- >       301 Total outstanding invoices past due
+-- >              Total amount of outstanding invoices past due.
+-- >       302 Off balance disputed items
+-- >              Total amount of disputed invoices/credit notes.
+-- >       303 Commission invoices
+-- >              Amount of commission invoices.
+-- >       304 Other charges
+-- >              Miscellaneous charges.
+-- >       305 Amount remittances
+-- >              Amount of money remitted.
+-- >       306 Total amount of payment commission invoices
+-- >              Total amount of commission invoices paid.
+-- >       307 Total amount of payment other charges invoices
+-- >              Total amount of invoices for miscellaneous charges paid.
+-- >       308 Total amount credit notes
+-- >              Total amount of credit notes.
+-- >       309 Total adjustment invoices
+-- >              Total amount of adjustments to invoices.
+-- >       310 Total adjustment credit notes
+-- >              Total amount of adjustments to credit notes.
+-- >       311 Total adjustment payments
+-- >              Total amount of adjustments to payments.
+-- >       312 Base unit value
+-- >              Value per base unit.
+-- >       313 International freight
+-- >              The amount of freight paid for moving goods between place
+-- >              of export and place of import.
+-- >       314 Own risk amount
+-- >              Amount for own credit risk, not covered by credit cover.
+-- >       315 Opening balance
+-- >              The amount of the opening balance.
+-- >       316 Insurance premium
+-- >              Premium amount including commission without insurance tax
+-- >              and fees.
+-- >       317 Insurance commission
+-- >              Amount due to an intermediary to be chargeable to an
+-- >              insurer for obtaining insurance business.
+-- >       318 Insurance tax
+-- >              Insurance tax amount on insurance premium and fees.
+-- >       319 Fee of insurer
+-- >              Amount to be paid to an insurer as a handling charge.
+-- >       320 Fee of intermediary
+-- >              Amount to be paid to an intermediary as a handling fee.
+-- > +     321 Debit flow
+-- >              Debit flow amount applying to an account.
+-- > +     322 Closing balance payable
+-- >              Outstanding payable amount of the account at the end of
+-- >              the reporting period.
+-- > +     323 Opening balance payable
+-- >              Outstanding payable amount of the account at the
+-- >              beginning of the reporting period.
+-- > +     324 Opening balance receivable
+-- >              Outstanding receivable amount of the account at the
+-- >              beginning of the reporting period.
+-- > +     325 Closing balance receivable
+-- >              Outstanding receivable payable amount of the account at
+-- >              the end of the reporting period.
+-- > +     326 Net assets and liabilities
+-- >              Position amount of the assets and liabilities at
+-- >              reporting date.
+-- > +     327 Adjustment to debit flow
+-- >              Adjustment to debit flow amount.
+-- > +     328 Adjustment to credit flow
+-- >              Adjustment to a credit flow amount.
+-- > +     329 Credit flow
+-- >              Credit flow amount applying to an account.
+-- > +     330 Total prepaid other charges due carrier
+-- >              The total of prepaid other charges due to carrier.
+-- > +     331 Total collect weight charge
+-- >              The total collect charge based on weight.
+-- > +     332 Total prepaid weight charge
+-- >              The total prepaid charge based on weight.
+-- > +     333 Total collect other charges due carrier
+-- >              The total of collect other charges due to carrier.
+-- > +     334 Total prepaid other charges due agent
+-- >              The total of prepaid other charges due to agent.
+-- > +     335 Total collect valuation charge
+-- >              The total collect valuation charge.
+-- > +     336 Total prepaid valuation charge
+-- >              The total prepaid valuation charge.
+-- >    ZZZ    Mutually defined
+-- >              Mutually defined monetary amount.
+simple5025 :: Parser Value
+simple5025 = simple "5025" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5118.hs b/specification/src/Text/Edifact/D96A/Simples/S5118.hs
new file mode 100644
index 0000000..ec683cb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5118.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5118
+  ( simple5118
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5118  Price
+-- >
+-- >    Desc: The monetary value associated with a purchase or sale of an
+-- >          article, product or service.
+-- >
+-- >    Repr: n..15
+simple5118 :: Parser Value
+simple5118 = simple "5118" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5125.hs b/specification/src/Text/Edifact/D96A/Simples/S5125.hs
new file mode 100644
index 0000000..afa22b0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5125.hs
@@ -0,0 +1,50 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5125
+  ( simple5125
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 5125  Price qualifier
+-- >
+-- >   Desc: Identification of a type of price.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AAA    Calculation net
+-- >              The price stated is the net price including allowances/
+-- >              charges. Allowances/charges may be stated for information
+-- >              only.
+-- >    AAB    Calculation gross
+-- >              The price stated is the gross price to which allowances/
+-- >              charges must be applied.
+-- >    AAC    Allowances and charges not included, tax included
+-- >              The price does not include the allowances and charges,
+-- >              but includes the taxes.
+-- >    AAD    Average selling price
+-- >              Average selling price of a product.
+-- > +  AAE    Information price, excluding allowances or charges,
+-- >           including taxes
+-- >              The price stated is for information purposes only and
+-- >              excludes all allowances and charges. Taxes however are
+-- >              included in the price.
+-- > +  AAF    Information price, excluding allowances or charges, and
+-- >           taxes
+-- >              The price stated is for information purposes only and
+-- >              excludes all allowances, charges and taxes.
+-- >    CAL    Calculation price
+-- >              The price stated is the price for the calculation of the
+-- >              line item amount.
+-- >    INF    Information
+-- >              The price is provided for information.
+-- >    INV    Invoice price
+-- >              Referenced price taken from an invoice.
+simple5125 :: Parser Value
+simple5125 = simple "5125" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5213.hs b/specification/src/Text/Edifact/D96A/Simples/S5213.hs
new file mode 100644
index 0000000..88f8c84
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5213.hs
@@ -0,0 +1,29 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5213
+  ( simple5213
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   5213  Sub-line price change, coded
+-- >
+-- >   Desc: Code indicating disposition of the price change of a sub-line
+-- >         item.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Added to the baseline item unit price
+-- >              Self explanatory.
+-- >    I      Included in the baseline item unit price
+-- >              Self explanatory.
+-- >    S      Subtracted from the baseline item unit price
+-- >              Self explanatory.
+simple5213 :: Parser Value
+simple5213 = simple "5213" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5237.hs b/specification/src/Text/Edifact/D96A/Simples/S5237.hs
new file mode 100644
index 0000000..77c6ed6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5237.hs
@@ -0,0 +1,79 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5237
+  ( simple5237
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   5237  Charge category, coded
+-- >
+-- >   Desc: To indicate the category or zone of charges.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 All charges
+-- >              All amounts calculated by the carrier in accordance with
+-- >              tariffs or in case of special events during the voyage
+-- >              (e.g. Rail - freights costs - additional costs).
+-- >         2 Additional charges
+-- >              Charges calculated by the carrier for specific events
+-- >              like re-weighting, re-loading, unexpected operations,
+-- >              services required during the voyage, etc.
+-- >         3 Transport charges + additional charges
+-- >              Transport charges plus Additional charges (e.g. for re-
+-- >              loading, re-weighting or unexpected operations) that must
+-- >              be precised in the payment conditions by the consignor
+-- >              (other charges must be taken in account by the
+-- >              consignee).
+-- >         4 Basic freight
+-- >              The basic freight payable on the cargo as per tariff.
+-- >         5 Destination haulage charges
+-- >              Self explanatory.
+-- >         6 Disbursement
+-- >              Sums paid out by ship's agent at a port and recovered
+-- >              from the carrier.
+-- >         7 Destination port charges
+-- >              Charges payable at the port of destination.
+-- >         8 Miscellaneous charges
+-- >              Miscellaneous charges not otherwise categorized.
+-- >         9 Transport charges up to a specified location
+-- >              Transport charges to be paid by the consignor for a part
+-- >              of the voyage, i.e. up to a location that must be
+-- >              precised.
+-- >        10 Origin port charges
+-- >              Charges payable at the port of origin.
+-- >        11 Origin haulage charges
+-- >              Self explanatory.
+-- >        12 Other charges
+-- >              Self explanatory.
+-- >        13 Specific amount payable
+-- >              Amount that the consignor agrees to be invoiced or to
+-- >              pay. This amount is part of the total charges applied to
+-- >              the consignment.
+-- >        14 Transport costs (carriage charges)
+-- >              Monetary amount calculated on the basis of the transport
+-- >              tariffs or contract eventually including charges or other
+-- >              costs.
+-- >        15 All costs up to a specified location
+-- >              All amounts to be paid by the consignor for a part of the
+-- >              voyage, i.e. up to a location that must be precised. (The
+-- >              remaining part of the voyage to be paid by the consignee)
+-- >              The amounts are calculated by the carrier in accordance
+-- >              with tariffs or in case of special events during the
+-- >              voyage (e.g. rail - freight costs - additional costs).
+-- >        16 Weight/valuation charge
+-- >              Code to indicate weight/valuation charges to be either
+-- >              wholly prepaid or wholly collect.
+-- >        17 All costs
+-- >              Description to be provided.
+-- >        18 Transport costs and supplementary costs
+-- >              Description to be provided.
+simple5237 :: Parser Value
+simple5237 = simple "5237" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5242.hs b/specification/src/Text/Edifact/D96A/Simples/S5242.hs
new file mode 100644
index 0000000..1541c5d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5242.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5242
+  ( simple5242
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5242  Rate/tariff class
+-- >
+-- >    Desc: Description of applicable rate/tariff class.
+-- >
+-- >    Repr: an..35
+simple5242 :: Parser Value
+simple5242 = simple "5242" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5243.hs b/specification/src/Text/Edifact/D96A/Simples/S5243.hs
new file mode 100644
index 0000000..29bb1c9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5243.hs
@@ -0,0 +1,46 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5243
+  ( simple5243
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 5243  Rate/tariff class identification
+-- >
+-- >   Desc: Identification of the rate/tariff class.
+-- >
+-- >   Repr: an..9
+-- >
+-- > +  A      Senior person rate
+-- >              Rate class applies to senior persons.
+-- >    B      Basic
+-- >              Self explanatory.
+-- >    C      Specific commodity rate
+-- >              Self explanatory.
+-- > +  D      Teenager rate
+-- >              Rate class applies to teenagers.
+-- > +  E      Child rate
+-- >              Rate class applies to children.
+-- > +  F      Adult rate
+-- >              Rate class applies to adults.
+-- >    K      Rate per kilogram
+-- >              Self explanatory.
+-- >    M      Minimum charge rate
+-- >              Self explanatory.
+-- >    N      Normal rate
+-- >              Self explanatory.
+-- >    Q      Quantity rate
+-- >              Self explanatory.
+-- >    R      Class rate (Reduction on normal rate)
+-- >              Description to be provided.
+-- >    S      Class rate (Surcharge on normal rate)
+-- >              Description to be provided.
+simple5243 :: Parser Value
+simple5243 = simple "5243" (alphaNumeric `upTo` 9)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5245.hs b/specification/src/Text/Edifact/D96A/Simples/S5245.hs
new file mode 100644
index 0000000..11039fa
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5245.hs
@@ -0,0 +1,139 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5245
+  ( simple5245
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 5245  Percentage qualifier
+-- >
+-- >   Desc: Identification of the usage of a percentage.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Allowance
+-- >              (5424) Allowance expressed as a percentage.
+-- >         2 Charge
+-- >              (5424) Charge expressed as a percentage.
+-- >         3 Allowance or charge
+-- >              [5424] Allowance or charge expressed as a percentage.
+-- >         4 Reinsurer's share
+-- >              To indicate the share of the reinsurer in a treaty.
+-- >         5 Entry percentage
+-- >              To indicate the percentage used for the specified entry
+-- >              (e.g. commission %, deposits % ...).
+-- >         6 Quality/yield
+-- >              (6318) The percentage of a specified material in the
+-- >              total product.
+-- >         7 Percentage of invoice
+-- >              Self explanatory.
+-- >         8 Reduction/surcharge percentage
+-- >              Percentage to calculate a reduction/surcharge.
+-- >         9 Adjustment
+-- >              Self explanatory.
+-- >        10 Bureau share
+-- >              London insurance market bureau (bureau share in
+-- >              reinsurance treaty).
+-- > |      11 Buffer stock requirement
+-- >              Anticipated additional consumption to safeguard against
+-- >              unforeseen shortages or demands.
+-- >        12 Discount
+-- >              Discount expressed as a percentage.
+-- >        13 Amount tolerance
+-- >              Tolerance of amount in percentage.
+-- >        14 Percentage of note
+-- >              Percentage of debit or credit note.
+-- >        15 Penalty percentage
+-- >              Self explanatory.
+-- >        16 Interest percentage
+-- >              Self explanatory.
+-- >        17 Part of documentary credit amount
+-- >              Part of documentary credit amount in percentage subject
+-- >              to sight payment, deferred payment or acceptance when the
+-- >              documentary credit is available by mixed payment.
+-- >        18 Percentage credit note
+-- >              Percentage of a credit note.
+-- >        19 Percentage debit note
+-- >              Percentage of a debit note.
+-- >        20 Percentage of insurance
+-- >              Self explanatory.
+-- >        21 Own risk percentage
+-- >              Percentage of total amount which is not covered by credit
+-- >              cover.
+-- >        22 Transferred VAT percentage
+-- >              VAT percentage rate for which accountability is being
+-- >              transferred from one party to another. VAT means: Value
+-- >              added tax.
+-- >        23 Part time employment
+-- >              The time a person is employed expressed as a percentage
+-- >              of the equivalent full time employment.
+-- >        24 Voluntary contribution
+-- >              Contribution to a superannuation scheme which is not
+-- >              compulsory, expressed as a percentage of salary.
+-- >        25 Attribute factor
+-- >              To indicate a mathematical factor, expressed as a
+-- >              percentage , used to multiply a specified attribute item.
+-- >        26 Additional contribution
+-- >              Contribution to a scheme in addition to the normal
+-- >              contribution, expressed as a percentage (in
+-- >              superannuation usually expressed as a percentage of
+-- >              salary).
+-- >        27 Benefits allocation
+-- >              Percentage of total benefits allocated to a person.
+-- >        28 Attribute classification
+-- >              To indicate the percentage of a specified attribute
+-- >              classification (e.g. percentage contributed before a
+-- >              defined year for superannuation purposes).
+-- >        29 Renegotiation trigger upper limit
+-- >              The percentage rise in a currency rate of exchange which
+-- >              would result in renegotiation of prices.
+-- >        30 Renegotiation trigger lower limit
+-- >              The percentage fall in a currency rate of exchange which
+-- >              would result in renegotiation of prices.
+-- >        31 Material reduction factor
+-- >              The percentage reduction in constituent material which
+-- >              occurs in the production process.
+-- >        32 Acceptable price difference
+-- >              The maximum percentage increase or decrease resulting
+-- >              from price recalculation which will not result in price
+-- >              renegotiation.
+-- >        33 Share of buyer's total requirement
+-- >              The percentage of the buyer's total acquisition
+-- >              requirement for the referenced or similar item which will
+-- >              be ordered from the named supplier.
+-- >        34 Price increase
+-- >              The percentage increase in price of the referenced item
+-- >              since the last notification.
+-- >        35 Share of tool cost paid by buyer
+-- >              The percentage of the cost of tooling which will be paid
+-- >              by the buyer.
+-- >        36 Volume capacity usage
+-- >              Percentage of the volume capacity used.
+-- >        37 Weight capacity usage
+-- >              Percentage of the weight capacity used.
+-- >        38 Loading length capacity usage
+-- >              Percentage of the loading length capacity used.
+-- >        39 Share of packaging cost paid by vendor
+-- >              The percentage of the cost of packaging which will be
+-- >              paid by the vendor.
+-- >        40 Reduction percentage
+-- >              Reduction from an amount/price expressed in a percentage.
+-- >        41 Surcharge percentage
+-- >              Additional amount expressed in a percentage.
+-- >        42 Local content
+-- >              To indicate the percentage of a products local (i.e.
+-- >              domestic) content.
+-- >        43 Chargeback
+-- >              Percentage amount charged back.
+-- >        44 Gross turnover commission
+-- >              Percentage of gross turnover used to calculate
+-- >              commission.
+simple5245 :: Parser Value
+simple5245 = simple "5245" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5249.hs b/specification/src/Text/Edifact/D96A/Simples/S5249.hs
new file mode 100644
index 0000000..caeeda0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5249.hs
@@ -0,0 +1,63 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5249
+  ( simple5249
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   5249  Percentage basis, coded
+-- >
+-- >   Desc: Indication of the application of a percentage.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Per unit
+-- >              Referenced percentage applies on a single unit basis.
+-- >         2 Per ton
+-- >              Reduction percentage is applied per transported ton.
+-- >         3 Per equipment unit
+-- >              Reduction percentage is applied per main equipment unit
+-- >              (for rail purpose, only rail wagons).
+-- >         4 Per unit price
+-- >              Reduction percentage is applied on the unit price, which
+-- >              is the basis of the charge calculation.
+-- >         5 Per quantity
+-- >              Reduction percentage applied on the unit price and
+-- >              conceded to a consignor after he reached a specified
+-- >              tonnage of transport.
+-- >         6 Basic charge
+-- >              Code to indicate that the IATA experimental special
+-- >              charge within Europe is the basis for the percentage
+-- >              reduction or surcharge.
+-- >         7 Rate per kilogram
+-- >              Code to indicate that the IATA experimental special rate
+-- >              within in Europe is the basis for the percentage
+-- >              reduction or surcharge.
+-- >         8 Minimum charge
+-- >              Code to indicate that the IATA minimum charge is the
+-- >              basis for the percentage reduction or surcharge.
+-- >         9 Normal rate
+-- >              Code to indicate that the IATA normal rate is the basis
+-- >              for the percentage reduction or surcharge.
+-- >        10 Quantity rate
+-- >              Code to indicate that the IATA quantity rate is the basis
+-- >              for the percentage reduction or surcharge.
+-- >        11 Amount of drawing
+-- >              Referenced percentage applies on the amount of drawing
+-- >              under the documentary credit.
+-- >        12 Documentary credit amount
+-- >              Referenced percentage applies on documentary credit
+-- >              amount.
+-- >        13 Invoice value
+-- >              Referenced percentage applies on the invoice value.
+-- >        14 CIF value
+-- >              Referenced percentage applies on CIF value.
+simple5249 :: Parser Value
+simple5249 = simple "5249" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5275.hs b/specification/src/Text/Edifact/D96A/Simples/S5275.hs
new file mode 100644
index 0000000..e772555
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5275.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5275
+  ( simple5275
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5275  Supplementary rate/tariff basis identification
+-- >
+-- >    Desc: Code identifying supplementary rate/tariff.
+-- >
+-- >    Repr: an..6
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple5275 :: Parser Value
+simple5275 = simple "5275" (alphaNumeric `upTo` 6)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5284.hs b/specification/src/Text/Edifact/D96A/Simples/S5284.hs
new file mode 100644
index 0000000..88dde2f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5284.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5284
+  ( simple5284
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5284  Unit price basis
+-- >
+-- >    Desc: Basis on which the unit price/rate applies.
+-- >
+-- >    Repr: n..9
+simple5284 :: Parser Value
+simple5284 = simple "5284" (numeric `upTo` 9)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5375.hs b/specification/src/Text/Edifact/D96A/Simples/S5375.hs
new file mode 100644
index 0000000..8722270
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5375.hs
@@ -0,0 +1,82 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5375
+  ( simple5375
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 5375  Price type, coded
+-- >
+-- >   Desc: Code identifying the type of price of an item.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Cancellation price
+-- >              Price authorized to be charged in the event of an order
+-- >              being cancelled.
+-- >    AB     Per ton
+-- >              To indicate that the price applies per ton.
+-- > +  AC     Minimum order price
+-- >              A code to identify the price when the minimum number is
+-- >              purchased.
+-- > +  AD     Export price
+-- >              A code to identify the price of a given article for the
+-- >              export market.
+-- > +  AE     Range dependent price
+-- >              A code identifying the price for a specific range of
+-- >              purchase quantities.
+-- >    AI     Active ingredient
+-- >              The price is referring to the active ingredient.
+-- >    AQ     As is quantity
+-- >              The price is referring to the measured quantity.
+-- >    CA     Catalogue
+-- >              Self explanatory.
+-- >    CT     Contract
+-- >              Self explanatory.
+-- >    CU     Consumer unit
+-- >              The price is referring to the consumer unit.
+-- >    DI     Distributor
+-- >              Self explanatory.
+-- >    EC     ECSC price
+-- >              Price registered at European Commission Steel and Carbon
+-- >              office (DG III).
+-- >    NW     Net weight
+-- >              Self explanatory.
+-- >    PC     Price catalogue
+-- >              Self explanatory.
+-- >    PE     Per each
+-- >              Self explanatory.
+-- >    PK     Per kilogram
+-- >              Self explanatory.
+-- >    PL     Per litre
+-- >              Self explanatory.
+-- >    PT     Per tonne
+-- >              Self explanatory.
+-- >    PU     Specified unit
+-- >              Self explanatory.
+-- >    PV     Provisional price
+-- >              Self explanatory.
+-- >    PW     Gross weight
+-- >              Self explanatory.
+-- >    QT     Quoted
+-- >              Self explanatory.
+-- >    SR     Suggested retail
+-- >              Self explanatory.
+-- >    TB     To be negotiated
+-- >              Self explanatory.
+-- >    TU     Traded unit
+-- >              The price is referring to the traded unit.
+-- >    TW     Theoretical weight
+-- >              Weight calculated on ordered dimension (length, width,
+-- >              thickness) not on final dimension (e.g. steel products).
+-- >    WH     Wholesale
+-- >              Self explanatory.
+simple5375 :: Parser Value
+simple5375 = simple "5375" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5387.hs b/specification/src/Text/Edifact/D96A/Simples/S5387.hs
new file mode 100644
index 0000000..9579861
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5387.hs
@@ -0,0 +1,238 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5387
+  ( simple5387
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 5387  Price type qualifier
+-- >
+-- >   Desc: Code identifying pricing specification.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AAA    Reference price
+-- >              Self explanatory.
+-- >    AAB    Price includes tax
+-- >              Self explanatory.
+-- > +  AAC    Buyer suggested retail price
+-- >              The suggested retail price as suggested or determined by
+-- >              the party purchasing the goods.
+-- >    AAD    Ocean charges rate
+-- >              The charges imposed by the ocean transportation industry
+-- >              above and beyond the basic freight.
+-- >    AAE    Not subject to fluctuation
+-- >              Not subject to escalation or adjustment.
+-- >    AAF    Subject to escalation
+-- >              Subject to increase or development by successive stages.
+-- >    AAG    Subject to price adjustment
+-- >              Self explanatory.
+-- >    AAH    Subject to escalation and price adjustment
+-- >              Subject to increase or development by successive stages
+-- >              and price adjustment.
+-- >    AAI    Fluctuation conditions not specified
+-- >              Self explanatory.
+-- >    AAJ    All in price
+-- >              Firm price for specified work.
+-- >    AAK    New price
+-- >              A price valid from an effective date/time/period.
+-- >    AAL    Old price
+-- >              A price valid prior to an effective date/time/period of a
+-- >              new price.
+-- >    AAM    Per week
+-- >              To indicate that the given price applies per week.
+-- >    AAN    Price on application
+-- >              Price can be obtained on request from seller.
+-- >    AAO    Unpacked price
+-- >              The price given is the price of the item without
+-- >              packaging.
+-- >    AAP    Trade price
+-- >              Discount price available to all customers except the
+-- >              retail customer.
+-- >    AAQ    Firm price
+-- >              Price which will remain unchanged for a given time
+-- >              period.
+-- >    AAR    Material share of item price
+-- >              The per unit cost of referenced material based on a
+-- >              given quotation for that material.
+-- >    AAS    Labour share of item price
+-- >              The labour component of the per-unit item price.
+-- >    AAT    Transport share of item price
+-- >              The transport component of the per-unit item price.
+-- >    AAU    Packing share of item price
+-- >              The packing component of the per-unit item price.
+-- >    AAV    Tooling share of item price
+-- >              The tooling component of the per-unit item price.
+-- > +  AAW    Temporary vehicle charge
+-- >              The component of a price charged for providing a
+-- >              temporary vehicle.
+-- > +  AAX    Price component due to interest
+-- >              This is the component of the price which is charged due
+-- >              to interest.
+-- > +  AAY    Price component due to management services
+-- >              This is the component of the price which is charged due
+-- >              to management services rendered.
+-- > +  AAZ    Price component due to maintenance
+-- >              This is the component of the price which is charged due
+-- >              to maintenance.
+-- > +  ABA    Individual buyer price
+-- >              A price which is available to an individual buyer as
+-- >              opposed to an institutional buyer.
+-- > +  ABB    Group buying price
+-- >              A price which is available to a buying group.
+-- > +  ABC    Group member buying price
+-- >              A special price given to a member of a buying group.
+-- > +  ABD    Pre-payment price
+-- >              A special price if pre-payment is made for the article
+-- >              ordered.
+-- > +  ABE    Retail price - excluding taxes
+-- >              Retail price not including any applicable taxes.
+-- > +  ABF    Suggested retail price - excluding taxes
+-- >              Suggested retail price not including any applicable
+-- >              taxes.
+-- >    AI     Active ingredient
+-- >              Self explanatory.
+-- >    ALT    Alternate price
+-- >              A substitute cost.
+-- >    AP     Advice price
+-- >              Self explanatory.
+-- >    BR     Broker price
+-- >              Self explanatory.
+-- > #| CAT    Catalogue price
+-- >              Price per unit of quantity of a product as specified in a
+-- >              catalogue.
+-- >    CDV    Current domestic value
+-- >              The present worth of a thing which comes from one's
+-- >              homeland, in terms of money or goods.
+-- >    CON    Contract price
+-- >              Price per unit of quantity of a product/service as agreed
+-- >              in a contract between parties.
+-- >    CP     Current price
+-- >              Price at time of transaction, but subject to future
+-- >              change.
+-- >    CU     Consumer unit
+-- >              Self explanatory.
+-- >    CUP    Confirmed unit price
+-- >              The value of a single item that proves to be correct.
+-- >    CUS    Declared customs unit value
+-- >              A clearly known duty on a single item which is imposed by
+-- >              law.
+-- >    DAP    Dealer adjusted price
+-- >              The necessary or desirable changes that the sales agency
+-- >              makes with respect to the value of the product.
+-- >    DIS    Distributor price
+-- >              The cost associated with the agency that markets goods.
+-- >    DPR    Discount price
+-- >              A reduction from the usual list value.
+-- >    DR     Dealer price
+-- >              Self explanatory.
+-- >    DSC    Discount amount allowed
+-- >              A certain price up to which one is able to make
+-- >              reductions from the usual list value.
+-- >    EC     ECSC price
+-- >              Price registered at European Commission Steel and Carbon
+-- >              office (DG III).
+-- >    ES     Estimated price
+-- >              Self explanatory.
+-- >    EUP    Expected unit price
+-- >              The anticipated value of a single item.
+-- >    FCR    Freight/charge rate
+-- >              The price that is either a freight rate or a rate on
+-- >              which freight charges are calculated.
+-- >    GRP    Gross unit price
+-- >              Unit price to which allowances and charges apply.
+-- >    INV    Invoice price
+-- >              Price per unit of quantity of a product as specified on
+-- >              an invoice.
+-- >    LBL    Labelling price
+-- >              Retail price of the buyer that should be printed by the
+-- >              producer on the article's label. The labelling price is
+-- >              not necessary the effective retail price.
+-- >    MAX    Maximum order quantity price
+-- >              The greatest amount of goods or services which one can
+-- >              buy to receive a certain value.
+-- >    MIN    Minimum order quantity price
+-- >              The least amount of goods or services that one can buy to
+-- >              receive a certain value.
+-- >    MNR    Minimum release quantity price
+-- >              The least amount of an order one can place in order to
+-- >              receive a certain value.
+-- >    MSR    Manufacturer's suggested retail
+-- >              Price that reflects "Sales to other manufacturers" or
+-- >              "Sales for resale".
+-- >    MXR    Maximum release quantity price
+-- >              The greatest amount of an order that one can place in
+-- >              order to receive a certain value.
+-- >    NE     Not-to-exceed price
+-- >              Self explanatory.
+-- >    NQT    No quote
+-- >              No price available.
+-- >    NTP    Net unit price
+-- >              Unit price to which no allowances and charges apply.
+-- >    NW     Net weight
+-- >              Self explanatory.
+-- >    OCR    Ocean charges rate
+-- >              The charges imposed by the ocean transportation industry
+-- >              above and beyond the basic freight.
+-- >    OFR    Ocean freight rate
+-- >              The price per pricing unit of ocean transportation
+-- >              services for moving cargo from one location to another.
+-- >    PAQ    Price break quantity(s)
+-- >              Numerical amounts of goods or services which are
+-- >              associated with different sums of money. As the amount
+-- >              goes up, the price per individual item decreases.
+-- >    PBQ    Unit price beginning quantity
+-- >              The starting amount at which you can place a value on a
+-- >              single item.
+-- >    PPD    Prepaid freight charges
+-- >              The cost of shipping is paid before the goods are
+-- >              shipped.
+-- >    PPR    Provisional price
+-- >              Price per unit of quantity of a product as provisionally
+-- >              agreed.
+-- >    PRO    Producer's price
+-- >              The value that the maker of a good places on an item.
+-- >    PRP    Promotional price
+-- >              The value that is placed on an item that is being
+-- >              developed. The idea is to sell this product for less than
+-- >              one normally would, and make up for it by selling a
+-- >              larger quantity.
+-- >    PW     Gross weight
+-- >              Self explanatory.
+-- >    QTE    Quote price
+-- >              Price per unit of quantity of a product as specified in a
+-- >              quote.
+-- >    RES    Resale price
+-- >              Price per unit of quantity of a product to be used for
+-- >              resale.
+-- >    RTP    Retail price
+-- >              Price per unit of quantity of a product to be used for
+-- >              retail.
+-- >    SHD    Ship and debit
+-- >              To transport goods and be owed money by the customer for
+-- >              the services performed.
+-- >    SRP    Suggested retail price
+-- >              Price per unit of quantity of a product suggested for
+-- >              retail.
+-- >    SW     Gross weight without wooden pallets
+-- >              Used in steel industry.
+-- >    TB     To be negotiated
+-- >              Self explanatory.
+-- >    TRF    Transfer
+-- >              To carry or remove from one place, situation, or person
+-- >              to another.
+-- >    TU     Traded unit
+-- >              Self explanatory.
+-- >    TW     Theoretical weight
+-- >              Self explanatory.
+-- >    WH     Wholesale price
+-- >              Description to be provided.
+simple5387 :: Parser Value
+simple5387 = simple "5387" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5402.hs b/specification/src/Text/Edifact/D96A/Simples/S5402.hs
new file mode 100644
index 0000000..2dde3fb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5402.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5402
+  ( simple5402
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5402  Rate of exchange
+-- >
+-- >    Desc: The rate at which one specified currency is expressed in
+-- >          another specified currency.
+-- >
+-- >    Repr: n..12
+simple5402 :: Parser Value
+simple5402 = simple "5402" (numeric `upTo` 12)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5479.hs b/specification/src/Text/Edifact/D96A/Simples/S5479.hs
new file mode 100644
index 0000000..1b5acc0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5479.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5479
+  ( simple5479
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    5479  Relation, coded
+-- >
+-- >    Desc: To specify the relationship between two or more items.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Code values to be provided.
+simple5479 :: Parser Value
+simple5479 = simple "5479" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5482.hs b/specification/src/Text/Edifact/D96A/Simples/S5482.hs
new file mode 100644
index 0000000..0932b6c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5482.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5482
+  ( simple5482
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > *  5482  Percentage
+-- >
+-- >    Desc: Value expressed as a percentage of a specified amount.
+-- >
+-- >    Repr: n..10
+simple5482 :: Parser Value
+simple5482 = simple "5482" (numeric `upTo` 10)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5495.hs b/specification/src/Text/Edifact/D96A/Simples/S5495.hs
new file mode 100644
index 0000000..48a1cf2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5495.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S5495
+  ( simple5495
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   5495  Sub-line indicator, coded
+-- >
+-- >   Desc: Indication that the segment and/or segment group is used for
+-- >         sub-line item information.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Sub-line information
+-- >              Self explanatory.
+simple5495 :: Parser Value
+simple5495 = simple "5495" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6008.hs b/specification/src/Text/Edifact/D96A/Simples/S6008.hs
new file mode 100644
index 0000000..ad636f6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6008.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6008
+  ( simple6008
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6008  Height dimension
+-- >
+-- >    Desc: Height of pieces or packages stated for transport purposes.
+-- >
+-- >    Repr: n..15
+simple6008 :: Parser Value
+simple6008 = simple "6008" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6060.hs b/specification/src/Text/Edifact/D96A/Simples/S6060.hs
new file mode 100644
index 0000000..3f95b3a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6060.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6060
+  ( simple6060
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6060  Quantity
+-- >
+-- >    Desc: Numeric value of a quantity.
+-- >
+-- >    Repr: n..15
+simple6060 :: Parser Value
+simple6060 = simple "6060" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6063.hs b/specification/src/Text/Edifact/D96A/Simples/S6063.hs
new file mode 100644
index 0000000..bd8827e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6063.hs
@@ -0,0 +1,470 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6063
+  ( simple6063
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6063  Quantity qualifier
+-- >
+-- >   Desc: Code giving specific meaning to a quantity.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Discrete quantity
+-- >              Self explanatory.
+-- >         2 Charge
+-- >              Quantity relevant for charge.
+-- >         3 Cumulative quantity
+-- >              Self explanatory.
+-- >         8 Inventory quantity at supplier's subject to inspection by
+-- >           customer
+-- >              Quantity of goods which the customer requires the
+-- >              supplier to have in inventory and which may be inspected
+-- >              by the customer if desired.
+-- >        11 Split quantity
+-- >              Part of the whole quantity.
+-- >        12 Despatch quantity
+-- >              Quantity despatched by the seller.
+-- >        17 Quantity on hand
+-- >              Self explanatory.
+-- >        18 Previous quantity
+-- >              Quantity previously referenced.
+-- >        20 Unusable quantity
+-- >              Self explanatory.
+-- >        21 Ordered quantity
+-- >              The quantity which has been ordered.
+-- >        22 Quantity at 100%
+-- >              Equivalent quantity at 100% purity.
+-- >        23 Active ingredient
+-- >              Quantity at 100% active agent content.
+-- >        24 Inventory quantity at supplier's not subject to inspection
+-- >           by customer
+-- >              Quantity of goods which the customer requires the
+-- >              supplier to have in inventory but which will not be
+-- >              checked by the customer.
+-- >        25 Retail sales
+-- >              Quantity of retail point of sale activity.
+-- >        26 Promotion quantity
+-- >              A quantity associated with a promotional event.
+-- >        27 On hold for shipment
+-- >              Article received which cannot be shipped in its present
+-- >              form.
+-- >        28 Military sales quantity
+-- >              Quantity of goods or services sold to a military
+-- >              organization.
+-- >        29 On premises sales
+-- >              Sale of product in restaurants or bars.
+-- >        30 Off premises sales
+-- >              Sale of product directly to a store.
+-- >        31 Estimated annual volume
+-- >              Self explanatory.
+-- >        32 Minimum delivery batch
+-- >              Self explanatory.
+-- >        33 Maximum delivery batch
+-- >              Self explanatory.
+-- >        35 Price break from
+-- >              The minimum quantity of a quantity range for a specified
+-- >              (unit) price.
+-- >        36 Price break to
+-- >              Description to be provided.
+-- >        40 Normal delivery
+-- >              Quantity normally delivered by the seller.
+-- >        46 Pieces delivered
+-- >              Number of pieces actually received at the final
+-- >              destination.
+-- >        47 Invoiced quantity
+-- >              The quantity as per invoice.
+-- >        48 Received quantity
+-- >              The quantity which has been received.
+-- >        49 Chargeable distance
+-- >              Distance really charged by tariff appliance.
+-- >        50 Disposition undetermined quantity
+-- >              Product quantity that has not yet had its disposition
+-- >              determined.
+-- >        51 Inventory category transfer
+-- >              Inventory that has been moved from one inventory category
+-- >              to another.
+-- >        52 Quantity per pack
+-- >              Self explanatory.
+-- >        53 Minimum order quantity
+-- >              Self explanatory.
+-- >        54 Maximum order quantity
+-- >              Self explanatory.
+-- >        55 Total sales
+-- >              The summation of total quantity sales.
+-- >        56 Wholesaler to wholesaler sales
+-- >              Sale of product to other wholesalers by a wholesaler.
+-- >        57 In transit quantity
+-- >              A quantity that is enroute.
+-- >        58 Quantity withdrawn
+-- >              Quantity withdrawn from a location.
+-- >        59 Numbers of consumer units in the traded unit
+-- >              Self explanatory.
+-- >        60 Current inventory quantity available for shipment
+-- >              Current inventory quantity available for shipment.
+-- >        61 Return quantity
+-- >              Self explanatory.
+-- >        62 Sorted quantity
+-- >              Description to be provided.
+-- >        63 Sorted quantity rejected
+-- >              Description to be provided.
+-- >        64 Scrap quantity
+-- >              Remainder of the total quantity after split deliveries.
+-- >        65 Destroyed quantity
+-- >              Self explanatory.
+-- >        66 Committed quantity
+-- >              Quantity a party is committed to.
+-- > +      67 Estimated reading quantity
+-- >              The value that is estimated to be the reading of a
+-- >              measuring device (e.g. meter).
+-- > +      68 End quantity
+-- >              The quantity recorded at the end of an agreement or
+-- >              period.
+-- > +      69 Start quantity
+-- >              The quantity recorded at the start of an agreement or
+-- >              period.
+-- >        70 Cumulative quantity received
+-- >              Cumulative quantity of all deliveries of this article
+-- >              received by the buyer.
+-- >        71 Cumulative quantity ordered
+-- >              Cumulative quantity of all deliveries, outstanding and
+-- >              scheduled orders.
+-- >        72 Cumulative quantity received end of prior year
+-- >              Cumulative quantity of all deliveries of the product
+-- >              received by the buyer till end of prior year.
+-- >        73 Outstanding quantity
+-- >              Difference between quantity ordered and quantity
+-- >              received.
+-- >        74 Latest cumulative quantity
+-- >              Cumulative quantity after complete delivery of all
+-- >              scheduled quantities of the product.
+-- >        75 Previous highest cumulative quantity
+-- >              Cumulative quantity after complete delivery of all
+-- >              scheduled quantities of the product from a prior schedule
+-- >              period.
+-- > +      76 Adjusted corrector reading
+-- >              A corrector reading after it has been adjusted.
+-- >        77 Work days
+-- >              Number of work days, e.g. per respective period.
+-- >        78 Cumulative quantity scheduled
+-- >              Adding the quantity actually scheduled to previous
+-- >              cumulative quantity.
+-- >        79 Previous cumulative quantity
+-- >              Cumulative quantity prior the actual order.
+-- > +      80 Unadjusted corrector reading
+-- >              A corrector reading before it has been adjusted.
+-- >        81 Extra unplanned delivery
+-- >              Non scheduled additional quantity.
+-- >        82 Quantity requirement for sample inspection
+-- >              Self explanatory.
+-- >        83 Backorder quantity
+-- >              Self explanatory.
+-- >        84 Urgent delivery quantity
+-- >              Self explanatory.
+-- >        85 Previous order quantity to be cancelled
+-- >              Self explanatory.
+-- > +      86 Normal reading quantity
+-- >              The value recorded or read from a measuring device (e.g.
+-- >              meter) in the normal conditions.
+-- > +      87 Customer reading quantity
+-- >              The value recorded or read from a measuring device (e.g.
+-- >              meter) by the customer.
+-- > +      88 Information reading quantity
+-- >              The value recorded or read from a measuring device (e.g.
+-- >              meter) for information purposes.
+-- > +      89 Quality control held
+-- >              Quantity of goods held pending completion of a quality
+-- >              control assessment.
+-- >        90 As is quantity
+-- >              Self explanatory.
+-- >        91 Open quantity
+-- >              Quantity remaining after partial delivery.
+-- >        92 Final delivery quantity
+-- >              Quantity of final delivery to a respective order.
+-- >        93 Subsequent delivery quantity
+-- >              Quantity delivered to a respective order after it's final
+-- >              delivery.
+-- >        94 Substitutional quantity
+-- >              Quantity delivered replacing previous deliveries.
+-- >        95 Redelivery after post processing
+-- >              Self explanatory.
+-- > +      96 Quality control failed
+-- >              Quantity of goods which have failed quality control.
+-- > +      97 Minimum inventory
+-- >              Minimum stock quantity on which replenishment is based.
+-- > +      98 Maximum inventory
+-- >              Maximum stock quantity on which replenishment is based.
+-- >        99 Estimated quantity
+-- >              Self explanatory.
+-- >       100 Chargeable weight
+-- >              The weight on which charges are based.
+-- >       101 Chargeable gross weight
+-- >              The gross weight on which charges are based.
+-- >       102 Chargeable tare weight
+-- >              The tare weight on which charges are based.
+-- >       103 Chargeable number of axles
+-- >              The number of axles on which charges are based.
+-- >       104 Chargeable number of containers
+-- >              The number of containers on which charges are based.
+-- >       105 Chargeable number of rail wagons
+-- >              The number of rail wagons on which charges are based.
+-- >       106 Chargeable number of packages
+-- >              The number of packages on which charges are based.
+-- >       107 Chargeable number of units
+-- >              The number of units on which charges are based.
+-- >       108 Chargeable period
+-- >              The period of time on which charges are based.
+-- >       109 Chargeable volume
+-- >              The volume on which charges are based.
+-- >       110 Chargeable cubic measurements
+-- >              The cubic measurements on which charges are based.
+-- >       111 Chargeable surface
+-- >              The surface area on which charges are based.
+-- >       112 Chargeable length
+-- >              The length on which charges are based.
+-- >       113 Quantity to be delivered
+-- >              The quantity to be delivered.
+-- >       114 Number of passengers
+-- >              Total number of passengers on the conveyance.
+-- >       115 Number of crew
+-- >              Total number of crew members on the conveyance.
+-- >       116 Number of transport documents
+-- >              Total number of air waybills, bills of lading, etc.
+-- >              being reported for a specific conveyance.
+-- >       117 Quantity landed
+-- >              Quantity of goods actually arrived.
+-- >       118 Quantity manifested
+-- >              Quantity of goods contracted for delivery by the carrier.
+-- >       119 Short shipped
+-- >              Indication that part of the consignment was not shipped.
+-- >       120 Split shipment
+-- >              Indication that the consignment has been split into two
+-- >              or more shipments.
+-- >       121 Over shipped
+-- >              Indication that more goods have been shipped than
+-- >              contracted for delivery.
+-- >       122 Short-landed goods
+-- >              If quantity of goods actually landed is less than the
+-- >              quantity which appears in the documentation. This
+-- >              quantity is the difference between these quantities.
+-- >       123 Surplus goods
+-- >              If quantity of goods actually landed is more than the
+-- >              quantity which appears in the documentation. This
+-- >              quantity is the difference between these quantities.
+-- >       124 Damaged goods
+-- >              Quantity of goods which have deteriorated in transport
+-- >              such that they cannot be used for the purpose for which
+-- >              they were originally intended.
+-- >       125 Pilferage goods
+-- >              Quantity of goods stolen during transport.
+-- >       126 Lost goods
+-- >              Quantity of goods that disappeared in transport.
+-- >       127 Report difference
+-- >              The quantity concerning the same transaction differs
+-- >              between two documents/messages and the source of this
+-- >              difference is a typing error.
+-- >       128 Quantity loaded
+-- >              Quantity of goods loaded onto a means of transport.
+-- >       129 Units per unit price
+-- >              Number of units per unit price.
+-- >       130 Allowance
+-- >              Quantity relevant for allowance.
+-- >       131 Delivery quantity
+-- >              Quantity required by buyer to be delivered.
+-- >       132 Cumulative quantity, preceding period, planned
+-- >              Cumulative quantity originally planned for the preceding
+-- >              period.
+-- >       133 Cumulative quantity, preceding period, reached
+-- >              Cumulative quantity reached in the preceding period.
+-- >       134 Cumulative quantity, actual planned
+-- >              Cumulative quantity planned for now.
+-- >       135 Period quantity, planned
+-- >              Quantity planned for this period.
+-- >       136 Period quantity, reached
+-- >              Quantity reached during this period.
+-- >       137 Cumulative quantity, preceding period, estimated
+-- >              Estimated cumulative quantity reached in the preceding
+-- >              period.
+-- >       138 Cumulative quantity, actual estimated
+-- >              Estimated cumulative quantity reached now.
+-- >       139 Cumulative quantity, preceding period, measured
+-- >              Surveyed cumulative quantity reached in the preceding
+-- >              period.
+-- >       140 Cumulative quantity, actual measured
+-- >              Surveyed cumulative quantity reached now.
+-- >       141 Period quantity, measured
+-- >              Surveyed quantity reached during this period.
+-- >       142 Total quantity, planned
+-- >              Total quantity planned.
+-- >       143 Quantity, remaining
+-- >              Quantity remaining.
+-- >       144 Tolerance
+-- >              Plus or minus tolerance expressed as a monetary amount.
+-- >       145 Actual stock
+-- >              The stock on hand, undamaged, and available for despatch,
+-- >              sale or use.
+-- >       146 Model or target stock
+-- >              The stock quantity required or planned to have on hand,
+-- >              undamaged and available for use.
+-- >       147 Direct shipment quantity
+-- >              Quantity to be shipped directly to a customer from a
+-- >              manufacturing site.
+-- >       148 Amortization total quantity
+-- >              Indication of final quantity for amortization.
+-- >       149 Amortization order quantity
+-- >              Indication of actual share of the order quantity for
+-- >              amortization.
+-- >       150 Amortization cumulated quantity
+-- >              Indication of actual cumulated quantity of previous and
+-- >              actual amortization order quantity.
+-- >       151 Quantity advised
+-- >              Quantity advised by supplier or shipper, in contrast to
+-- >              quantity actually received.
+-- >       152 Quantity on hand
+-- >              The total quantity of a product on hand at a location.
+-- >              This includes as well units awaiting return to
+-- >              manufacturer, units unavailable due to inspection
+-- >              procedures and undamaged stock available for despatch,
+-- >              resale or use.
+-- >       153 Statistical sales quantity
+-- >              Quantity of goods sold in a specified period.
+-- >       154 Sales quantity planned
+-- >              Quantity of goods required to meet future demands. -
+-- >              Market intelligence quantity.
+-- >       155 Replenishment quantity
+-- >              Quantity required to maintain the requisite on-hand stock
+-- >              of goods.
+-- >       156 Inventory movement quantity
+-- >              To specify the quantity of an inventory movement.
+-- >       157 Opening stock balance quantity
+-- >              To specify the quantity of an opening stock balance.
+-- >       158 Closing stock balance quantity
+-- >              To specify the quantity of a closing stock balance.
+-- >       159 Number of stops
+-- >              Number of times a means of transport stops before
+-- >              arriving at destination.
+-- >       160 Minimum production batch
+-- >              The quantity specified is the minimum output from a
+-- >              single production run.
+-- >       161 Dimensional sample quantity
+-- >              The quantity defined is a sample for the purpose of
+-- >              validating dimensions.
+-- >       162 Functional sample quantity
+-- >              The quantity defined is a sample for the purpose of
+-- >              validating function and performance.
+-- >       163 Pre-production quantity
+-- >              Quantity of the referenced item required prior to full
+-- >              production.
+-- >       164 Delivery batch
+-- >              Quantity of the referenced item which constitutes a
+-- >              standard batch for deliver purposes.
+-- >       165 Delivery batch multiple
+-- >              The multiples in which delivery batches can be supplied.
+-- >       166 All time buy
+-- >              The total quantity of the referenced covering all future
+-- >              needs. Further orders of the referenced item are not
+-- >              expected.
+-- >       167 Total delivery quantity
+-- >              The total quantity required by the buyer to be delivered.
+-- >       168 Single delivery quantity
+-- >              The quantity required by the buyer to be delivered in a
+-- >              single shipment.
+-- >       169 Supplied quantity
+-- >              Quantity of the referenced item actually shipped.
+-- >       170 Allocated quantity
+-- >              Quantity of the referenced item allocated from available
+-- >              stock for delivery.
+-- >       171 Maximum stackability
+-- >              The number of pallets/handling units which can be safely
+-- >              stacked one on top of another.
+-- >       172 Amortisation quantity
+-- >              The quantity of the referenced item which has a cost for
+-- >              tooling amortisation included in the item price.
+-- >       173 Previously amortised quantity
+-- >              The cumulative quantity of the referenced item which had
+-- >              a cost for tooling amortisation included in the item
+-- >              price.
+-- >       174 Total amortisation quantity
+-- >              The total quantity of the referenced item which has a
+-- >              cost for tooling amortisation included in the item price.
+-- >       175 Number of moulds
+-- >              The number of pressing moulds contained within a single
+-- >              piece of the referenced tooling.
+-- >       176 Concurrent item output of tooling
+-- >              The number of related items which can be produced
+-- >              simultaneously with a single piece of the referenced
+-- >              tooling.
+-- >       177 Periodic capacity of tooling
+-- >              Maximum production output of the referenced tool over a
+-- >              period of time.
+-- >       178 Lifetime capacity of tooling
+-- >              Maximum production output of the referenced tool over its
+-- >              productive lifetime.
+-- >       179 Number of deliveries per despatch period
+-- >              The number of deliveries normally expected to be
+-- >              despatched within each despatch period.
+-- >       180 Provided quantity
+-- >              The quantity of a referenced component supplied by the
+-- >              buyer for manufacturing of an ordered item.
+-- >       181 Maximum production batch
+-- >              The quantity specified is the maximum output from a
+-- >              single production run.
+-- >       182 Cancelled quantity
+-- >              Quantity of the referenced item which has previously
+-- >              been ordered and is now cancelled.
+-- >       183 No delivery requirement in this instruction
+-- >              This delivery instruction does not contain any delivery
+-- >              requirements.
+-- >       184 Quantity of material in ordered time
+-- >              Quantity of the referenced material within the ordered
+-- >              time.
+-- >       185 Rejected quantity
+-- >              The quantity of received goods rejected for quantity
+-- >              reasons.
+-- >       186 Cumulative quantity scheduled up to accumulation start date
+-- >              The cumulative quantity scheduled up to the accumulation
+-- >              start date.
+-- >       187 Quantity scheduled
+-- >              The quantity scheduled for delivery.
+-- >       188 Number of identical handling units
+-- >              Number of identical handling units in terms of type and
+-- >              contents.
+-- >       189 Number of packages in handling unit
+-- >              The number of packages contained in one handling unit.
+-- >       190 Despatch note quantity
+-- >              The item quantity specified on the despatch note.
+-- >       191 Adjustment to inventory quantity
+-- >              An adjustment to inventory quantity.
+-- > +     192 Free goods quantity
+-- >              Quantity of goods which are free of charge.
+-- > +     193 Free quantity included
+-- >              Free quantity included in ordered quantity.
+-- > +     194 Received and accepted
+-- >              Quantity which has been received and accepted at a given
+-- >              location.
+-- > +     195 Received, not accepted, to be returned
+-- >              Quantity which has been received but not accepted at a
+-- >              given location and which will consequently be returned to
+-- >              the relevant party.
+-- > +     196 Received, not accepted, to be destroyed
+-- >              Quantity which has been received but not accepted at a
+-- >              given location and which will consequently be destroyed.
+-- > +     197 Reordering level
+-- >              Quantity at which an order may be triggered to replenish.
+-- > +     198 Quantity in transit
+-- >              Quantity which is currently in transit.
+-- > +     199 Inventory withdrawal quantity
+-- >              Quantity which has been withdrawn from inventory since
+-- >              the last inventory report.
+-- > +     200 Free quantity not included
+-- >              Free quantity not included in ordered quantity.
+simple6063 :: Parser Value
+simple6063 = simple "6063" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6064.hs b/specification/src/Text/Edifact/D96A/Simples/S6064.hs
new file mode 100644
index 0000000..1136a32
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6064.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6064
+  ( simple6064
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6064  Quantity difference
+-- >
+-- >    Desc: Numeric value of variance between ordered/shipped/invoiced
+-- >          quantities.
+-- >
+-- >    Repr: n..15
+simple6064 :: Parser Value
+simple6064 = simple "6064" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6066.hs b/specification/src/Text/Edifact/D96A/Simples/S6066.hs
new file mode 100644
index 0000000..27f5779
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6066.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6066
+  ( simple6066
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6066  Control value
+-- >
+-- >    Desc: Value obtained from summing the values specified by the
+-- >          Control Qualifier throughout the message (Hash total).
+-- >
+-- >    Repr: n..18
+simple6066 :: Parser Value
+simple6066 = simple "6066" (numeric `upTo` 18)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6069.hs b/specification/src/Text/Edifact/D96A/Simples/S6069.hs
new file mode 100644
index 0000000..22a96b3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6069.hs
@@ -0,0 +1,103 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6069
+  ( simple6069
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6069  Control qualifier
+-- >
+-- >   Desc: Determines the source data elements in the message which forms
+-- >         the basis for 6066 Control value.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Algebraic total of the quantity values in line items in a
+-- >           message
+-- >              Self-explanatory.
+-- >         2 Number of line items in message
+-- >              Self-explanatory.
+-- >         3 Number of line and sub items in message
+-- >              Description to be provided.
+-- >         4 Number of invoice lines
+-- >              Number of lines on an invoice.
+-- >         5 Number of Customs item detail lines
+-- >              Total number of occurrences of the Customs item detail
+-- >              section within a single Customs declaration message.
+-- >         6 Number of Customs entries
+-- >              Number of entries which are subject to the same Customs
+-- >              procedures, and have the same tariff or statistical
+-- >              heading, country and duty regime.
+-- >         7 Total gross weight
+-- >              Code to indicate total gross weight of a consignment.
+-- >         8 Total pieces
+-- >              Self explanatory.
+-- >         9 Total number of ULD (Unit Load Device)
+-- >              The total number of Unit Load Devices mentioned in the
+-- >              message.
+-- >        10 Total number of consignments
+-- >              The total number of consignments.
+-- >        11 Total number of packages
+-- >              [7370] Total number of packages of the entire
+-- >              consignment.
+-- >        12 Invoice total amount
+-- >              [5444] Total sum charged in respect of one or more
+-- >              Invoices in accordance with the terms of delivery.
+-- >        13 Number of loading lists
+-- >              [1166] Number of loading lists, manifests or other
+-- >              similar specifications attached to a document.
+-- >        14 Number of Customs commercial detail lines
+-- >              Commercial detail section within a single Customs
+-- >              declaration message.
+-- >        15 Total consignment, cube
+-- >              The total cube of consignment.
+-- >        16 Total number of equipment
+-- >              Total number of equipment mentioned in the message.
+-- >        17 Declared total Customs value
+-- >              [5070] Total value declared for Customs purposes of all
+-- >              goods in a consignment, whether or not they are subject
+-- >              to the same Customs procedure, or have the same
+-- >              tariff/statistical heading, country information, and duty
+-- >              regime.
+-- >        18 Total reported quantity in net weight
+-- >              Total reported quantity in net weight.
+-- >        19 Total reported quantity in supplementary units
+-- >              Total reported quantity in supplementary units.
+-- >        20 Total reported invoice(s) value
+-- >              Hash total of the total monetary amounts reported on the
+-- >              invoices.
+-- >        21 Total reported ancillary costs
+-- >              Hash total of the reported total extra costs (e.g.
+-- >              carriage, freight, insurance) of all invoices.
+-- >        22 Total reported statistical value
+-- >              The total reported statistical value.
+-- >        23 Total ordered quantity
+-- >              Total quantity ordered in this message.
+-- >        24 Number of orders referenced in this message
+-- >              Total number of order messages or documents referenced in
+-- >              this message.
+-- >        25 Number of rejected order lines
+-- >              Total number of rejected order lines in this message.
+-- >        26 Total gross measurement/cube
+-- >              Total gross cubic measurement of the goods, including
+-- >              packing but excluding transport equipment.
+-- >        27 Total number of credit items given for control purposes
+-- >              Total number of credit items given for control purposes.
+-- >        28 Total number of debit items given for control purposes
+-- >              Total number of debit items given for control purposes.
+-- >        29 Total net weight of consignment
+-- >              A code to indicate the total net weight of a consignment.
+-- > +      30 Total number of empty containers
+-- >              The total number of empty containers mentioned in the
+-- >              message.
+-- > +      31 Number of messages
+-- >              Control count of the number of messages referenced.
+simple6069 :: Parser Value
+simple6069 = simple "6069" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6140.hs b/specification/src/Text/Edifact/D96A/Simples/S6140.hs
new file mode 100644
index 0000000..bdddc0f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6140.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6140
+  ( simple6140
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6140  Width dimension
+-- >
+-- >    Desc: Width of pieces or packages stated for transport purposes.
+-- >
+-- >    Repr: n..15
+simple6140 :: Parser Value
+simple6140 = simple "6140" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6145.hs b/specification/src/Text/Edifact/D96A/Simples/S6145.hs
new file mode 100644
index 0000000..fe71395
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6145.hs
@@ -0,0 +1,50 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6145
+  ( simple6145
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6145  Dimension qualifier
+-- >
+-- >   Desc: To specify the dimensions applicable to each of the
+-- >         transportable units.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Gross dimensions
+-- >              The dimension expressed in a gross value.
+-- >         2 Package dimensions (incl. goods)
+-- >              The dimension of the goods including the packaging.
+-- >         3 Pallet dimensions (excl.goods)
+-- >              The dimension of a pallet excluding the goods.
+-- >         4 Pallet dimensions (incl.goods)
+-- >              The dimension of a pallet including the goods.
+-- >         5 Off-standard dimension front
+-- >              The dimension in the length that the cargo exceeds the
+-- >              standard length at the front of an equipment.
+-- >         6 Off-standard dimension back
+-- >              The dimension in the length that the cargo exceeds the
+-- >              standard length at the back of an equipment.
+-- >         7 Off-standard dimension right
+-- >              The dimension in the width that the cargo exceeds the
+-- >              standard width at the right side of an equipment.
+-- >         8 Off-standard dimension left
+-- >              The dimension in the width that the cargo exceeds the
+-- >              standard width at the left side of an equipment.
+-- >         9 Off-standard dimension general
+-- >              The dimensions that the cargo exceeds the standard
+-- >              dimensions.
+-- >        10 External equipment dimension
+-- >              The external dimensions of transport equipment.
+-- > +      11 Internal equipment dimensions
+-- >              The internal dimensions of equipment.
+simple6145 :: Parser Value
+simple6145 = simple "6145" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6152.hs b/specification/src/Text/Edifact/D96A/Simples/S6152.hs
new file mode 100644
index 0000000..51165ea
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6152.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6152
+  ( simple6152
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6152  Range maximum
+-- >
+-- >    Desc: Maximum of a range.
+-- >
+-- >    Repr: n..18
+simple6152 :: Parser Value
+simple6152 = simple "6152" (numeric `upTo` 18)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6154.hs b/specification/src/Text/Edifact/D96A/Simples/S6154.hs
new file mode 100644
index 0000000..f427a88
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6154.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6154
+  ( simple6154
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6154  Measurement attribute
+-- >
+-- >    Desc: To specify non-discrete measurement values.
+-- >
+-- >    Repr: an..70
+simple6154 :: Parser Value
+simple6154 = simple "6154" (alphaNumeric `upTo` 70)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6155.hs b/specification/src/Text/Edifact/D96A/Simples/S6155.hs
new file mode 100644
index 0000000..2b718a8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6155.hs
@@ -0,0 +1,107 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6155
+  ( simple6155
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6155  Measurement attribute, coded
+-- >
+-- >   Desc: Code used to specify non-discrete measurement values.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Clear
+-- >              Self explanatory.
+-- >         2 Hazy
+-- >              Self explanatory.
+-- >         3 Excess
+-- >              Self explanatory.
+-- >         4 Some
+-- >              Self explanatory.
+-- >         5 Undetectable
+-- >              Self explanatory.
+-- >         6 Trace
+-- >              Self explanatory.
+-- >         7 Yes
+-- >              Self explanatory.
+-- >         8 Closed
+-- >              Self explanatory.
+-- >         9 Passed
+-- >              Self explanatory.
+-- >        10 Present
+-- >              Self explanatory.
+-- >        11 Gel
+-- >              Self explanatory.
+-- >        12 OK
+-- >              Self explanatory.
+-- >        13 Slight
+-- >              Self explanatory.
+-- >        14 No Good
+-- >              Self explanatory.
+-- >        15 Marginal
+-- >              Self explanatory.
+-- >        16 Nil
+-- >              Self explanatory.
+-- >        18 Open
+-- >              Self explanatory.
+-- >        19 Free
+-- >              Self explanatory.
+-- >        20 No
+-- >              Self explanatory.
+-- >        21 Checked
+-- >              Self explanatory.
+-- >        22 Fail
+-- >              Self explanatory.
+-- >        23 Absent
+-- >              Self explanatory.
+-- >        24 Good
+-- >              Self explanatory.
+-- >        25 Fair
+-- >              Self explanatory.
+-- >        26 Poor
+-- >              Self explanatory.
+-- >        27 Excellent
+-- >              Self explanatory.
+-- >        28 Bright
+-- >              Self explanatory.
+-- >        29 To be determined
+-- >              Self explanatory.
+-- >        32 Conditional, free
+-- >              Self explanatory.
+-- >        33 Balance
+-- >              Self explanatory.
+-- >        34 Complete
+-- >              Self explanatory.
+-- >        35 Low
+-- >              Self explanatory.
+-- >        36 Not applicable
+-- >              Self explanatory.
+-- >        37 Not determined
+-- >              Self explanatory.
+-- >        38 Negligible
+-- >              Self explanatory.
+-- >        39 Moderate
+-- >              Self explanatory.
+-- >        40 Appreciable
+-- >              Self explanatory.
+-- >        41 Not available
+-- >              Self explanatory.
+-- > +      42 Uncontrolled temperature
+-- >              Uncontrolled temperature conditions.
+-- > +      43 Chilled
+-- >              Somewhere between four degrees Celsius and twelve degrees
+-- >              Celsius.
+-- > +      44 Frozen
+-- >              Less than zero degrees Celsius.
+-- > +      45 Temperature controlled
+-- >              Required temperature value.
+simple6155 :: Parser Value
+simple6155 = simple "6155" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6162.hs b/specification/src/Text/Edifact/D96A/Simples/S6162.hs
new file mode 100644
index 0000000..6eb6dc5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6162.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6162
+  ( simple6162
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6162  Range minimum
+-- >
+-- >    Desc: Minimum of a range.
+-- >
+-- >    Repr: n..18
+simple6162 :: Parser Value
+simple6162 = simple "6162" (numeric `upTo` 18)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6167.hs b/specification/src/Text/Edifact/D96A/Simples/S6167.hs
new file mode 100644
index 0000000..bc4cf83
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6167.hs
@@ -0,0 +1,43 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6167
+  ( simple6167
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   6167  Range type qualifier
+-- >
+-- >   Desc: Identification of the type of range.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Allowance range
+-- >              Self explanatory.
+-- >         2 Charge range
+-- >              Self explanatory.
+-- >         3 Monetary range
+-- >              Self explanatory.
+-- >         4 Quantity range
+-- >              Self explanatory.
+-- >         5 Temperature range
+-- >              The range of a temperature.
+-- >         6 Order quantity range
+-- >              The minimum to maximum order quantity.
+-- >         7 Delivery quantity range
+-- >              The minimum to maximum delivery quantity.
+-- >         8 Production batch range
+-- >              The minimum to maximum quantity in a single production
+-- >              run.
+-- >         9 Monthly quantity range
+-- >              The minimum to maximum monthly quantity.
+-- >        10 Annual quantity range
+-- >              The minimum to maximum yearly quantity.
+simple6167 :: Parser Value
+simple6167 = simple "6167" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6168.hs b/specification/src/Text/Edifact/D96A/Simples/S6168.hs
new file mode 100644
index 0000000..bfa7835
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6168.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6168
+  ( simple6168
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6168  Length dimension
+-- >
+-- >    Desc: Length of pieces or packages stated for transport purposes.
+-- >
+-- >    Repr: n..15
+simple6168 :: Parser Value
+simple6168 = simple "6168" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6245.hs b/specification/src/Text/Edifact/D96A/Simples/S6245.hs
new file mode 100644
index 0000000..182d253
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6245.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6245
+  ( simple6245
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   6245  Temperature qualifier
+-- >
+-- >   Desc: A code giving specific meaning to the temperature.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Storage temperature
+-- >              The temperature at which the cargo is to be kept while it
+-- >              is in storage.
+-- >         2 Transport temperature
+-- >              The temperature at which cargo is to be kept while it is
+-- >              under transport.
+-- >         3 Cargo operating temperature
+-- >              The temperature at which cargo is to be kept during cargo
+-- >              handling.
+-- >         4 Transport emergency temperature
+-- >              The temperature at which emergency procedures apply for
+-- >              the disposal of temperature-controlled goods.
+-- >         5 Transport control temperature
+-- >              The maximum temperature at which certain products can be
+-- >              safely transported.
+simple6245 :: Parser Value
+simple6245 = simple "6245" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6246.hs b/specification/src/Text/Edifact/D96A/Simples/S6246.hs
new file mode 100644
index 0000000..0249be9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6246.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6246
+  ( simple6246
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6246  Temperature setting
+-- >
+-- >    Desc: The actual temperature value in degrees Celsius (e.g. 008,
+-- >          020).
+-- >
+-- >    Repr: n3
+simple6246 :: Parser Value
+simple6246 = simple "6246" (numeric `exactly` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6311.hs b/specification/src/Text/Edifact/D96A/Simples/S6311.hs
new file mode 100644
index 0000000..b790dfc
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6311.hs
@@ -0,0 +1,235 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6311
+  ( simple6311
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6311  Measurement application qualifier
+-- >
+-- >   Desc: Specification of the application of the physical measurement
+-- >         used.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AAA    Line item measurement
+-- >              Line item measurement specified by the Food and Drug
+-- >              Administration.
+-- > X  AAB    Retail container dimension
+-- >              Single physical dimension of a retail container.
+-- > |  AAC    Retail container size
+-- >              Size of a retail container in terms of volume.
+-- > |  AAD    Other US Government agency application
+-- >              Description to be provided.
+-- > |  AAE    Measurement
+-- >              [6314] Value of the measured unit.
+-- > |  AAF    Customs line item measurement
+-- >              The measurement of a consignment or part for customs
+-- >              purpose.
+-- > |  AAG    Percentage of alcohol (by volume)
+-- >              The measurement of the percentage of alcohol by volume.
+-- > |  AAH    Dimensions total weight
+-- >              Description to be provided.
+-- > |  AAI    Item weight
+-- >              Weight at line item level.
+-- > |  AAJ    Visa quantity
+-- >              Measurement reportable for visaed merchandise.
+-- > |  AAK    Licence (quantity deducted)
+-- >              Quantity to be written off from the total license amount.
+-- > |  AAL    Cargo loaded
+-- >              Total tonnage of cargo loaded onto the conveyance.
+-- > |  AAM    Cargo discharged
+-- >              Total tonnage of cargo unloaded from the conveyance.
+-- > |  AAN    Weight of conveyance
+-- >              Tonnage of conveyance.
+-- > |  AAO    Conveyance summer dead weight
+-- >              Registered summer dead weight total tonnage of the
+-- >              vessel.
+-- > |  AAP    Containerized cargo on vessel's weight
+-- >              Total weight of containerized cargo on vessel.
+-- > |  AAQ    Non-containerized cargo on vessel's weight
+-- >              Total weight of non-containerized cargo on vessel.
+-- > |  AAR    1st specified tariff quantity
+-- >              Primary reportable quantity associated with a tariff
+-- >              number.
+-- > |  AAS    2nd specified tariff quantity
+-- >              Secondary reportable quantity associated with a tariff
+-- >              number.
+-- > |  AAT    3rd specified tariff quantity
+-- >              Third reportable quantity associated with a tariff
+-- >              number.
+-- >    AAU    Package
+-- >              Commodity/product shipped or sold in discrete individual
+-- >              containers which may be accumulated in a larger package.
+-- >    AAV    Person
+-- >              Physical measurement of a person.
+-- > |  AAW    Accuracy
+-- >              Accuracy of the measurements being sent.
+-- >    AAX    Consignment measurement
+-- >              Measurement related to a consignment; to be specified by
+-- >              the measurement code dimension value.
+-- >    AAY    Package measurement
+-- >              Measurements of package.
+-- >    AAZ    Handling unit measurement
+-- >              Measurements of handling unit.
+-- >    ABA    Unit of measure used for ordered quantities
+-- >              The unit of measure in which ordered quantities are
+-- >              expressed.
+-- > X  ABB    Colour
+-- >              The colour of an object.
+-- > X  ABC    Size
+-- >              Dimensions or magnitude of an object.
+-- > X  ABD    Length
+-- >              The greater of the two or three dimensions of an object.
+-- > X  ABE    Height
+-- >              The distance from the bottom to the top.
+-- > X  ABF    Width
+-- >              The distance from side to side.
+-- > X  ABG    Diameter
+-- >              The length of a line segment passing through the center
+-- >              of a circle, sphere, etc. from one side to the other.
+-- > X  ABH    Depth
+-- >              The distance from the top downward.
+-- > +  ABI    Ventilation
+-- >              The number of air exchanges per hour.
+-- > +  ABJ    Original unit of issue
+-- >              A code identifying the original unit of issue.
+-- > +  ABK    External dimension
+-- >              The outer measurement of the referenced item or package.
+-- > +  ABL    Internal dimension
+-- >              The inner measurement of the referenced item or package.
+-- > +  ABM    Test piece dimensions
+-- >              The size of the test piece that was tested.
+-- > +  ABN    Average reading
+-- >              Average reading of the test being reported on.
+-- > |  ASW    Weight ascertained
+-- >              [4240] Endorsement of the true weight (mass) as
+-- >              ascertained or verified by the railway (CIM 81).
+-- > |  CH     Chemistry
+-- >              The given measurement value identifies the amount or
+-- >              percentage of a specific chemical within a substance.
+-- > |  CHW    Chargeable weight
+-- >              The weight on which charges are based.
+-- > |  CN     Core notch dimensions
+-- >              Self explanatory.
+-- > |  CS     Core size
+-- >              Self explanatory.
+-- >    CT     Counts
+-- >              Self explanatory.
+-- >    DEN    Density
+-- >              Code to indicate the mass of a commodity per unit of
+-- >              volume.
+-- > X  DR     Decision result value
+-- >              Description to be provided.
+-- > |  DT     Dimensional tolerance
+-- >              Possible range of values for a specified measurement
+-- >              dimension of a product, material or package.
+-- > |  DV     Discrete measurement value
+-- >              The measurement specified is separate and distinct from
+-- >              other measurements.
+-- > |  DX     Dimension used in price extension
+-- >              Description to be provided.
+-- > X  EGW    Estimated gross weight
+-- >              Estimated weight (mass) of goods, including packing and
+-- >              excluding carrier's.
+-- > |  EN     Environmental conditions
+-- >              The data values to be reported reflect the environmental
+-- >              conditions surrounding a situation including but not
+-- >              limited to test environments.
+-- > X  EVO    Estimated volume
+-- >              Estimated size or measure of anything in three
+-- >              dimensions.
+-- > |  FO     Footage
+-- >              Description to be provided.
+-- > |  IV     Interpolated value
+-- >              Description to be provided.
+-- > |  LAO    Vessel overall length
+-- >              Total overall length of the vessel.
+-- > |  LC     Limited weight/size coils
+-- >              Description to be provided.
+-- >    LGL    Length limitations
+-- >              Indicates that value/range information is understood as
+-- >              length limitation.
+-- > |  LL     Lift limitation
+-- >              A measurement indicating lift capacity limitations.
+-- > |  LMT    Loading meters
+-- >              The length in a vehicle, whereby the complete width and
+-- >              height over that length is needed for the goods.
+-- > X  NAX    Number of axles
+-- >              Number of axles of movable equipment or means of
+-- >              transport on wheels.
+-- > |  PAL    Payload
+-- >              The revenue-producing load carried by a means of
+-- >              transport.
+-- > |  PC     Parting cut (sawcut)
+-- >              Description to be provided.
+-- > |  PD     Physical dimensions (product ordered)
+-- >              Specified measurement dimensions refer to physical
+-- >              dimensions of a product, material or package.
+-- > |  PL     Package limitations
+-- >              A measurement indicating limitations associated with the
+-- >              package.
+-- > |  PLL    Platform limitation
+-- >              A measurement indicating limitations in relation to a
+-- >              platform.
+-- > |  RL     Receiving facility limitations
+-- >              Specified measurement dimensions are provided as a result
+-- >              of limitations or restrictions related to the physical
+-- >              dimensions of a product, material or package at the
+-- >              reception point.
+-- > X  RN     Length limitations
+-- >              Indicates that value/range information within
+-- >              measurement information is understood as length
+-- >              limitation. Use code value LGL.
+-- > |  SE     Property specification
+-- >              Indicates that the data to follow are target
+-- >              specifications.
+-- > |  SH     Shipping tolerance
+-- >              Tolerances related to shipping.
+-- > |  SM     Shade
+-- >              Description to be provided.
+-- > |  SO     Storage limitation
+-- >              A measurement indicating limitation in relation to
+-- >              storage.
+-- > X  SPG    Specific gravity
+-- >              Self explanatory.
+-- > |  SR     Surface roughness
+-- >              Self explanatory.
+-- > |  ST     Surface treatment
+-- >              Self explanatory.
+-- > |  SU     Surface
+-- >              Self explanatory.
+-- > |  SV     Specification value
+-- >              A measurable item characteristic specified by the buyer,
+-- >              seller or third party.
+-- > |  TE     Temperature
+-- >              Self explanatory.
+-- > |  TL     Transportation equipment limitations
+-- >              A measurement indicating limitations in relation to
+-- >              transportation equipment.
+-- > |  TR     Test result
+-- >              Indicates that the data to follow is the test result
+-- >              measurements.
+-- > X  TX     Time used in price extension
+-- >              Description to be provided.
+-- > X  VO     Observed value
+-- >              The reported test result which includes measurement
+-- >              variability.
+-- >    VOL    Volume
+-- >              Size or measure of anything in three dimensions.
+-- > X  VT     True value
+-- >              The reported test result with the measurement variability
+-- >              removed.
+-- >    WT     Weights
+-- >              Self explanatory.
+-- > |  WX     Weight used in price extension
+-- >              Description to be provided.
+simple6311 :: Parser Value
+simple6311 = simple "6311" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6313.hs b/specification/src/Text/Edifact/D96A/Simples/S6313.hs
new file mode 100644
index 0000000..5b54125
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6313.hs
@@ -0,0 +1,533 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6313
+  ( simple6313
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6313  Measurement dimension, coded
+-- >
+-- >   Desc: Specification of the type of dimension to be measured.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Consolidated weight
+-- >              Description to be provided.
+-- >    AAA    Unit net weight
+-- >              [6160] Weight (mass) of goods including any packing
+-- >              normally going with them to a buyer in a retail sale.
+-- >    AAB    Unit gross weight
+-- >              [6292] Weight (mass) of goods including packing but
+-- >              excluding the carrier's equipment.
+-- >    AAC    Total net weight
+-- >              Self explanatory.
+-- >    AAD    Total gross weight
+-- >              [6292] Weight (mass) of goods including packing but
+-- >              excluding the carrier's equipment.
+-- >    AAE    Item gross weight
+-- >              Gross weight at line item level.
+-- >    AAF    Net net weight
+-- >              [6048] Weight (mass) of the goods themselves without any
+-- >              packing.
+-- > X  AAG    Gross weight (item level)
+-- >              Self explanatory.
+-- > X  AAH    Customs line item measurement
+-- >              Description to be provided.
+-- > X  AAI    Visa quantity
+-- >              Measurement reportable for visaed merchandise.
+-- >    AAL    Net weight
+-- >              [6160] Weight (mass) of goods including any packing
+-- >              normally going with them to a buyer in a retail sale.
+-- >    AAM    Gross tonnage of the vessel
+-- >              [6300] The measure of the overall size of a ship
+-- >              determined in accordance with the provisions of the
+-- >              International Convention on Tonnage Measurement of Ships,
+-- >              1969.
+-- >    AAN    Net tonnage of the vessel
+-- >              [6302] The measure of the useful capacity of a ship
+-- >              determined in accordance with the provisions of the
+-- >              International Convention on Tonnage Measurement of Ships,
+-- >              1969.
+-- >    AAO    Humidity
+-- >              Self-explanatory.
+-- >    AAP    Voltage
+-- >              Self-explanatory.
+-- >    AAQ    Power consumption
+-- >              Value of energy consumption.
+-- >    AAR    Heat dissipation
+-- >              Self-explanatory.
+-- >    AAS    Air flow
+-- >              Self-explanatory.
+-- >    AAT    Shock impact
+-- >              Self-explanatory.
+-- >    AAU    Operative temperature
+-- >              Temperature identified system or process works according
+-- >              to specifications.
+-- >    AAV    Non operative temperature
+-- >              Temperature identified system or process does not work
+-- >              according to specifications.
+-- >    AAW    Gross volume
+-- >              The observed volume unadjusted for factors such as
+-- >              temperature or gravity.
+-- >    AAX    Net volume
+-- >              The observed volume after adjustment for factors such as
+-- >              temperature or gravity.
+-- >    AAY    Water content
+-- >              Water content in product.
+-- >    AAZ    Tensile stress
+-- >              Self explanatory.
+-- >    ABA    Fibrosity
+-- >              Self explanatory.
+-- >    ABB    Gauge length
+-- >              Self explanatory.
+-- >    ABC    Radius
+-- >              Self explanatory.
+-- >    ABD    Straightness
+-- >              Straightness of the item.
+-- >    ABE    Strain
+-- >              Self explanatory.
+-- > X  ABF    Test piece dimensions
+-- >              The size of the test piece that was tested.
+-- > X  ABG    Average reading
+-- >              Average reading of the test being reported on.
+-- > X  ABH    External dimension
+-- >              The outer measurement of the referenced item or package.
+-- > X  ABI    Internal dimension
+-- >              The inner measurement of the referenced item or package.
+-- >    ABJ    Volume
+-- >              The amount of air space taken up by the entity
+-- >              identified in the 6311 qualifier.
+-- > X  ABK    Loading meter
+-- >              A measurement dimension given in loading meters.
+-- > X  ABL    Retail container dimension
+-- >              Single physical dimension of a retail container.
+-- > X  ABM    Retail container size
+-- >              Size of a retail container in terms of volume.
+-- > X  ABN    Other US Government agency application
+-- >              Application of an other US government agency.
+-- > X  ABO    Measurement
+-- >              [6314]  Value of the measured unit.
+-- > X  ABQ    Percentage of alcohol (by volume)
+-- >              The percentage of alcohol contained in a liquid.
+-- > X  ABR    Dimensions total weight
+-- >              Total weight resulting from the dimensions.
+-- >    ABS    Item weight
+-- >              Weight at line item level.
+-- > X  ABU    Licence (quantity deducted)
+-- >              Quantity to be written off from the total license amount.
+-- > X  ABV    Cargo loaded
+-- >              Total tonnage of cargo loaded onto the conveyance.
+-- > X  ABW    Cargo discharged
+-- >              Total tonnage of cargo unloaded from the conveyance.
+-- >    ABX    Weight of conveyance
+-- >              Tonnage of conveyance.
+-- >    ABY    Conveyance summer dead weight
+-- >              Registered summer dead weight total tonnage of the
+-- >              vessel.
+-- >    ABZ    Containerized cargo on vessel's weight
+-- >              Total weight of containerized cargo on vessel.
+-- >    ACA    Non-containerized cargo on vessel's weight
+-- >              Total weight of non-containerized cargo on vessel.
+-- > X  ACB    1st specified tariff quantity
+-- >              Primary reportable quantity associated with a tariff
+-- >              number.
+-- > X  ACC    2nd specified tariff quantity
+-- >              Secondary reportable quantity associated with a tariff
+-- >              number.
+-- > X  ACD    3rd specified tariff quantity
+-- >              Third reportable quantity associated with a tariff
+-- >              number.
+-- >    ACE    Weight ascertained
+-- >              [4240]  Endorsement of the true weight (mass) as
+-- >              ascertained or verified by the railway (CIM 81).
+-- > X  ACF    Chemistry
+-- >              Measurement related to a chemical measurement system.
+-- >    ACG    Chargeable weight
+-- >              The weight on which charges are based.
+-- > X  ACH    Core notch dimensions
+-- >              Dimensions of a core notch.
+-- > X  ACI    Core size
+-- >              A measurement indicating the core size of an object.
+-- > X  ACJ    Decision result value
+-- >              A measurement in relation to value representing a
+-- >              decision result.
+-- > X  ACK    Dimensional tolerance
+-- >              Tolerance in relation to a dimension.
+-- > X  ACL    Discrete measurement value
+-- >              Value of a discrete measurement.
+-- > X  ACM    Dimension used in price extension
+-- >              Dimension used in relation to a price.
+-- >    ACN    Estimated gross weight
+-- >              Estimated weight (mass) of goods, including packing and
+-- >              excluding carrier's.
+-- > X  ACO    Environmental conditions
+-- >              The data values to be reported reflect the environmental
+-- >              conditions surrounding a situation including but not
+-- >              limited to test environments.
+-- >    ACP    Estimated volume
+-- >              Estimated size or measure of anything in three
+-- >              dimensions.
+-- > X  ACQ    Footage
+-- >              Length measurement in feet.
+-- > X  ACR    Interpolated value
+-- >              A value interpolated from a number of values.
+-- >    ACS    Vessel overall length
+-- >              Total overall length of the vessel.
+-- > X  ACT    Limited coil measurement
+-- >              Value limiting the measurement of a coil.
+-- > X  ACU    Lift limitation
+-- >              A measurement indicating the lift capacity limitation.
+-- >    ACV    Loading meters
+-- >              The length in a vehicle, whereby the complete width and
+-- >              height over that length is needed for the goods.
+-- >    ACW    Number of axles
+-- >              Number of axles of movable equipment or means of
+-- >              transport on wheels.
+-- >    ACX    Payload
+-- >              The revenue-producing load carried by a means of
+-- >              transport.
+-- > X  ACY    Parting cut (sawcut)
+-- >              A measurement related to the cutting of items.
+-- > X  ACZ    Physical dimensions
+-- >              A measurement indicating the physical dimensions of an
+-- >              object.
+-- > X  ADA    Package limitations
+-- >              A measurement indicating limitation associated with
+-- >              packages.
+-- > X  ADB    Platform limitation
+-- >              A measurement indicating limitation in relation to a
+-- >              platform.
+-- > X  ADC    Receiving facility limitations
+-- >              A measurement indicating limitations in relation to a
+-- >              receiving facility.
+-- > X  ADD    Property specification
+-- >              Indicates that the data to follow are target
+-- >              specifications.
+-- > X  ADE    Shipping tolerance
+-- >              A measurement indicating a tolerance in relation to the
+-- >              transport.
+-- > X  ADF    Shade
+-- >              A measurement in relation to the shade.
+-- > X  ADG    Storage limitation
+-- >              A measurement indicating limitation in relation to
+-- >              storage.
+-- > X  ADH    Surface roughness
+-- >              A measurement indicating surface roughness.
+-- > X  ADI    Surface treatment
+-- >              A measurement in relation to surface treatment.
+-- > X  ADJ    Surface
+-- >              A measurement in relation a surface.
+-- > X  ADK    Specification value
+-- >              A measurable item characteristic specified by the buyer,
+-- >              seller or third party.
+-- > X  ADL    Transportation equipment limitations
+-- >              A measurement indicating limitations in relation to
+-- >              transport equipment.
+-- > X  ADM    Test result
+-- >              Indicates that the data to follow is the test result
+-- >              measurements.
+-- > X  ADN    Time used in price extension
+-- >              Time value in relation to a price.
+-- > X  ADO    Observed value
+-- >              The reported test result which includes measurement
+-- >              variability.
+-- > X  ADP    True value
+-- >              The reported test result with the measurement
+-- >              variability removed.
+-- > X  ADQ    Weight used in price extension
+-- >              A weight measurement in relation to a price.
+-- >    ADR    Start position in the length
+-- >              The starting position from the beginning of an item
+-- >              located in the length direction.
+-- >    ADS    End position in the length
+-- >              The end position from the beginning of an item located in
+-- >              the length direction.
+-- >    ADT    Start position in the width
+-- >              The start position from the beginning of an item located
+-- >              in the width direction.
+-- >    ADU    End position in the width
+-- >              The end position from the beginning of an item located in
+-- >              the width direction.
+-- >    ADV    Start position in the thickness
+-- >              The start position from the beginning of an item located
+-- >              in the thickness direction.
+-- >    ADW    End position in the thickness
+-- >              The end position from the beginning of an item located in
+-- >              the thickness direction.
+-- > +  ADX    Transport container actual filling weight
+-- >              Actual filling weight of a transport container.
+-- > +  ADY    Transport container maximum capacity
+-- >              Maximum capacity of a transport container.
+-- > +  ADZ    Declared net weight
+-- >              The declared net weight of a product or products used for
+-- >              invoicing, customs or transport purposes.
+-- > +  AEA    Loading height
+-- >              Maximum height of products or packages loaded onto a
+-- >              given transportation device or equipment such as a
+-- >              pallet.
+-- > +  AEB    Stacking height
+-- >              Maximum height up to which the same product or package
+-- >              may be placed one upon the other for storage purposes.
+-- > +  AEC    Calculated weight
+-- >              The calculated weight of the item based on the ordered
+-- >              dimensions.
+-- > +  AED    Ferrite
+-- >              The chemical composition ferrite.
+-- > +  AEE    Impurity
+-- >              The impurity of the product i.e. the measurement of other
+-- >              chemical elements not normally appearing in a product.
+-- > +  AEF    Grain size
+-- >              The grain size.
+-- > +  AEG    Lanthanides
+-- >              The chemical element Lanthanides.
+-- > +  AEH    Elasticity
+-- >              The value of the elasticity.
+-- >    AF     Angle of bend
+-- >              Self explanatory.
+-- >    B      Billed weight
+-- >              Self explanatory.
+-- >    BL     Breaking load
+-- >              Description to be provided.
+-- >    BND    Bands
+-- >              Description to be provided.
+-- >    BR     Brightness
+-- >              Self explanatory.
+-- >    BRA    Brakes
+-- >              Description to be provided.
+-- >    BRE    Break
+-- >              Description to be provided.
+-- >    BS     Breaking strength
+-- >              Self explanatory.
+-- >    BSW    Breaking strength wet
+-- >              Self explanatory.
+-- >    BW     Basis weight
+-- >              Description to be provided.
+-- >    CHN    Change
+-- >              Description to be provided.
+-- >    CM     Color
+-- >              Self explanatory.
+-- >    CT     Contents of package
+-- >              In combination with the other data elements of the actual
+-- >              segment this code indicates the measured content of a
+-- >              package.
+-- >    CV     Commercial weight
+-- >              Item weight considering its maximum possible humidity.
+-- >    CZ     Core length
+-- >              To specify length of core (of spod/babbin etc.) on which
+-- >              product is to be placed.
+-- >    D      Destination weight agreement
+-- >              The agreed weight of despatched goods whose weight may
+-- >              change during transport.
+-- >    DI     Diameter
+-- >              Diameter of an article.
+-- >    DL     Delta value L
+-- >              Description to be provided.
+-- >    DN     Density
+-- >              Self explanatory.
+-- >    DP     Depth
+-- >              Self explanatory.
+-- >    DR     Denier
+-- >              Description to be provided.
+-- >    DS     Distance between points
+-- >              Self explanatory.
+-- >    DW     Width, boxcar door
+-- >              Self explanatory.
+-- >    E      Estimated new weight
+-- >              Self explanatory.
+-- >    EA     Elongation
+-- >              Self explanatory.
+-- >    F      Deficit weight
+-- >              Description to be provided.
+-- >    FI     Filament count
+-- >              Used e.g. in textile, print industries.
+-- >    FL     Longitudinal flatness
+-- >              Self explanatory.
+-- >    FN     Flatness
+-- >              Self explanatory.
+-- >    FV     Transverse flatness
+-- >              Self explanatory.
+-- >    G      Gross weight
+-- >              [6292] Weight (mass) of goods including packing but
+-- >              excluding the carrier's equipment.
+-- >    GG     Gauge
+-- >              Self explanatory.
+-- >    GW     Gross weight, maximum
+-- >              Self explanatory.
+-- >    HF     Hardness
+-- >              Self explanatory.
+-- >    HM     Height, maximum
+-- >              Self explanatory.
+-- >    HT     Height dimension
+-- >              Numeric value of height.
+-- >    IB     Impact energy
+-- >              Self explanatory.
+-- >    ID     Inside diameter
+-- >              Self explanatory.
+-- >    L      Legal weight
+-- >              Self explanatory.
+-- >    LM     Length, maximum
+-- >              Self explanatory.
+-- >    LN     Length dimension
+-- >              (6168) Length of pieces or packages stated for transport
+-- >              purposes.
+-- >    LND    Lost end
+-- >              Description to be provided.
+-- >    M      Minimum weight
+-- >              Self explanatory.
+-- >    MO     Moisture
+-- >              Measurement application is the moisture content of the
+-- >              item.
+-- >    MW     Maximum weight
+-- >              Self explanatory.
+-- >    N      Actual net weight
+-- >              Self explanatory.
+-- >    OD     Outside diameter
+-- >              Self explanatory.
+-- > |  PRS    Pre stretch
+-- >              Measurement identifying the amount an item has been
+-- >              streched prior to use.
+-- >    PTN    Per tonne
+-- >              Self explanatory.
+-- >    RA     Relative humidity
+-- >              Self explanatory.
+-- >    RF     Resistivity
+-- >              Description to be provided.
+-- >    RJ     Rockwell C
+-- >              Hardness in the Rockwell C scale.
+-- >    RMW    Ream weight
+-- >              Measurement indication for paper.
+-- >    RP     Reduction of area
+-- >              Self explanatory.
+-- >    RUN    Run (process)
+-- >              Description to be provided.
+-- >    RY     Ratio
+-- >              Self explanatory.
+-- >    SQ     Shipped quantity
+-- >              Self explanatory.
+-- >    T      Tare weight
+-- >              Self explanatory.
+-- >    TC     Temperature
+-- >              A measurement in relation to temperature.
+-- >    TH     Thickness
+-- >              Self explanatory.
+-- > |  TN     Time period
+-- >              Self explanatory.
+-- > |  TT     Time
+-- >              Self explanatory.
+-- >    U      Weight per unit
+-- >              [6150] Numeric value of weight.
+-- >    VH     Height, van door
+-- >              Self explanatory.
+-- >    VW     Width, van door
+-- >              Self explanatory.
+-- >    WA     Weight per unit of area
+-- >              Self explanatory.
+-- >    WD     Width dimension
+-- >              Numeric value of width.
+-- >    WM     Width, maximum
+-- >              Self explanatory.
+-- >    WT     Weight
+-- >              [6150] Numeric value of weight.
+-- >    WU     Weight per unit of length
+-- >              Self explanatory.
+-- >    XH     Side height, flat bed with removable sides
+-- >              Self explanatory.
+-- >    XQ     Squareness
+-- >              Self explanatory.
+-- >    XZ     Spool size
+-- >              Self explanatory.
+-- >    YS     Yield stress
+-- >              Self explanatory.
+-- >    ZAL    Aluminium
+-- >              Self explanatory.
+-- >    ZAS    Arsenic
+-- >              Self explanatory.
+-- >    ZB     Boron
+-- >              Self explanatory.
+-- >    ZBI    Bismuth
+-- >              Self explanatory.
+-- >    ZC     Carbon
+-- >              Self explanatory.
+-- >    ZCA    Calcium
+-- >              Self explanatory.
+-- >    ZCB    Columbium
+-- >              Self explanatory.
+-- >    ZCE    Cerium
+-- >              Self explanatory.
+-- >    ZCL    Chlorine
+-- >              Self explanatory.
+-- >    ZCO    Cobalt
+-- >              Self explanatory.
+-- >    ZCR    Chromium
+-- >              Self explanatory.
+-- >    ZCU    Copper
+-- >              Self explanatory.
+-- >    ZFE    Iron
+-- >              Self explanatory.
+-- >    ZFS    Iron plus silicon
+-- >              Self explanatory.
+-- >    ZGE    Germanium
+-- >              Self explanatory.
+-- >    ZH     Hydrogen
+-- >              Self explanatory.
+-- >    ZK     Potassium
+-- >              Self explanatory.
+-- >    ZMG    Magnesium
+-- >              Self explanatory.
+-- >    ZMN    Manganese
+-- >              Self explanatory.
+-- >    ZMO    Molybdenum
+-- >              Self explanatory.
+-- >    ZN     Nitrogen
+-- >              Self explanatory.
+-- >    ZNA    Sodium
+-- >              Self explanatory.
+-- >    ZNB    Niobium
+-- >              Self-explanatory.
+-- >    ZNI    Nickel
+-- >              Self explanatory.
+-- >    ZO     Oxygen
+-- >              Self explanatory.
+-- >    ZP     Phosphorus
+-- >              Self explanatory.
+-- >    ZPB    Lead
+-- >              Self explanatory.
+-- >    ZS     Sulphur
+-- >              Self explanatory.
+-- >    ZSB    Antimony
+-- >              Self explanatory.
+-- >    ZSE    Selenium
+-- >              Self explanatory.
+-- >    ZSI    Silicon
+-- >              Self explanatory.
+-- >    ZSL    Silicium oxyd
+-- >              Self explanatory.
+-- >    ZSN    Tin
+-- >              Self explanatory.
+-- >    ZTA    Tantalium
+-- >              Self explanatory.
+-- >    ZTE    Tellurium
+-- >              Self explanatory.
+-- >    ZTI    Titanium
+-- >              Self explanatory.
+-- >    ZV     Vanadium
+-- >              Self explanatory.
+-- >    ZW     Tungsten
+-- >              Self explanatory.
+-- >    ZWA    Waste content
+-- >              Self explanatory.
+-- >    ZZN    Zinc
+-- >              Self explanatory.
+-- >    ZZR    Zirconium
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple6313 :: Parser Value
+simple6313 = simple "6313" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6314.hs b/specification/src/Text/Edifact/D96A/Simples/S6314.hs
new file mode 100644
index 0000000..c598d7b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6314.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6314
+  ( simple6314
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6314  Measurement value
+-- >
+-- >    Desc: Value of the measured unit.
+-- >
+-- >    Repr: n..18
+simple6314 :: Parser Value
+simple6314 = simple "6314" (numeric `upTo` 18)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6321.hs b/specification/src/Text/Edifact/D96A/Simples/S6321.hs
new file mode 100644
index 0000000..9f0b7d8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6321.hs
@@ -0,0 +1,44 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6321
+  ( simple6321
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   6321  Measurement significance, coded
+-- >
+-- >   Desc: Code specifying the significance of a measurement value.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         3 Approximately
+-- >              Self explanatory.
+-- >         4 Equal to
+-- >              Self explanatory.
+-- >         5 Greater than or equal to
+-- >              Self explanatory.
+-- >         6 Greater than
+-- >              Self explanatory.
+-- >         7 Less than
+-- >              Self explanatory.
+-- >         8 Less than or equal to
+-- >              Self explanatory.
+-- >        10 Not equal to
+-- >              Self explanatory.
+-- >        11 Trace
+-- >              Description to be provided.
+-- >        12 True value
+-- >              Description to be provided.
+-- >        13 Observed value
+-- >              Description to be provided.
+-- >        15 Out of range
+-- >              Self explanatory.
+simple6321 :: Parser Value
+simple6321 = simple "6321" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6341.hs b/specification/src/Text/Edifact/D96A/Simples/S6341.hs
new file mode 100644
index 0000000..988a8ed
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6341.hs
@@ -0,0 +1,70 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6341
+  ( simple6341
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   6341  Currency market exchange, coded
+-- >
+-- >   Desc: Code identifying the market upon which the currency exchange
+-- >         rate is based.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AAA    Paris exchange
+-- >              Self explanatory.
+-- >    AMS    Amsterdam exchange
+-- >              Self explanatory.
+-- >    ARG    Bolsa de Comercio de Buenos Aires
+-- >              Argentina exchange.
+-- >    AST    Australian exchange
+-- >              Self explanatory.
+-- >    AUS    Wien exchange
+-- >              Wiener Boersenkammer.
+-- >    BEL    Brussel exchange
+-- >              Commission de la Bourse Bruxelles.
+-- >    CAN    Toronto exchange
+-- >              Self explanatory.
+-- >    CAR    Contractual agreement exchange rate
+-- >              Self explanatory.
+-- >    CIE    US Customs Information Exchange
+-- >              Currency rates published by the US Customs Information
+-- >              Exchange, 6 WTC, New York NY 10048-0945, USA.
+-- >    DEN    Copenhagen exchange
+-- >              Koebenhavns Fondsboers.
+-- >    ECR    European Community period exchange rate
+-- >              Description to be provided.
+-- >    FIN    Helsinki exchange
+-- >              Self explanatory.
+-- >    FRA    Frankfurt exchange
+-- >              Self explanatory.
+-- >    IMF    International Monetary Fund
+-- >              Self explanatory.
+-- >    LNF    London exchange, first closing
+-- >              Self explanatory.
+-- >    LNS    London exchange, second closing
+-- >              Self explanatory.
+-- >    MIL    Milan exchange
+-- >              Self explanatory.
+-- >    NOR    Oslo exchange
+-- >              Self explanatory.
+-- >    NYC    New York exchange
+-- >              Self explanatory.
+-- >    PHI    Philadelphia exchange
+-- >              Self explanatory.
+-- >    SRE    Specific railway exchange currency
+-- >              Self explanatory.
+-- >    SWE    Stockholm exchange
+-- >              Self explanatory.
+-- >    ZUR    Zurich exchange
+-- >              Self explanatory.
+simple6341 :: Parser Value
+simple6341 = simple "6341" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6343.hs b/specification/src/Text/Edifact/D96A/Simples/S6343.hs
new file mode 100644
index 0000000..eb24391
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6343.hs
@@ -0,0 +1,67 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6343
+  ( simple6343
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   6343  Currency qualifier
+-- >
+-- >   Desc: Code giving specific meaning to data element 6345 Currency.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Customs valuation currency
+-- >              The name or symbol of the monetary unit involved in the
+-- >              transaction for customs valuation.
+-- >         2 Insurance currency
+-- >              The name or symbol of the monetary unit involved in the
+-- >              transaction for insurance purposes.
+-- >         3 Home currency
+-- >              The name or symbol of the local monetary unit.
+-- >         4 Invoicing currency
+-- >              The name or symbol of the monetary unit used for
+-- >              calculation in an invoice.
+-- >         5 Account currency
+-- >              The name or symbol of the monetary unit to be converted
+-- >              from.
+-- >         6 Reference currency
+-- >              The name or symbol of the monetary unit to be converted.
+-- >         7 Target currency
+-- >              The name or symbol of the monetary unit to be converted
+-- >              into.
+-- >         8 Price list currency
+-- >              The name or symbol of the monetary unit used in a price
+-- >              list.
+-- >         9 Order currency
+-- >              The name or symbol of the monetary unit used in an order.
+-- >        10 Pricing currency
+-- >              The name or symbol of the monetary unit used for pricing
+-- >              purposes.
+-- >        11 Payment currency
+-- >              The name or symbol of the monetary unit used for payment.
+-- >        12 Quotation currency
+-- >              The name or symbol of the monetary unit used in a
+-- >              quotation.
+-- >        13 Recipient local currency
+-- >              The name or symbol of the local monetary unit at
+-- >              recipient's location.
+-- >        14 Supplier currency
+-- >              The name or symbol of the monetary unit normally used by
+-- >              the supplier.
+-- >        15 Sender local currency
+-- >              The name or symbol of the local monetary unit at sender's
+-- >              location.
+-- >        16 Tariff currency
+-- >              The currency as per tariff.
+-- >        17 Charge calculation currency
+-- >              The currency in which the charges are calculated.
+simple6343 :: Parser Value
+simple6343 = simple "6343" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6345.hs b/specification/src/Text/Edifact/D96A/Simples/S6345.hs
new file mode 100644
index 0000000..f9574b3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6345.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6345
+  ( simple6345
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6345  Currency, coded
+-- >
+-- >    Desc: Identification of the name or symbol of the monetary unit
+-- >          involved in the transaction.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Use ISO 4217 three alpha code.
+simple6345 :: Parser Value
+simple6345 = simple "6345" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6347.hs b/specification/src/Text/Edifact/D96A/Simples/S6347.hs
new file mode 100644
index 0000000..a9c7720
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6347.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6347
+  ( simple6347
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 6347  Currency details qualifier
+-- >
+-- >   Desc: Specification of the usage to which the currency relates.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Charge payment currency
+-- >              The currency in which charges are to be paid.
+-- >         2 Reference currency
+-- >              The currency applicable to amounts stated. It may have to
+-- >              be converted.
+-- >         3 Target currency
+-- >              The currency which should be used to the target
+-- >              destination of the transaction.
+-- >         4 Transport document currency
+-- >              Currency applicable to amounts stated in a transport
+-- >              document/message.
+-- >         5 Calculation base currency
+-- >              Currency on which the calculation is based.
+-- >         6 Information Currency
+-- >              Additional currency the message recipient needs for
+-- >              information purposes. The actual message amount(s) is/are
+-- >              not based upon this currency.
+-- > +       7 Currency of the account
+-- >              Currency in which the account is held.
+simple6347 :: Parser Value
+simple6347 = simple "6347" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6348.hs b/specification/src/Text/Edifact/D96A/Simples/S6348.hs
new file mode 100644
index 0000000..825cd9b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6348.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6348
+  ( simple6348
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6348  Currency rate base
+-- >
+-- >    Desc: Multiplying factor used in expressing the number of currency
+-- >          units.
+-- >
+-- >    Repr: n..4
+simple6348 :: Parser Value
+simple6348 = simple "6348" (numeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6350.hs b/specification/src/Text/Edifact/D96A/Simples/S6350.hs
new file mode 100644
index 0000000..beb90b8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6350.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6350
+  ( simple6350
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6350  Number of units
+-- >
+-- >    Desc: Number of units of a certain type.
+-- >
+-- >    Repr: n..15
+simple6350 :: Parser Value
+simple6350 = simple "6350" (numeric `upTo` 15)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6353.hs b/specification/src/Text/Edifact/D96A/Simples/S6353.hs
new file mode 100644
index 0000000..1fe401c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6353.hs
@@ -0,0 +1,33 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6353
+  ( simple6353
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   6353  Number of units qualifier
+-- >
+-- >   Desc: Indication of the objective of number of units information.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Number of pricing units
+-- >              [6170] Number of units which multiplied by the unit price
+-- >              gives 5116 Line item amount.
+-- >         2 Transportable unit
+-- >              Self explanatory.
+-- >         3 Number of debit units
+-- >              The number of units which are debited by the sender of
+-- >              the consignment to the receiving party.
+-- >         4 Number of received units
+-- >              The number of units which are received by the receiving
+-- >              party of the consignment.
+simple6353 :: Parser Value
+simple6353 = simple "6353" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6411.hs b/specification/src/Text/Edifact/D96A/Simples/S6411.hs
new file mode 100644
index 0000000..a4b2c8b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6411.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6411
+  ( simple6411
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6411  Measure unit qualifier
+-- >
+-- >    Desc: Indication of the unit of measurement in which weight (mass),
+-- >          capacity, length, area, volume or other quantity is
+-- >          expressed.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: See UN/ECE Recommendation 20.
+simple6411 :: Parser Value
+simple6411 = simple "6411" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S6432.hs b/specification/src/Text/Edifact/D96A/Simples/S6432.hs
new file mode 100644
index 0000000..55e66f8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S6432.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S6432
+  ( simple6432
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    6432  Significant digits
+-- >
+-- >    Desc: To specify the number of significant digits.
+-- >
+-- >    Repr: n..2
+simple6432 :: Parser Value
+simple6432 = simple "6432" (numeric `upTo` 2)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7008.hs b/specification/src/Text/Edifact/D96A/Simples/S7008.hs
new file mode 100644
index 0000000..5a0a78f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7008.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7008
+  ( simple7008
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7008  Item description
+-- >
+-- >    Desc: Plain language description of articles or products.
+-- >
+-- >    Repr: an..35
+simple7008 :: Parser Value
+simple7008 = simple "7008" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7009.hs b/specification/src/Text/Edifact/D96A/Simples/S7009.hs
new file mode 100644
index 0000000..10fedf5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7009.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7009
+  ( simple7009
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7009  Item description identification
+-- >
+-- >    Desc: Code from an industry code list which provides specific data
+-- >          about a product characteristic.
+-- >
+-- >    Repr: an..17
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple7009 :: Parser Value
+simple7009 = simple "7009" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7064.hs b/specification/src/Text/Edifact/D96A/Simples/S7064.hs
new file mode 100644
index 0000000..4fbe567
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7064.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7064
+  ( simple7064
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7064  Type of packages
+-- >
+-- >    Desc: Description of the form in which goods are presented.
+-- >
+-- >    Repr: an..35
+simple7064 :: Parser Value
+simple7064 = simple "7064" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7065.hs b/specification/src/Text/Edifact/D96A/Simples/S7065.hs
new file mode 100644
index 0000000..80c3079
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7065.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7065
+  ( simple7065
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7065  Type of packages identification
+-- >
+-- >    Desc: Coded description of the form in which goods are presented.
+-- >
+-- >    Repr: an..17
+-- >
+-- >    Note: See UN/ECE Recommendation No. 21 (See Vol. II of UNTDED).
+-- >          May be used in combination with 1131/3055.
+simple7065 :: Parser Value
+simple7065 = simple "7065" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7073.hs b/specification/src/Text/Edifact/D96A/Simples/S7073.hs
new file mode 100644
index 0000000..b8af3bf
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7073.hs
@@ -0,0 +1,77 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7073
+  ( simple7073
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   7073  Packaging terms and conditions, coded
+-- >
+-- >   Desc: Code identifying packaging terms and conditions.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Packaging cost paid by supplier
+-- >              Self explanatory.
+-- >         2 Packaging cost paid by recipient
+-- >              Self explanatory.
+-- >         3 Packaging cost not charged (returnable)
+-- >              Self explanatory.
+-- >         4 Buyer's
+-- >              Self explanatory.
+-- >         5 Carrier's durable
+-- >              Self explanatory.
+-- >         6 Carrier's expendable
+-- >              Self explanatory.
+-- >         7 Seller's durable
+-- >              Self explanatory.
+-- >         8 Seller's expendable
+-- >              Self explanatory.
+-- >         9 Special purpose buyer's durable
+-- >              Reusable packaging specifically designed for packaging of
+-- >              the referenced item and owned by the buyer.
+-- >        10 Special purpose buyer's expendable
+-- >              Disposable packaging specifically designed for packaging
+-- >              of the referenced item.
+-- >        11 Multiple usage buyer's durable
+-- >              Reusable multi-purpose packaging owned by the buyer.
+-- >        12 Multiple usage seller's durable
+-- >              Reusable multi-purpose packaging owned by the seller.
+-- >        13 Not packed
+-- >              The referenced item is to be supplied without packaging.
+-- >        14 Special purpose seller's durable
+-- >              Non-standard reusable packaging owned by the seller.
+-- >        15 Export quality
+-- >              The packaging used must meet durability and handling
+-- >              characteristics required for item export.
+-- >        16 Domestic quality
+-- >              The packaging used must meet durability and handling
+-- >              characteristics required for domestic usage.
+-- >        17 Packaging included in price
+-- >              The cost of packaging is included in the item price.
+-- >        18 Packaging costs split
+-- >              The cost of packaging is shared equally between the buyer
+-- >              and seller.
+-- >        19 Packaging costs invoiced separately
+-- >              The packaging cost will be invoiced on a separate message
+-- >              or document.
+-- >        20 Nil packaging costs
+-- >              The packaging is free of charge.
+-- >        21 Nil packaging costs if packaging returned
+-- >              The costs of packaging is reimbursed by the seller to
+-- >              buyer if packaging is returned.
+-- >        22 Return chargeable
+-- >              The return of packaging/empties is chargeable.
+-- >        23 Chargeable, two thirds of paid amount with credit note on
+-- >           return of loaned  package
+-- >              The buyer receives two thirds of paid amount with credit
+-- >              note if loaned package is returned.
+simple7073 :: Parser Value
+simple7073 = simple "7073" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7075.hs b/specification/src/Text/Edifact/D96A/Simples/S7075.hs
new file mode 100644
index 0000000..7a725b2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7075.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7075
+  ( simple7075
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   7075  Packaging level, coded
+-- >
+-- >   Desc: Indication of level of packaging specified.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Inner
+-- >              Level of packing, if it exists, that is immediately
+-- >              subordinate to the intermediate packaging level.
+-- >         2 Intermediate
+-- >              Level of packaging, if it exists, that is immediately
+-- >              subordinate to the outer packaging level.
+-- >         3 Outer
+-- >              For packed merchandise, outermost level of packaging for
+-- >              a shipment.
+-- >         4 No packaging hierarchy
+-- >              There is no specifiable level of packaging: packaging is
+-- >              inner and outer level as well.
+simple7075 :: Parser Value
+simple7075 = simple "7075" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7077.hs b/specification/src/Text/Edifact/D96A/Simples/S7077.hs
new file mode 100644
index 0000000..75f2ced
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7077.hs
@@ -0,0 +1,39 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7077
+  ( simple7077
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7077  Item description type, coded
+-- >
+-- >   Desc: Code indicating the format of a description.
+-- >
+-- >   Repr: an..3
+-- >
+-- > +  A      Free-form long description
+-- >              Long description of an item in free form.
+-- >    B      Code and text
+-- >              Self explanatory.
+-- >    C      Code (from industry code list)
+-- >              Self explanatory.
+-- > +  D      Free-form price look up
+-- >              Price look-up description of a product for point of sale
+-- >              receipts.
+-- > +  E      Free-form short description
+-- >              Short description of an item in free form.
+-- >    F      Free-form
+-- >              Self explanatory.
+-- >    S      Structured (from industry code list)
+-- >              Self explanatory.
+-- >    X      Semi-structured (code + text)
+-- >              Self explanatory.
+simple7077 :: Parser Value
+simple7077 = simple "7077" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7081.hs b/specification/src/Text/Edifact/D96A/Simples/S7081.hs
new file mode 100644
index 0000000..152afa1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7081.hs
@@ -0,0 +1,201 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7081
+  ( simple7081
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7081  Item characteristic, coded
+-- >
+-- >   Desc: Code specifying the item characteristic being described.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Certificate of conformity
+-- >              Product in conformity with specifications.
+-- >         2 General product form
+-- >              Description of general product form.
+-- >         3 Ship to stock
+-- >              Product without quality control when received.
+-- >         4 Finish
+-- >              Description of the finish required/available on the
+-- >              product.
+-- >         5 End use application
+-- >              Description of what the end use application of the
+-- >              product will be.
+-- >         8 Product
+-- >              Self explanatory.
+-- >         9 Sub-product
+-- >              Description of a sub-product.
+-- >        11 Customs specifications
+-- >              Item characteristic is described following Customs
+-- >              specifications.
+-- >        12 Type and/or process
+-- >              Description of the type and/or process involved in making
+-- >              the product. E.g. in steel, description of the
+-- >              steelmaking process.
+-- >        13 Quality
+-- >              Self explanatory.
+-- >        14 Surface condition
+-- >              Description of the surface condition (e.g. roughness)
+-- >              of the product.
+-- >        15 Heat treat/anneal
+-- >              Description of any heat treatment or annealing
+-- >              required/performed on the product.
+-- >        17 Coating
+-- >              Description of any special coating required/available on
+-- >              the product.
+-- >        18 Surface treatment, chemical
+-- >              Description of any chemical surface treatment
+-- >              required/performed on the product.
+-- >        19 Surface treatment, mechanical
+-- >              Description of any mechanical surface treatment
+-- >              required/performed on the product.
+-- >        21 Forming
+-- >              Description of any forming required/performed on the
+-- >              product.
+-- >        22 Edge treatment
+-- >              Description of any special edge treatment
+-- >              required/performed on the product.
+-- >        23 Welds/splices
+-- >              Description of any special welds and or splices
+-- >              required/performed on the product.
+-- >        24 Control item
+-- >              Security relevant product with special quality control
+-- >              and control documentation prescriptions.
+-- >        25 End treatment
+-- >              Description of any special treatment required/performed
+-- >              on the ends the product.
+-- >        26 Ship to line
+-- >              Product without quality control at customer's, and packed
+-- >              according production needs.
+-- >        28 Test sample frequency
+-- >              Indication of test sample frequency. Used when ordering
+-- >              special testing requirements on a product.
+-- >        30 Test sample direction
+-- >              Description of test sample direction. Used when ordering
+-- >              special testing requirements on a product.
+-- >        32 Type of test/inspection
+-- >              Description of type of test or inspection. Used to order
+-- >              special tests to be performed on the product.
+-- >        35 Colour
+-- >              Description of the colour required/available on the
+-- >              product.
+-- >        38 Grade
+-- >              Specification of the grade required/available for the
+-- >              product.
+-- >        43 Twist
+-- >              Description of any special twisting requirements for the
+-- >              product.
+-- >        54 Section profile
+-- >              Description of the section and profile of the product.
+-- >        56 Special processing
+-- >              Description of any special processing requirements
+-- >              performed/require on the product.
+-- >        58 Winding instructions
+-- >              Description of any special winding instructions for the
+-- >              product.
+-- >        59 Surface protection
+-- >              Description of the surface protection required/available
+-- >              for the product.
+-- >        61 New article
+-- >              Self explanatory.
+-- >        62 Obsolete article
+-- >              Self explanatory.
+-- >        63 Current article
+-- >              Self explanatory.
+-- >        64 Revised design
+-- >              Self explanatory.
+-- >        65 Reinstated article
+-- >              Self explanatory.
+-- >        66 Current article spares
+-- >              Self explanatory.
+-- >        67 Balance out article
+-- >              Self explanatory.
+-- >        68 Initial sample
+-- >              Self explanatory.
+-- >        69 Field test
+-- >              First series of a new item to be tested by end users.
+-- >        70 Revised article
+-- >              Item design revised.
+-- >        71 Refurbished article
+-- >              Description to be provided.
+-- > +      72 Vintage
+-- >              The harvest year of the grapes that are part of the
+-- >              composition of a particular wine.
+-- > +      73 Beverage age
+-- >              The period during which, after distillation and before
+-- >              bottling, distilled spirits have been stored in
+-- >              containers.
+-- > +      74 Beverage brand
+-- >              A grouping of beverage products similar in name only, but
+-- >              of different size, age, proof, quality and flavour.
+-- > +      75 Artist
+-- >              The performing artist(es) of a recorded song or piece of
+-- >              music.
+-- > +      76 Author
+-- >              The author of a written work.
+-- > +      77 Binding
+-- >              A description of the type of binding used for a written
+-- >              work.
+-- > +      78 Edition
+-- >              Description of the edition of a written work.
+-- > +      79 Other physical description
+-- >              Any other relevant physical description.
+-- > +      80 Publisher
+-- >              The publisher of a written piece of work as part of the
+-- >              item description.
+-- > +      81 Title
+-- >              The title of a work.
+-- > +      82 Series title
+-- >              Title of a series of works.
+-- > +      83 Volume title
+-- >              The title of a volume of work.
+-- > +      84 Composer
+-- >              The composer of a recorded song or piece of music.
+-- > +      85 Recording medium
+-- >              The medium on which a musical recording is made.
+-- > +      86 Music style
+-- >              The style of music.
+-- > +      87 Promotional event
+-- >              Describes the promotional event associated with a
+-- >              product.
+-- > +      88 Promotional offer
+-- >              Describes the additions to the basic product for a
+-- >              promotional event.
+-- > +      89 Alcohol beverage class
+-- >              Class characteristics for different compositions of
+-- >              alcoholic beverages.
+-- > +      90 Alcohol beverage type
+-- >              A descriptive term that further defines the class of an
+-- >              alcoholic beverage.
+-- > +      91 Secondary grape
+-- >              The grape that comprises the second largest percentage of
+-- >              the ingredients used in wine product.
+-- > +      92 Primary grape
+-- >              The type of grape that comprises the largest percentage
+-- >              of grape in the wine product.
+-- > +      93 Beverage category
+-- >              A description to designate the beverage category.
+-- > +      94 Beverage flavour
+-- >              Distinctions from the base product that results in a
+-- >              different taste.
+-- > +      95 Wine growing region
+-- >              The area where the grape used to produce a wine was
+-- >              harvested.
+-- > +      96 Wine fruit
+-- >              The fruit that is used as a base to produce a wine.
+-- > +      97 Beverage container characteristics
+-- >              A description of various beverage container
+-- >              characteristics.
+-- > +      98 Size
+-- >              Description of size in non-numeric terms.
+simple7081 :: Parser Value
+simple7081 = simple "7081" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7083.hs b/specification/src/Text/Edifact/D96A/Simples/S7083.hs
new file mode 100644
index 0000000..b3730a1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7083.hs
@@ -0,0 +1,29 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7083
+  ( simple7083
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   7083  Configuration, coded
+-- >
+-- >   Desc: Code indicating the status of the sub-line item in the
+-- >         configuration.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Added to the configuration
+-- >              Self explanatory.
+-- >    D      Deleted from the configuration
+-- >              Self explanatory.
+-- >    I      Included in the configuration
+-- >              Self explanatory.
+simple7083 :: Parser Value
+simple7083 = simple "7083" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7085.hs b/specification/src/Text/Edifact/D96A/Simples/S7085.hs
new file mode 100644
index 0000000..86922f9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7085.hs
@@ -0,0 +1,55 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7085
+  ( simple7085
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7085  Nature of cargo, coded
+-- >
+-- >   Desc: Code indicating the type of cargo as a rough classification.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Documents
+-- >              Printed, typed or written matter including leaflets,
+-- >              pamphlets, certificates etc., which are not subject to
+-- >              import duties and taxes, restrictions and prohibitions.
+-- >         2 Low value non-dutiable consignments
+-- >              Imported consignments/items/goods in respect of which
+-- >              Customs duties and other taxes are waived as they are
+-- >              below a value determined by the Customs administration.
+-- >         3 Low value dutiable consignments
+-- >              Imported consignments/items/goods in respect of which
+-- >              Customs duties and other taxes are payable are below a
+-- >              certain amount as determined by the Customs
+-- >              administration.
+-- >         4 High value consignments
+-- >              Imported consignments/items/goods which are determined as
+-- >              having a value above a certain amount fixed by the
+-- >              Customs administration, which may or may not attract
+-- >              duties and taxes.
+-- > +       5 Other non-containerized
+-- >              Non-containerized cargo which cannot be categorized by
+-- >              any of the other nature of cargo code.
+-- > +       6 Vehicles
+-- >              Vehicles which are not stowed in containers.
+-- > +       7 Roll-on roll-off
+-- >              Cargo transported or to be transported on roll-on roll-
+-- >              off vessels and which is transportable on its own wheels
+-- >              or stowed on special heavy duty trailers.
+-- > +       8 Palletized
+-- >              Non-containerized cargo which is palletized.
+-- > +       9 Containerized
+-- >              Cargo stowed or to be stowed in a container.
+-- > +      10 Breakbulk
+-- >              Non-containerized cargo stowed in vessels' holds.
+simple7085 :: Parser Value
+simple7085 = simple "7085" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7088.hs b/specification/src/Text/Edifact/D96A/Simples/S7088.hs
new file mode 100644
index 0000000..09a763c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7088.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7088
+  ( simple7088
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7088  Dangerous goods flashpoint
+-- >
+-- >    Desc: Lowest temperature, in the case of dangerous goods, at which
+-- >          vapour from an inflammable liquid forms an ignitable mixture
+-- >          with air.
+-- >
+-- >    Repr: an..8
+simple7088 :: Parser Value
+simple7088 = simple "7088" (alphaNumeric `upTo` 8)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7102.hs b/specification/src/Text/Edifact/D96A/Simples/S7102.hs
new file mode 100644
index 0000000..ac58cf9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7102.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7102
+  ( simple7102
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7102  Shipping marks
+-- >
+-- >    Desc: Marks and numbers identifying individual packages.
+-- >
+-- >    Repr: an..35
+simple7102 :: Parser Value
+simple7102 = simple "7102" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7106.hs b/specification/src/Text/Edifact/D96A/Simples/S7106.hs
new file mode 100644
index 0000000..52a79bb
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7106.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7106
+  ( simple7106
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7106  Shipment flashpoint
+-- >
+-- >    Desc: Temperature in centigrade determined by the closed cup test
+-- >          as per ISO 1523/73 where a vapour is given off that can be
+-- >          ignited.
+-- >
+-- >    Repr: n3
+simple7106 :: Parser Value
+simple7106 = simple "7106" (numeric `exactly` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7124.hs b/specification/src/Text/Edifact/D96A/Simples/S7124.hs
new file mode 100644
index 0000000..8936d69
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7124.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7124
+  ( simple7124
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7124  UNDG number
+-- >
+-- >    Desc: Unique serial number assigned within the United Nations to
+-- >          substances and articles contained in a list of the dangerous
+-- >          goods most commonly carried.
+-- >
+-- >    Repr: n4
+simple7124 :: Parser Value
+simple7124 = simple "7124" (numeric `exactly` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7130.hs b/specification/src/Text/Edifact/D96A/Simples/S7130.hs
new file mode 100644
index 0000000..f62a928
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7130.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7130
+  ( simple7130
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7130  Customer authorization number
+-- >
+-- >    Desc: Customer provided authorization number to allow supplier to
+-- >          ship goods under specific freight conditions.  This number
+-- >          will be transmitted back to customer in the dispatch advice
+-- >          message.
+-- >
+-- >    Repr: an..17
+simple7130 :: Parser Value
+simple7130 = simple "7130" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7140.hs b/specification/src/Text/Edifact/D96A/Simples/S7140.hs
new file mode 100644
index 0000000..f9763fe
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7140.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7140
+  ( simple7140
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7140  Item number
+-- >
+-- >    Desc: A number allocated to a group or item.
+-- >
+-- >    Repr: an..35
+simple7140 :: Parser Value
+simple7140 = simple "7140" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7143.hs b/specification/src/Text/Edifact/D96A/Simples/S7143.hs
new file mode 100644
index 0000000..dbcb61a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7143.hs
@@ -0,0 +1,205 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7143
+  ( simple7143
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7143  Item number type, coded
+-- >
+-- >   Desc: Identification of the type of item number.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Product version number
+-- >              Number assigned by manufacturer or seller to identify the
+-- >              release of a product.
+-- >    AB     Assembly
+-- >              Self explanatory.
+-- >    AC     HIBC (Health Industry Bar Code)
+-- >              Article identifier used within health sector to indicate
+-- >              data used conforms to HIBC.
+-- >    AD     Cold roll number
+-- >              Number assigned to a cold roll.
+-- >    AE     Hot roll number
+-- >              Number assigned to a hot roll.
+-- >    AF     Slab number
+-- >              Number assigned to a slab, which is produced in a
+-- >              particular production step.
+-- >    AG     Software revision number
+-- >              A number assigned to indicate a revision of software.
+-- >    AH     UPC (Universal Product Code) Consumer package code (1-5-5)
+-- >              An 11-digit code that uniquely identifies consumer
+-- >              packaging of a product; does not have a check digit.
+-- >    AI     UPC (Universal Product Code) Consumer package code (1-5-5-1)
+-- >              A 12-digit code that uniquely identifies the consumer
+-- >              packaging of a product, including a check digit.
+-- >    AJ     Sample number
+-- >              Number assigned to a sample.
+-- >    AK     Pack number
+-- >              Number assigned to a pack containing a stack of items put
+-- >              together (eg. cold roll sheets (steel product)).
+-- >    AL     UPC (Universal Product Code) Shipping container code (1-2-5-
+-- >           5)
+-- >              A 13-digit code that uniquely identifies the
+-- >              manufacturer's shipping unit, including the packaging
+-- >              indicator.
+-- >    AM     UPC (Universal Product Code)/EAN (European article number)
+-- >           Shipping container code (1-2-5-5-1)
+-- >              A 14-digit code that uniquely identifies the
+-- >              manufacturer's shipping unit, including the packaging
+-- >              indicator and the check digit.
+-- >    AN     UPC (Universal Product Code) suffix
+-- >              A suffix used in conjunction with a higher level UPC
+-- >              (Universal product code) to define packing variations for
+-- >              a product.
+-- >    AO     State label code
+-- >              A code which specifies the codification of the state's
+-- >              labelling requirements.
+-- > +  AP     Heat number
+-- >              Number assigned to the heat (also known as the iron
+-- >              charge) for the production of steel products.
+-- > +  AT     Price look up number
+-- >              Identification number on a product allowing a quick
+-- >              electronic retrieval of price information for that
+-- >              product.
+-- > +  AU     NSN (North Atlantic Treaty Organization Stock Number)
+-- >              Number assigned under the NATO (North Atlantic Treaty
+-- >              Organization) codification system to provide the
+-- >              identification of an approved item of supply.
+-- >    BO     Buyers color
+-- >              Code given by the buyer for the color of an article.
+-- >    BP     Buyer's part number
+-- >              Reference number assigned by the buyer to identify an
+-- >              article.
+-- >    CC     Industry commodity code
+-- >              The codes given to certain commodities by an industry.
+-- >    CG     Commodity grouping
+-- >              Code for a group of articles with common characteristics
+-- >              (e.g. used for statistical purposes).
+-- >    CL     Color number
+-- >              Code for the color of an article.
+-- >    CR     Contract number
+-- >              Reference number identifying a contract.
+-- >    CV     Customs article number
+-- >              Code defined by Customs authorities to an article or a
+-- >              group of articles for Customs purposes.
+-- >    DR     Drawing revision number
+-- >              Reference number indicating that a change or revision has
+-- >              been applied to a drawing.
+-- >    DW     Drawing
+-- >              Reference number identifying a drawing of an article.
+-- >    EC     Engineering change level
+-- >              Reference number indicating that a change or revision has
+-- >              been applied to an article's specification.
+-- >    EF     Material code
+-- >              Code defining the material's type, surface, geometric
+-- >              form plus various classifying characteristics.
+-- >    EN     International Article Numbering Association (EAN)
+-- >              Number assigned to a manufacturer's product according to
+-- >              the International Article Numbering Association.
+-- > +  GB     Buyer's internal product group code
+-- >              Product group code used within a buyer's internal
+-- >              systems.
+-- > +  GN     National product group code
+-- >              National product group code. Administered by a national
+-- >              agency.
+-- >    GS     General specification number
+-- >              Self explanatory.
+-- >    HS     Harmonised system
+-- >              Self explanatory.
+-- >    IB     ISBN (International Standard Book Number)
+-- >              Self explanatory.
+-- >    IN     Buyer's item number
+-- >              Self explanatory.
+-- >    IS     ISSN (International Standard Serial Number)
+-- >              Self explanatory.
+-- >    IT     Buyer's style number
+-- >              Number given by the buyer to a specific style or form of
+-- >              an article, especially used for garments.
+-- >    IZ     Buyer's size code
+-- >              Code given by the buyer to designate the size of an
+-- >              article in textile and shoe industry.
+-- >    MA     Machine number
+-- >              Self explanatory.
+-- >    MF     Manufacturer's (producer's) article number
+-- >              The number given to an article by its manufacturer.
+-- >    MN     Model number
+-- >              Reference number assigned by the manufacturer to
+-- >              differentiate variations in similar products in a class
+-- >              or group.
+-- >    MP     Product/service identification number
+-- >              Reference number identifying a product or service.
+-- >    NB     Batch number
+-- >              Self explanatory.
+-- >    ON     Customer order number
+-- >              Reference number of a customer's order.
+-- >    PD     Part number description
+-- >              Reference number identifying a description associated
+-- >              with a number ultimately used to identify an article.
+-- >    PL     Purchaser's order line number
+-- >              Reference number identifying a line entry in a customer's
+-- >              order for goods or services.
+-- >    PO     Purchase order number
+-- >              Reference number identifying a customer's order.
+-- >    PV     Promotional variant number
+-- >              Self explanatory.
+-- >    QS     Buyer's qualifier for size
+-- >              Self explanatory.
+-- >    RC     Returnable container number
+-- >              Reference number identifying a returnable container.
+-- >    RN     Release number
+-- >              Reference number identifying a release from a buyer's
+-- >              purchase order.
+-- >    RU     Run number
+-- >              Self explanatory.
+-- >    RY     Record keeping of model year
+-- >              Self explanatory.
+-- >    SA     Supplier's article number
+-- >              Number assigned to an article by the supplier of that
+-- >              article.
+-- >    SG     Standard group of products (mixed assortment)
+-- >              Self explanatory.
+-- >    SK     SKU (Stock keeping unit)
+-- >              Reference number of a stock keeping unit.
+-- >    SN     Serial number
+-- >              Identification number of an item which distinguishes this
+-- >              specific item out of a number of identical items.
+-- >    SRS    RSK number
+-- >              Plumbing and heating.
+-- >    SS     Supplier's supplier article number
+-- >              Article number referring to a sales catalogue of
+-- >              supplier's supplier.
+-- >    ST     Style number
+-- >              Number given to a specific style or form of an article,
+-- >              especially used for garments.
+-- >    TG     Transport group number
+-- >              Additional number to form article groups for packing
+-- >              and/or transportation purposes.
+-- >    UA     Ultimate customer's article number
+-- >              Number assigned by ultimate customer to identify relevant
+-- >              article.
+-- >    UP     UPC (Universal product code)
+-- >              Number assigned to a manufacturer's product by the
+-- >              Product Code Council.
+-- >    VN     Vendor item number
+-- >              Reference number assigned by a vendor/seller identifying
+-- >              a product/service/article.
+-- >    VP     Vendor's (seller's) part number
+-- >              Reference number assigned by a vendor/seller identifying
+-- >              an article.
+-- >    VS     Vendor's supplemental item number
+-- >              Self explanatory.
+-- >    VX     Vendor specification number
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple7143 :: Parser Value
+simple7143 = simple "7143" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7160.hs b/specification/src/Text/Edifact/D96A/Simples/S7160.hs
new file mode 100644
index 0000000..24da10d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7160.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7160
+  ( simple7160
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7160  Special service
+-- >
+-- >    Desc: Description of a special service.
+-- >
+-- >    Repr: an..35
+simple7160 :: Parser Value
+simple7160 = simple "7160" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7161.hs b/specification/src/Text/Edifact/D96A/Simples/S7161.hs
new file mode 100644
index 0000000..c234e63
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7161.hs
@@ -0,0 +1,600 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7161
+  ( simple7161
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7161  Special services, coded
+-- >
+-- >   Desc: Code identifying a special service.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Advertising allowance
+-- >              Description to be provided.
+-- >    AAA    Telecommunication charges
+-- >              Self-explanatory.
+-- >    AAB    Returned goods charges
+-- >              Self-explanatory.
+-- >    AAC    Modification costs
+-- >              Costs for technical modifications to a product.
+-- >    AAD    Job-order production
+-- >              Costs of job-order production; only used in invoices.
+-- >    AAE    Outlays
+-- >              Outlays incurred in the company's interest for an
+-- >              installation order.
+-- >    AAF    Off-premises surcharge
+-- >              Expenses on top of service-rates for non-local
+-- >              activities.
+-- >    AAG    Gold surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAH    Processing surcharge
+-- >              Charging for increased processing costs.
+-- >    AAI    Attestation fee
+-- >              Outlays incurred by official attestation (by public
+-- >              authorities).
+-- >    AAJ    Copper surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAK    Energy surcharge
+-- >              Surcharge for energy costs.
+-- >    AAL    Deduction for missing parts
+-- >              Deduction for missing parts.
+-- >    AAM    Rubber surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAN    Brass surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAO    Material surcharge/deduction
+-- >              Percentage-based surcharge/deduction, calculated for
+-- >              higher/ lower material's consumption.
+-- >    AAP    Lead surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAQ    Price index surcharge
+-- >              Higher/lower price, resulting from change in costs
+-- >              between the times of making offer and delivery.
+-- >    AAR    Platinum surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAS    Acceptance cost
+-- >              Charge for testing.
+-- >    AAT    Rush delivery
+-- >              Charge for increased delivery speed.
+-- >    AAU    Selenium surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAV    Special construction charge
+-- >              Charge for costs incurred as result of special
+-- >              constructions.
+-- >    AAW    Deduction for delayed return
+-- >              Deduction for delayed return of goods.
+-- >    AAX    Wolfram surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AAY    Airport fee
+-- >              Charge associated with usage of airport facilities.
+-- >    AAZ    Concession fee
+-- >              Fee imposed by an airport to allow used of that facility.
+-- >    ABA    Compulsory storage fee
+-- >              Fee levied to cover the cost of carrying a certain amount
+-- >              of compulsory inventory (set by regulatory agency).
+-- >    ABB    Defuel
+-- >              Remove or off-load fuel from vehicle, vessel or craft.
+-- >    ABC    Into plane fee
+-- >              Charge associated with providing goods delivered to an
+-- >              aircraft from local storage.
+-- >    ABD    Overtime
+-- >              Fee charge for service rendered beyond the established
+-- >              limit of working hours.
+-- >    ABE    Reservicing charge
+-- >              Fee for services provided after initial service.
+-- >    ABF    Tooling cost
+-- >              Item or service relates to tooling, not direct provision
+-- >              of goods.
+-- >    ABG    Tooling charge
+-- >              Item or service relates to tooling charges, not direct
+-- >              provision of goods.
+-- >    ABH    Throughput allowance
+-- >              Allowance for reaching or exceeding an agreed throughput
+-- >              threshold.
+-- >    ABI    Superfund fee
+-- >              Fee imposed for superfund, a US-government fund created
+-- >              for the clean-up or eradication of sites at which toxic
+-- >              waste, hazardous to the environment, has been dumped.
+-- >    ABJ    Airport system fee
+-- >              Fee associated with the use of the hydrant and storage
+-- >              system at an airport.
+-- >    ABK    Miscellaneous
+-- >              The service provided for the stated charge is not
+-- >              defined.
+-- >    ABL    Packaging surcharge
+-- >              Additional charge for packaging of items.
+-- >    ABM    Scrap surcharge
+-- >              Additional charge on an item's price for the cost of
+-- >              constituent scrap.
+-- > |  ABN    Dunnage charge
+-- >              A charge incurred to cover the costs of the additional
+-- >              padding materials and labour required to secure and
+-- >              protect a cargo within a shipping container.
+-- >    ABO    Air freight transportation
+-- >              Additional charge on an item's price for air freight
+-- >              transportation.
+-- >    ABP    Carriage charge
+-- >              Additional charge on an item's price for the carriage.
+-- >    ABQ    Tonnage rebate
+-- >              Rebate based on the weight of the goods.
+-- >    ABR    Containerisation
+-- >              Additional charge on an item's price for
+-- >              containerisation.
+-- >    ABS    Carton packing
+-- >              Additional charge on an item's price for carton packing.
+-- >    ABT    Hessian wrapped
+-- >              Additional charge on an item's price for hessian
+-- >              wrapping.
+-- >    ABU    Polyethylene wrap packing
+-- >              Additional charge on an item's price for polyethylene
+-- >              wrap packing.
+-- >    ABV    Miscellaneous customs charge
+-- >              Non-defined customs charge.
+-- >    ABW    Customs duty charge
+-- >              Additional charge on an item's price for customs duty.
+-- >    ABX    Miscellaneous special tooling charge
+-- >              Non-defined additional charge on an item's price for
+-- >              special tooling.
+-- >    ABY    Tooling amortisation
+-- >              Additional charge on an item's price for tooling
+-- >              amortisation.
+-- >    ABZ    Miscellaneous rebate or discount
+-- >              Non-defined rebate or discount.
+-- >    ACA    Allowance
+-- >              Non-defined allowance.
+-- >    ACB    Future discount off retail
+-- >              Expected future discount off retail.
+-- >    ACC    Miscellaneous setting costs (tooling)
+-- >              Non-defined additional charge on an item's price for
+-- >              tooling costs.
+-- >    ACD    Minimum amount costs for quantity based surcharges
+-- >              The minimum amount for surcharges that are related to the
+-- >              quantity referred to.
+-- >    ACE    Below schedule quantity after quantity-based surcharge
+-- >              An adjustment made since the quantity was below the
+-- >              quantity-based surcharge.
+-- >    ACF    Miscellaneous treatment
+-- >              Non-defined additional charge on an item's price for
+-- >              treatment.
+-- >    ACG    Enamelling treatment
+-- >              Additional charge on an item's price for enamelling
+-- >              treatment.
+-- >    ACH    Heat treatment
+-- >              Additional charge on an item's price for heat treatment.
+-- >    ACI    Plating treatment
+-- >              Additional charge on an item's price for plating
+-- >              treatment.
+-- >    ACJ    Painting
+-- >              Additional charge on an item's price for painting.
+-- >    ACK    Polishing
+-- >              Additional charge on an item's price for polishing.
+-- >    ACL    Priming
+-- >              Additional charge on an item's price for priming.
+-- >    ACM    Preservation treatment
+-- >              Additional charge on an item's price for preservation
+-- >              treatment.
+-- >    ACN    Miscellaneous other surcharges
+-- >              Non-defined surcharges.
+-- >    ACO    Alloy surcharge
+-- >              Additional charge on an item's price for alloy.
+-- >    ACP    Coke surcharge
+-- >              Additional charge on an item's price for coke.
+-- >    ACQ    Royalty surcharge
+-- >              Additional charge on an item's price for royalty.
+-- >    ACR    Wheel handling charge
+-- >              Additional charge on an item's price for wheel handling.
+-- >    ACS    Fitting surcharge
+-- >              Additional charge on an item's price for fitting.
+-- >    ACT    Non-standard surcharge
+-- >              The surcharge is a non-standard charge.
+-- >    ACU    Standard surcharge
+-- >              The surcharge is a standard charge.
+-- >    ACV    Wheel surcharge
+-- >              Additional charge on an item's price for wheels.
+-- >    ACW    Washer surcharge
+-- >              Additional charge on an item's price for washers.
+-- >    ACX    Ocean freight charge
+-- >              The transportation charge relating to the ocean segment
+-- >              of a international journey.
+-- >    ACY    Container deposit charge
+-- >              The charge relating to the packaging of a product in a
+-- >              container when the container is expected to be returned
+-- >              and has value when empty.
+-- >    ACZ    Damaged merchandise
+-- >              The charge or credit relating to the circumstance of
+-- >              product being damaged and not saleable.
+-- >    ADA    Bopsheet charge
+-- >              A charge relating to securing a stack of product on a
+-- >              bopsheet.
+-- >    ADB    Drum deposit
+-- >              Deposit paid on a returnable drum.
+-- >    ADC    Consolidation
+-- >              The charge relating to additional services for
+-- >              consolidating multiple consignments into one shipment.
+-- >    ADD    Inland transportation
+-- >              The transportation charge related to the inland segment
+-- >              of a journey.
+-- >    ADE    Bill of lading charge
+-- >              The charge relating to the service of providing bill of
+-- >              lading document.
+-- >    ADF    Excise tax-destination
+-- >              The excise tax applied to a product by the country of
+-- >              destination.
+-- >    ADG    Customs bond charge
+-- >              Place of destination Customs department charge for
+-- >              processing a request to have goods brought into the
+-- >              country without paying the appropriate duties and taxes
+-- >              upon entry.
+-- >    ADH    Per pound charge
+-- >              A charge that is directly related to the weight in pounds
+-- >              of the product being sold and/or delivered.
+-- >    ADI    Royalties
+-- >              A share of the sales charge reversed by the grantor.
+-- >    ADJ    Airbag charge
+-- >              A charge for surrounding a product with an air bag.
+-- >    ADK    Transfer charge
+-- >              A charge relating to the additional transfer of goods and
+-- >              services from one entity to another.
+-- >    ADL    Slipsheet charge
+-- >              A charge relating to securing a stack of product on a
+-- >              slipsheet.
+-- > +  ADM    Binding services
+-- >              A code indicating binding services.
+-- > +  ADN    Repair or replacement of broken returnable package
+-- >              The repair or replacement of a broken returnable package.
+-- > +  ADO    Efficient logistics
+-- >              A code indicating efficient logistics services.
+-- > +  ADP    Merchandising
+-- >              A code indicating that merchandising services are in
+-- >              operation.
+-- > +  ADQ    Product mix
+-- >              A code indicating that product mixing services are in
+-- >              operation.
+-- > +  ADR    Other services
+-- >              A code indicating that other non-specific services are in
+-- >              operation.
+-- > +  ADS    Full pallet ordering
+-- >              Ordering of a full pallet of a product.
+-- > +  ADT    Pick-up
+-- >              For the pick-up or collection of goods.
+-- >    AG     Silver surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AJ     Adjustments
+-- >              Description to be provided.
+-- >    AL     Aluminium surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    AM     Additional material
+-- >              Surcharge for material additionally needed in the
+-- >              production of the item.
+-- >    AU     Authentication charge
+-- >              Charge to cover authentication costs and fees.
+-- >    CA     Cataloguing services
+-- >              Description to be provided.
+-- >    CAA    Cancellation charge
+-- >              Charge incurring with cancellation.
+-- >    CAB    Cartage
+-- >              Self-explanatory.
+-- >    CAC    Cash discount
+-- >              Discount incurring with cash payment.
+-- >    CAD    Certification fee
+-- >              Fee raised for certification services.
+-- >    CAE    Certificate of conformance
+-- >              Description to be provided.
+-- >    CAF    Certificate of origin
+-- >              Charge concerning certificate of origin.
+-- >    CAG    Competitive allowance
+-- >              Price adjustment allowed for market conditions or
+-- >              factors.
+-- >    CAH    Competitive auto allowance
+-- >              Description to be provided.
+-- >    CAI    Cutting charge
+-- >              Description to be provided.
+-- >    CAJ    Consular costs
+-- >              Charge to cover consular costs.
+-- >    CAK    Customer collection rebate
+-- >              Description to be provided.
+-- >    CB     Commission
+-- >              Description to be provided.
+-- >    CD     Car loading
+-- >              Costs incurred with car loading.
+-- >    CG     Cleaning charge
+-- >              Charge for cleaning an item.
+-- >    CK     COD charge
+-- >              Description to be provided.
+-- >    CL     Contract allowance
+-- >              Description to be provided.
+-- >    CO     Cents off
+-- >              Description to be provided.
+-- >    CP     Competitive price
+-- >              Description to be provided.
+-- >    CS     Cigarette stamping
+-- >              Description to be provided.
+-- >    CT     Count and recount
+-- >              Description to be provided.
+-- >    CW     Container allowance
+-- >              Description to be provided.
+-- >    DA     Defective allowance
+-- >              Description to be provided.
+-- >    DAA    Deficit freight
+-- >              Description to be provided.
+-- >    DAB    Layout/design
+-- >              Description to be provided.
+-- >    DAD    Driver assigned unloading
+-- >              Charges to cover handling costs for unloading by driver.
+-- >    DAE    Distributor discount/allowance
+-- >              Specific discount/allowance for distributors.
+-- >    DI     Discount
+-- >              A reduction from a usual or list price.
+-- >    DL     Delivery
+-- >              Description to be provided.
+-- >    DM     Demurrage
+-- >              The compensation payable to a carrier or freight whose
+-- >              vehicle or vessel is delayed, as by failure to load or
+-- >              unload the freight within the time allowed.
+-- >    EAA    Early buy allowance
+-- >              Allowance granted to customers buying early.
+-- >    EAB    Early payment allowance
+-- >              Allowance granted to customers paying early.
+-- >    EG     Engraving
+-- >              Description to be provided.
+-- >    EP     Expediting premium
+-- >              Description to be provided.
+-- >    ER     Exchange rate guarantee charge
+-- >              Description to be provided.
+-- >    EX     Export shipping charge
+-- >              Description to be provided.
+-- >    FA     Freight allowance
+-- >              Description to be provided.
+-- >    FAA    Fabrication charge
+-- >              Description to be provided.
+-- >    FAB    Freight equalization
+-- >              Description to be provided.
+-- >    FAC    Freight surcharge
+-- >              Charge on shipment for extraordinary handling.
+-- >    FC     Freight charge
+-- >              Amount to be paid for moving goods, by whatever means,
+-- >              from one place to another, inclusive discounts,
+-- >              allowances, rebates, adjustment factors and additional
+-- >              cost relating to freight costs (UN/ECE Recommendation no
+-- >              23).
+-- >    FG     Free goods
+-- >              Allowance or rebate granted by delivery of goods free of
+-- >              charge.
+-- >    FH     Filling/handling charge
+-- >              Description to be provided.
+-- >    FI     Finance charge
+-- >              Description to be provided.
+-- >    FN     Special finish charge
+-- >              Description to be provided.
+-- >    FR     Flat rate
+-- >              Description to be provided.
+-- >    GAA    Grinding
+-- >              Description to be provided.
+-- >    HAA    Hose charge
+-- >              Description to be provided.
+-- >    HD     Handling
+-- >              Charge for handling of the item.
+-- >    HH     Hoisting and hauling
+-- >              Description to be provided.
+-- >    IA     Invoice adjustment
+-- >              Description to be provided.
+-- >    IAA    Installation
+-- >              Costs incurred for installation.
+-- >    IAB    Installation and warranty
+-- >              Description to be provided.
+-- >    ID     Inside delivery charge
+-- >              Description to be provided.
+-- >    IF     Inspection fee
+-- >              Fee raised for inspection.
+-- >    IN     Insurance
+-- >              Charge for insurance.
+-- >    IR     Installation and training
+-- >              Description to be provided.
+-- >    IS     Invoice services
+-- >              Description to be provided.
+-- >    KO     Koshering
+-- >              Description to be provided.
+-- >    L1     Shipper load, carrier count
+-- >              Description to be provided.
+-- >    LA     Labelling
+-- >              Description to be provided.
+-- >    LAA    Labour charge
+-- >              Charge raised for labour services.
+-- >    LAB    Labor (repair and return orders)
+-- >              Description to be provided.
+-- >    LAC    License fee
+-- >              Description to be provided.
+-- >    LF     Legalisation fee
+-- >              Self explanatory.
+-- >    LS     Local sales tax
+-- >              (All applicable sales taxes by authorities below the
+-- >              state level).
+-- >    MA     Material allowance (special materials)
+-- >              Description to be provided.
+-- >    MAA    Mileage or travel
+-- >              Description to be provided.
+-- >    MAB    Mileage fee (for repair and return)
+-- >              Description to be provided.
+-- >    MAC    Minimum order/minimum billing charge
+-- >              Description to be provided.
+-- >    MAD    Monthly rental
+-- >              Description to be provided.
+-- >    MAE    Mounting
+-- >              Description to be provided.
+-- >    MC     Material surcharge (special materials)
+-- >              Description to be provided.
+-- >    MI     Mail invoice
+-- >              Description to be provided.
+-- >    ML     Mail invoice to each location
+-- >              Description to be provided.
+-- >    NAA    Non-returnable containers
+-- >              Description to be provided.
+-- >    OA     Outside cable connectors
+-- >              Description to be provided.
+-- >    OAA    Overtime loading
+-- >              Description to be provided.
+-- >    PA     Pack invoice with shipment
+-- >              Description to be provided.
+-- >    PAA    Phosphatizing (steel treatment)
+-- >              Description to be provided.
+-- >    PAB    Postage charge
+-- >              Description to be provided.
+-- >    PAC    Premium charge
+-- >              Description to be provided.
+-- >    PAD    Promotional allowance
+-- >              Description to be provided.
+-- >    PAE    Promotional discount
+-- >              Description to be provided.
+-- >    PC     Packing
+-- >              Charge for packing.
+-- >    PD     Palladium surcharge
+-- >              Difference between current price and basic value
+-- >              contained in product price.
+-- >    PI     Pick-up allowance
+-- >              Description to be provided.
+-- >    PL     Palletizing
+-- >              Description to be provided.
+-- >    PN     Pallet charge
+-- >              Description to be provided.
+-- >    PO     Per order charge
+-- >              Description to be provided.
+-- >    QAA    Quantity surcharge
+-- >              Fee associated with providing goods outside "normal"
+-- >              quantity limits.
+-- >    QD     Quantity discount
+-- >              Description to be provided.
+-- >    RAA    Rebate
+-- >              Description to be provided.
+-- >    RAB    Repack charge
+-- >              Description to be provided.
+-- >    RAC    Repair
+-- >              Description to be provided.
+-- >    RAD    Returnable container
+-- >              Description to be provided.
+-- >    RAE    Resellers discount
+-- >              Description to be provided.
+-- >    RAF    Restocking charge
+-- >              Description to be provided.
+-- >    RAG    Roll rebate
+-- >              Description to be provided.
+-- >    RAH    Road/rail tanker rebate
+-- >              Description to be provided.
+-- >    RE     Re-delivery charge
+-- >              Description to be provided.
+-- >    RF     Refurbishing charge
+-- >              Description to be provided.
+-- >    RH     Rail wagon hire
+-- >              Description to be provided.
+-- >    RO     Roe allowance/charge
+-- >              Description to be provided.
+-- >    RP     Repair charge
+-- >              Description to be provided.
+-- >    RV     Freight charge/costs of loading
+-- >              Description to be provided.
+-- >    SA     Salvage
+-- >              Description to be provided.
+-- >    SAA    Shipping and handling
+-- >              Description to be provided.
+-- >    SAB    Special allowance
+-- >              Description to be provided.
+-- >    SAC    Special credit
+-- >              Description to be provided.
+-- >    SAD    Special packaging
+-- >              Description to be provided.
+-- >    SAE    Stamping
+-- >              Description to be provided.
+-- >    SAF    Supplemental items
+-- >              Description to be provided.
+-- >    SAG    Surcharge (dollar value)
+-- >              An additional amount added to the usual charge, expressed
+-- >              in a dollar, or monetary, value.
+-- >    SAH    Surcharge (percentage)
+-- >              An additional amount added to the usual charge, expressed
+-- >              in a percentage.
+-- >    SAI    Shipper load, consignee unload
+-- >              Description to be provided.
+-- >    SAJ    Small packages charge
+-- >              Description to be provided.
+-- >    SC     Surcharge
+-- >              An additional amount added to the usual charge.
+-- >    SD     Shrinkage allowance
+-- >              Description to be provided.
+-- >    SF     Special rebate
+-- >              A return of part of an amount paid for goods or services,
+-- >              serving as a reduction or discount.
+-- >    SG     Shrink-wrap charge
+-- >              Description to be provided.
+-- >    SH     Special handling service
+-- >              Description to be provided.
+-- >    SM     Special finish
+-- >              Description to be provided.
+-- >    ST     Stamp duties
+-- >              Self explanatory.
+-- >    SU     Set-up
+-- >              Description to be provided.
+-- >    SZ     Steel surcharge
+-- >              Description to be provided.
+-- >    TAA    Telephone charge
+-- >              Description to be provided.
+-- >    TAB    Tank rental
+-- >              Description to be provided.
+-- >    TAC    Testing charge
+-- >              Description to be provided.
+-- >    TAD    Testing allowance
+-- >              Description to be provided.
+-- >    TAE    Truckload discount
+-- >              Description to be provided.
+-- >    TD     Trade discount
+-- >              Description to be provided.
+-- >    TS     State tax
+-- >              All applicable taxes by authorities at the state or
+-- >              provincial level, below national level.
+-- >    TT     Transportation - third party billing
+-- >              Description to be provided.
+-- >    TV     Transportation - vendor provided
+-- >              Description to be provided.
+-- >    TX     Tax
+-- >              Contribution levied by an authority.
+-- >    TZ     Temporary allowance
+-- >              Description to be provided.
+-- >    UM     Unsaleable merchandise allowance
+-- >              Description to be provided.
+-- >    V1     Drop yard
+-- >              Description to be provided.
+-- >    V2     Drop dock
+-- >              Description to be provided.
+-- >    VAA    Vendor freight
+-- >              Description to be provided.
+-- >    VAB    Volume discount
+-- >              Discount offered based on the amount of purchase.
+-- >    VL     Vehicle load allowance
+-- >              Description to be provided.
+-- >    WH     Warehousing
+-- >              Costs for storage and handling.
+-- >    XAA    Combine all same day shipment
+-- >              Description to be provided.
+-- >    YY     Split pickup
+-- >              Description to be provided.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple7161 :: Parser Value
+simple7161 = simple "7161" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7164.hs b/specification/src/Text/Edifact/D96A/Simples/S7164.hs
new file mode 100644
index 0000000..465616b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7164.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7164
+  ( simple7164
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7164  Hierarchical id. number
+-- >
+-- >    Desc: A unique number assigned by the sender to identify a level
+-- >          within a hierarchical structure.
+-- >
+-- >    Repr: an..12
+simple7164 :: Parser Value
+simple7164 = simple "7164" (alphaNumeric `upTo` 12)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7166.hs b/specification/src/Text/Edifact/D96A/Simples/S7166.hs
new file mode 100644
index 0000000..666989b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7166.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7166
+  ( simple7166
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7166  Hierarchical parent id.
+-- >
+-- >    Desc: Identification number of the next higher hierarchical data
+-- >          segment in a hierarchical structure.
+-- >
+-- >    Repr: an..12
+simple7166 :: Parser Value
+simple7166 = simple "7166" (alphaNumeric `upTo` 12)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7224.hs b/specification/src/Text/Edifact/D96A/Simples/S7224.hs
new file mode 100644
index 0000000..bc1e76b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7224.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7224
+  ( simple7224
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7224  Number of packages
+-- >
+-- >    Desc: Number of individual parts of a shipment either unpacked, or
+-- >          packed in such a way that they cannot be divided without
+-- >          first undoing the packing.
+-- >
+-- >    Repr: n..8
+simple7224 :: Parser Value
+simple7224 = simple "7224" (numeric `upTo` 8)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7233.hs b/specification/src/Text/Edifact/D96A/Simples/S7233.hs
new file mode 100644
index 0000000..01fb45f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7233.hs
@@ -0,0 +1,74 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7233
+  ( simple7233
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7233  Packaging related information, coded
+-- >
+-- >   Desc: Code giving packaging, handling and marking related
+-- >         information.
+-- >
+-- >   Repr: an..3
+-- >
+-- >        34 Product marking
+-- >              Self explanatory.
+-- >        35 Type of package
+-- >              Self explanatory.
+-- >        36 Package specifications
+-- >              Self explanatory.
+-- >        37 Package protection
+-- >              Self explanatory.
+-- >        38 Tarping
+-- >              Description to be provided.
+-- >        39 Platform/skid location
+-- >              Description to be provided.
+-- >        40 Bearing piece location
+-- >              Description to be provided.
+-- >        41 Skid/pallet type
+-- >              Description to be provided.
+-- >        42 Placement on carrier
+-- >              Description to be provided.
+-- >        43 Spacing directions
+-- >              Descriptions to be provided.
+-- >        44 Unloading device
+-- >              Description to be provided.
+-- >        45 Unloading equipment
+-- >              Self explanatory.
+-- > +      50 Package barcoded EAN-13 or EAN-8
+-- >              The package is barcoded with EAN-13 or EAN-8 code.
+-- > +      51 Package barcoded ITF-14 or ITF-6
+-- >              The package is barcoded with ITF-14 or ITF-6 code.
+-- > +      52 Package barcoded UCC or EAN-128
+-- >              The package is barcoded with UCC or EAN-128 code.
+-- > +      53 Package price marked
+-- >              The package is marked with the price.
+-- > +      54 Product ingredients marked on package
+-- >              The ingredients of the product contained in a package are
+-- >              marked on that package.
+-- >        60 Product marking pattern
+-- >              Self explanatory.
+-- >        61 Product marking location
+-- >              Self explanatory.
+-- >        62 Package/container mark location
+-- >              Self explanatory.
+-- >        63 Marking method
+-- >              Self explanatory.
+-- >        66 Receiving facility limitations
+-- >              Description to be provided.
+-- >        67 Tagging/bar code instructions
+-- >              Description to be provided.
+-- >        68 Shipping package labelling
+-- >              Self explanatory.
+-- >        69 Shipping package sealing
+-- >              Self explanatory.
+simple7233 :: Parser Value
+simple7233 = simple "7233" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7273.hs b/specification/src/Text/Edifact/D96A/Simples/S7273.hs
new file mode 100644
index 0000000..24291b5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7273.hs
@@ -0,0 +1,66 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7273
+  ( simple7273
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   7273  Service requirement, coded
+-- >
+-- >   Desc: Identification of a service requirement (which may constitute
+-- >         an additional component to a basic contract).
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Carrier loads
+-- >              The cargo is loaded in the equipment by the carrier.
+-- >         2 Full loads
+-- >              Container to be stuffed or stripped under responsibility
+-- >              and for account of the shipper or the consignee.
+-- >         3 Less than full loads
+-- >              Container to be stuffed and stripped for account and risk
+-- >              of the carrier.
+-- >         4 Shipper loads
+-- >              The cargo is loaded in the equipment by the shipper.
+-- >         5 To be delivered
+-- >              The cargo is to be delivered as instructed.
+-- >         6 To be kept
+-- >              The cargo is to be retained awaiting further
+-- >              instructions.
+-- >         7 Transhipment allowed
+-- >              Transhipment of goods is allowed.
+-- >         8 Transhipment not allowed
+-- >              Transhipment of goods is not allowed.
+-- >         9 Partial shipment allowed
+-- >              Partial shipment is allowed.
+-- >        10 Partial shipment not allowed
+-- >              Partial shipment is not allowed.
+-- >        11 Partial shipment and/or drawing allowed
+-- >              Partial shipment and/or drawing is allowed.
+-- >        12 Partial shipment and/or drawing not allowed
+-- >              Partial shipment and/or drawing is not allowed.
+-- >        13 Carrier unloads
+-- >              The cargo is to be unloaded from the equipment by the
+-- >              carrier.
+-- >        14 Shipper unloads
+-- >              The cargo is to be unloaded from the equipment by the
+-- >              shipper.
+-- >        15 Consignee unloads
+-- >              The cargo is to be unloaded from the equipment by the
+-- >              consignee.
+-- >        16 Consignee loads
+-- >              The cargo is to be loaded in the equipment by the
+-- >              consignee.
+-- >        17 Exclusive usage of equipment
+-- >              Usage of the equipment is reserved for exclusive use.
+-- >        18 Non exclusive usage of equipment
+-- >              Usage of the equipment is not reserved for exclusive use.
+simple7273 :: Parser Value
+simple7273 = simple "7273" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7297.hs b/specification/src/Text/Edifact/D96A/Simples/S7297.hs
new file mode 100644
index 0000000..676da23
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7297.hs
@@ -0,0 +1,43 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7297
+  ( simple7297
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7297  Set identification qualifier
+-- >
+-- >   Desc: Identification of the type of set.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Product
+-- >              Self explanatory.
+-- >         2 Licence
+-- >              Description to be provided.
+-- >         3 Package
+-- >              Related numbers identifying a package such as a bar code
+-- >              label number related to a kanban card number, etc.
+-- >         4 Vehicle reference set
+-- >              A code which indicates that the identities which follow
+-- >              are related to a particular vehicle which may have been
+-- >              previously identified.
+-- >         5 Source database
+-- >              The source database of the data in a data set.
+-- >         6 Target database
+-- >              The target database for the data in a data set.
+-- >         7 Value list
+-- >              A coded or non coded list of values.
+-- > +       8 Contract
+-- >              The contract related item numbers.
+-- > +       9 Financial security
+-- >              Financial security identifier set.
+simple7297 :: Parser Value
+simple7297 = simple "7297" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7357.hs b/specification/src/Text/Edifact/D96A/Simples/S7357.hs
new file mode 100644
index 0000000..c1e45f8
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7357.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7357
+  ( simple7357
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7357  Commodity/rate identification
+-- >
+-- >    Desc: Code identifying goods for Customs, transport or statistical
+-- >          purposes (generic term).
+-- >
+-- >    Repr: an..18
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple7357 :: Parser Value
+simple7357 = simple "7357" (alphaNumeric `upTo` 18)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7383.hs b/specification/src/Text/Edifact/D96A/Simples/S7383.hs
new file mode 100644
index 0000000..1cde7db
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7383.hs
@@ -0,0 +1,70 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7383
+  ( simple7383
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   7383  Surface/layer indicator, coded
+-- >
+-- >   Desc: Code indicating the surface or layer of a product that is
+-- >         being described.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    1S     Side one
+-- >              Self explanatory.
+-- >    2S     Side two
+-- >              Self explanatory.
+-- >    AA     On surface
+-- >              To indicate that the entity being specified is on the
+-- >              surface.
+-- >    AB     Off surface
+-- >              To indicate that the entity being specified is off the
+-- >              surface.
+-- >    AC     Soluble
+-- >              Specifies that the surface/layer/position being
+-- >              described is the soluble portion.
+-- >    BC     Back of cab
+-- >              Self explanatory.
+-- >    BS     Both sides
+-- >              Self explanatory.
+-- >    BT     Bottom
+-- >              Self explanatory.
+-- >    DF     Dual fuel tank positions
+-- >              Self explanatory.
+-- >    FR     Front
+-- >              Self explanatory.
+-- >    IN     Inside
+-- >              Self explanatory.
+-- >    LE     Left
+-- >              Self explanatory.
+-- >    OA     Overall
+-- >              Self explanatory.
+-- >    OS     One side
+-- >              Self explanatory.
+-- >    OT     Outside
+-- >              Self explanatory.
+-- >    RI     Right
+-- >              Self explanatory.
+-- >    RR     Rear
+-- >              Self explanatory.
+-- >    ST     Spare tyre position
+-- >              Self explanatory.
+-- >    TB     Tank bottom
+-- >              Self explanatory.
+-- >    TP     Top
+-- >              Self explanatory.
+-- >    TS     Two sides
+-- >              Self explanatory.
+-- >    UC     Under cab
+-- >              Self explanatory.
+simple7383 :: Parser Value
+simple7383 = simple "7383" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7402.hs b/specification/src/Text/Edifact/D96A/Simples/S7402.hs
new file mode 100644
index 0000000..8d1dff2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7402.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7402
+  ( simple7402
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7402  Identity number
+-- >
+-- >    Desc: A value given to an object for identification purposes.
+-- >
+-- >    Repr: an..35
+simple7402 :: Parser Value
+simple7402 = simple "7402" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7405.hs b/specification/src/Text/Edifact/D96A/Simples/S7405.hs
new file mode 100644
index 0000000..dd3472f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7405.hs
@@ -0,0 +1,146 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7405
+  ( simple7405
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 7405  Identity number qualifier
+-- >
+-- >   Desc: Code specifying the type/source of identity number.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     House bill of lading
+-- >              A number that is used to identify goods from a freight
+-- >              forwarder/consolidator.
+-- >    AB     1st structure element name
+-- >              The first element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AC     2nd structure element name
+-- >              The second element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AD     3rd structure element name
+-- >              The third element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AE     4th structure element name
+-- >              The fourth element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AF     5th structure element name
+-- >              The fifth element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AG     6th structure element name
+-- >              The sixth element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AH     7th structure element name
+-- >              The seventh element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AI     8th structure element name
+-- >              The eighth element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AJ     9th structure element name
+-- >              The ninth element in a series of elements that together
+-- >              define the structure of an object.
+-- >    AK     Data set
+-- >              The identity of a data set.
+-- >    AL     Kanban card number
+-- >              Reference number assigned by a consignee to a Kanban
+-- >              card.
+-- >    AM     Level number
+-- >              Level number in a hierarchy or other structure.
+-- >    AN     Manufacturing reference number
+-- >              A unique number identifying a particular assembly or
+-- >              other manufacturing process.
+-- >    AO     Position number in package
+-- >              A number to identify the position within a package
+-- >              according to agreed rules between partners.
+-- >    AP     Product
+-- >              A name or number which identifies a product.
+-- >    AQ     Release number
+-- >              Number assigned to a release.
+-- >    AR     Statistical concept
+-- >              Statistical concept.
+-- >    AS     Table
+-- >              A table of items e.g. figures and text represented in
+-- >              rows and columns.
+-- >    AT     Transport packing group number
+-- >              Number identifying a group of articles in a predescribed
+-- >              unit load for shipment/dispatch as agreed between
+-- >              partners.
+-- >    AU     Value list
+-- >              A coded or non coded list of values.
+-- >    AV     Value list subset
+-- >              A subset of a coded or non coded list of values.
+-- >    AW     Serial shipping container code
+-- >              A single unique serial number which identifies shipping
+-- >              containers or shipping packages.
+-- > +  AX     Case number
+-- >              A code to identify the number assigned to a given case.
+-- > +  AY     Financial security identification number
+-- >              Identification number of a financial security.
+-- > +  AZ     Compact disk player security code number
+-- >              The security code number of the compact disk player.
+-- > +  BA     Question in questionnaire
+-- >              The identity number of a question in a questionnaire.
+-- > +  BB     Questionnaire
+-- >              The identification of a questionnaire.
+-- > +  BC     Check digit
+-- >              The check digit of the primary number.
+-- > +  BD     Vehicle telephone identification number
+-- >              The number which identifies the telephone equipment
+-- >              fitted to the vehicle.
+-- >    BE     Batch excluded
+-- >              Products manufactured in Batch not to be included in
+-- >              consignment.
+-- > +  BF     Door key number
+-- >              The number on the key that fits the door lock.
+-- > +  BG     Fleet number
+-- >              The number of the fleet to which a vehicle is assigned.
+-- > +  BH     Ignition key number
+-- >              The number on the key that fits the ignition lock.
+-- > +  BI     Radio security code number
+-- >              The security code number of the radio.
+-- > +  BJ     Serial shipping container code
+-- >              Serial code uniquely identifying a shipping container.
+-- > +  BK     Fleet vehicle unit number
+-- >              The unit number of the vehicle within the fleet allocated
+-- >              by the fleet operator.
+-- > +  BL     Vehicle registration number
+-- >              The registration number of the vehicle.
+-- >    BN     Serial number
+-- >              Identification number of an item which distinguishes this
+-- >              specific item out of a number of identical items.
+-- >    BX     Batch number
+-- >              Unique number affixed by manufacturer to a batch of
+-- >              products produced under similar conditions.
+-- >    CN     Chassis number
+-- >              Unique number affixed by manufacturer to a chassis for
+-- >              identification purposes.
+-- >    EE     Engine number
+-- >              Unique number affixed by manufacturer to an engine for
+-- >              identification purposes.
+-- >    EM     Emulsion number
+-- >              Manufacturer assigned reference to a photographic product
+-- >              indicating sensitivity.
+-- >    IL     Invoice line number
+-- >              Sequential numerical assignment to identical invoiced
+-- >              goods which are subject to the same conditions of sale.
+-- >    ML     Marking/label number
+-- >              Self explanatory.
+-- >    PN     Part number
+-- >              Manufacturer-assigned reference to a product part.
+-- >    SC     Secondary Customs tariff number
+-- >              Indicate (e.g. in segment GIR) the secondary (sub-) level
+-- >              of a Customs tariff number.
+-- >    VV     Vehicle identity number
+-- >              Unique serial number assigned by the manufacturer that
+-- >              distinguishes one vehicle from another.
+simple7405 :: Parser Value
+simple7405 = simple "7405" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7419.hs b/specification/src/Text/Edifact/D96A/Simples/S7419.hs
new file mode 100644
index 0000000..d59d2a3
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7419.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7419
+  ( simple7419
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7419  Hazardous material class code, identification
+-- >
+-- >    Desc: Code specifying the kind of hazard for a material.
+-- >
+-- >    Repr: an..4
+-- >
+-- >    Note: Association defined code.  May be used in combination with
+-- >          1131/3055.
+simple7419 :: Parser Value
+simple7419 = simple "7419" (alphaNumeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S7511.hs b/specification/src/Text/Edifact/D96A/Simples/S7511.hs
new file mode 100644
index 0000000..076a458
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S7511.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S7511
+  ( simple7511
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    7511  Type of marking, coded
+-- >
+-- >    Desc: To specify the type of marking that reflects the method and
+-- >          the conventions adhered to for marking.
+-- >
+-- >    Repr: an..3
+simple7511 :: Parser Value
+simple7511 = simple "7511" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8022.hs b/specification/src/Text/Edifact/D96A/Simples/S8022.hs
new file mode 100644
index 0000000..b790d35
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8022.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8022
+  ( simple8022
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8022  Freight and charges
+-- >
+-- >    Desc: Plain language statement describing freight and other
+-- >          charges.
+-- >
+-- >    Repr: an..26
+simple8022 :: Parser Value
+simple8022 = simple "8022" (alphaNumeric `upTo` 26)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8023.hs b/specification/src/Text/Edifact/D96A/Simples/S8023.hs
new file mode 100644
index 0000000..df96b79
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8023.hs
@@ -0,0 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8023
+  ( simple8023
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8023  Freight and charges identification
+-- >
+-- >    Desc: Coded description of freight charges and other charges (used
+-- >          in combination with 1131/3055).
+-- >
+-- >    Repr: an..17
+-- >
+-- >    Note: Use UN/ECE Recommendation No. 23: Freight costs and charges.
+-- >          If not applicable, use appropriate code in combination with
+-- >          1131/3055.
+simple8023 :: Parser Value
+simple8023 = simple "8023" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8028.hs b/specification/src/Text/Edifact/D96A/Simples/S8028.hs
new file mode 100644
index 0000000..59f6ae0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8028.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8028
+  ( simple8028
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8028  Conveyance reference number
+-- >
+-- >    Desc: Unique reference given by the carrier to a certain journey or
+-- >          departure of a means of transport (generic term).
+-- >
+-- >    Repr: an..17
+simple8028 :: Parser Value
+simple8028 = simple "8028" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8051.hs b/specification/src/Text/Edifact/D96A/Simples/S8051.hs
new file mode 100644
index 0000000..0aad082
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8051.hs
@@ -0,0 +1,66 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8051
+  ( simple8051
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 8051  Transport stage qualifier
+-- >
+-- >   Desc: Qualifier giving a specific meaning to the transport details.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Inland transport
+-- >              Transport by which goods are moved from or to the
+-- >              frontier, or between inland points.
+-- >         2 At the statistical territory limit
+-- >              Point by which the means of transport are presumed to
+-- >              have left the statistical territory of despatch or to
+-- >              have entered the statistical territory of arrival.
+-- >        10 Pre-carriage transport
+-- >              Transport by which the goods are moved prior to their
+-- >              main carriage transport.
+-- >        11 At border
+-- >              Transport by which goods are moved to the Customs
+-- >              frontier.
+-- >        12 At departure
+-- >              Transport by which goods are moved from the place of
+-- >              departure.
+-- >        13 At destination
+-- >              Transport by which goods are moved at the place of
+-- >              destination.
+-- >        14 At the statistical territory limit
+-- >              Transport by which the goods are presumed to have left
+-- >              the statistical territory of dispatch or have entered the
+-- >              statistical territory of arrival.
+-- >        20 Main-carriage transport
+-- >              The primary stage in the movement of cargo from the point
+-- >              of origin to the intended destination.
+-- >        21 Main carriage - first carrier
+-- >              The first carrier of the ordered transport when more than
+-- >              one carrier is involved.
+-- >        22 Main carriage - second carrier
+-- >              The second carrier of the ordered transport when more
+-- >              than one carrier is involved.
+-- >        23 Main carriage - third carrier
+-- >              The third carrier of the ordered transport when more than
+-- >              one carrier is involved.
+-- > +      24 Inland waterway transport
+-- >              Transport by which goods are moved via an inland body of
+-- >              water.
+-- > +      25 Delivery carrier all transport
+-- >              Carrier responsible from the point of origin to the final
+-- >              delivery destination.
+-- >        30 On-carriage transport
+-- >              Transport by which the goods are moved after the main-
+-- >              carriage transport.
+simple8051 :: Parser Value
+simple8051 = simple "8051" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8053.hs b/specification/src/Text/Edifact/D96A/Simples/S8053.hs
new file mode 100644
index 0000000..fa3fe00
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8053.hs
@@ -0,0 +1,130 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8053
+  ( simple8053
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8053  Equipment qualifier
+-- >
+-- >   Desc: Code identifying type of equipment.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    AA     Ground equipment
+-- >              Ground equipment being fuelled or serviced.
+-- >    AB     Chain
+-- >              Chain used in the securing of cargo.
+-- >    AD     Temperature recorder
+-- >              Temperature recorder to provide a record of the actual
+-- >              temperature.
+-- >    AE     Body trailer
+-- >              The part of the vehicle where the cargo is loaded.
+-- >    BL     Blocks
+-- >              A piece of equipment that is normally a piece of wood to
+-- >              fix cargo (e.g. coils) during transport.
+-- >    BPN    Box pallet non exchangeable
+-- >              Self explanatory.
+-- >    BPY    Box pallet EUR Y non exchangeable
+-- >              Self explanatory.
+-- >    BR     Barge
+-- >              Flat bottomed inland cargo vessel for canals and rivers
+-- >              with or without own propulsion for the purpose of
+-- >              transported goods. (Synonym: Lighter).
+-- >    BX     Boxcar
+-- >              Description to be provided.
+-- >    CH     Chassis
+-- >              A wheeled carriage onto which an ocean container is
+-- >              mounted for inland conveyance.
+-- >    CN     Container
+-- >              Equipment item as defined by ISO for transport. It must
+-- >              be of: A) permanent character, strong enough for repeated
+-- >              use; B) designed to facilitate the carriage of goods, by
+-- >              one or more modes of transport, without intermediate
+-- >              reloading; C) fitted with devices for its ready handling,
+-- >              particularly.
+-- >    DPA    Deadlight (panel)
+-- >              Self explanatory.
+-- >    EFP    Exchangeable EUR flat pallet
+-- >              Self explanatory.
+-- >    EYP    Exchangeable EUR Y box pallet
+-- >              Self explanatory.
+-- >    FPN    Flat pallet EUR non exchangeable
+-- >              Self explanatory.
+-- >    FPR    Flat pallet (railway property) non exchangeable
+-- >              Self explanatory.
+-- >    FSU    Forked support
+-- >              Self explanatory.
+-- >    LAR    Lashing rope
+-- >              Self explanatory.
+-- >    LU     Load/unload device on equipment
+-- >              A mechanical device used in the loading and/or unloading
+-- >              of cargo into and from transport equipment.
+-- >    MPA    Movable panel
+-- >              Self explanatory.
+-- >    PA     Pallet
+-- >              A platform on which goods can be stacked in order to
+-- >              facilitate the movement by a forklift or sling.
+-- >    PBP    Identified private box pallet
+-- >              Self explanatory.
+-- >    PFP    Identified private flat pallet
+-- >              Self explanatory.
+-- >    PL     Platform
+-- >              A piece of equipment normally having a flat surface, or
+-- >              prepared for carrying cargo with a specific shape.
+-- >    PPA    Protecting panel
+-- >              Self explanatory.
+-- >    PST    Portable stove
+-- >              Self explanatory.
+-- >    RF     Flat car
+-- >              Description to be provided.
+-- >    RG     Reefer generator
+-- >              A generator used to control the temperature in
+-- >              temperature-controlled transport equipment.
+-- >    RGF    Ground facility
+-- >              Storage tank or facility capable of receiving shipment of
+-- >              goods or commodity.
+-- >    RO     Rope
+-- >              Rope used in the securing of cargo.
+-- >    RR     Rail car
+-- >              [8320] Registered identification number of railway wagon
+-- >              (CIM 19).
+-- >    SCA    Small container category A
+-- >              Self explanatory.
+-- >    SCB    Small container category B
+-- >              Self explanatory.
+-- >    SCC    Small container category C
+-- >              Self explanatory.
+-- >    SFA    Stiffening ring of frame
+-- >              Self explanatory.
+-- >    SPP    Identified special pallet
+-- >              Self explanatory.
+-- >    STR    Strap
+-- >              Self explanatory.
+-- >    SW     Swap body
+-- >              Rectangular equipment unit without wheels, which can be
+-- >              mounted on a chassis or positioned on legs.
+-- >    TE     Trailer
+-- >              A vehicle without motive power, designed for the carriage
+-- >              of cargo and to be towed by a motor vehicle.
+-- >    TP     Tarpaulin
+-- >              Waterproof material, e.g. canvas, to spread over cargo to
+-- >              protect it from getting wet.
+-- >    TS     Tackles
+-- >              [8030] Identification marks and numbers of loading tackle
+-- >              used (sheets, ropes, chains, etc..), as specified in DCU
+-- >              9 to CIM Article 13; and of containers, as specified in
+-- >              Articles 5 and 10 of Annex III to CIM (CIM 17).
+-- >    TSU    Tarpaulin support
+-- >              Self explanatory.
+-- >    UL     ULD (Unit load device)
+-- >              An aircraft container or pallet.
+simple8053 :: Parser Value
+simple8053 = simple "8053" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8066.hs b/specification/src/Text/Edifact/D96A/Simples/S8066.hs
new file mode 100644
index 0000000..de44792
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8066.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8066
+  ( simple8066
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8066  Mode of transport
+-- >
+-- >    Desc: Method of transport used for the carriage of the goods.
+-- >
+-- >    Repr: an..17
+simple8066 :: Parser Value
+simple8066 = simple "8066" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8067.hs b/specification/src/Text/Edifact/D96A/Simples/S8067.hs
new file mode 100644
index 0000000..032eebc
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8067.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8067
+  ( simple8067
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8067  Mode of transport, coded
+-- >
+-- >    Desc: Coded method of transport used for the carriage of the goods.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Use UN/ECE Recommendation No 19.
+simple8067 :: Parser Value
+simple8067 = simple "8067" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8077.hs b/specification/src/Text/Edifact/D96A/Simples/S8077.hs
new file mode 100644
index 0000000..7b9697f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8077.hs
@@ -0,0 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8077
+  ( simple8077
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8077  Equipment supplier, coded
+-- >
+-- >   Desc: To indicate the party that is the supplier of the equipment.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Shipper supplied
+-- >              The transport equipment is supplied by the shipper.
+-- >         2 Carrier supplied
+-- >              The transport equipment is supplied by the carrier.
+simple8077 :: Parser Value
+simple8077 = simple "8077" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8078.hs b/specification/src/Text/Edifact/D96A/Simples/S8078.hs
new file mode 100644
index 0000000..966dced
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8078.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8078
+  ( simple8078
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8078  Hazard substance/item/page number
+-- >
+-- >    Desc: Number giving additional hazard code classification of a
+-- >          goods item within the applicable dangerous goods regulation.
+-- >
+-- >    Repr: an..7
+simple8078 :: Parser Value
+simple8078 = simple "8078" (alphaNumeric `upTo` 7)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8092.hs b/specification/src/Text/Edifact/D96A/Simples/S8092.hs
new file mode 100644
index 0000000..9769d87
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8092.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8092
+  ( simple8092
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8092  Hazard code version number
+-- >
+-- >    Desc: The version/revision number of date of issuance of the code
+-- >          used.
+-- >
+-- >    Repr: an..10
+simple8092 :: Parser Value
+simple8092 = simple "8092" (alphaNumeric `upTo` 10)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8101.hs b/specification/src/Text/Edifact/D96A/Simples/S8101.hs
new file mode 100644
index 0000000..947f1ae
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8101.hs
@@ -0,0 +1,36 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8101
+  ( simple8101
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8101  Transit direction, coded
+-- >
+-- >   Desc: Identification of the point of origin and point of direction.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    BS     Buyer to seller
+-- >              Self explanatory.
+-- >    SB     Seller to buyer
+-- >              Self explanatory.
+-- >    SC     Subcontractor to seller
+-- >              Self explanatory.
+-- >    SD     Seller to drop ship designated location
+-- >              Self explanatory.
+-- >    SF     Seller to freight forwarder
+-- >              Self explanatory.
+-- >    SS     Seller to subcontractor
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple8101 :: Parser Value
+simple8101 = simple "8101" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8126.hs b/specification/src/Text/Edifact/D96A/Simples/S8126.hs
new file mode 100644
index 0000000..6366322
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8126.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8126
+  ( simple8126
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8126  Trem card number
+-- >
+-- >    Desc: The identification of a transport emergency card giving
+-- >          advice for emergency actions.
+-- >
+-- >    Repr: an..10
+simple8126 :: Parser Value
+simple8126 = simple "8126" (alphaNumeric `upTo` 10)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8154.hs b/specification/src/Text/Edifact/D96A/Simples/S8154.hs
new file mode 100644
index 0000000..f6ab19f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8154.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8154
+  ( simple8154
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8154  Equipment size and type
+-- >
+-- >    Desc: Plain language description of the size and type of equipment
+-- >          e.g. unit load device.
+-- >
+-- >    Repr: an..35
+simple8154 :: Parser Value
+simple8154 = simple "8154" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8155.hs b/specification/src/Text/Edifact/D96A/Simples/S8155.hs
new file mode 100644
index 0000000..e9d1b5b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8155.hs
@@ -0,0 +1,118 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8155
+  ( simple8155
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 8155  Equipment size and type identification
+-- >
+-- >   Desc: Coded description of the size and type of equipment e.g. unit
+-- >         load device.
+-- >
+-- >   Repr: an..10
+-- >
+-- >         1 Dime coated tank
+-- >              Self explanatory.
+-- >         2 Epoxy coated tank
+-- >              Self explanatory.
+-- >         3 IMO1
+-- >              Description to be provided.
+-- >         4 IMO2
+-- >              Description to be provided.
+-- >         5 IMO3
+-- >              Description to be provided.
+-- >         6 Pressurized tank
+-- >              Self explanatory.
+-- >         7 Refrigerated tank
+-- >              Self explanatory.
+-- >         8 Semi-refrigerated
+-- >              Self explanatory.
+-- >         9 Stainless steel tank
+-- >              Self explanatory.
+-- >        10 Nonworking reefer container 40 ft
+-- >              A 40 foot refrigerated container that is not actively
+-- >              controlling temperature of the product.
+-- >        11 Box pallet
+-- >              Self explanatory.
+-- >        12 Europallet
+-- >              80 x 120 cm.
+-- >        13 Scandinavian pallet
+-- >              100 x 120 cm.
+-- >        14 Trailer
+-- >              Non self-propelled vehicle designed for the carriage of
+-- >              cargo so that it can be towed by a motor vehicle.
+-- >        15 Nonworking reefer container 20 ft
+-- >              A 20 foot refrigerated container that is not actively
+-- >              controlling temperature of the product.
+-- >        16 Exchangeable pallet
+-- >              Standard pallet exchangeable following international
+-- >              convention.
+-- >        17 Semi-trailer
+-- >              Non self propelled vehicle without fron twheels designed
+-- >              for the carriage of cargo and provided with a kingpin.
+-- >        18 Tank container 20 ft.
+-- >              Self explanatory.
+-- >        19 Tank container 30 ft.
+-- >              Self explanatory.
+-- >        20 Tank container 40 ft.
+-- >              Self explanatory.
+-- >        21 Container IC 20 ft.
+-- >              Self explanatory. IC = InterContainer (subsidiary company
+-- >              of the European railway, responsible for container
+-- >              traffic in a rail environment for special container
+-- >              handling).
+-- >        22 Container IC 30 ft.
+-- >              Self explanatory.
+-- >        23 Container IC 40 ft.
+-- >              Self explanatory.
+-- >        24 Refrigerator tank 20 ft.
+-- >              Self explanatory.
+-- >        25 Refrigerator tank 30 ft.
+-- >              Self explanatory.
+-- >        26 Refrigerator tank 40 ft.
+-- >              Self explanatory.
+-- >        27 Tank container IC 20 ft.
+-- >              Self explanatory.
+-- >        28 Tank container IC 30 ft.
+-- >              Self explanatory.
+-- >        29 Tank container IC 40 ft.
+-- >              Self explanatory.
+-- >        30 Refrigerator tank IC 20 ft.
+-- >              Self explanatory.
+-- > +      31 Temperature controlled container 30 ft.
+-- >              Temperature controlled container measuring 30 feet.
+-- >        32 Refrigerator tank IC 40 ft.
+-- >              Self explanatory.
+-- >        33 Movable case: L < 6,15m
+-- >              Self explanatory.
+-- >        34 Movable case: 6,15m < L < 7,82m
+-- >              Self explanatory.
+-- >        35 Movable case: 7,82m < L < 9,15m
+-- >              Self explanatory.
+-- >        36 Movable case: 9,15m < L < 10,90m
+-- >              Self explanatory.
+-- >        37 Movable case: 10,90m < L < 13,75m
+-- >              Self explanatory.
+-- >        38 Totebin
+-- >              A steel open top unit of about 1,5 * 1,5 * 2,5 meters for
+-- >              road transport of bulk cargo.
+-- >        39 Temperature controlled container 20 ft
+-- >              Temperature controlled container measuring 20 feet.
+-- >        40 Temperature controlled container 40 ft
+-- >              A temperature controlled container measuring 40 feet.
+-- > +      41 Non working refrigerated (reefer) container 30ft.
+-- >              A 30 foot refrigerated (reefer) container that is not
+-- >              actively cooling the product.
+-- > +      42 Dual trailers
+-- >              Two trailers linked together one behind another and
+-- >              pulled by one tractor.
+simple8155 :: Parser Value
+simple8155 = simple "8155" (alphaNumeric `upTo` 10)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8158.hs b/specification/src/Text/Edifact/D96A/Simples/S8158.hs
new file mode 100644
index 0000000..25300d9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8158.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8158
+  ( simple8158
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8158  Hazard identification number, upper part
+-- >
+-- >    Desc: The id. number for the Orange Placard (upper part) required
+-- >          on the means of transport.
+-- >
+-- >    Repr: an..4
+simple8158 :: Parser Value
+simple8158 = simple "8158" (alphaNumeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8169.hs b/specification/src/Text/Edifact/D96A/Simples/S8169.hs
new file mode 100644
index 0000000..1cf3bce
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8169.hs
@@ -0,0 +1,42 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8169
+  ( simple8169
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8169  Full/empty indicator, coded
+-- >
+-- >   Desc: To indicate the extent to which the equipment is full or
+-- >         empty.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 More than one quarter volume available
+-- >              Self explanatory.
+-- >         2 More than half volume available
+-- >              Self explanatory.
+-- >         3 More than three quarters volume available
+-- >              Self explanatory.
+-- >         4 Empty
+-- >              Self explanatory.
+-- >         5 Full
+-- >              Self explanatory.
+-- >         6 No volume available
+-- >              Self explanatory.
+-- >         7 Full, mixed consignment
+-- >              Indicates that the equipment is fully loaded, and
+-- >              includes a number LCL (Less Than Container Load)
+-- >              consignments.
+-- >         8 Full, single consignment
+-- >              Indicates that the container is fully loaded with a
+-- >              single FCL (Full Container Load) consignment.
+simple8169 :: Parser Value
+simple8169 = simple "8169" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8178.hs b/specification/src/Text/Edifact/D96A/Simples/S8178.hs
new file mode 100644
index 0000000..374b0b5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8178.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8178
+  ( simple8178
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8178  Type of means of transport
+-- >
+-- >    Desc: Description of the type of the means of transport being
+-- >          utilized.
+-- >
+-- >    Repr: an..17
+simple8178 :: Parser Value
+simple8178 = simple "8178" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8179.hs b/specification/src/Text/Edifact/D96A/Simples/S8179.hs
new file mode 100644
index 0000000..a20a0c6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8179.hs
@@ -0,0 +1,74 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8179
+  ( simple8179
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- > * 8179  Type of means of transport identification
+-- >
+-- >   Desc: Code defining the type of the means of transport being
+-- >         utilized.
+-- >
+-- >   Repr: an..8
+-- >
+-- >         1 Barge chemical tanker
+-- >              Self explanatory.
+-- >         2 Coaster chemical tanker
+-- >              Self explanatory.
+-- >         3 Dry bulk carrier
+-- >              Self explanatory.
+-- >         4 Deep sea chemical tanker
+-- >              Self explanatory.
+-- >         5 Gas tanker
+-- >              Self explanatory.
+-- >         6 Aircraft
+-- >              Self explanatory.
+-- > +       7 Car with caravan
+-- >              A caravan towed by a car.
+-- >         9 Exceptional transport
+-- >              Transport for which common characteristics are not
+-- >              applicable (e.g. big transformers requiring special
+-- >              wagons, special tackles, special routing etc.).
+-- >        11 Ship
+-- >              Self explanatory.
+-- >        12 Ship tanker
+-- >              Self explanatory.
+-- >        13 Ocean vessel
+-- >              Self explanatory.
+-- >        21 Rail tanker
+-- >              Self explanatory.
+-- >        22 Rail silo tanker
+-- >              Self explanatory.
+-- >        23 Rail bulk car
+-- >              Self explanatory.
+-- >        24 Customer rail tanker
+-- >              Description to be provided.
+-- >        25 Rail express
+-- >              Description to be provided.
+-- >        31 Truck
+-- >              Self explanatory.
+-- >        32 Road tanker
+-- >              An over-the-road tank trucker or trailer.
+-- >        33 Road silo tanker
+-- >              Description to be provided.
+-- >        35 Truck/trailer with tilt
+-- >              Self explanatory.
+-- >        36 Pipeline
+-- >              A line of pipes for conveying water, gas, oil, etc.
+-- >        37 Hydrant cart
+-- >              Vehicle used at large airports with installed
+-- >              distribution systems to make into-plane deliveries of
+-- >              fuel; distinguished from other types of fuelling
+-- >              vehicles.
+-- > +      38 Car
+-- >              Car.
+simple8179 :: Parser Value
+simple8179 = simple "8179" (alphaNumeric `upTo` 8)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8186.hs b/specification/src/Text/Edifact/D96A/Simples/S8186.hs
new file mode 100644
index 0000000..0e24bc9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8186.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8186
+  ( simple8186
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8186  Substance identification number, lower part
+-- >
+-- >    Desc: The number for the Orange Placard (lower part) required on
+-- >          the means of transport.
+-- >
+-- >    Repr: an4
+simple8186 :: Parser Value
+simple8186 = simple "8186" (alphaNumeric `exactly` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8211.hs b/specification/src/Text/Edifact/D96A/Simples/S8211.hs
new file mode 100644
index 0000000..c2dac13
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8211.hs
@@ -0,0 +1,25 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8211
+  ( simple8211
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8211  Permission for transport, coded
+-- >
+-- >    Desc: Code giving evidence that transportation of particular
+-- >          hazardous cargo is permitted and identifies the restrictions
+-- >          being put upon a particular transport.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Code values to be provided.
+simple8211 :: Parser Value
+simple8211 = simple "8211" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8212.hs b/specification/src/Text/Edifact/D96A/Simples/S8212.hs
new file mode 100644
index 0000000..8b49a38
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8212.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8212
+  ( simple8212
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8212  Id. of the means of transport
+-- >
+-- >    Desc: Identification of the means of transport by name or number.
+-- >
+-- >    Repr: an..35
+-- >
+-- >    Note: Use relevant code.  May be used in combination with
+-- >          1131/3055.
+simple8212 :: Parser Value
+simple8212 = simple "8212" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8213.hs b/specification/src/Text/Edifact/D96A/Simples/S8213.hs
new file mode 100644
index 0000000..08d894f
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8213.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8213
+  ( simple8213
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8213  Id. of means of transport identification
+-- >
+-- >    Desc: Identification of the means of transport by name or number.
+-- >
+-- >    Repr: an..9
+-- >
+-- >    Note: Use relevant code.  May be used in combination with
+-- >          1131/3055.
+simple8213 :: Parser Value
+simple8213 = simple "8213" (alphaNumeric `upTo` 9)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8246.hs b/specification/src/Text/Edifact/D96A/Simples/S8246.hs
new file mode 100644
index 0000000..c80c12d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8246.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8246
+  ( simple8246
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8246  Dangerous goods label marking
+-- >
+-- >    Desc: Marking identifying the type of hazardous goods (substance),
+-- >          Loading/Unloading instructions and advising actions in case
+-- >          of emergency.
+-- >
+-- >    Repr: an..4
+simple8246 :: Parser Value
+simple8246 = simple "8246" (alphaNumeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8249.hs b/specification/src/Text/Edifact/D96A/Simples/S8249.hs
new file mode 100644
index 0000000..7ea4afd
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8249.hs
@@ -0,0 +1,38 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8249
+  ( simple8249
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8249  Equipment status, coded
+-- >
+-- >   Desc: Indication of the action related to the equipment.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Continental
+-- >              Self explanatory.
+-- >         2 Export
+-- >              Transport equipment to be exported on a marine vessel.
+-- >         3 Import
+-- >              Transport equipment to be imported on a marine vessel.
+-- >         4 Remain on board
+-- >              Transport equipment arriving on a marine vessel is to
+-- >              remain on board.
+-- >         5 Shifter
+-- >              Transport equipment is to be shifted from one stowage
+-- >              location on a marine vessel to another on the same
+-- >              vessel.
+-- >         6 Transhipment
+-- >              Transport equipment is to be transferred from one marine
+-- >              vessel to another.
+simple8249 :: Parser Value
+simple8249 = simple "8249" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8255.hs b/specification/src/Text/Edifact/D96A/Simples/S8255.hs
new file mode 100644
index 0000000..cff37fd
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8255.hs
@@ -0,0 +1,26 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8255
+  ( simple8255
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8255  Packing instruction, coded
+-- >
+-- >    Desc: Code defining the quantity and the type of package in which a
+-- >          product is allowed to be shipped in a passenger or freight
+-- >          aircraft.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: User or association defined code.  May be used in combination
+-- >          with 1131/3055.
+simple8255 :: Parser Value
+simple8255 = simple "8255" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8260.hs b/specification/src/Text/Edifact/D96A/Simples/S8260.hs
new file mode 100644
index 0000000..3bc5be0
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8260.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8260
+  ( simple8260
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8260  Equipment identification number
+-- >
+-- >    Desc: Marks (letters and/or numbers) which identify equipment e.g.
+-- >          unit load device.
+-- >
+-- >    Repr: an..17
+simple8260 :: Parser Value
+simple8260 = simple "8260" (alphaNumeric `upTo` 17)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8273.hs b/specification/src/Text/Edifact/D96A/Simples/S8273.hs
new file mode 100644
index 0000000..62fbc2c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8273.hs
@@ -0,0 +1,49 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8273
+  ( simple8273
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8273  Dangerous goods regulations, coded
+-- >
+-- >   Desc: Code indicating the regulation, international or national,
+-- >         applicable for a means of transport.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    ADR    European agreement regarding the total carriage of dangerous
+-- >           goods
+-- >              European agreement regarding the total carriage of
+-- >              dangerous goods by road.
+-- >    CFR    49 code of federal regulations
+-- >              US federal regulations issued by the US Dept. of
+-- >              transportation covering the domestic transportation of
+-- >              dangerous goods by truck, rail, water and air.
+-- >    ICA    IATA ICAO
+-- >              Regulations covering the international transportation of
+-- >              dangerous goods issued by the International Air Transport
+-- >              Association and the International Civil Aviation
+-- >              Organization.
+-- >    IMD    IMO IMDG code
+-- >              Regulations regarding the transportation of dangerous
+-- >              goods on ocean-going vessels issued by the International
+-- >              Maritime Organization.
+-- >    RID    Rail/road dangerous goods book (RID)
+-- >              International reglementation in dangerous goods
+-- >              transportation, applicable in Rail and Road environment.
+-- >              RID is the abbreviation of "Reglement International des
+-- >              marchandises Dangereuses".
+-- >    TEC    Transport emergency trem card
+-- >              Description to be provided.
+-- >    UI     UK IMO book
+-- >              Description to be provided.
+simple8273 :: Parser Value
+simple8273 = simple "8273" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8275.hs b/specification/src/Text/Edifact/D96A/Simples/S8275.hs
new file mode 100644
index 0000000..93c5654
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8275.hs
@@ -0,0 +1,53 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8275
+  ( simple8275
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8275  Container/package status, coded
+-- >
+-- >   Desc: Code to identify whether goods of separate description or
+-- >         comprising separate consignments are contained in the same
+-- >         external packaging or to indicate that a container or similar
+-- >         unit load device is empty.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Full load
+-- >              Container represents the full consignment of goods
+-- >              declared on a single Customs declaration (i.e. all goods
+-- >              in the container relate to a single Customs declaration).
+-- >         2 Part load
+-- >              Container represents part of a consignment declared on a
+-- >              single Customs declaration (i.e. the Customs declaration
+-- >              covers more than one container).
+-- >         3 Full load mixed consignments
+-- >              Container holds the full consignment related to the
+-- >              Customs declaration but also holds goods related to other
+-- >              declarations.
+-- >         4 Part load mixed consignments
+-- >              Container represents part of the consignment declared on
+-- >              a single Customs declaration with the remainder being in
+-- >              other containers. Other goods, related to other
+-- >              declarations, are also in the container.
+-- >         5 Single invoiced load
+-- >              Merchandise within a container/package covered by a
+-- >              single invoice.
+-- >         6 Multi invoiced load
+-- >              Merchandise within a container/package covered by more
+-- >              than one invoice.
+-- >         7 Empty
+-- >              Container holds no goods.
+-- >         8 Full load, multiple bills
+-- >              A container representing a consignment of goods for one
+-- >              consignee with multiple bill of lading numbers.
+simple8275 :: Parser Value
+simple8275 = simple "8275" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8281.hs b/specification/src/Text/Edifact/D96A/Simples/S8281.hs
new file mode 100644
index 0000000..411cfaf
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8281.hs
@@ -0,0 +1,28 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8281
+  ( simple8281
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8281  Transport ownership, coded
+-- >
+-- >   Desc: Code indicating the ownership of the means of transport.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Transport for the owner's account
+-- >              The owner of the transported goods is also the owner of
+-- >              the means of transport or rented it for this transport.
+-- >         2 Transport for another account
+-- >              The owner of the transported goods does not own the means
+-- >              of transport or has not rented it for this transport.
+simple8281 :: Parser Value
+simple8281 = simple "8281" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8323.hs b/specification/src/Text/Edifact/D96A/Simples/S8323.hs
new file mode 100644
index 0000000..368c835
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8323.hs
@@ -0,0 +1,29 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8323
+  ( simple8323
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8323  Transport movement, coded
+-- >
+-- >   Desc: Code indicating the movement of goods (e.g. import, export,
+-- >         transit).
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Export
+-- >              Self explanatory.
+-- >         2 Import
+-- >              Self explanatory.
+-- >         3 Transit
+-- >              Self explanatory.
+simple8323 :: Parser Value
+simple8323 = simple "8323" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8325.hs b/specification/src/Text/Edifact/D96A/Simples/S8325.hs
new file mode 100644
index 0000000..f75790c
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8325.hs
@@ -0,0 +1,41 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8325
+  ( simple8325
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8325  Category of means of transport, coded
+-- >
+-- >   Desc: Identification of the type of means of transport determined to
+-- >         carry particular goods, not necessarily being hazardous.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 ADNR code, OS
+-- >              Description to be provided.
+-- >         2 ADNR code, 1N
+-- >              Description to be provided.
+-- >         3 ADNR code, 1S
+-- >              Description to be provided.
+-- >         4 ADNR code, 2
+-- >              Description to be provided.
+-- >         5 ADNR code, 3
+-- >              Description to be provided.
+-- >         6 ADNR code, F
+-- >              Description to be provided.
+-- >         7 ADNR code, NF
+-- >              Description to be provided.
+-- >         8 ADNR code, ON
+-- >              Description to be provided.
+-- >         9 ADNR code, X
+-- >              Description to be provided.
+simple8325 :: Parser Value
+simple8325 = simple "8325" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8332.hs b/specification/src/Text/Edifact/D96A/Simples/S8332.hs
new file mode 100644
index 0000000..2d25388
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8332.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8332
+  ( simple8332
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8332  Equipment plan
+-- >
+-- >    Desc: Description indicating equipment plan, e.g. FCL or LCL.
+-- >
+-- >    Repr: an..26
+simple8332 :: Parser Value
+simple8332 = simple "8332" (alphaNumeric `upTo` 26)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8334.hs b/specification/src/Text/Edifact/D96A/Simples/S8334.hs
new file mode 100644
index 0000000..c1e8947
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8334.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8334
+  ( simple8334
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8334  Movement type
+-- >
+-- >    Desc: Description of the type of movement.
+-- >
+-- >    Repr: an..35
+simple8334 :: Parser Value
+simple8334 = simple "8334" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8335.hs b/specification/src/Text/Edifact/D96A/Simples/S8335.hs
new file mode 100644
index 0000000..a2bbe57
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8335.hs
@@ -0,0 +1,84 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8335
+  ( simple8335
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8335  Movement type, coded
+-- >
+-- >   Desc: Code indicating the type of movement.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Breakbulk
+-- >              Defines the movement of general cargo not carried in ISO
+-- >              standard containers.
+-- >         2 LCL/LCL
+-- >              Defines the movement of cargo packed in and unpacked from
+-- >              containers by the carrier on behalf of the
+-- >              shipper/consignee. 'LCL' means Less than Container Load.
+-- >         3 FCL/FCL
+-- >              Defines the movement of cargo packed by the shipper or
+-- >              shipper's agent and unpacked by the consignee or
+-- >              consignee's agent. 'FCL' means Full Container Load.
+-- >         4 FCL/LCL
+-- >              Defines the movement of cargo packed by the shipper or
+-- >              shipper's agent and unpacked by the carrier. 'FCL' means
+-- >              Full Container Load. 'LCL' means Less than Container
+-- >              Load.
+-- >         5 LCL/FCL
+-- >              Defines the movement of cargo packed by the carrier and
+-- >              unpacked by the consignee or consignee's agent. 'LCL'
+-- >              means Less than Container Load. 'FCL' means Full Load.
+-- >        11 House to house
+-- >              Cargo packed in a unit by the shipper at point of origin
+-- >              and unpacked by consignee at final destination.
+-- >        12 House to terminal
+-- >              Cargo packed in a unit by the shipper at point of origin
+-- >              and unpacked at the carrier's inland facility between the
+-- >              ship's point of discharge and the final destination.
+-- >        13 House to pier
+-- >              Cargo packed in a unit by the shipper at point of origin
+-- >              and unpacked by carrier at ship's point of discharge
+-- >              (pier).
+-- >        21 Terminal to house
+-- >              Cargo packed in a unit at a carrier's inland facility
+-- >              between point of origin and the ship's point of loading
+-- >              and unpacked by consignee at the final destination.
+-- >        22 Terminal to terminal
+-- >              Cargo packed in a unit at a carrier's inland facility
+-- >              between point of origin and the ship's point of loading
+-- >              and unpacked at a carrier's inland facility between
+-- >              ship's point of discharge and final destination.
+-- >        23 Terminal to pier
+-- >              Cargo packed in a unit at a carrier's inland facility
+-- >              between point of origin and ship's point of loading and
+-- >              unpacked by carrier at ship's point of discharge (pier).
+-- >        31 Pier to house
+-- >              Cargo packed in a unit at ship's point of loading and
+-- >              unpacked by consignee at final destination.
+-- >        32 Pier to terminal
+-- >              Cargo packed in a unit at ship's point of loading and
+-- >              unpacked at a carrier's inland facility between ship's
+-- >              point of discharge and final destination.
+-- >        33 Pier to pier
+-- >              Cargo packed in a unit at ship's point of loading and
+-- >              unpacked by carrier at ship's point of discharge (pier).
+-- >        41 Station to station
+-- >              Self explanatory.
+-- >        42 House to warehouse
+-- >              Self explanatory.
+-- >        43 Warehouse to house
+-- >              Self explanatory.
+-- >        44 Station to house
+-- >              Self explanatory.
+simple8335 :: Parser Value
+simple8335 = simple "8335" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8339.hs b/specification/src/Text/Edifact/D96A/Simples/S8339.hs
new file mode 100644
index 0000000..06ade7a
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8339.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8339
+  ( simple8339
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8339  Packing group, coded
+-- >
+-- >   Desc: Identification of a packing group by code.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Great danger
+-- >              Packaging meeting criteria to pack hazardous materials
+-- >              with great danger. Group I according to IATA/IMDG/ADR/RID
+-- >              regulations.
+-- >         2 Medium danger
+-- >              Packaging meeting criteria to pack hazardous materials
+-- >              with great danger. Group II according to
+-- >              IATA/IDMG/ADR/RID regulations.
+-- >         3 Minor danger
+-- >              Packaging meeting criteria to pack hazardous materials
+-- >              with great danger. Group III according to
+-- >              IATA/IDMG/ADR/RID regulations.
+simple8339 :: Parser Value
+simple8339 = simple "8339" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8341.hs b/specification/src/Text/Edifact/D96A/Simples/S8341.hs
new file mode 100644
index 0000000..ff1db4b
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8341.hs
@@ -0,0 +1,27 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8341
+  ( simple8341
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8341  Haulage arrangements, coded
+-- >
+-- >   Desc: Specification of the type of equipment haulage arrangements.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Carrier
+-- >              Haulage arranged by carrier.
+-- >         2 Merchant
+-- >              Haulage arranged by merchant (shipper, consignee, or
+-- >              their agent).
+simple8341 :: Parser Value
+simple8341 = simple "8341" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8351.hs b/specification/src/Text/Edifact/D96A/Simples/S8351.hs
new file mode 100644
index 0000000..23f2c9e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8351.hs
@@ -0,0 +1,23 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8351
+  ( simple8351
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8351  Hazard code identification
+-- >
+-- >    Desc: Dangerous goods code.
+-- >
+-- >    Repr: an..7
+-- >
+-- >    Note: Use relevant code list.
+simple8351 :: Parser Value
+simple8351 = simple "8351" (alphaNumeric `upTo` 7)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8364.hs b/specification/src/Text/Edifact/D96A/Simples/S8364.hs
new file mode 100644
index 0000000..795dd8e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8364.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8364
+  ( simple8364
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8364  EMS number
+-- >
+-- >    Desc: Emergency procedures for ships carrying dangerous goods.
+-- >
+-- >    Repr: an..6
+simple8364 :: Parser Value
+simple8364 = simple "8364" (alphaNumeric `upTo` 6)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8393.hs b/specification/src/Text/Edifact/D96A/Simples/S8393.hs
new file mode 100644
index 0000000..076548d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8393.hs
@@ -0,0 +1,43 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8393
+  ( simple8393
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8393  Returnable package load contents, coded
+-- >
+-- >   Desc: To indicate the composition of goods loaded into a returnable
+-- >         package.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Loaded with empty 4-block for blocking purposes
+-- >              Description to be provided.
+-- >         2 Empty container with dunnage
+-- >              Description to be provided.
+-- >         3 Empty container
+-- >              Description to be provided.
+-- >         4 Loaded with production material
+-- >              Description to be provided.
+-- >         5 Mixed empty and loaded
+-- >              Description to be provided.
+-- >         6 Obsolete material
+-- >              Description to be provided.
+-- >         7 Loaded with excess returned production material
+-- >              Description to be provided.
+-- >         8 Loaded with rejected material
+-- >              Description to be provided.
+-- >         9 Service part obsolete container
+-- >              Description to be provided.
+-- >        10 Loaded with returned processed material
+-- >              Description to be provided.
+simple8393 :: Parser Value
+simple8393 = simple "8393" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8395.hs b/specification/src/Text/Edifact/D96A/Simples/S8395.hs
new file mode 100644
index 0000000..16103c7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8395.hs
@@ -0,0 +1,31 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8395
+  ( simple8395
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8395  Returnable package freight payment responsibility, coded
+-- >
+-- >   Desc: To indicate responsibility for payment of return freight
+-- >         charges for packaging that is returnable.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Paid by customer
+-- >              Self explanatory.
+-- >         2 Free
+-- >              Self explanatory.
+-- >         3 Paid by supplier
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple8395 :: Parser Value
+simple8395 = simple "8395" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8410.hs b/specification/src/Text/Edifact/D96A/Simples/S8410.hs
new file mode 100644
index 0000000..cdcd7e7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8410.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8410
+  ( simple8410
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8410  MFAG
+-- >
+-- >    Desc: Medical first aid guide.
+-- >
+-- >    Repr: an..4
+simple8410 :: Parser Value
+simple8410 = simple "8410" (alphaNumeric `upTo` 4)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8453.hs b/specification/src/Text/Edifact/D96A/Simples/S8453.hs
new file mode 100644
index 0000000..f3c0de5
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8453.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8453
+  ( simple8453
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    8453  Nationality of means of transport, coded
+-- >
+-- >    Desc: Coded name of the country in which a means of transport is
+-- >          registered.
+-- >
+-- >    Repr: an..3
+-- >
+-- >    Note: Use ISO 3166 alpha two country code.
+simple8453 :: Parser Value
+simple8453 = simple "8453" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8457.hs b/specification/src/Text/Edifact/D96A/Simples/S8457.hs
new file mode 100644
index 0000000..647f112
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8457.hs
@@ -0,0 +1,68 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8457
+  ( simple8457
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8457  Excess transportation reason, coded
+-- >
+-- >   Desc: Indication of reason for excess transportation.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Special rail car order, schedule increase forecast change
+-- >              Self explanatory.
+-- >    B      Engineering change or late release
+-- >              Self explanatory.
+-- >    C      Specification (schedule) error/overbuilding
+-- >              Self explanatory.
+-- >    D      Shipment tracing delay
+-- >              Self explanatory.
+-- >    E      Plant inventory loss
+-- >              Self explanatory.
+-- >    F      Building ahead of schedule
+-- >              Self explanatory.
+-- >    G      Vendor behind schedule
+-- >              Self explanatory.
+-- >    H      Failed to include in last shipment
+-- >              Self explanatory.
+-- >    I      Carrier loss claim
+-- >              Self explanatory.
+-- >    J      Transportation failure
+-- >              Self explanatory.
+-- >    K      Insufficient weight for carload
+-- >              Self explanatory.
+-- >    L      Reject or discrepancy (material rejected in prior shipment)
+-- >              Self explanatory.
+-- >    M      Transportation delay
+-- >              Self explanatory.
+-- >    N      Lack of railcar or railroad equipment
+-- >              Self explanatory.
+-- >    P      Releasing error
+-- >              Self explanatory.
+-- >    R      Record error or cate reported discrepancy report
+-- >              Self explanatory.
+-- >    T      Common or peculiar part schedule increase
+-- >              Self explanatory.
+-- >    U      Alternative supplier shipping for responsible supplier
+-- >              Self explanatory.
+-- >    V      Direct schedule or locally controlled
+-- >              Self explanatory.
+-- >    W      Purchasing waiver approval
+-- >              Self explanatory.
+-- >    X      Authorization code to be determined
+-- >              Self explanatory.
+-- >    Y      Pilot material
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple8457 :: Parser Value
+simple8457 = simple "8457" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S8459.hs b/specification/src/Text/Edifact/D96A/Simples/S8459.hs
new file mode 100644
index 0000000..e630f03
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S8459.hs
@@ -0,0 +1,32 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S8459
+  ( simple8459
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   8459  Excess transportation responsibility, coded
+-- >
+-- >   Desc: Indication of responsibility for excess transportation.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    A      Customer plant (receiving location)
+-- >              Self explanatory.
+-- >    B      Material release issuer
+-- >              Self explanatory.
+-- >    S      Supplier authority
+-- >              Self explanatory.
+-- >    X      Responsibility to be determined
+-- >              Self explanatory.
+-- >    ZZZ    Mutually defined
+-- >              Self explanatory.
+simple8459 :: Parser Value
+simple8459 = simple "8459" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9010.hs b/specification/src/Text/Edifact/D96A/Simples/S9010.hs
new file mode 100644
index 0000000..585524d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9010.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9010
+  ( simple9010
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    9010  Status event
+-- >
+-- >    Desc: Description of a status event.
+-- >
+-- >    Repr: an..35
+simple9010 :: Parser Value
+simple9010 = simple "9010" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9011.hs b/specification/src/Text/Edifact/D96A/Simples/S9011.hs
new file mode 100644
index 0000000..eb9c154
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9011.hs
@@ -0,0 +1,341 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9011
+  ( simple9011
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9011  Status event, coded
+-- >
+-- >   Desc: Code identifying a status event.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Arrived
+-- >              The means of transport has arrived at a location.
+-- >         2 Authorized to load
+-- >              Permission to load has been given by the responsible
+-- >              party.
+-- >         3 Arrived in defective condition
+-- >              Goods/consignments/equipment have been received or a
+-- >              means of transport has arrived in a defective condition.
+-- >         4 Defective equipment release
+-- >              Equipment previously the subject of a 'defective
+-- >              condition' status has been returned to service.
+-- >         5 Begun
+-- >              The process has begun.
+-- >         6 Booked
+-- >              Goods/consignments/equipment or means of transport have
+-- >              been booked for subsequent movements.
+-- >         7 Booking cancelled
+-- >              The booking of goods/consignments/equipment or means of
+-- >              transport previously booked has been cancelled.
+-- >         8 Cleared import restrictions
+-- >              Goods/consignments/equipment held for import restriction
+-- >              purposes have been released for import.
+-- >         9 Cleared export restrictions
+-- >              Goods/consignments/equipment held prior to loading have
+-- >              now been cleared for export.
+-- >        10 Cleared by agriculture, food or fisheries authorities
+-- >              Goods/consignments/equipment have been held prior to
+-- >              shipment and are now cleared for shipment following
+-- >              examination by relevant authority.
+-- >        11 Cleared by port authority
+-- >              The port authority has given permission for the
+-- >              goods/consignments/equipment/means of transport to leave
+-- >              the port.
+-- >        12 Cleared by customs
+-- >              Customs have cleared goods/consignments for
+-- >              import/export.
+-- >        13 Collected
+-- >              Goods/consignments/equipment have been collected from a
+-- >              predetermined location.
+-- >        14 Completed
+-- >              The process has been completed.
+-- >        15 Consolidated
+-- >              Goods/consignments have been added to other goods/
+-- >              consignments to form a larger consignment and/or have
+-- >              been incorporated into one or more containers/units.
+-- >        16 Crossed border
+-- >              Goods/consignments/equipment have crossed a border from
+-- >              one country to another.
+-- >        17 Customs refusal
+-- >              The Customs authorities have refused to clear the
+-- >              goods/consignments/equipment.
+-- >        18 Damaged
+-- >              Goods/consignments/equipment have been damaged in the
+-- >              course of transportation.
+-- >        19 Damaged equipment quoted
+-- >              Damaged equipment has been assessed and the quotation
+-- >              sent to lessor.
+-- >        20 Delayed
+-- >              Goods/consignments/equipment have been delayed in the
+-- >              course of transportation.
+-- >        21 Delivered
+-- >              The goods/consignments/equipment have been delivered to a
+-- >              location/party in the transport chain.
+-- >        22 Delivery completed
+-- >              Delivery of the goods/consignments/equipment has been
+-- >              completed as per instructions.
+-- >        23 Delivery not completed
+-- >              Delivery of the goods/consignments/equipment has not been
+-- >              completed in accordance with instructions.
+-- >        24 Departed
+-- >              The means of transport has departed from a location in
+-- >              the transport chain.
+-- >        25 Departure delay
+-- >              The transport has been delayed in departing on the
+-- >              arranged transport action.
+-- >        26 Deramped
+-- >              Equipment has been removed from a position above other
+-- >              equipment on a means of transport.
+-- >        27 Despatched
+-- >              The goods/consignments/equipment have departed from a
+-- >              location in the transport chain.
+-- >        28 Stripped
+-- >              The goods/consignments/equipment have been unloaded from
+-- >              equipment in which they were transported.
+-- >        29 Discharged
+-- >              The goods/consignments/equipment have been unloaded from
+-- >              a means of transport.
+-- >        30 Empty on inspection
+-- >              The package/equipment has been found to be empty.
+-- >        31 En route
+-- >              The goods/consignments/equipment are in the normal course
+-- >              of transportation to the next destination.
+-- >        32 Equipment in from repair
+-- >              A piece of equipment has been received in after having
+-- >              been sent out for repair.
+-- >        33 Equipment out for repair
+-- >              A piece of equipment has been sent out for repair.
+-- >        34 Equipment repaired
+-- >              A damaged piece of equipment has been repaired.
+-- >        35 Expedited to destination
+-- >              The goods/consignments/equipment have been expedited to
+-- >              the next/final destination in the transport chain.
+-- >        36 Not found
+-- >              The goods/consignments/equipment notified to be missing
+-- >              have not been located.
+-- >        37 Found
+-- >              The goods/consignments/equipment previously notified
+-- >              missing have now been located.
+-- >        38 Freight paid
+-- >              The freight charges on goods/consignments/equipment have
+-- >              been paid.
+-- >        39 From bond
+-- >              The goods/consignments/equipment have been moved/are
+-- >              available to be moved from bond.
+-- >        40 Goods/consignments/equipment at port
+-- >              The goods/consignments/equipment have arrived/are
+-- >              available at port.
+-- >        41 Handover
+-- >              The goods/consignments/equipment have been formally
+-- >              passed from one point in the transport chain to another
+-- >              under responsibility of the same transporter. (See also
+-- >              'handover delivered'.)
+-- >        42 Handover delivered
+-- >              The goods/consignments/equipment from one transport
+-- >              operator have been passed to another transport operator.
+-- >              (see also 'handover'.)
+-- >        43 Handover received
+-- >              The goods/consignments/equipment have been received by
+-- >              one transport operator from another transport operator.
+-- >        44 Ill-routed consignment reforwarded
+-- >              The goods/consignments/equipment which were previously
+-- >              sent to a wrong destination are on the way to correct
+-- >              destination.
+-- >        45 Informed Consignee of arrival
+-- >              The consignee has been informed formally of the arrival
+-- >              at a transit or final destination of
+-- >              goods/consignments/equipment.
+-- >        46 Into bond
+-- >              The goods/consignments/equipment have been moved/is
+-- >              available to be moved into bond.
+-- >        47 Into packing depot
+-- >              The goods/consignments/equipment have been moved into a
+-- >              LCL (less than container load)/packing depot.
+-- >        48 Loaded
+-- >              The goods/consignments/equipment have been loaded onto a
+-- >              means of transport.
+-- >        49 Lost
+-- >              The goods/consignments/equipment have been lost in the
+-- >              course of a movement along the transport chain.
+-- >        50 Manifested
+-- >              The goods/consignments/equipment have been included on
+-- >              the list of units moving from one location to another in
+-- >              the transport chain.
+-- >        51 Means of transport damaged
+-- >              The means of transport on which the
+-- >              goods/consignments/equipment was being (was to be) moved
+-- >              has been damaged.
+-- >        52 Mechanical breakdown
+-- >              There has been a mechanical breakdown of the means of
+-- >              transport/equipment on which the
+-- >              goods/consignments/equipment was being (was to be) moved.
+-- >        53 No pick-up
+-- >              The goods/consignments/equipment expected to be picked up
+-- >              and conveyed from location to location in the transport
+-- >              chain have not been picked up.
+-- >        54 Not identified
+-- >              The goods/consignments/equipment expected to be located
+-- >              and identified in the transport chain cannot be
+-- >              identified.
+-- >        55 Not collected
+-- >              The goods/consignments/equipment expected to be collected
+-- >              after transportation have not been collected.
+-- >        56 Not delivered
+-- >              The goods/consignments/equipment have not been delivered.
+-- >        57 Not loaded
+-- >              The goods/consignments/equipment to be loaded onto a
+-- >              means of transport have not been loaded on the expected
+-- >              transport.
+-- >        58 Off hire
+-- >              Equipment previously under hire to a customer has been
+-- >              returned to the lessor and the contract has been
+-- >              terminated.
+-- >        59 Off loaded
+-- >              The goods/consignments/equipment previously loaded to a
+-- >              means of transport have been removed from that means of
+-- >              transport before completion of the planned transport.
+-- >        60 On hire
+-- >              Equipment has been hired out to a hirer/customer.
+-- >        61 Outstanding claims settled
+-- >              Outstanding claims in respect of
+-- >              goods/consignments/equipment have been settled.
+-- >        62 Over landed
+-- >              Goods/consignments/equipment have been discharged from a
+-- >              means of transport at a specific location when they were
+-- >              not expected to be discharged.
+-- >        63 Package not ready
+-- >              The package was not available for collection.
+-- >        64 Pick-up awaited
+-- >              Goods/consignments/equipment are awaiting pick-up.
+-- >        65 Plugged equipment
+-- >              Equipment, e.g. a refrigerated container, has been
+-- >              plugged into the power source.
+-- >        66 Plundered
+-- >              The goods/consignments/equipment have been plundered.
+-- >        67 Positioned goods/consignments/equipment
+-- >              Goods/consignments/equipment have been positioned on a
+-- >              means of transport.
+-- >        68 Pre-informed
+-- >              The consignor/consignee has been advised in advance of a
+-- >              transport action.
+-- >        69 Put to refuse
+-- >              The goods/consignments/equipment have been written off
+-- >              and disposed of.
+-- >        70 Ramped equipment
+-- >              Equipment has been placed above other equipment and
+-- >              placed on a means of transport.
+-- >        71 Ready for transportation
+-- >              Goods/consignments/equipment have been made ready for
+-- >              transportation.
+-- >        72 Receipt fully acknowledged
+-- >              The consignee has given full acknowledgement for the
+-- >              receipt of goods.
+-- >        73 Receipt partially acknowledged
+-- >              The consignee has not given full acknowledgement for the
+-- >              receipt of goods.
+-- >        74 Received
+-- >              Goods/consignments/equipment have been received at a
+-- >              location/party in the transport chain.
+-- >        75 Reconsigned
+-- >              Goods/consignments/equipment have been consigned to a
+-- >              party other than the original or subsequent consignees.
+-- >        76 Reforwarding on request
+-- >              The goods/consignments/equipment which have been delayed
+-- >              will be/have been reforwarded on request by appropriate
+-- >              authority.
+-- >        77 Refused without reason given
+-- >              The transport action/documentation has been refused
+-- >              without explanation.
+-- >        78 Released
+-- >              Goods/consignments/equipment have been released to an
+-- >              authorized party.
+-- >        79 Reloaded
+-- >              Goods/consignments/equipment have been reloaded onto a
+-- >              means of transport.
+-- >        80 Returned as instructed
+-- >              The goods/consignments/equipment have been returned to a
+-- >              location as per instructions.
+-- >        81 Returned as wreck
+-- >              The goods/consignments/equipment have been returned in a
+-- >              wrecked condition to a location as per instructions.
+-- >        82 Returned
+-- >              Goods/consignments/equipment have been returned to a
+-- >              previous location.
+-- >        83 Sealed equipment
+-- >              The equipment has been sealed according to operational
+-- >              and governmental requirements.
+-- >        84 Service ordered
+-- >              A service has been ordered in relation to the
+-- >              transportation of goods/consignments/equipment.
+-- >        85 Short landed
+-- >              Goods/consignments/equipment expected to be discharged
+-- >              from a means of transport at a specific location have not
+-- >              been discharged.
+-- >        86 Short shipped
+-- >              The goods/consignments/equipment expected to be sent to a
+-- >              specific destination on a selected means of transport
+-- >              from a specific location have not been loaded for onward
+-- >              delivery.
+-- >        87 Sorted wrong route
+-- >              The goods/consignments/equipment have been sorted
+-- >              erroneously to an incorrect route.
+-- >        88 Split
+-- >              The consignment of goods has been split into two or more
+-- >              consignments.
+-- >        89 Steam cleaned
+-- >              The equipment, e.g. a container, has been steam cleaned.
+-- >        90 Stopped
+-- >              The goods/consignments/equipment have been stopped from
+-- >              further movement in the transport chain.
+-- >        91 Stored
+-- >              The goods/consignments/equipment have been stored at a
+-- >              location.
+-- >        92 Stowed
+-- >              The goods/consignments/equipment have been stowed for
+-- >              transportation in the selected equipment/means of
+-- >              transport.
+-- >        93 Stuffed
+-- >              The goods/consignments/equipment have been loaded into a
+-- >              piece of equipment, e.g. a container.
+-- >        94 Stuffed and sealed
+-- >              The goods/consignments/equipment have been loaded into a
+-- >              piece of equipment and the equipment has been sealed.
+-- >        95 Sub-lease in
+-- >              In the leasing of equipment a sub-lease has been notified
+-- >              to the lessor.
+-- >        96 Sub-lease out
+-- >              In the leasing of equipment a sub-lease has been notified
+-- >              by a lessee.
+-- >        97 Surveyed damage
+-- >              Damaged goods/consignments/equipment have been officially
+-- >              surveyed by a third party to assess the extent of damage.
+-- >        98 Transferred in
+-- >              The goods/consignments/equipment have been transferred in
+-- >              from another location.
+-- >        99 Transferred out
+-- >              The goods/consignments/equipment have been transferred
+-- >              out to another location.
+-- >       100 Transhipment
+-- >              The goods/consignments/equipment have been transhipped to
+-- >              another means of transport.
+-- >       101 Transit delay
+-- >              The goods/consignments/equipment has been delayed in
+-- >              transit.
+-- >       102 Unknown goods/consignments/equipment
+-- >              The goods/consignments/equipment are not known to the
+-- >              source being enquired upon.
+-- >       103 Unplugged equipment
+-- >              Equipment, e.g. a refrigerated container, has been
+-- >              unplugged from the power source at a given location.
+simple9011 :: Parser Value
+simple9011 = simple "9011" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9012.hs b/specification/src/Text/Edifact/D96A/Simples/S9012.hs
new file mode 100644
index 0000000..e293b7d
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9012.hs
@@ -0,0 +1,21 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9012
+  ( simple9012
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    9012  Status reason
+-- >
+-- >    Desc: Provides the reason behind a status event.
+-- >
+-- >    Repr: an..35
+simple9012 :: Parser Value
+simple9012 = simple "9012" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9013.hs b/specification/src/Text/Edifact/D96A/Simples/S9013.hs
new file mode 100644
index 0000000..8e3a3f7
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9013.hs
@@ -0,0 +1,207 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9013
+  ( simple9013
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9013  Status reason, coded
+-- >
+-- >   Desc: Code identifying the reason behind a status event.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Address ex delivery area
+-- >              The address for delivery is outside the area of the
+-- >              carrier/transporter.
+-- >         2 After transport departed
+-- >              The goods/consignments/equipment arrived after the means
+-- >              of transport has departed.
+-- >         3 Agent refusal
+-- >              The agent of the customer refused to accept delivery.
+-- >         4 Altered seals
+-- >              The seals on the equipment have been changed from those
+-- >              notified.
+-- >         5 Appointment scheduled
+-- >              An arrangement has been made to deliver at a specific
+-- >              time.
+-- >         6 Attempt unsuccessful
+-- >              An unsuccessful attempt has been made to deliver the
+-- >              goods/consignments/equipment.
+-- >         7 Business closed
+-- >              The goods/consignments/equipment could not be
+-- >              delivered/collected as the business was closed.
+-- >         8 Changed schedule
+-- >              The goods/consignments/equipment cannot/will not be
+-- >              delivered/collected at the arranged time because of a
+-- >              change of schedule.
+-- >         9 Complementary address needed
+-- >              A further address is needed to effect delivery/collection
+-- >              of the goods/consignments/equipment.
+-- >        10 Computer system down
+-- >              The computer system is inoperative.
+-- >        11 Credit approval requested
+-- >              The consignee requests delivery on a credit base.
+-- >        12 Customer arrangements
+-- >              Goods/consignments/equipment require delivery
+-- >              arrangements by the customer.
+-- >        13 Customs refusal
+-- >              The Customs authorities have refused to clear the
+-- >              goods/consignments/equipment.
+-- >        14 Damaged
+-- >              The goods/consignments/equipment have been damaged.
+-- >        15 Delivery at specific requested dates/times/periods
+-- >              Delivery of the goods/consignments/equipment is requested
+-- >              at specific dates/times/periods.
+-- >        16 Destination incorrect
+-- >              The goods/consignments/equipment have been sent to wrong
+-- >              destination.
+-- >        17 Departure delay
+-- >              The transport has been delayed in departing on the
+-- >              arranged transport action.
+-- >        18 Derailment
+-- >              The train carrying the goods/consignments/equipment has
+-- >              been derailed.
+-- >        19 Discrepancy
+-- >              There is a discrepancy between the details of goods/
+-- >              equipment previously provided and the actual situation.
+-- >        20 Dock strike
+-- >              The goods/consignments/equipment cannot be
+-- >              delivered/collected due to a dock strike.
+-- >        21 Due to customer
+-- >              An action in the transport chain has been affected due to
+-- >              action of the customer.
+-- >        22 Empty
+-- >              The package/equipment is found to be empty.
+-- >        23 Equipment failure
+-- >              Delivery/collection could not be effected due to
+-- >              equipment failure.
+-- >        24 Examination required by relevant authority
+-- >              An examination of the goods/equipment has been ordered by
+-- >              the relevant authority.
+-- >        25 Export restrictions
+-- >              The goods/consignments/equipment have been prohibited
+-- >              from export pending further investigation.
+-- >        26 Frustrated export
+-- >              Attempts to export the goods/consignments/equipment have
+-- >              been unsuccessful.
+-- >        27 Goods units missing
+-- >              The tally of goods/consignments/equipment does not match
+-- >              the quantity as per advice. Result: less than advised.
+-- >        28 Import restrictions
+-- >              The goods/consignments/equipment need import checks and
+-- >              tests pending being released for importation.
+-- >        29 Incorrect pick information
+-- >              The goods/consignments/equipment were not collected due
+-- >              to incorrect pick information.
+-- >        30 Incorrect address
+-- >              The address given for the action was incorrect.
+-- >        31 Industrial dispute
+-- >              The action was frustrated by an industrial dispute.
+-- >        32 Instructions awaited
+-- >              Further instructions are required.
+-- >        33 Lost goods/consignments/equipment
+-- >              The goods/consignments/equipment have been lost in the
+-- >              course of a movement along the transport chain.
+-- >        34 Means of transport damaged
+-- >              The means of transport on which the
+-- >              goods/consignments/equipment were being (were to be)
+-- >              moved has been  damaged.
+-- >        35 Mechanical breakdown
+-- >              There has been a mechanical breakdown of the means of
+-- >              transport/equipment on which the
+-- >              goods/consignments/equipment was being (was to be) moved.
+-- >        36 Mechanical inspection
+-- >              A mechanical inspection of the means of transport/
+-- >              equipment on which the goods/consignments/equipment were
+-- >              being (were to be) moved, is required.
+-- >        37 Missing and/or incorrect documents
+-- >              The goods/consignments/equipment require complete and
+-- >              correct documentation.
+-- >        38 New delivery arrangements
+-- >              Alternative delivery arrangements advised by consignee
+-- >              after failed delivery.
+-- >        39 No recipient contact information
+-- >              No information available concerning the responsible
+-- >              person at delivery address.
+-- >        40 Not identified
+-- >              The goods/consignments/equipment expected to be located
+-- >              and identified in the transport chain cannot be
+-- >              identified.
+-- >        41 Not loaded
+-- >              The goods/consignments/equipment to be loaded onto a
+-- >              means of transport have not been loaded on the expected
+-- >              transport.
+-- >        42 On deck
+-- >              The goods/consignments/equipment have been stowed on
+-- >              deck.
+-- >        43 Package not ready
+-- >              The package was not available for collection.
+-- >        44 Package tracking number unknown
+-- >              The package tracking number is unknown.
+-- >        45 Partly missing
+-- >              The goods/consignments/equipment are partly, but not
+-- >              completely, missing.
+-- >        46 Payment not received
+-- >              The expected payment for the transport action was not
+-- >              received.
+-- >        47 Payment refused
+-- >              The payer refused to pay for the service.
+-- >        48 Plundered
+-- >              The goods/consignments/equipment have been plundered.
+-- >        49 Refused without reason given
+-- >              The transport action/documentation has been refused
+-- >              without explanation.
+-- >        50 Scheduled past cut-off
+-- >              The goods/consignments/equipment to be
+-- >              delivered/collected have been scheduled past/later than
+-- >              the cut-off time.
+-- >        51 Shunted to siding
+-- >              The transport on which the goods/consignments/equipment
+-- >              is to be placed has been shunted to siding.
+-- >        52 Signature not required
+-- >              Self explanatory.
+-- >        53 Sorted wrong route
+-- >              The goods/consignments/equipment have been sorted
+-- >              erroneously to an incorrect route.
+-- >        54 Special service required
+-- >              A special service is required for the
+-- >              goods/consignments/equipment.
+-- >        55 Split
+-- >              The consignment of goods has been split into two or more
+-- >              consignments.
+-- >        56 Totally missing
+-- >              The total goods/consignments/equipment is missing.
+-- >        57 Tracking information unavailable
+-- >              The tracking information of the
+-- >              goods/consignments/equipment is unavailable.
+-- >        58 Transit delay
+-- >              The goods/consignments/equipment have been delayed in
+-- >              transit.
+-- >        59 Unable to locate
+-- >              The goods/consignments/equipment cannot be located.
+-- >        60 Unacceptable condition
+-- >              The goods/consignments/equipment were in unacceptable
+-- >              condition at time of delivery/collection.
+-- >        61 Under deck
+-- >              The goods/consignments/equipment have been stowed
+-- >              under/below deck.
+-- >        62 Unknown
+-- >              The reason is unknown.
+-- >        63 Weather conditions
+-- >              The weather conditions have affected collection/delivery.
+-- >        64 Expired free time
+-- >              The goods/consignments/equipment have been in a storage
+-- >              facility for longer than permitted free time.
+-- >        65 Outstanding claims settled
+-- >              Outstanding claims in respect of
+-- >              goods/consignments/equipment have been settled.
+simple9013 :: Parser Value
+simple9013 = simple "9013" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9015.hs b/specification/src/Text/Edifact/D96A/Simples/S9015.hs
new file mode 100644
index 0000000..04285e6
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9015.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9015
+  ( simple9015
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9015  Status type, coded
+-- >
+-- >   Desc: Code identifying the type of status event.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Transport
+-- >              Status type is related to transport.
+simple9015 :: Parser Value
+simple9015 = simple "9015" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9213.hs b/specification/src/Text/Edifact/D96A/Simples/S9213.hs
new file mode 100644
index 0000000..f936ac2
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9213.hs
@@ -0,0 +1,33 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9213
+  ( simple9213
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9213  Type of duty regime, coded
+-- >
+-- >   Desc: Identification of the statement of the full/preferential
+-- >         regime according to which duty is assessed.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Origin subject to EC/EFTA preference
+-- >              Self explanatory.
+-- >         2 Origin subject to other preference agreement
+-- >              Self explanatory.
+-- >         3 No preference origin
+-- >              Self explanatory.
+-- >         8 Excluded origin
+-- >              Self explanatory.
+-- >         9 Imposed origin
+-- >              Self explanatory.
+simple9213 :: Parser Value
+simple9213 = simple "9213" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9302.hs b/specification/src/Text/Edifact/D96A/Simples/S9302.hs
new file mode 100644
index 0000000..0c11141
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9302.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9302
+  ( simple9302
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    9302  Sealing party
+-- >
+-- >    Desc: Clear text, representing the name of the issuer of the seal
+-- >          number.
+-- >
+-- >    Repr: an..35
+simple9302 :: Parser Value
+simple9302 = simple "9302" (alphaNumeric `upTo` 35)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9303.hs b/specification/src/Text/Edifact/D96A/Simples/S9303.hs
new file mode 100644
index 0000000..2587a32
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9303.hs
@@ -0,0 +1,34 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9303
+  ( simple9303
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9303  Sealing party, coded
+-- >
+-- >   Desc: Identification of the issuer of the seal number.
+-- >
+-- >   Repr: an..3
+-- >
+-- >    CA     Carrier
+-- >              Party undertaking or arranging transport of goods between
+-- >              named points.
+-- >    CU     Customs
+-- >              Self explanatory.
+-- >    SH     Shipper
+-- >              Party which, by contract with a carrier, consigns or
+-- >              sends goods with the carrier, or has them conveyed by
+-- >              him.
+-- >    TO     Terminal operator
+-- >              Party which handles the loading and unloading of marine
+-- >              vessels.
+simple9303 :: Parser Value
+simple9303 = simple "9303" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9308.hs b/specification/src/Text/Edifact/D96A/Simples/S9308.hs
new file mode 100644
index 0000000..e39ccda
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9308.hs
@@ -0,0 +1,22 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9308
+  ( simple9308
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >    9308  Seal number
+-- >
+-- >    Desc: The number of a custom seal or another seal affixed to the
+-- >          containers or other transport unit.
+-- >
+-- >    Repr: an..10
+simple9308 :: Parser Value
+simple9308 = simple "9308" (alphaNumeric `upTo` 10)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9353.hs b/specification/src/Text/Edifact/D96A/Simples/S9353.hs
new file mode 100644
index 0000000..ca44dab
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9353.hs
@@ -0,0 +1,52 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9353
+  ( simple9353
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9353  Government procedure, coded
+-- >
+-- >   Desc: Code identifying the treatment applied by the government to
+-- >         goods which are subject to a control.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Already customs cleared in the importing country
+-- >              Arrangements for inspection are not necessary because
+-- >              they were cleared before.
+-- >         2 Documents requirements completed
+-- >              All requirements for documents have been completed.
+-- >         3 Documents required
+-- >              Pertinent documents are required.
+-- >         4 Inspection arrangements completed
+-- >              Arrangements for inspection of the cargo have been
+-- >              completed.
+-- >         5 Inspection arrangements required
+-- >              Arrangements for inspection of the cargo are required.
+-- >         6 No customs procedure
+-- >              Customs clearance not required.
+-- >         7 Safety arrangements completed
+-- >              Arrangements for safeguarding the cargo have been
+-- >              completed.
+-- >         8 Safety arrangements required
+-- >              Arrangements for safeguarding the cargo are required.
+-- >         9 Security arrangements required
+-- >              Arrangements for the security of the cargo are required.
+-- >        10 Storage arrangements completed
+-- >              Arrangements for storing the cargo have been completed.
+-- >        11 Storage arrangements required
+-- >              Arrangements for storing the cargo are required.
+-- >        12 Transport arrangements completed
+-- >              All arrangements for transport have been completed.
+-- >        13 Transport arrangements required
+-- >              Transport has to be arranged.
+simple9353 :: Parser Value
+simple9353 = simple "9353" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9411.hs b/specification/src/Text/Edifact/D96A/Simples/S9411.hs
new file mode 100644
index 0000000..5c640b1
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9411.hs
@@ -0,0 +1,37 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9411
+  ( simple9411
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9411  Government involvement, coded
+-- >
+-- >   Desc: Indication of requirement and status of government
+-- >         involvement.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Carried out as instructed
+-- >              Instructions have been carried out.
+-- >         2 Carried out as amended
+-- >              Procedures have been carried out as amended.
+-- >         3 Completed
+-- >              Procedures have been completed.
+-- >         4 Not applicable
+-- >              Instructions are not applicable.
+-- >         5 Optimal
+-- >              An action which is most desirable but not required.
+-- >         6 Required
+-- >              Procedures are required.
+-- >         7 Applicable
+-- >              Procedures are applicable.
+simple9411 :: Parser Value
+simple9411 = simple "9411" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9415.hs b/specification/src/Text/Edifact/D96A/Simples/S9415.hs
new file mode 100644
index 0000000..487b173
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9415.hs
@@ -0,0 +1,58 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9415
+  ( simple9415
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9415  Government agency, coded
+-- >
+-- >   Desc: To indicate government agencies that are involved.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Agriculture
+-- >              Government agency responsible for agriculture and e.g.
+-- >              the inspection of vegetable and animal substances being
+-- >              imported.
+-- >         2 Ammunition
+-- >              Government agency responsible for the safe transport of
+-- >              ammunition.
+-- >         3 Commerce
+-- >              Government agency responsible for commerce both domestic
+-- >              and international.
+-- >         4 Coastguard
+-- >              Government agency responsible for public safety on
+-- >              waterways.
+-- >         5 Customs
+-- >              Customs authorities.
+-- >         6 Food and drug
+-- >              Government agency responsible for the safety on food and
+-- >              drugs.
+-- >         7 Health certificate
+-- >              Health authorities.
+-- >         8 Harbour police
+-- >              Police authorities responsible for public safety in the
+-- >              harbour.
+-- >         9 Immigration
+-- >              Government agency responsible for immigration matters.
+-- >        10 Live animals
+-- >              Government agency responsible for the importation of live
+-- >              animals.
+-- >        11 Port authority
+-- >              Government or semi-government body responsible for port
+-- >              operations.
+-- >        12 Public health
+-- >              Government body responsible for public health matters.
+-- >        13 Transportation
+-- >              Government agency responsible for transportation policy
+-- >              and other transportation matters.
+simple9415 :: Parser Value
+simple9415 = simple "9415" (alphaNumeric `upTo` 3)
diff --git a/specification/src/Text/Edifact/D96A/Simples/S9417.hs b/specification/src/Text/Edifact/D96A/Simples/S9417.hs
new file mode 100644
index 0000000..3f95c7e
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S9417.hs
@@ -0,0 +1,33 @@
+{-# LANGUAGE OverloadedStrings #-}
+
+---- Machine generated code.
+---- Output of edi-parser-scaffolder
+
+module Text.Edifact.D96A.Simples.S9417
+  ( simple9417
+  ) where
+
+import           Text.Edifact.Parsing
+import           Text.Edifact.Types   (Value)
+
+-- | Derived from this specification:
+--
+-- >   9417  Government action, coded
+-- >
+-- >   Desc: To indicate type of government action such as inspection,
+-- >         detention, fumigation, security.
+-- >
+-- >   Repr: an..3
+-- >
+-- >         1 Clearance
+-- >              The cargo will be or has been cleared.
+-- >         2 Detention
+-- >              The cargo has been or will be detained.
+-- >         3 Fumigation
+-- >              The cargo has been or will be fumigated.
+-- >         4 Inspection
+-- >              The cargo has been or will be inspected.
+-- >         5 Security
+-- >              The cargo has been or will be secured.
+simple9417 :: Parser Value
+simple9417 = simple "9417" (alphaNumeric `upTo` 3)