]> git.immae.eu Git - github/fretlink/edi-parser.git/blob - specification/src/Text/Edifact/D96A/Simples/S3139.hs
Release code as open source
[github/fretlink/edi-parser.git] / specification / src / Text / Edifact / D96A / Simples / S3139.hs
1 {-# LANGUAGE OverloadedStrings #-}
2
3 ---- Machine generated code.
4 ---- Output of edi-parser-scaffolder
5
6 module Text.Edifact.D96A.Simples.S3139
7 ( simple3139
8 ) where
9
10 import Text.Edifact.Parsing
11 import Text.Edifact.Types (Value)
12
13 -- | Derived from this specification:
14 --
15 -- > 3139 Contact function, coded
16 -- >
17 -- > Desc: Code specifying the function of a contact (e.g. department or
18 -- > person).
19 -- >
20 -- > Repr: an..3
21 -- >
22 -- > AA Insurance contact
23 -- > Department/person to contact for matters regarding
24 -- > insurance.
25 -- > AB Workshop contact
26 -- > Department/person to contact for matters regarding the
27 -- > workshop.
28 -- > AC Accepting contact
29 -- > Department/person in charge of accepting incoming goods.
30 -- > AD Accounting contact
31 -- > Department/person responsible for the accounts payable
32 -- > function within a corporation.
33 -- > AE Contract contact
34 -- > Department/person to contact for matters regarding
35 -- > contracts.
36 -- > AF Land registry contact
37 -- > Department/person to contact for matters regarding land
38 -- > registry.
39 -- > AG Agent
40 -- > Department/person of the agent which acts on behalf of
41 -- > another party.
42 -- > AH Coordination contact
43 -- > Department/person to contact for matters regarding
44 -- > technical coordination of works.
45 -- > AI Project management contact
46 -- > Department/person to contact for matters regarding
47 -- > project management on behalf of the contractor.
48 -- > AJ Investment contact
49 -- > Department/person to contact for matters regarding
50 -- > investments.
51 -- > AK Works management contact
52 -- > Department/person to contact for matters regarding
53 -- > management of works on behalf of the owner.
54 -- > AL Personnel contact
55 -- > Department/person to contact for matters regarding
56 -- > personnel (human resources).
57 -- > AM Claims contact
58 -- > Department/person to contact for matters regarding
59 -- > claims.
60 -- > AN Laboratory contact
61 -- > Department/person to contact for laboratory matters.
62 -- > AO Plant/equipment contact
63 -- > Department/person to contact for matters regarding
64 -- > plant/equipment.
65 -- > AP Accounts payable contact
66 -- > Department/person responsible for the accounts payable
67 -- > function within a corporation.
68 -- > AQ Quantity surveyor contact
69 -- > Department/person to contact for matters regarding
70 -- > quantity surveying.
71 -- > AR Accounts receivable contact
72 -- > Department/person responsible for the accounts receivable
73 -- > within a corporation.
74 -- > AS Public relations contact
75 -- > Department/person to contact for matters regarding public
76 -- > relations.
77 -- > AT Technical contact
78 -- > Department/person to contact for matters regarding
79 -- > technical issues.
80 -- > AU City works authority contact
81 -- > Department/person to contact for matters regarding city
82 -- > works.
83 -- > AV Maintenance contact
84 -- > Department/person to contact for matters regarding
85 -- > maintenance.
86 -- > AW Town planning contact
87 -- > Department/person to contact for matters regarding town `
88 -- > planning.
89 -- > AX Traffic authority contact
90 -- > Department/person to contact for matters regarding
91 -- > traffic.
92 -- > AY Electricity supply contact
93 -- > Department/person to contact for matters regarding
94 -- > electricity supply.
95 -- > AZ Gas supply contact
96 -- > Department/person to contact for matters regarding gas
97 -- > supply.
98 -- > BA Water supply contact
99 -- > Department/person to contact for matters regarding water
100 -- > supply.
101 -- > BB Telecommunications network contact
102 -- > Department/person to contact for matters regarding
103 -- > telecommunications network.
104 -- > BC Banking contact
105 -- > Contact person for bank.
106 -- > BD New developments contact
107 -- > Department/person to contact for matters regarding new
108 -- > developments (e.g. construction).
109 -- > BE Transport infrastructure authority
110 -- > Department/person to contact for matters regarding
111 -- > transport infrastructure.
112 -- > BF Service contact
113 -- > Department/person to be contacted in service matters.
114 -- > BU Ultimate consignee
115 -- > Department/designated on the invoice or packing list as
116 -- > the final recipient of the stated merchandise.
117 -- > CA Carrier
118 -- > (3126) Party undertaking or arranging transport of goods
119 -- > between named points.
120 -- > CB Changed by
121 -- > Person who made the change.
122 -- > CC Responsible person for information production
123 -- > Responsible person to contact for matters regarding the
124 -- > production of information.
125 -- > CD Responsible person for information dissemination
126 -- > Responsible person to contact for matters regarding
127 -- > information dissemination.
128 -- > CE Head of unit for computer data processing
129 -- > Head of unit to contact for matters regarding computer
130 -- > data processing.
131 -- > CF Head of unit for information production
132 -- > Head of unit to contact for matters regarding the
133 -- > production of information.
134 -- > CG Head of unit for information dissemination
135 -- > Head of unit to contact for matters regarding
136 -- > dissemination of information.
137 -- > CN Consignee
138 -- > (3132) Party to which goods are consigned.
139 -- > CO Consignor
140 -- > (3336) Party which, by contract with a carrier, consigns
141 -- > or sends goods with the carrier, or has them conveyed by
142 -- > him. Synonym: shipper/sender.
143 -- > CP Responsible person for computer data processing
144 -- > Responsible person to contact for matters regarding
145 -- > computer data processing.
146 -- > CR Customer relations
147 -- > Individual responsible for customer relations.
148 -- > CW Confirmed with
149 -- > Person with whom the contents of the purchase order has
150 -- > been discussed and agreed (e.g. by telephone) prior to
151 -- > the sending of this message.
152 -- > DE Department/employee to execute export procedures
153 -- > Self explanatory.
154 -- > DI Department/employee to execute import procedures
155 -- > Self explanatory.
156 -- > DL Delivery contact
157 -- > Department/person responsible for delivery.
158 -- > EB Entered by
159 -- > Name of an individual who made the entry.
160 -- > EC Education coordinator
161 -- > Person in charge of coordination of education.
162 -- > ED Engineering contact
163 -- > Department/person to contact for matters regarding
164 -- > engineering.
165 -- > EX Expeditor
166 -- > Party to be contacted where goods are (to be) expedited.
167 -- > GR Goods receiving contact
168 -- > Department/person responsible for receiving the goods at
169 -- > the place of delivery.
170 -- > HE Emergency dangerous goods contact
171 -- > Party who is to be contacted to intervene in case of
172 -- > emergency.
173 -- > HG Dangerous goods contact
174 -- > Department/person to be contacted for details about the
175 -- > transportation of dangerous goods/hazardous material.
176 -- > HM Hazardous material contact
177 -- > Department/person responsible for hazardous material
178 -- > control.
179 -- > IC Information contact
180 -- > Department/person to contact for questions regarding
181 -- > transactions.
182 -- > IN Insurer contact
183 -- > Self explanatory.
184 -- > LB Place of delivery contact
185 -- > Self explanatory.
186 -- > LO Place of collection contact
187 -- > Self explanatory.
188 -- > MC Material control contact
189 -- > Department/person responsible for the
190 -- > controlling/inspection of goods.
191 -- > MD Material disposition contact
192 -- > Department/person responsible for the
193 -- > disposition/scheduling of goods.
194 -- > MH Material handling contact
195 -- > Self explanatory.
196 -- > MR Message recipient contact
197 -- > Self explanatory.
198 -- > MS Message sender contact
199 -- > Self explanatory.
200 -- > NT Notification contact
201 -- > Self explanatory.
202 -- > OC Order contact
203 -- > An individual to contact for questions regarding this
204 -- > order.
205 -- > PA Prototype coordinator
206 -- > Description to be provided.
207 -- > PD Purchasing contact
208 -- > Department/person responsible for issuing this purchase
209 -- > order.
210 -- > PE Payee contact
211 -- > Self explanatory.
212 -- > PM Product management contact
213 -- > Department/person to contact for questions regarding this
214 -- > order.
215 -- > QA Quality assurance contact
216 -- > Quality assurance contact within an organization.
217 -- > QC Quality coordinator contact
218 -- > Quality coordinator contact within an organization.
219 -- > RD Receiving dock contact
220 -- > The receiving dock contact within an organization.
221 -- > SA Sales administration
222 -- > Name of the sales administration contact within a
223 -- > corporation.
224 -- > SC Schedule contact
225 -- > Name of the scheduling contact within a corporation.
226 -- > SD Shipping contact
227 -- > The shipping department contact within an organization.
228 -- > SR Sales representative or department
229 -- > The sales representative or department contact within an
230 -- > organization.
231 -- > SU Supplier contact
232 -- > Department/person to be contacted at the supplier.
233 -- > TA Traffic administrator
234 -- > The traffic administrator contact within an organization.
235 -- > TD Test contact
236 -- > Department/person responsible for testing contact.
237 -- > TI Technical documentation recipient
238 -- > Department/person to receive technical documentation.
239 -- > TR Transport contact
240 -- > Department/person in charge of transportation.
241 -- > WH Warehouse
242 -- > The warehouse contact within an organization.
243 -- > ZZZ Mutually defined
244 -- > Self explanatory.
245 simple3139 :: Parser Value
246 simple3139 = simple "3139" (alphaNumeric `upTo` 3)