diff options
author | Frédéric Menou <frederic.menou@fretlink.com> | 2016-12-08 10:19:15 +0200 |
---|---|---|
committer | Ismaël Bouya <ismael.bouya@fretlink.com> | 2022-05-17 18:01:51 +0200 |
commit | a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7 (patch) | |
tree | adf3186fdccaeef19151026cdfbd38a530cf9ecb /specification/src/Text/Edifact/D96A/Simples/S3139.hs | |
download | edi-parser-a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7.tar.gz edi-parser-a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7.tar.zst edi-parser-a9d77a20008efe82862cc1adbfa7a6d4f09f8ff7.zip |
Diffstat (limited to 'specification/src/Text/Edifact/D96A/Simples/S3139.hs')
-rw-r--r-- | specification/src/Text/Edifact/D96A/Simples/S3139.hs | 246 |
1 files changed, 246 insertions, 0 deletions
diff --git a/specification/src/Text/Edifact/D96A/Simples/S3139.hs b/specification/src/Text/Edifact/D96A/Simples/S3139.hs new file mode 100644 index 0000000..50ffe3f --- /dev/null +++ b/specification/src/Text/Edifact/D96A/Simples/S3139.hs | |||
@@ -0,0 +1,246 @@ | |||
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) | ||