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

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Segments.EQN
   7   ( -- * Definition
   8     segmentEQN
   9     -- * Dependencies
  10   , compositeC523
  11   ) where
  12
  13 import           Text.Edifact.D96A.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
  25 -- >       6350   Number of units                               C  n..15
  26 -- >       6353   Number of units qualifier                     C  an..3
  27 --
  28 -- Dependencies: 'compositeC523'.
  29 segmentEQN :: Parser Value
  30 segmentEQN =
  31   segment "EQN"
  32     [ "010" .@ mandatory compositeC523
  33     ]