1 {-# LANGUAGE OverloadedStrings #-}
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
6 module Text.Edifact.D96A.Simples.S1225
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
13 -- | Derived from this specification:
15 -- > * 1225 Message function, coded
17 -- > Desc: Code indicating the function of the message.
22 -- > Message cancelling a previous transmission for a given
25 -- > Message containing items (e.g. line items, goods items,
26 -- > Customs items, equipment items) to be added to a
27 -- > previously sent message.
29 -- > Message containing items (e.g. line items, goods items,
30 -- > Customs items, equipment items) to be deleted from a
31 -- > previously sent message.
33 -- > Message containing items (e.g. line items, goods items,
34 -- > Customs items, equipment items) to be changed in a
35 -- > previously sent message.
37 -- > Message replacing a previous message.
39 -- > Message confirming the details of a previous transmission
40 -- > where such confirmation is required or recommended under
41 -- > the terms of a trading partner agreement.
43 -- > The message is a duplicate of a previously generated
46 -- > Description to be provided.
48 -- > Initial transmission related to a given transaction.
50 -- > Message whose reference number is not filed.
52 -- > Message responding to a previous message or document.
54 -- > Message indicating that the referenced message was
55 -- > received but not yet processed.
57 -- > Self explanatory.
58 -- > 14 Advance notification
59 -- > Self explanatory.
61 -- > Repeated message transmission for reminding purposes.
63 -- > Message content is a proposal.
64 -- > 17 Cancel, to be reissued
65 -- > Referenced transaction cancelled, reissued message will
68 -- > New issue of a previous message (maybe cancelled).
69 -- > 19 Seller initiated change
70 -- > Change information submitted by buyer but initiated by
72 -- > 20 Replace heading section only
73 -- > Message to replace the heading of a previous message.
74 -- > 21 Replace item detail and summary only
75 -- > Message to replace item detail and summary of a previous
77 -- > 22 Final transmission
78 -- > Final message in a related series of messages together
79 -- > making up a commercial, administrative or transport
81 -- > 23 Transaction on hold
82 -- > Message not to be processed until further release
84 -- > 24 Delivery instruction
85 -- > Delivery schedule message only used to transmit short-
86 -- > term delivery instructions.
88 -- > Delivery schedule message only used to transmit long-term
89 -- > schedule information.
90 -- > 26 Delivery instruction and forecast
91 -- > Combination of codes '24' and '25'.
93 -- > Message to inform that the referenced message is not
94 -- > accepted by the recipient.
95 -- > 28 Accepted, with amendment in heading section
96 -- > Message accepted but amended in heading section.
97 -- > 29 Accepted without amendment
98 -- > Referenced message is entirely accepted.
99 -- > 30 Accepted, with amendment in detail section
100 -- > Referenced message is accepted but amended in detail
103 -- > Indicates that the message is a copy of an original
104 -- > message that has been sent, e.g. for action or
107 -- > A message releasing an existing referenced message for
108 -- > action to the receiver.
109 -- > 33 Change in heading section
110 -- > Message changing the referenced message heading section.
111 -- > 34 Accepted with amendment
112 -- > The referenced message is accepted but amended.
113 -- > 35 Retransmission
114 -- > Change-free transmission of a message previously sent.
115 -- > 36 Change in detail section
116 -- > Message changing referenced detail section.
117 -- > 37 Reversal of a debit
118 -- > Reversal of a previously posted debit.
119 -- > 38 Reversal of a credit
120 -- > Reversal of a previously posted credit.
121 -- > 39 Reversal for cancellation
122 -- > Description to be provided.
123 -- > 40 Request for deletion
124 -- > The message is given to inform the recipient to delete
125 -- > the referenced transaction.
126 -- > 41 Finishing/closing order
127 -- > Last of series of call-offs.
128 -- > 42 Confirmation via specific means
129 -- > Message confirming a transaction previously agreed via
130 -- > other means (e.g. phone).
131 -- > 43 Additional transmission
132 -- > Message already transmitted via another communication
133 -- > channel. This transmission is to provide electronically
134 -- > processable data only.
135 -- > 44 Accepted without reserves
136 -- > Message accepted without reserves.
137 -- > 45 Accepted with reserves
138 -- > Message accepted with reserves.
140 -- > Message content is provisional.
142 -- > Message content is definitive.
143 -- > 48 Accepted, contents rejected
144 -- > Message to inform that the previous message is received,
145 -- > but it cannot be processed due to regulations, laws, etc.
146 -- > 49 Settled dispute
147 -- > The reported dispute is settled.
149 -- > Message withdrawing a previously approved message.
150 -- > 51 Authorisation
151 -- > Message authorising a message or transaction(s).
152 -- > 52 Proposed amendment
153 -- > A code used to indicate an amendment suggested by the
156 -- > Code indicating the message is to be considered as a
159 -- > A subset of the original.
160 simple1225 :: Parser Value
161 simple1225 = simple "1225" (alphaNumeric `upTo` 3)