specification/src/Text/Edifact/D96A/Simples/S8051.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Simples.S8051
   7   ( simple8051
   8   ) where
   9
  10 import           Text.Edifact.Parsing
  11 import           Text.Edifact.Types   (Value)
  12
  13 -- | Derived from this specification:
  14 --
  15 -- > * 8051  Transport stage qualifier
  16 -- >
  17 -- >   Desc: Qualifier giving a specific meaning to the transport details.
  18 -- >
  19 -- >   Repr: an..3
  20 -- >
  21 -- >         1 Inland transport
  22 -- >              Transport by which goods are moved from or to the
  23 -- >              frontier, or between inland points.
  24 -- >         2 At the statistical territory limit
  25 -- >              Point by which the means of transport are presumed to
  26 -- >              have left the statistical territory of despatch or to
  27 -- >              have entered the statistical territory of arrival.
  28 -- >        10 Pre-carriage transport
  29 -- >              Transport by which the goods are moved prior to their
  30 -- >              main carriage transport.
  31 -- >        11 At border
  32 -- >              Transport by which goods are moved to the Customs
  33 -- >              frontier.
  34 -- >        12 At departure
  35 -- >              Transport by which goods are moved from the place of
  36 -- >              departure.
  37 -- >        13 At destination
  38 -- >              Transport by which goods are moved at the place of
  39 -- >              destination.
  40 -- >        14 At the statistical territory limit
  41 -- >              Transport by which the goods are presumed to have left
  42 -- >              the statistical territory of dispatch or have entered the
  43 -- >              statistical territory of arrival.
  44 -- >        20 Main-carriage transport
  45 -- >              The primary stage in the movement of cargo from the point
  46 -- >              of origin to the intended destination.
  47 -- >        21 Main carriage - first carrier
  48 -- >              The first carrier of the ordered transport when more than
  49 -- >              one carrier is involved.
  50 -- >        22 Main carriage - second carrier
  51 -- >              The second carrier of the ordered transport when more
  52 -- >              than one carrier is involved.
  53 -- >        23 Main carriage - third carrier
  54 -- >              The third carrier of the ordered transport when more than
  55 -- >              one carrier is involved.
  56 -- > +      24 Inland waterway transport
  57 -- >              Transport by which goods are moved via an inland body of
  58 -- >              water.
  59 -- > +      25 Delivery carrier all transport
  60 -- >              Carrier responsible from the point of origin to the final
  61 -- >              delivery destination.
  62 -- >        30 On-carriage transport
  63 -- >              Transport by which the goods are moved after the main-
  64 -- >              carriage transport.
  65 simple8051 :: Parser Value
  66 simple8051 = simple "8051" (alphaNumeric `upTo` 3)