1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Composites.C174
17 import Text.Edifact.D01B.Simples (simple6152, simple6162, simple6314,
18 simple6411, simple6432)
20 import Text.Edifact.Parsing
21 import Text.Edifact.Types (Value)
23 -- | Derived from this specification:
27 -- > Desc: Measurement value and relevant minimum and maximum
28 -- > values of the measurement range.
30 -- > 010 6411 Measurement unit code M an..3
31 -- > 020 6314 Measurement value C an..18
32 -- > 030 6162 Range minimum value C n..18
33 -- > 040 6152 Range maximum value C n..18
34 -- > 050 6432 Significant digits quantity C n..2
36 -- Dependencies: 'simple6152', 'simple6162', 'simple6314', 'simple6411', 'simple6432'.
37 compositeC174 :: Parser Value
40 [ "010" .@ mandatory simple6411
41 , "020" .@ optional simple6314
42 , "030" .@ optional simple6162
43 , "040" .@ optional simple6152
44 , "050" .@ optional simple6432