1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
{-# LANGUAGE OverloadedStrings #-}
---- Machine generated code.
---- Output of edi-parser-scaffolder
module Text.Edifact.D01B.Simples.S8155
( simple8155
) where
import Text.Edifact.Parsing
import Text.Edifact.Types (Value)
-- | Derived from this specification:
--
-- > * 8155 Equipment size and type description code [B]
-- >
-- > Desc: Code specifying the size and type of equipment.
-- >
-- > Repr: an..10
-- >
-- > 1 Dime coated tank
-- > A tank coated with dime.
-- >
-- > 2 Epoxy coated tank
-- > A tank coated with epoxy.
-- >
-- > X 3 IMO1
-- > Description to be provided.
-- >
-- > Note:
-- > 1. This code value will be removed effective with
-- > directory D.04B.
-- >
-- > X 4 IMO2
-- > Description to be provided.
-- >
-- > Note:
-- > 1. This code value will be removed effective with
-- > directory D.04B.
-- >
-- > X 5 IMO3
-- > Description to be provided.
-- >
-- > Note:
-- > 1. This code value will be removed effective with
-- > directory D.04B.
-- >
-- > 6 Pressurized tank
-- > A tank capable of holding pressurized goods.
-- >
-- > 7 Refrigerated tank
-- > A tank capable of keeping goods refrigerated.
-- >
-- > X 8 Semi-refrigerated
-- > Self explanatory.
-- >
-- > Note:
-- > 1. This code value will be removed effective with
-- > directory D.04B.
-- >
-- > 9 Stainless steel tank
-- > A tank made of stainless steel.
-- >
-- > 10 Nonworking reefer container 40 ft
-- > A 40 foot refrigerated container that is not actively
-- > controlling temperature of the product.
-- >
-- > X 11 Box pallet
-- > Self explanatory.
-- >
-- > Note:
-- > 1. This code value will be removed effective with
-- > directory D.04B.
-- >
-- > 12 Europallet
-- > 80 x 120 cm.
-- >
-- > 13 Scandinavian pallet
-- > 100 x 120 cm.
-- >
-- > 14 Trailer
-- > Non self-propelled vehicle designed for the carriage of
-- > cargo so that it can be towed by a motor vehicle.
-- >
-- > 15 Nonworking reefer container 20 ft
-- > A 20 foot refrigerated container that is not actively
-- > controlling temperature of the product.
-- >
-- > 16 Exchangeable pallet
-- > Standard pallet exchangeable following international
-- > convention.
-- >
-- > 17 Semi-trailer
-- > Non self propelled vehicle without front wheels designed
-- > for the carriage of cargo and provided with a kingpin.
-- >
-- > 18 Tank container 20 feet
-- > A tank container with a length of 20 feet.
-- >
-- > 19 Tank container 30 feet
-- > A tank container with a length of 30 feet.
-- >
-- > 20 Tank container 40 feet
-- > A tank container with a length of 40 feet.
-- >
-- > 21 Container IC 20 feet
-- > A container owned by InterContainer, a European railway
-- > subsidiary, with a length of 20 feet.
-- >
-- > 22 Container IC 30 feet
-- > A container owned by InterContainer, a European railway
-- > subsidiary, with a length of 30 feet.
-- >
-- > 23 Container IC 40 feet
-- > A container owned by InterContainer, a European railway
-- > subsidiary, with a length of 40 feet.
-- >
-- > 24 Refrigerated tank 20 feet
-- > A refrigerated tank with a length of 20 feet.
-- >
-- > 25 Refrigerated tank 30 feet
-- > A refrigerated tank with a length of 30 feet.
-- >
-- > 26 Refrigerated tank 40 feet
-- > A refrigerated tank with a length of 40 feet.
-- >
-- > 27 Tank container IC 20 feet
-- > A tank container owned by InterContainer, a European
-- > railway subsidiary, with a length of 20 feet.
-- >
-- > 28 Tank container IC 30 feet
-- > A tank container owned by InterContainer, a European
-- > railway subsidiary, with a length of 30 feet.
-- >
-- > 29 Tank container IC 40 feet
-- > A tank container, owned by InterContainer, a European
-- > railway subsidiary, with a length of 40 feet.
-- >
-- > 30 Refrigerated tank IC 20 feet
-- > A refrigerated tank owned by InterContainer, a European
-- > railway subsidiary, with a length of 20 feet.
-- >
-- > 31 Temperature controlled container 30 ft.
-- > Temperature controlled container measuring 30 feet.
-- >
-- > 32 Refrigerated tank IC 40 feet
-- > A refrigerated tank owned by InterContainer, a European
-- > railway subsidiary, with a length of 40 feet.
-- >
-- > 33 Movable case: L < 6,15m
-- > A movable case with a length less than 6,15 metres.
-- >
-- > 34 Movable case: 6,15m < L < 7,82m
-- > A movable case with a length between 6,15 metres and
-- > 7,82 metres.
-- >
-- > 35 Movable case: 7,82m < L < 9,15m
-- > A movable case with a length between 7,82 metres and
-- > 9,15 metres.
-- >
-- > 36 Movable case: 9,15m < L < 10,90m
-- > A movable case with a length between 9,15 metres and
-- > 10,90 metres.
-- >
-- > 37 Movable case: 10,90m < L < 13,75m
-- > A movable case with a length between 10,90 metres and
-- > 13,75 metres.
-- >
-- > 38 Totebin
-- > A steel open top unit of about 1,5 * 1,5 * 2,5 meters
-- > for road transport of bulk cargo.
-- >
-- > 39 Temperature controlled container 20 ft
-- > Temperature controlled container measuring 20 feet.
-- >
-- > 40 Temperature controlled container 40 ft
-- > A temperature controlled container measuring 40 feet.
-- >
-- > 41 Non working refrigerated (reefer) container 30ft.
-- > A 30 foot refrigerated (reefer) container that is not
-- > actively cooling the product.
-- >
-- > 42 Dual trailers
-- > Two trailers linked together one behind another and
-- > pulled by one tractor.
-- >
-- > 43 20 ft IL container (open top)
-- > An open top container that is 20 feet in internal
-- > length.
-- >
-- > 44 20 ft IL container (closed top)
-- > A closed top container that is 20 feet in internal
-- > length.
-- >
-- > 45 40 ft IL container (closed top)
-- > A closed top container that is 40 feet in internal
-- > length.
simple8155 :: Parser Value
simple8155 = simple "8155" (alphaNumeric `upTo` 10)
|
