1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S8051
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 8051 Transport stage code qualifier [B]
17 -- > Desc: Code qualifying a specific stage of transport.
21 -- > 1 Inland transport
22 -- > Transport by which goods are moved from or to the
23 -- > frontier, or between inland points.
25 -- > 2 At the statistical territory limit
26 -- > Point by which the means of transport are presumed to
27 -- > have left the statistical territory of despatch or to
28 -- > have entered the statistical territory of arrival.
30 -- > 10 Pre-carriage transport
31 -- > Transport by which the goods are moved prior to their
32 -- > main carriage transport.
35 -- > Transport by which goods are moved to the Customs
39 -- > Transport by which goods are moved from the place of
42 -- > 13 At destination
43 -- > Transport by which goods are moved at the place of
46 -- > 15 Main carriage - fourth carrier
47 -- > The fourth carrier of the ordered transport.
49 -- > 16 Main carriage - fifth carrier
50 -- > The fifth carrier of the ordered transport.
52 -- > 17 Main carriage - sixth carrier
53 -- > The sixth carrier of the ordered transport.
55 -- > 18 Main carriage - seventh carrier
56 -- > The seventh carrier of the ordered transport.
58 -- > 19 Main carriage - eighth carrier
59 -- > The eighth carrier of the ordered transport.
61 -- > 20 Main-carriage transport
62 -- > The primary stage in the movement of cargo from the
63 -- > point of origin to the intended destination.
65 -- > 21 Main carriage - first carrier
66 -- > The first carrier of the ordered transport when more
67 -- > than one carrier is involved.
69 -- > 22 Main carriage - second carrier
70 -- > The second carrier of the ordered transport when more
71 -- > than one carrier is involved.
73 -- > 23 Main carriage - third carrier
74 -- > The third carrier of the ordered transport when more
75 -- > than one carrier is involved.
77 -- > 24 Inland waterway transport
78 -- > Transport by which goods are moved via an inland body of
81 -- > 25 Delivery carrier all transport
82 -- > Carrier responsible from the point of origin to the
83 -- > final delivery destination.
85 -- > 26 Second pre-carriage transport
86 -- > Second transport by which the goods are moved prior to
87 -- > their main carriage transport.
89 -- > 27 Pre-acceptance transport
90 -- > The transport by which the goods are moved to the place
93 -- > 28 Second on-carriage transport
94 -- > Second transport by which the goods are moved after the
95 -- > main carriage transport.
97 -- > 29 Main carriage - ninth carrier
98 -- > The ninth carrier of the ordered transport.
100 -- > 30 On-carriage transport
101 -- > Transport by which the goods are moved after the main
102 -- > carriage transport.
104 -- > 31 Main carriage - tenth carrier
105 -- > The tenth carrier of the ordered transport.
107 -- > 32 Main carriage - eleventh carrier
108 -- > The eleventh carrier of the ordered transport.
110 -- > 33 Main carriage - twelfth carrier
111 -- > The twelfth carrier of the ordered transport.
112 simple8051 :: Parser Value
113 simple8051 = simple "8051" (alphaNumeric `upTo` 3)