1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S5125
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 5125 Price code qualifier [C]
17 -- > Desc: Code qualifying a price.
21 -- > AAA Calculation net
22 -- > The price stated is the net price including allowances/
23 -- > charges. Allowances/charges may be stated for
24 -- > information only.
26 -- > AAB Calculation gross
27 -- > The price stated is the gross price to which allowances/
28 -- > charges must be applied.
30 -- > AAC Allowances and charges not included, tax included
31 -- > The price does not include the allowances and charges,
32 -- > but includes the taxes.
34 -- > AAD Average selling price
35 -- > Average selling price of a product.
37 -- > AAE Information price, excluding allowances or charges,
39 -- > The price stated is for information purposes only and
40 -- > excludes all allowances and charges. Taxes however are
41 -- > included in the price.
43 -- > AAF Information price, excluding allowances or charges, and
45 -- > The price stated is for information purposes only and
46 -- > excludes all allowances, charges and taxes.
48 -- > AAG Additive unit price component
49 -- > A code to indicate that the price described is an
50 -- > additive component of the total price.
52 -- > CAL Calculation price
53 -- > The price stated is the price for the calculation of the
54 -- > line item amount.
57 -- > The price is provided for information.
59 -- > INV Invoice price
60 -- > Referenced price taken from an invoice.
61 simple5125 :: Parser Value
62 simple5125 = simple "5125" (alphaNumeric `upTo` 3)