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

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Segments.GID
   7   ( -- * Definition
   8     segmentGID
   9     -- * Dependencies
  10   , compositeC213
  11   , simple1496
  12   ) where
  13
  14 import           Text.Edifact.D96A.Composites (compositeC213)
  15 import           Text.Edifact.D96A.Simples    (simple1496)
  16
  17 import           Text.Edifact.Parsing
  18 import           Text.Edifact.Types           (Value)
  19
  20 -- | Derived from this specification:
  21 --
  22 -- >       GID    GOODS ITEM DETAILS
  23 -- >
  24 -- >       Function: To indicate totals of a goods item.
  25 -- >
  26 -- > 010   1496  GOODS ITEM NUMBER                              C  n..5
  27 -- >
  28 -- > 020   C213  NUMBER AND TYPE OF PACKAGES                    C
  29 -- >       7224   Number of packages                            C  n..8
  30 -- >       7065   Type of packages identification               C  an..17
  31 -- >       1131   Code list qualifier                           C  an..3
  32 -- >       3055   Code list responsible agency, coded           C  an..3
  33 -- >       7064   Type of packages                              C  an..35
  34 -- >
  35 -- > 030   C213  NUMBER AND TYPE OF PACKAGES                    C
  36 -- >       7224   Number of packages                            C  n..8
  37 -- >       7065   Type of packages identification               C  an..17
  38 -- >       1131   Code list qualifier                           C  an..3
  39 -- >       3055   Code list responsible agency, coded           C  an..3
  40 -- >       7064   Type of packages                              C  an..35
  41 -- >
  42 -- > 040   C213  NUMBER AND TYPE OF PACKAGES                    C
  43 -- >       7224   Number of packages                            C  n..8
  44 -- >       7065   Type of packages identification               C  an..17
  45 -- >       1131   Code list qualifier                           C  an..3
  46 -- >       3055   Code list responsible agency, coded           C  an..3
  47 -- >       7064   Type of packages                              C  an..35
  48 --
  49 -- Dependencies: 'compositeC213', 'simple1496'.
  50 segmentGID :: Parser Value
  51 segmentGID =
  52   segment "GID"
  53     [ "010" .@ optional  simple1496
  54     , "020" .@ optional  compositeC213
  55     , "030" .@ optional  compositeC213
  56     , "040" .@ optional  compositeC213
  57     ]