blob: d3b68188033a9d7373a52f215531091306ca266f (
plain) (
tree)
|
|
{-# LANGUAGE OverloadedStrings #-}
---- Machine generated code.
---- Output of edi-parser-scaffolder
module Text.Edifact.D96A.Simples.S4237
( simple4237
) where
import Text.Edifact.Parsing
import Text.Edifact.Types (Value)
-- | Derived from this specification:
--
-- > 4237 Prepaid/collect indicator, coded
-- >
-- > Desc: Code indicating whether freight item amount is prepaid or to
-- > be collected.
-- >
-- > Repr: an..3
-- >
-- > A Payable elsewhere
-- > Responsibility for payment of transport charges unknown
-- > at time of departure.
-- > B Third party to pay
-- > A third party to pay the freight bill is known at the
-- > time of shipment.
-- > C Collect
-- > Charges are (to be) collected from the consignee at the
-- > destination.
-- > P Prepaid
-- > Charges are (to be) prepaid before the transport actually
-- > leaves.
simple4237 :: Parser Value
simple4237 = simple "4237" (alphaNumeric `upTo` 3)
|