1 files changed, 66 insertions, 0 deletions

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)