1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Composites.C211
16 import Text.Edifact.D96A.Simples (simple6008, simple6140, simple6168,
19 import Text.Edifact.Parsing
20 import Text.Edifact.Types (Value)
22 -- | Derived from this specification:
26 -- > Desc: Specification of the dimensions of a transportable unit.
28 -- > 010 6411 Measure unit qualifier M an..3
29 -- > 020 6168 Length dimension C n..15
30 -- > 030 6140 Width dimension C n..15
31 -- > 040 6008 Height dimension C n..15
33 -- Dependencies: 'simple6008', 'simple6140', 'simple6168', 'simple6411'.
34 compositeC211 :: Parser Value
37 [ "010" .@ mandatory simple6411
38 , "020" .@ optional simple6168
39 , "030" .@ optional simple6140
40 , "040" .@ optional simple6008