blob: 4f047a67aeabb64f30f3f9c424867dba0c597fb6 (
plain) (
tree)
|
|
{-# LANGUAGE OverloadedStrings #-}
---- Machine generated code.
---- Output of edi-parser-scaffolder
module Text.Edifact.D01B.Simples.S8249
( simple8249
) where
import Text.Edifact.Parsing
import Text.Edifact.Types (Value)
-- | Derived from this specification:
--
-- > 8249 Equipment status code [B]
-- >
-- > Desc: Code specifying the status of equipment.
-- >
-- > Repr: an..3
-- >
-- > 1 Continental
-- > The equipment is or will be moving across a continent on
-- > an intermodal or multimodal basis.
-- >
-- > 2 Export
-- > Transport equipment to be exported on a marine vessel.
-- >
-- > 3 Import
-- > Transport equipment to be imported on a marine vessel.
-- >
-- > 4 Remain on board
-- > Transport equipment arriving on a marine vessel is to
-- > remain on board.
-- >
-- > 5 Shifter
-- > Transport equipment is to be shifted from one stowage
-- > location on a marine vessel to another on the same
-- > vessel.
-- >
-- > 6 Transhipment
-- > Transport equipment is to be transferred from one marine
-- > vessel to another.
-- >
-- > 7 Shortlanded
-- > Transport equipment notified to arrive which did not
-- > arrive on the means of transport.
-- >
-- > 8 Overlanded
-- > Transport equipment not notified to arrive but which did
-- > arrive on the means of transport.
-- >
-- > 9 Domestic
-- > Transport equipment is used in domestic service.
-- >
-- > 10 Positioning
-- > Equipment is being transported for positioning purposes.
-- >
-- > 11 Delivery
-- > Equipment is being delivered.
-- >
-- > 12 Redelivery
-- > Equipment is being redelivered.
-- >
-- > 13 Repair
-- > The equipment is for repair.
-- >
-- > 14 Reloader
-- > Transport equipment to be discharged and subsequently
-- > reloaded on the same means of transport but in a
-- > different stowage location.
simple8249 :: Parser Value
simple8249 = simple "8249" (alphaNumeric `upTo` 3)
|