1 PACKAGE JMF_GTA_CONC_PROG AS
2 ----$Header: JMFCCPGS.pls 120.5.12010000.2 2008/11/17 14:26:27 dwang ship $
3 --+===========================================================================+
4 --| Copyright (c) 2005 Oracle Corporation |
5 --| Redwood Shores, California, USA |
6 --| All rights reserved. |
7 --+===========================================================================+
8 --| |
9 --| FILENAME : |
10 --| JMFCCPGS.pls |
11 --| |
12 --| DESCRIPTION: |
13 --| This package is the a collection of procedures which |
14 --| called by concurrent programs |
15 --| |
16 --| |
17 --| HISTORY: |
18 --| 20-APR-2005: Jim Zheng Create |
19 --| 08-MAY-2005: Qiang Li |
20 --| 20-MAY-2005: Jogen Hu add Import_GT_invoices |
21 --| Transfer_Invoices_to_GT |
22 --| Transfer_Trxs_from_workbench |
23 --| 13-Jun-2005: Donghai Wang add procedure Discrepancy_Report |
24 --| and Item_Export |
25 --| 01-Jul-2005: Jim Zheng Update after code review, |
26 --| chang parameter type. |
27 --| 28-Sep-2005: Jogen Hu change Transfer_Invoices_to_GT |
28 --| 18-Oct-2005: Donghai Wang Update 'Transrfer_Invoices_To_GT' |
29 --| procedure to adjust order of |
30 --| paramerts |
31 --| 30-Nov-2005: Qiang Li change set_of_books_id to ledger_id in |
32 --| purge program |
33 --| 18-Jun-2007: Yanping Wang Modify g_module_prefix to use small case|
34 --| of jmf |
35 --+===========================================================================+
36
37 --Declare global variable for package name
38 g_module_prefix VARCHAR2(100) := 'jmf.plsql.JMF_GTA_CONC_PROC';
39
40 --==========================================================================
41 -- PROCEDURE NAME:
42 --
43 -- Transfer_AR_Transactions Public
44 --
45 -- DESCRIPTION:
46 --
47 -- This procedure is the main program for transfer program.
48 --
49 -- PARAMETERS:
50 -- In: p_transfer_id Transfer rule id
51 -- p_customer_num_from Customer number from
52 -- p_customer_num_to Customer number to
53 -- p_customer_name_from Customer name from
54 -- p_customer_name_to Customer name to
55 -- p_gl_period GL period
56 -- p_gl_date_from GL date from
57 -- p_gl_date_to GL date to
58 -- p_trx_batch_from Batch number from
59 -- p_trx_batch_to Batch number to
60 -- p_trx_number_from Trx number from
61 -- p_trx_number_to Trx number to
62 -- p_trx_date_from Trx date from
63 -- p_trx_date_to Trx date to
64 -- p_doc_num_from Doc number from
65 -- p_doc_num_to Doc number to
66 -- Out: errbuf
67 -- retcode
68 --
69 -- DESIGN REFERENCES:
70 -- GTA-TRANSFER-PROGRAM-TD.doc
71 --
72 -- CHANGE HISTORY:
73 --
74 -- 05-MAY-2005: Jim.Zheng Created
75 --
76 --===========================================================================
77 PROCEDURE transfer_ar_transactions
78 (errbuf OUT NOCOPY VARCHAR2
79 ,retcode OUT NOCOPY VARCHAR2
80 ,p_transfer_id IN VARCHAR2
81 ,p_customer_num_from IN VARCHAR2
82 ,p_customer_num_to IN VARCHAR2
83 ,p_customer_name_from IN VARCHAR2
84 ,p_customer_name_to IN VARCHAR2
85 ,p_gl_period IN VARCHAR2
86 ,p_gl_date_from IN VARCHAR2
87 ,p_gl_date_to IN VARCHAR2
88 ,p_trx_batch_from IN VARCHAR2
89 ,p_trx_batch_to IN VARCHAR2
90 ,p_trx_number_from IN VARCHAR2
91 ,p_trx_number_to IN VARCHAR2
92 ,p_trx_date_from IN VARCHAR2
93 ,p_trx_date_to IN VARCHAR2
94 ,p_doc_num_from IN NUMBER
95 ,p_doc_num_to IN NUMBER
96 );
97
98 --==========================================================================
99 -- PROCEDURE NAME:
100 --
101 -- Purge_Invoice Public
102 --
103 -- DESCRIPTION:
104 --
105 -- This procedure is the main program for purge program,
106 -- it search eligible records in GTA invoice tables first,
107 -- if find any, then invoke corresponding table handlers to
108 -- remove these records from db.
109 --
110 -- PARAMETERS:
111 -- In: p_set_of_books_id Accounting book identifier
112 -- p_customer_name Customer name
113 -- p_gl_date_from GL date low range
114 -- p_gl_date_to GL date high range
115 --
116 -- Out: errbuf
117 -- retcode
118 --
119 -- DESIGN REFERENCES:
120 -- GTA-PURGE-PROGRAM-TD.doc
121 --
122 -- CHANGE HISTORY:
123 --
124 -- 8-MAY-2005: Qiang Li Created.
125 -- 30-Nov-2005: Qiang Li change set_of_books_id to ledger_id
126 --
127 --===========================================================================
128 PROCEDURE purge_invoice
129 (errbuf OUT NOCOPY VARCHAR2
130 ,retcode OUT NOCOPY VARCHAR2
131 ,p_ledger_id IN NUMBER
132 ,p_customer_name IN VARCHAR2
133 ,p_gl_date_from IN VARCHAR2
134 ,p_gl_date_to IN VARCHAR2
135 );
136
137 --==========================================================================
138 -- PROCEDURE NAME:
139 --
140 -- Run_AR_GT_Mapping Public
141 --
142 -- DESCRIPTION:
143 --
144 -- This Concurrent program Generate Mapping Report Data
145 --
146 -- PARAMETERS:
147 -- In: p_fp_tax_reg_num First Party Tax Registration Number
148 -- p_trx_source Transaction source,GT or AR
149 -- P_Customer_Id Customer id
150 -- p_gt_inv_num_from GT Invoice Number low range
151 -- p_gt_inv_num_to GT Invoice Number high range
152 -- p_gt_inv_date_from GT Invoice Date low range
153 -- p_gt_inv_date_to GT Invoice Date high range
154 -- p_ar_inv_num_from AR Invoice Number low range
155 -- p_ar_inv_num_to AR Invoice Number high range
156 -- p_ar_inv_date_from AR Invoice Date low range
157 -- p_ar_inv_date_to AR Invoice Date high range
158 --
159 -- Out: errbuf
160 -- retcode
161 --
162 -- DESIGN REFERENCES:
163 -- GTA_REPORTS_TD.doc
164 --
165 -- CHANGE HISTORY:
166 --
167 -- 8-MAY-2005: Qiang Li Created.
168 -- 27-Sep-2005:Qiang Li Add a new parameter fp_tax_reg_number.
169 --
170 --===========================================================================
171 PROCEDURE run_ar_gt_mapping
172 (errbuf OUT NOCOPY VARCHAR2
173 ,retcode OUT NOCOPY VARCHAR2
174 ,p_fp_tax_reg_num IN VARCHAR2
175 ,p_trx_source IN NUMBER
176 ,p_customer_id IN VARCHAR2
177 ,p_gt_inv_num_from IN VARCHAR2
178 ,p_gt_inv_num_to IN VARCHAR2
179 ,p_gt_inv_date_from IN VARCHAR2
180 ,p_gt_inv_date_to IN VARCHAR2
181 ,p_ar_inv_num_from IN VARCHAR2
182 ,p_ar_inv_num_to IN VARCHAR2
183 ,p_ar_inv_date_from IN VARCHAR2
184 ,p_ar_inv_date_to IN VARCHAR2
185 );
186
187 --==========================================================================
188 -- PROCEDURE NAME:
189 --
190 -- Import_GT_Invoices Public
191 --
192 -- DESCRIPTION:
193 --
194 -- This procedure is program of SRS concurrent for import
195 -- flat file exported from Golden Tax system
196 --
197 -- PARAMETERS:
198 -- In:
199 --
200 -- Out: errbuf
201 -- retcode
202 --
203 -- DESIGN REFERENCES:
204 -- GTA-Txt-Interface-TD.doc
205 --
206 -- CHANGE HISTORY:
207 --
208 -- 20-MAY-2005: Jogen Hu Created
209 --
210 --===========================================================================
211 PROCEDURE import_gt_invoices
212 (errbuf OUT NOCOPY VARCHAR2
213 ,retcode OUT NOCOPY VARCHAR2
214 );
215
216 --==========================================================================
217 -- PROCEDURE NAME:
218 --
219 -- Transfer_Invoices_to_GT Public
220 --
221 -- DESCRIPTION:
222 --
223 -- This procedure is a SRS concurrent program which exports GTA
224 -- invoices to the flat file Its output will be printed on concurrent
225 -- output and will be save as flat file by users.
226 --
227 -- PARAMETERS:
228 -- In: p_regeneration IN VARCHAR2
229 -- p_new_batch_dummy IN VARCHAR2
230 -- p_regeneration_dummy IN VARCHAR2
231 -- p_fp_tax_reg_num IN VARCHAR2
232 -- p_transfer_rule_id IN NUMBER
233 -- p_batch_number IN VARCHAR2
234 -- p_customer_id_from_number IN NUMBER
235 -- p_customer_id_from_name IN NUMBER
236 -- p_cust_id_from_taxpayer IN NUMBER
237 -- p_ar_trx_num_from IN VARCHAR2
238 -- p_ar_trx_num_to IN VARCHAR2
239 -- p_ar_trx_date_from IN VARCHAR2
240 -- p_ar_trx_date_to IN VARCHAR2
241 -- p_ar_trx_gl_date_from IN VARCHAR2
242 -- p_ar_trx_gl_date_to IN VARCHAR2
243 -- p_ar_trx_batch_from IN VARCHAR2
244 -- p_ar_trx_batch_to IN VARCHAR2
245 -- p_trx_class IN VARCHAR2
246 -- p_batch_id IN VARCHAR2
247 -- p_invoice_type IN VARCHAR2
248 --
249 -- Out: errbuf
250 -- retcode
251 --
252 -- DESIGN REFERENCES:
253 -- GTA-Txt-Interface-TD.doc
254 --
255 -- CHANGE HISTORY:
256 --
257 -- 20-MAY-2005: Jogen Hu Created
258 -- 28-Sep-2005: Jogen Hu add a parameter
259 -- p_fp_tax_reg_num IN VARCHAR2
260 -- 18-Oct-2005: Donghai Wang move the parameter 'p_fp_tax_reg_num'
261 -- behind the parameter 'p_regeneration_dummy'
262 --===========================================================================
263 PROCEDURE transfer_invoices_to_gt
264 (errbuf OUT NOCOPY VARCHAR2
265 ,retcode OUT NOCOPY VARCHAR2
266 ,p_regeneration IN VARCHAR2
267 ,p_new_batch_dummy IN VARCHAR2
268 ,p_regeneration_dummy IN VARCHAR2
269 ,p_fp_tax_reg_num IN VARCHAR2
270 ,p_transfer_rule_id IN NUMBER
271 ,p_batch_number IN VARCHAR2
272 ,p_customer_id_from_number IN NUMBER
273 ,p_customer_id_from_name IN NUMBER
274 ,p_cust_id_from_taxpayer IN NUMBER
275 ,p_ar_trx_num_from IN VARCHAR2
276 ,p_ar_trx_num_to IN VARCHAR2
277 ,p_ar_trx_date_from IN VARCHAR2
278 ,p_ar_trx_date_to IN VARCHAR2
279 ,p_ar_trx_gl_date_from IN VARCHAR2
280 ,p_ar_trx_gl_date_to IN VARCHAR2
281 ,p_ar_trx_batch_from IN VARCHAR2
282 ,p_ar_trx_batch_to IN VARCHAR2
283 ,p_trx_class IN VARCHAR2
284 ,p_batch_id IN VARCHAR2
285 ,p_invoice_type IN VARCHAR2
286 );
287
288 --==========================================================================
289 -- PROCEDURE NAME:
290 --
291 -- Export_Invoices_from_Workbench Public
292 --
293 -- DESCRIPTION:
294 --
295 -- This procedure is a SRS concurrent program which exports VAT
296 -- invoices from GTA to flat file and is invoked in workbench
297 --
298 -- PARAMETERS:
299 -- In: p_org_id IN NUMBER
300 -- p_generator_ID IN NUMBER
301 -- p_batch_number IN VARCHAR2
302 --
303 -- Out: errbuf
304 -- retcode
305 --
306 -- DESIGN REFERENCES:
307 -- GTA-Txt-Interface-TD.doc
308 --
309 -- CHANGE HISTORY:
310 --
311 -- 20-MAY-2005: Jogen Hu Created
312 --
313 --==========================================================================
314 PROCEDURE transfer_trxs_from_workbench
315 (errbuf OUT NOCOPY VARCHAR2
316 ,retcode OUT NOCOPY VARCHAR2
317 ,p_org_id IN NUMBER
318 ,p_generator_id IN NUMBER
319 ,p_batch_number IN VARCHAR2
320 );
321
322 --==========================================================================
323 -- PROCEDURE NAME:
324 --
325 -- Discrepancy_Report Public
326 --
327 -- DESCRIPTION:
328 --
329 -- This procedure is called by concurren program 'Golden Tax
330 -- Discrepancy Report' to generte discrepancy report.
331 --
332 -- PARAMETERS:
333 -- In: p_gta_batch_num_from GTA invoice batch number low range
334 -- p_gta_batch_num_to GTA invoice batch number high range
335 -- p_ar_transaction_type AR transaction type
336 -- p_cust_num_from Customer number low range
337 -- p_cust_num_to Customer number high range
338 -- p_cust_name_id Identifier of customer
339 -- p_gl_period GL period name
340 -- p_gl_date_from GL date low range
341 -- p_gl_date_to GL date high range
342 -- p_ar_trx_batch_from AR transaction batch name low range
343 -- p_ar_trx_batch_to AR transaction batch name high range
344 -- P_ar_trx_num_from AR transaction number low range
345 -- P_ar_trx_num_to AR transaction number high range
346 -- p_ar_trx_date_from AR transaction date low range
347 -- p_ar_trx_date_to AR transaction date high range
348 -- p_ar_doc_num_from AR document sequnce number low range
349 -- p_ar_doc_num_to AR document sequnce number high range
350 -- p_original_curr_code Original currency code
351 -- p_primary_sales Identifier of primary salesperson
352 --
353 -- Out: errbuf
354 -- retcode
355 --
356 -- DESIGN REFERENCES:
357 -- GTA_REPORTS_TD.doc
358 --
359 -- CHANGE HISTORY:
360 --
361 -- 13-Jun-2005: Donghai Wang Created
362 --
363 --==========================================================================
364 PROCEDURE discrepancy_report
365 (errbuf OUT NOCOPY VARCHAR2
366 ,retcode OUT NOCOPY VARCHAR2
367 ,p_gta_batch_num_from IN VARCHAR2
368 ,p_gta_batch_num_to IN VARCHAR2
369 ,p_ar_transaction_type IN NUMBER
370 ,p_cust_num_from IN VARCHAR2
371 ,p_cust_num_to IN VARCHAR2
372 ,p_cust_name_id IN NUMBER
373 ,p_gl_period IN VARCHAR2
374 ,p_gl_date_from IN VARCHAR2
375 ,p_gl_date_to IN VARCHAR2
376 ,p_ar_trx_batch_from IN VARCHAR2
377 ,p_ar_trx_batch_to IN VARCHAR2
378 ,p_ar_trx_num_from IN VARCHAR2
379 ,p_ar_trx_num_to IN VARCHAR2
380 ,p_ar_trx_date_from IN VARCHAR2
381 ,p_ar_trx_date_to IN VARCHAR2
382 ,p_ar_doc_num_from IN VARCHAR2
383 ,p_ar_doc_num_to IN VARCHAR2
384 ,p_original_curr_code IN VARCHAR2
385 ,p_primary_sales IN NUMBER
386 );
387
388 --==========================================================================
389 -- PROCEDURE NAME:
390 --
391 -- Item_Export Public
392 --
393 -- DESCRIPTION:
394 --
395 -- This procedure is to export item information to a flat file
396 --
397 -- PARAMETERS:
398 -- In: p_master_org_id Identifier of INV master organization
399 -- p_item_num_from Item number low range
400 -- p_item_num_to Item number high range
401 -- p_category_set_id Identifier of item category set
402 -- p_category_structure_id Structure id of item category
403 -- p_item_category_from Item category low range
404 -- p_item_category_to Item category high range
405 -- p_item_name_source Source to deciede where item name is gotten
406 -- p_dummy Dummy parameter
407 -- p_cross_reference_type Cross reference
408 -- p_item_status Status of an item
409 -- p_creation_date_from Item creation date low range
410 -- p_creation_date_to Item creation date high range
411 --
412 -- Out: errbuf
413 -- retcode
414 --
415 -- DESIGN REFERENCES:
416 -- GTA-Txt-Interface-TD.doc
417 --
418 -- CHANGE HISTORY:
419 --
420 -- 13-Jun-2005: Donghai Wang Created
421 --
422 --==========================================================================
423 PROCEDURE item_export
424 (errbuf OUT NOCOPY VARCHAR2
425 ,retcode OUT NOCOPY VARCHAR2
426 ,p_master_org_id IN NUMBER
427 ,p_item_num_from IN VARCHAR2
428 ,p_item_num_to IN VARCHAR2
429 ,p_category_set_id IN NUMBER
430 ,p_category_structure_id IN NUMBER
431 ,p_item_category_from IN VARCHAR2
432 ,p_item_category_to IN VARCHAR2
433 ,p_item_name_source IN VARCHAR2
434 ,p_dummy IN VARCHAR2
435 ,p_cross_reference_type IN VARCHAR2
436 ,p_item_status IN VARCHAR2
437 ,p_creation_date_from IN VARCHAR2
438 ,p_creation_date_to IN VARCHAR2
439 );
440
441 --==========================================================================
442 -- PROCEDURE NAME:
443 --
444 -- Transfer_Customers_To_GT Public
445 --
446 -- DESCRIPTION:
447 --
448 -- This procedure convert AR customers information into a flat file
449 --
450 -- PARAMETERS:
451 -- In: p_customer_num_from IN VARCHAR2
452 -- p_customer_num_to IN VARCHAR2
453 -- p_customer_name_from IN VARCHAR2
454 -- p_customer_name_to IN VARCHAR2
455 -- p_taxpayee_id IN VARCHAR2
456 -- p_creation_date_from IN VARCHAR2
457 -- p_creation_date_to IN VARCHAR2
458 --
459 -- Out: errbuf
460 -- retcode
461 --
462 -- DESIGN REFERENCES:
463 -- GTA-Txt-Interface-TD.doc
464 --
465 -- CHANGE HISTORY:
466 --
467 -- 20-MAY-2005: Jim.Zheng Created.
468 -- 26_Jun-005 Jim Zheng update , chanage the Date parameter to Varchar2
469 --==========================================================================
470 PROCEDURE transfer_customers_to_gt
471 (errbuf OUT NOCOPY VARCHAR2
472 ,retcode OUT NOCOPY VARCHAR2
473 ,p_customer_num_from IN VARCHAR2
474 ,p_customer_num_to IN VARCHAR2
475 ,p_customer_name_from IN VARCHAR2
476 ,p_customer_name_to IN VARCHAR2
477 --,p_taxpayee_id IN VARCHAR2
478 ,p_creation_date_from IN VARCHAR2
479 ,p_creation_date_to IN VARCHAR2
480 );
481
482 END JMF_GTA_CONC_PROG;
483