specification/src/Text/Edifact/D01B/Simples/S8325.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D01B.Simples.S8325
   7   ( simple8325
   8   ) where
   9
  10 import           Text.Edifact.Parsing
  11 import           Text.Edifact.Types   (Value)
  12
  13 -- | Derived from this specification:
  14 --
  15 -- > *    8325  Hazardous means of transport category code              [B]
  16 -- >
  17 -- >      Desc: Code specifying the category of means of transport for
  18 -- >            carrying hazardous goods.
  19 -- >
  20 -- >      Repr: an..3
  21 -- >
  22 -- > X    1     ADNR code, OS
  23 -- >               Description to be provided.
  24 -- >
  25 -- >            Note:
  26 -- >               1. This code value will be removed effective with
  27 -- >               directory D.04B.
  28 -- >
  29 -- > X    2     ADNR code, 1N
  30 -- >               Description to be provided.
  31 -- >
  32 -- >            Note:
  33 -- >               1. This code value will be removed effective with
  34 -- >               directory D.04B.
  35 -- >
  36 -- > X    3     ADNR code, 1S
  37 -- >               Description to be provided.
  38 -- >
  39 -- >            Note:
  40 -- >               1. This code value will be removed effective with
  41 -- >               directory D.04B.
  42 -- >
  43 -- > X    4     ADNR code, 2
  44 -- >               Description to be provided.
  45 -- >
  46 -- >            Note:
  47 -- >               1. This code value will be removed effective with
  48 -- >               directory D.04B.
  49 -- >
  50 -- > X    5     ADNR code, 3
  51 -- >               Description to be provided.
  52 -- >
  53 -- >            Note:
  54 -- >               1. This code value will be removed effective with
  55 -- >               directory D.04B.
  56 -- >
  57 -- > X    6     ADNR code, F
  58 -- >               Description to be provided.
  59 -- >
  60 -- >            Note:
  61 -- >               1. This code value will be removed effective with
  62 -- >               directory D.04B.
  63 -- >
  64 -- > X    7     ADNR code, NF
  65 -- >               Description to be provided.
  66 -- >
  67 -- >            Note:
  68 -- >               1. This code value will be removed effective with
  69 -- >               directory D.04B.
  70 -- >
  71 -- > X    8     ADNR code, ON
  72 -- >               Description to be provided.
  73 -- >
  74 -- >            Note:
  75 -- >               1. This code value will be removed effective with
  76 -- >               directory D.04B.
  77 -- >
  78 -- > X    9     ADNR code, X
  79 -- >               Description to be provided.
  80 -- >
  81 -- >            Note:
  82 -- >               1. This code value will be removed effective with
  83 -- >               directory D.04B.
  84 simple8325 :: Parser Value
  85 simple8325 = simple "8325" (alphaNumeric `upTo` 3)