1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Composites.C211
16 import Text.Edifact.D01B.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
29 -- > 010 6411 Measurement unit code M an..3
30 -- > 020 6168 Length dimension value C n..15
31 -- > 030 6140 Width dimension value C n..15
32 -- > 040 6008 Height dimension value C n..15
34 -- Dependencies: 'simple6008', 'simple6140', 'simple6168', 'simple6411'.
35 compositeC211 :: Parser Value
38 [ "010" .@ mandatory simple6411
39 , "020" .@ optional simple6168
40 , "030" .@ optional simple6140
41 , "040" .@ optional simple6008