1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Segments.PRI
14 import Text.Edifact.D96A.Composites (compositeC509)
15 import Text.Edifact.D96A.Simples (simple5213)
17 import Text.Edifact.Parsing
18 import Text.Edifact.Types (Value)
20 -- | Derived from this specification:
22 -- > PRI PRICE DETAILS
24 -- > Function: To specify price information.
26 -- > 010 C509 PRICE INFORMATION C
27 -- > 5125 Price qualifier M an..3
28 -- > 5118 Price C n..15
29 -- > 5375 Price type, coded C an..3
30 -- > 5387 Price type qualifier C an..3
31 -- > 5284 Unit price basis C n..9
32 -- > 6411 Measure unit qualifier C an..3
34 -- > 020 5213 SUB-LINE PRICE CHANGE, CODED C an..3
36 -- Dependencies: 'compositeC509', 'simple5213'.
37 segmentPRI :: Parser Value
40 [ "010" .@ optional compositeC509
41 , "020" .@ optional simple5213