[github/fretlink/edi-parser.git] / specification / src / Text / Edifact / D96A / Segments / EQN.hs

{-# LANGUAGE OverloadedStrings #-}

---- Machine generated code.
---- Output of edi-parser-scaffolder

module Text.Edifact.D96A.Segments.EQN
  ( -- * Definition
    segmentEQN
    -- * Dependencies
  , compositeC523
  ) where

import           Text.Edifact.D96A.Composites (compositeC523)

import           Text.Edifact.Parsing
import           Text.Edifact.Types           (Value)

-- | Derived from this specification:
--
-- >       EQN    NUMBER OF UNITS
-- >
-- >       Function: To specify the number of units.
-- >
-- > 010   C523  NUMBER OF UNIT DETAILS                         M
-- >       6350   Number of units                               C  n..15
-- >       6353   Number of units qualifier                     C  an..3
--
-- Dependencies: 'compositeC523'.
segmentEQN :: Parser Value
segmentEQN =
  segment "EQN"
    [ "010" .@ mandatory compositeC523
    ]
Commit	Line	Data
a9d77a20 FM	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	]