]> git.immae.eu Git - github/fretlink/edi-parser.git/blob - specification/src/Text/Edifact/D96A/Simples/S8155.hs
Release code as open source
[github/fretlink/edi-parser.git] / specification / src / Text / Edifact / D96A / Simples / S8155.hs
1 {-# LANGUAGE OverloadedStrings #-}
2
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
5
6 module Text.Edifact.D96A.Simples.S8155
7 ( simple8155
8 ) where
9
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
12
13 -- | Derived from this specification:
14 --
15 -- > * 8155 Equipment size and type identification
16 -- >
17 -- > Desc: Coded description of the size and type of equipment e.g. unit
18 -- > load device.
19 -- >
20 -- > Repr: an..10
21 -- >
22 -- > 1 Dime coated tank
23 -- > Self explanatory.
24 -- > 2 Epoxy coated tank
25 -- > Self explanatory.
26 -- > 3 IMO1
27 -- > Description to be provided.
28 -- > 4 IMO2
29 -- > Description to be provided.
30 -- > 5 IMO3
31 -- > Description to be provided.
32 -- > 6 Pressurized tank
33 -- > Self explanatory.
34 -- > 7 Refrigerated tank
35 -- > Self explanatory.
36 -- > 8 Semi-refrigerated
37 -- > Self explanatory.
38 -- > 9 Stainless steel tank
39 -- > Self explanatory.
40 -- > 10 Nonworking reefer container 40 ft
41 -- > A 40 foot refrigerated container that is not actively
42 -- > controlling temperature of the product.
43 -- > 11 Box pallet
44 -- > Self explanatory.
45 -- > 12 Europallet
46 -- > 80 x 120 cm.
47 -- > 13 Scandinavian pallet
48 -- > 100 x 120 cm.
49 -- > 14 Trailer
50 -- > Non self-propelled vehicle designed for the carriage of
51 -- > cargo so that it can be towed by a motor vehicle.
52 -- > 15 Nonworking reefer container 20 ft
53 -- > A 20 foot refrigerated container that is not actively
54 -- > controlling temperature of the product.
55 -- > 16 Exchangeable pallet
56 -- > Standard pallet exchangeable following international
57 -- > convention.
58 -- > 17 Semi-trailer
59 -- > Non self propelled vehicle without fron twheels designed
60 -- > for the carriage of cargo and provided with a kingpin.
61 -- > 18 Tank container 20 ft.
62 -- > Self explanatory.
63 -- > 19 Tank container 30 ft.
64 -- > Self explanatory.
65 -- > 20 Tank container 40 ft.
66 -- > Self explanatory.
67 -- > 21 Container IC 20 ft.
68 -- > Self explanatory. IC = InterContainer (subsidiary company
69 -- > of the European railway, responsible for container
70 -- > traffic in a rail environment for special container
71 -- > handling).
72 -- > 22 Container IC 30 ft.
73 -- > Self explanatory.
74 -- > 23 Container IC 40 ft.
75 -- > Self explanatory.
76 -- > 24 Refrigerator tank 20 ft.
77 -- > Self explanatory.
78 -- > 25 Refrigerator tank 30 ft.
79 -- > Self explanatory.
80 -- > 26 Refrigerator tank 40 ft.
81 -- > Self explanatory.
82 -- > 27 Tank container IC 20 ft.
83 -- > Self explanatory.
84 -- > 28 Tank container IC 30 ft.
85 -- > Self explanatory.
86 -- > 29 Tank container IC 40 ft.
87 -- > Self explanatory.
88 -- > 30 Refrigerator tank IC 20 ft.
89 -- > Self explanatory.
90 -- > + 31 Temperature controlled container 30 ft.
91 -- > Temperature controlled container measuring 30 feet.
92 -- > 32 Refrigerator tank IC 40 ft.
93 -- > Self explanatory.
94 -- > 33 Movable case: L < 6,15m
95 -- > Self explanatory.
96 -- > 34 Movable case: 6,15m < L < 7,82m
97 -- > Self explanatory.
98 -- > 35 Movable case: 7,82m < L < 9,15m
99 -- > Self explanatory.
100 -- > 36 Movable case: 9,15m < L < 10,90m
101 -- > Self explanatory.
102 -- > 37 Movable case: 10,90m < L < 13,75m
103 -- > Self explanatory.
104 -- > 38 Totebin
105 -- > A steel open top unit of about 1,5 * 1,5 * 2,5 meters for
106 -- > road transport of bulk cargo.
107 -- > 39 Temperature controlled container 20 ft
108 -- > Temperature controlled container measuring 20 feet.
109 -- > 40 Temperature controlled container 40 ft
110 -- > A temperature controlled container measuring 40 feet.
111 -- > + 41 Non working refrigerated (reefer) container 30ft.
112 -- > A 30 foot refrigerated (reefer) container that is not
113 -- > actively cooling the product.
114 -- > + 42 Dual trailers
115 -- > Two trailers linked together one behind another and
116 -- > pulled by one tractor.
117 simple8155 :: Parser Value
118 simple8155 = simple "8155" (alphaNumeric `upTo` 10)