specification/src/Text/Edifact/D96A/Segments/GOR.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Segments.GOR
   7   ( -- * Definition
   8     segmentGOR
   9     -- * Dependencies
  10   , compositeC232
  11   , simple8323
  12   ) where
  13
  14 import           Text.Edifact.D96A.Composites (compositeC232)
  15 import           Text.Edifact.D96A.Simples    (simple8323)
  16
  17 import           Text.Edifact.Parsing
  18 import           Text.Edifact.Types           (Value)
  19
  20 -- | Derived from this specification:
  21 --
  22 -- >       GOR    GOVERNMENTAL REQUIREMENTS
  23 -- >
  24 -- >       Function: To indicate the requirement for a specific govermental
  25 -- >                 action and/or procedure or which specific procedure is
  26 -- >                 valid for a specific part of the transport.
  27 -- >
  28 -- > 010   8323  TRANSPORT MOVEMENT, CODED                      C  an..3
  29 -- >
  30 -- > 020   C232  GOVERNMENT ACTION                              C
  31 -- >       9415   Government agency, coded                      C  an..3
  32 -- >       9411   Government involvement, coded                 C  an..3
  33 -- >       9417   Government action, coded                      C  an..3
  34 -- >       9353   Government procedure, coded                   C  an..3
  35 -- >
  36 -- > 030   C232  GOVERNMENT ACTION                              C
  37 -- >       9415   Government agency, coded                      C  an..3
  38 -- >       9411   Government involvement, coded                 C  an..3
  39 -- >       9417   Government action, coded                      C  an..3
  40 -- >       9353   Government procedure, coded                   C  an..3
  41 -- >
  42 -- > 040   C232  GOVERNMENT ACTION                              C
  43 -- >       9415   Government agency, coded                      C  an..3
  44 -- >       9411   Government involvement, coded                 C  an..3
  45 -- >       9417   Government action, coded                      C  an..3
  46 -- >       9353   Government procedure, coded                   C  an..3
  47 -- >
  48 -- > 050   C232  GOVERNMENT ACTION                              C
  49 -- >       9415   Government agency, coded                      C  an..3
  50 -- >       9411   Government involvement, coded                 C  an..3
  51 -- >       9417   Government action, coded                      C  an..3
  52 -- >       9353   Government procedure, coded                   C  an..3
  53 --
  54 -- Dependencies: 'compositeC232', 'simple8323'.
  55 segmentGOR :: Parser Value
  56 segmentGOR =
  57   segment "GOR"
  58     [ "010" .@ optional  simple8323
  59     , "020" .@ optional  compositeC232
  60     , "030" .@ optional  compositeC232
  61     , "040" .@ optional  compositeC232
  62     , "050" .@ optional  compositeC232
  63     ]