1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Simples.S5243
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > * 5243 Rate/tariff class identification
17 -- > Desc: Identification of the rate/tariff class.
21 -- > + A Senior person rate
22 -- > Rate class applies to senior persons.
24 -- > Self explanatory.
25 -- > C Specific commodity rate
26 -- > Self explanatory.
27 -- > + D Teenager rate
28 -- > Rate class applies to teenagers.
30 -- > Rate class applies to children.
32 -- > Rate class applies to adults.
33 -- > K Rate per kilogram
34 -- > Self explanatory.
35 -- > M Minimum charge rate
36 -- > Self explanatory.
38 -- > Self explanatory.
40 -- > Self explanatory.
41 -- > R Class rate (Reduction on normal rate)
42 -- > Description to be provided.
43 -- > S Class rate (Surcharge on normal rate)
44 -- > Description to be provided.
45 simple5243 :: Parser Value
46 simple5243 = simple "5243" (alphaNumeric `upTo` 9)