specification/src/Text/Edifact/D01B/Simples/S4215.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D01B.Simples.S4215
   7   ( simple4215
   8   ) where
   9
  10 import           Text.Edifact.Parsing
  11 import           Text.Edifact.Types   (Value)
  12
  13 -- | Derived from this specification:
  14 --
  15 -- >      4215  Transport charges payment method code                   [B]
  16 -- >
  17 -- >      Desc: Code specifying the payment method for transport
  18 -- >            charges.
  19 -- >
  20 -- >      Repr: an..3
  21 -- >
  22 -- >      A     Account
  23 -- >               The charges are to be charged to an account.
  24 -- >
  25 -- >      AA    Cash on delivery service charge paid by consignor
  26 -- >               An indication that the consignor is responsible for the
  27 -- >               payment of the cash on delivery service charge.
  28 -- >
  29 -- >      AB    Cash on delivery service charge paid by consignee
  30 -- >               An indication that the consignee is responsible for the
  31 -- >               payment of the cash on delivery service charge.
  32 -- >
  33 -- >      AC    Insurance costs paid by consignor
  34 -- >               An indication that the consignor is responsible for the
  35 -- >               payment of the insurance costs.
  36 -- >
  37 -- >      AD    Insurance costs paid by consignee
  38 -- >               An indication that the consignee is responsible for the
  39 -- >               payment of the insurance costs.
  40 -- >
  41 -- >      CA    Advance collect
  42 -- >               The amount of freight or other charge on a shipment
  43 -- >               advanced by one transportation line to another or to the
  44 -- >               shipper, to be collected from consignee.
  45 -- >
  46 -- >      CC    Collect
  47 -- >               A shipment on which freight charges will be paid by
  48 -- >               consignee.
  49 -- >
  50 -- >      CF    Collect, freight credited to payment customer
  51 -- >               The freight is collect but has been paid by the shipper
  52 -- >               and will be credited to that party.
  53 -- >
  54 -- >      DF    Defined by buyer and seller
  55 -- >               The payment method for transport charges have been
  56 -- >               defined by the buyer and seller.
  57 -- >
  58 -- >      FO    FOB port of call
  59 -- >               Title and control of goods pass to the buyer at port of
  60 -- >               call. Responsibility for export taxes and cost of
  61 -- >               documents for overseas shipments have not been
  62 -- >               specified.
  63 -- >
  64 -- >      IC    Information copy, no payment due
  65 -- >               Transaction set has been provided for information only.
  66 -- >
  67 -- >      MX    Mixed
  68 -- >               The consignment is partially collect and partially
  69 -- >               prepaid.
  70 -- >
  71 -- >      NC    Service freight, no charge
  72 -- >               The consignment is shipped on a service basis and there
  73 -- >               is no freight charge.
  74 -- >
  75 -- >      NS    Not specified
  76 -- >               The payment method for transport charges have not been
  77 -- >               specified.
  78 -- >
  79 -- >      PA    Advance prepaid
  80 -- >               Costs have been paid in advance.
  81 -- >
  82 -- >      PB    Customer pick-up/backhaul
  83 -- >               Buyer's private carriage picks up the goods as a return
  84 -- >               load to the buyer's facility.
  85 -- >
  86 -- >      PC    Prepaid but charged to customer
  87 -- >               shipping charges have been paid in advance of shipment
  88 -- >               but are charged back to consignee usually as line item
  89 -- >               on invoice for the purchased goods.
  90 -- >
  91 -- >      PE    Payable elsewhere
  92 -- >               Place of payment not known at the begin of conveyance.
  93 -- >
  94 -- >      PO    Prepaid only
  95 -- >               Payment in advance of freight and/or other charges prior
  96 -- >               to delivery of shipment at destination, usually by
  97 -- >               shipper at point of origin.
  98 -- >
  99 -- >      PP    Prepaid (by seller)
 100 -- >               Seller of goods makes payment to carrier for freight
 101 -- >               charges prior to shipment.
 102 -- >
 103 -- >      PU    Pickup
 104 -- >               Customer is responsible for payment of pickup charges at
 105 -- >               shipping point.
 106 -- >
 107 -- >      RC    Return container freight paid by customer
 108 -- >               The freight for returning the container is paid by the
 109 -- >               customer.
 110 -- >
 111 -- >      RF    Return container freight free
 112 -- >               There is no freight charge for returning the container.
 113 -- >
 114 -- >      RS    Return container freight paid by supplier
 115 -- >               The freight charge for returning the container is paid
 116 -- >               by the supplier.
 117 -- >
 118 -- >      TP    Third party pay
 119 -- >               A third party, someone other than buyer or seller, is
 120 -- >               identified as responsible for payment of shipping
 121 -- >               charges.
 122 -- >
 123 -- >      WC    Weight condition
 124 -- >               The payment method for transport charges are due to the
 125 -- >               weight.
 126 -- >
 127 -- >      WD    Paid by supplier
 128 -- >               Transport charges will be paid by the supplier.
 129 -- >
 130 -- >      WE    Paid by buyer
 131 -- >               Transport charges will be paid by the buyer.
 132 -- >
 133 -- >      ZZZ   Mutually defined
 134 -- >               A code assigned within a code list to be used on an
 135 -- >               interim basis and as defined among trading partners
 136 -- >               until a precise code can be assigned to the code list.
 137 simple4215 :: Parser Value
 138 simple4215 = simple "4215" (alphaNumeric `upTo` 3)