blob: 59e3f63a9f02c28c481e5db4f3c6960b193ab377 (
plain) (
tree)
|
|
{-# LANGUAGE OverloadedStrings #-}
---- Machine generated code.
---- Output of edi-parser-scaffolder
module Text.Edifact.D96A.Simples.S1229
( simple1229
) where
import Text.Edifact.Parsing
import Text.Edifact.Types (Value)
-- | Derived from this specification:
--
-- > * 1229 Action request/notification, coded
-- >
-- > Desc: Code specifying the action to be taken or already taken.
-- >
-- > Repr: an..3
-- >
-- > 1 Added
-- > This line item is added to the referenced message.
-- > 2 Deleted
-- > This line item is deleted from the referenced message.
-- > 3 Changed
-- > This line item is changed in the referenced message.
-- > 4 No action
-- > This line item is not affected by the actual message.
-- > 5 Accepted without amendment
-- > This line item is entirely accepted by the seller.
-- > 6 Accepted with amendment
-- > This line item is accepted but amended by the seller.
-- > 7 Not accepted
-- > This line item is not accepted by the seller.
-- > 8 Schedule only
-- > Self explanatory.
-- > 9 Amendments
-- > Self explanatory.
-- > 10 Not found
-- > This line item is not found in the referenced message.
-- > 11 Not amended
-- > This line is not amended by the buyer.
-- > 12 Line item numbers changed
-- > Self explanatory.
-- > 13 Buyer has deducted amount
-- > Buyer has deducted amount from payment.
-- > 14 Buyer claims against invoice
-- > Buyer has a claim against an outstanding invoice.
-- > 15 Charge back by seller
-- > Factor has been requested to charge back the outstanding
-- > item.
-- > 16 Seller will issue credit note
-- > Seller agrees to issue a credit note.
-- > 17 Terms changed for new terms
-- > New settlement terms have been agreed.
-- > 18 Abide outcome of negotiations
-- > Factor agrees to abide by the outcome of negotiations
-- > between seller and buyer.
-- > 19 Seller rejects dispute
-- > Seller does not accept validity of dispute.
-- > 20 Settlement
-- > The reported situation is settled.
-- > 21 No delivery
-- > Code indicating that no delivery will be required.
-- > 22 Call-off delivery
-- > A request for delivery of a particular quantity of goods
-- > to be delivered on a particular date (or within a
-- > particular period).
-- > 23 Proposed amendment
-- > A code used to indicate an amendment suggested by the
-- > sender.
-- > + 24 Accepted with amendment, no confirmation required
-- > Accepted with changes which require no confirmation.
simple1229 :: Parser Value
simple1229 = simple "1229" (alphaNumeric `upTo` 3)
|