1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S5243
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 5243 Rate or tariff class description code [C]
17 -- > Desc: Code specifying an applicable rate or tariff class.
21 -- > A Senior person rate
22 -- > Rate class applies to senior persons.
25 -- > Code specifying that the rate or tariff is a basic one.
27 -- > C Specific commodity rate
28 -- > Code specifying the specific commodity rate.
31 -- > Rate class applies to teenagers.
34 -- > Rate class applies to children.
37 -- > Rate class applies to adults.
39 -- > K Rate per kilogram
40 -- > Code specifying the rate per kilogram.
42 -- > M Minimum charge rate
43 -- > Code specifying the minimum charge rate.
46 -- > Code specifying the normal rate.
49 -- > Code specifying the quantity rate.
51 -- > R Class rate (Reduction on normal rate)
52 -- > Code specifying the reduction on normal rate.
54 -- > S Class rate (Surcharge on normal rate)
55 -- > Code specifying the surcharge on normal rate.
56 simple5243 :: Parser Value
57 simple5243 = simple "5243" (alphaNumeric `upTo` 9)