specification/src/Text/Edifact/D01B/Segments/EQN.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D01B.Segments.EQN
   7   ( -- * Definition
   8     segmentEQN
   9     -- * Dependencies
  10   , compositeC523
  11   ) where
  12
  13 import           Text.Edifact.D01B.Composites (compositeC523)
  14
  15 import           Text.Edifact.Parsing
  16 import           Text.Edifact.Types           (Value)
  17
  18 -- | Derived from this specification:
  19 --
  20 -- >        EQN  NUMBER OF UNITS
  21 -- >
  22 -- >        Function: To specify the number of units.
  23 -- >
  24 -- > 010    C523 NUMBER OF UNIT DETAILS                     M    1
  25 -- >        6350  Units quantity                            C      n..15
  26 -- >        6353  Unit type code qualifier                  C      an..3
  27 --
  28 -- Dependencies: 'compositeC523'.
  29 segmentEQN :: Parser Value
  30 segmentEQN =
  31   segment "EQN"
  32     [ "010" .@ mandatory compositeC523
  33     ]