1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Composites.C186
15 import Text.Edifact.D96A.Simples (simple6060, simple6063, simple6411)
17 import Text.Edifact.Parsing
18 import Text.Edifact.Types (Value)
20 -- | Derived from this specification:
22 -- > C186 QUANTITY DETAILS
24 -- > Desc: Quantity information in a transaction, qualified when
27 -- > 010 6063 Quantity qualifier M an..3
28 -- > 020 6060 Quantity M n..15
29 -- > 030 6411 Measure unit qualifier C an..3
31 -- Dependencies: 'simple6060', 'simple6063', 'simple6411'.
32 compositeC186 :: Parser Value
35 [ "010" .@ mandatory simple6063
36 , "020" .@ mandatory simple6060
37 , "030" .@ optional simple6411