1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D01B.Simples.S4065
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > 4065 Contract and carriage condition code [B]
17 -- > Desc: Code to identify the conditions of contract and
23 -- > General conditions of transport 1983, latest revision
24 -- > laid down by the Stichting Vervoeradres The Hague.
26 -- > 2 Special agreement for parcels transport
27 -- > Appliance of a non published special agreement signed
28 -- > between a customer and the carrier (mandatory requested
29 -- > by the consignor) for parcels transport.
31 -- > 3 Special agreement for full loading transport
32 -- > Appliance of a non published special agreement signed
33 -- > between a customer and the carrier (mandatory requested
34 -- > by the consignor) for full load transport.
36 -- > 4 Combined transport
37 -- > A transport which involves more than one mode of
40 -- > 5 FIATA combined transport bill of lading
41 -- > Standard conditions of a combined transport bill of
42 -- > lading issued by FIATA.
44 -- > 6 Freight forwarders national conditions
45 -- > The contract and carriage conditions as established by
46 -- > freight forwarders on a national basis.
48 -- > 7 Normal tariff, parcels transport
49 -- > Appliance of the published legal tariff in case of
50 -- > parcels transport (required or not by the consignor.
52 -- > 8 Normal tariff, full loading transport
53 -- > Appliance of the published legal tariff in case of full
54 -- > load transport (required or not by the consignor).
57 -- > Carrier will choose the cheapest tariff in the legally
58 -- > published tariffs for parcels or full load transports
59 -- > (no tariff required by the consignor).
62 -- > The transport will only be port to port, no inland
63 -- > transport would have to be provided under the contract.
66 -- > Conditions in accordance with the convention of the
67 -- > contract for the international carriage of goods by
70 -- > 12 Special tariff, parcels transport
71 -- > Appliance of the legally published "special" tariff in
72 -- > case or parcels transport (tariff requested by the
75 -- > 13 Special tariff, full transport
76 -- > Appliance of the legally published "special tariff" in
77 -- > case of full load transport (tariff requested by the
80 -- > 14 Through transport
81 -- > The transport that is contracted not only from port to
82 -- > port, but from one inland location to another inland
85 -- > 15 Cancel space allocation
86 -- > Indication that space previously allocated on a flight
87 -- > is to be cancelled.
89 -- > 16 Report sale of space
90 -- > Indication that a sale has been made against a space
91 -- > allocation on a specific flight.
93 -- > 17 Alternative space allocation
94 -- > Indication that space is being requested for a specific
95 -- > flight and that an alternative is acceptable.
97 -- > 18 No alternative space allocation
98 -- > Indication that space is being requested for a specific
99 -- > flight and that an alternative is not acceptable.
101 -- > 19 Allotment sale
102 -- > Indication that space is being sold against a space
103 -- > allocation allotment on a specific flight.
105 -- > 20 Confirmation of space
106 -- > Indication that space requested has been confirmed on a
107 -- > specific flight.
109 -- > 21 Unable to confirm
110 -- > Indication that airline is unable to confirm the space
111 -- > allocation on a specific flight.
113 -- > 22 Non-operative flight
114 -- > Indication that airline is unable to confirm space on a
115 -- > specific flight since the flight does not operate.
118 -- > Indication that the space allocation request has been
119 -- > assigned to a wait list.
121 -- > 24 Prior space allocation request
122 -- > Indication that a space allocation on a specific flight
123 -- > has already been requested.
125 -- > 25 Holding confirmed space allocation
126 -- > Indication that space is being held as confirmed on a
127 -- > specific flight.
129 -- > 26 Holding wait list
130 -- > Indication that space allocation request on a specific
131 -- > flight has been assigned to a wait list.
134 -- > The carrier is responsible for the intermodal carriage
135 -- > of cargo including both the pre-carriage and the on-
139 -- > The carrier is responsible for the intermodal carriage
140 -- > of cargo including the pre-carriage, but excluding the
144 -- > The carrier is responsible for the intermodal carriage
145 -- > of cargo including the on-carriage, but excluding the
149 -- > The carrier of intermodal cargo is only responsible for
150 -- > the main carriage.
152 -- > 31 Space cancellation noted
153 -- > Indication that space previously allocated on a means of
154 -- > transport has been cancelled.
156 -- > 32 Mini landbridge service
157 -- > Cargo moving from a coastal port for delivery at an
158 -- > inland location or cargo received at an inland location
159 -- > moving to a coastal port for subsequent ocean
162 -- > 34 Speed level - required
163 -- > Maximum speed required on an itinerary or part of this
164 -- > itinerary to be able to assume some services.
166 -- > 35 Speed level - adopted
167 -- > Real speed used on an itinerary or part of this
168 -- > itinerary (for technical reasons, some limitation can be
169 -- > imposed or some higher speed could be used).
171 -- > 36 Normal tariff, less than full load transport
172 -- > Application of the published legal tariff in case of
173 -- > less than full load transport (required or not by the
176 -- > 37 Re-expedition special tariff
177 -- > Indication that a special tariff must be used in the
178 -- > case of a re-expedition.
180 -- > 38 Transport arrangement by the requester
181 -- > The service requester has the responsibility of making
182 -- > transport arrangement.
184 -- > 39 Transport arrangement by the provider
185 -- > The service provider has the responsibility of making
186 -- > transport arrangement.
188 -- > 40 Transport arrangement by the patient
189 -- > The patient has the responsibility of making transport
191 simple4065 :: Parser Value
192 simple4065 = simple "4065" (alphaNumeric `upTo` 3)