aboutsummaryrefslogtreecommitdiffhomepage
path: root/specification/src/Text/Edifact/D96A/Simples/S5243.hs
diff options
context:
space:
mode:
Diffstat (limited to 'specification/src/Text/Edifact/D96A/Simples/S5243.hs')
-rw-r--r--specification/src/Text/Edifact/D96A/Simples/S5243.hs46
1 files changed, 46 insertions, 0 deletions
diff --git a/specification/src/Text/Edifact/D96A/Simples/S5243.hs b/specification/src/Text/Edifact/D96A/Simples/S5243.hs
new file mode 100644
index 0000000..29bb1c9
--- /dev/null
+++ b/specification/src/Text/Edifact/D96A/Simples/S5243.hs
@@ -0,0 +1,46 @@
1{-# LANGUAGE OverloadedStrings #-}
2
3---- Machine generated code.
4---- Output of edi-parser-scaffolder
5
6module Text.Edifact.D96A.Simples.S5243
7 ( simple5243
8 ) where
9
10import Text.Edifact.Parsing
11import Text.Edifact.Types (Value)
12
13-- | Derived from this specification:
14--
15-- > * 5243 Rate/tariff class identification
16-- >
17-- > Desc: Identification of the rate/tariff class.
18-- >
19-- > Repr: an..9
20-- >
21-- > + A Senior person rate
22-- > Rate class applies to senior persons.
23-- > B Basic
24-- > Self explanatory.
25-- > C Specific commodity rate
26-- > Self explanatory.
27-- > + D Teenager rate
28-- > Rate class applies to teenagers.
29-- > + E Child rate
30-- > Rate class applies to children.
31-- > + F Adult rate
32-- > Rate class applies to adults.
33-- > K Rate per kilogram
34-- > Self explanatory.
35-- > M Minimum charge rate
36-- > Self explanatory.
37-- > N Normal rate
38-- > Self explanatory.
39-- > Q Quantity rate
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.
45simple5243 :: Parser Value
46simple5243 = simple "5243" (alphaNumeric `upTo` 9)