specification/src/Text/Edifact/D96A/Simples/S4343.hs

   1 {-# LANGUAGE OverloadedStrings #-}
   2
   3 ---- Machine generated code.
   4 ---- Output of edi-parser-scaffolder
   5
   6 module Text.Edifact.D96A.Simples.S4343
   7   ( simple4343
   8   ) where
   9
  10 import           Text.Edifact.Parsing
  11 import           Text.Edifact.Types   (Value)
  12
  13 -- | Derived from this specification:
  14 --
  15 -- > * 4343  Response type, coded
  16 -- >
  17 -- >   Desc: Code specifying the type of acknowledgement required or
  18 -- >         transmitted.
  19 -- >
  20 -- >   Repr: an..3
  21 -- >
  22 -- >    AA     Debit advice
  23 -- >              Receiver of the payment message needs to return a debit
  24 -- >              advice in response to the payment message.
  25 -- >    AB     Message acknowledgement
  26 -- >              Indicates that an acknowledge relating to receipt is
  27 -- >              required.
  28 -- >    AC     Acknowledge - with detail and change
  29 -- >              Acknowledge complete including changes.
  30 -- >    AD     Acknowledge - with detail, no change
  31 -- >              Acknowledge complete without changes.
  32 -- >    AF     Debit advice/message acknowledgement
  33 -- >              The sender wishes to receive both a Debit Advice and an
  34 -- >              acknowledgement of receipt for a payment message.
  35 -- >    AG     Authentication
  36 -- >              Authentication, by a party, of a document established for
  37 -- >              him by another party.
  38 -- > +  AI     Acknowledge only changes
  39 -- >              Acknowledgement of changes only is required.
  40 -- >    AP     Accepted
  41 -- >              Indication that the referenced offer or transaction
  42 -- >              (e.g., cargo booking or quotation request) has been
  43 -- >              accepted.
  44 -- >    CA     Conditionally accepted
  45 -- >              Indication that the referenced offer or transaction
  46 -- >              (e.g., cargo booking or quotation request) has been
  47 -- >              accepted under conditions indicated in this message.
  48 -- >    CO     Confirmation of measurements
  49 -- >              Indication that the message contains the physical
  50 -- >              measurements on which the charges will be based.
  51 -- > #  NA     No acknowledgement needed
  52 -- >              Self explanatory.
  53 -- >    RE     Rejected
  54 -- >              Indication that the referenced offer or transaction
  55 -- >              (e.g., cargo booking or quotation request) is not
  56 -- >              accepted.
  57 simple4343 :: Parser Value
  58 simple4343 = simple "4343" (alphaNumeric `upTo` 3)