1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Segments.CUX
15 import Text.Edifact.D01B.Composites (compositeC504)
16 import Text.Edifact.D01B.Simples (simple5402, simple6341)
18 import Text.Edifact.Parsing
19 import Text.Edifact.Types (Value)
21 -- | Derived from this specification:
25 -- > Function: To specify currencies used in the transaction
26 -- > and relevant details for the rate of exchange.
28 -- > 010 C504 CURRENCY DETAILS C 1
29 -- > 6347 Currency usage code qualifier M an..3
30 -- > 6345 Currency identification code C an..3
31 -- > 6343 Currency type code qualifier C an..3
32 -- > 6348 Currency rate value C n..4
34 -- > 020 C504 CURRENCY DETAILS C 1
35 -- > 6347 Currency usage code qualifier M an..3
36 -- > 6345 Currency identification code C an..3
37 -- > 6343 Currency type code qualifier C an..3
38 -- > 6348 Currency rate value C n..4
40 -- > 030 5402 CURRENCY EXCHANGE RATE C 1 n..12
42 -- > 040 6341 EXCHANGE RATE CURRENCY MARKET IDENTIFIER C 1 an..3
44 -- Dependencies: 'compositeC504', 'simple5402', 'simple6341'.
45 segmentCUX :: Parser Value
48 [ "010" .@ optional compositeC504
49 , "020" .@ optional compositeC504
50 , "030" .@ optional simple5402
51 , "040" .@ optional simple6341