1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Composites.C208
13 import Text.Edifact.D96A.Simples (simple7402)
15 import Text.Edifact.Parsing
16 import Text.Edifact.Types (Value)
18 -- | Derived from this specification:
20 -- > C208 IDENTITY NUMBER RANGE
22 -- > Desc: Goods item identification numbers, start and end of
23 -- > consecutively numbered range.
25 -- > 010 7402 Identity number M an..35
26 -- > 020 7402 Identity number C an..35
28 -- Dependencies: 'simple7402'.
29 compositeC208 :: Parser Value
32 [ "010" .@ mandatory simple7402
33 , "020" .@ optional simple7402