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

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Simples.S8179
   7   ( simple8179
   8   ) where
   9
  10 import           Text.Edifact.Parsing
  11 import           Text.Edifact.Types   (Value)
  12
  13 -- | Derived from this specification:
  14 --
  15 -- > * 8179  Type of means of transport identification
  16 -- >
  17 -- >   Desc: Code defining the type of the means of transport being
  18 -- >         utilized.
  19 -- >
  20 -- >   Repr: an..8
  21 -- >
  22 -- >         1 Barge chemical tanker
  23 -- >              Self explanatory.
  24 -- >         2 Coaster chemical tanker
  25 -- >              Self explanatory.
  26 -- >         3 Dry bulk carrier
  27 -- >              Self explanatory.
  28 -- >         4 Deep sea chemical tanker
  29 -- >              Self explanatory.
  30 -- >         5 Gas tanker
  31 -- >              Self explanatory.
  32 -- >         6 Aircraft
  33 -- >              Self explanatory.
  34 -- > +       7 Car with caravan
  35 -- >              A caravan towed by a car.
  36 -- >         9 Exceptional transport
  37 -- >              Transport for which common characteristics are not
  38 -- >              applicable (e.g. big transformers requiring special
  39 -- >              wagons, special tackles, special routing etc.).
  40 -- >        11 Ship
  41 -- >              Self explanatory.
  42 -- >        12 Ship tanker
  43 -- >              Self explanatory.
  44 -- >        13 Ocean vessel
  45 -- >              Self explanatory.
  46 -- >        21 Rail tanker
  47 -- >              Self explanatory.
  48 -- >        22 Rail silo tanker
  49 -- >              Self explanatory.
  50 -- >        23 Rail bulk car
  51 -- >              Self explanatory.
  52 -- >        24 Customer rail tanker
  53 -- >              Description to be provided.
  54 -- >        25 Rail express
  55 -- >              Description to be provided.
  56 -- >        31 Truck
  57 -- >              Self explanatory.
  58 -- >        32 Road tanker
  59 -- >              An over-the-road tank trucker or trailer.
  60 -- >        33 Road silo tanker
  61 -- >              Description to be provided.
  62 -- >        35 Truck/trailer with tilt
  63 -- >              Self explanatory.
  64 -- >        36 Pipeline
  65 -- >              A line of pipes for conveying water, gas, oil, etc.
  66 -- >        37 Hydrant cart
  67 -- >              Vehicle used at large airports with installed
  68 -- >              distribution systems to make into-plane deliveries of
  69 -- >              fuel; distinguished from other types of fuelling
  70 -- >              vehicles.
  71 -- > +      38 Car
  72 -- >              Car.
  73 simple8179 :: Parser Value
  74 simple8179 = simple "8179" (alphaNumeric `upTo` 8)