[Home] [Help]
PACKAGE BODY: APPS.ARP_CT_PKG
Source
1 PACKAGE BODY ARP_CT_PKG AS
2 /* $Header: ARTITRXB.pls 120.18.12010000.3 2008/09/04 12:25:19 dgaurab ship $ */
3
4 /*---------------------------------------------------------------+
5 | Package global variables to hold the parsed update cursors. |
6 | This allows the cursors to be reused without being reparsed. |
7 +---------------------------------------------------------------*/
8
9 /*--------------------------------------------------------+
10 | Dummy constants for use in update and lock operations |
11 +--------------------------------------------------------*/
12 AR_TEXT_DUMMY CONSTANT VARCHAR2(10) := '~~!@#$*&^';
13 AR_FLAG_DUMMY CONSTANT VARCHAR2(10) := '~';
14 AR_NUMBER_DUMMY CONSTANT NUMBER(15) := -999999999999999;
15 AR_DATE_DUMMY CONSTANT DATE := to_date(1, 'J');
16
17 pg_cursor1 integer := '';
18
19 /*-------------------------------------+
20 | WHO column values from FND_GLOBAL |
21 +-------------------------------------*/
22
23 pg_user_id number;
24 pg_conc_login_id number;
25 pg_login_id number;
26 pg_prog_appl_id number;
27 pg_conc_program_id number;
28
29
30 /*==========================================================================+
31 | PROCEDURE |
32 | bind_trx_variables |
33 | |
34 | DESCRIPTION |
35 | Binds variables from the record variable to the bind variables |
36 | in the dynamic SQL update statement. |
37 | |
38 | SCOPE - PRIVATE |
39 | |
40 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
41 | dbms_sql.bind_variable |
42 | arp_util.debug |
43 | |
44 | ARGUMENTS : IN: |
45 | p_update_cursor - ID of the update cursor |
46 | p_trx_rec - ra_customer_trx record |
47 | OUT: |
48 | None |
49 | |
50 | RETURNS : NONE |
51 | |
52 | NOTES |
53 | |
54 | MODIFICATION HISTORY |
55 | 06-JUN-95 Charlie Tomberg Created |
56 | |
57 | 20-MAR-2000 J Rautiainen Added BR project related columns |
58 | BR_AMOUNT, BR_UNPAID_FLAG,BR_ON_HOLD_FLAG, |
59 | DRAWEE_ID, DRAWEE_CONTACT_ID, |
60 | DRAWEE_SITE_USE_ID, DRAWEE_BANK_ACCOUNT_ID, |
61 | REMITTANCE_BANK_ACCOUNT_ID, |
62 | OVERRIDE_REMIT_ACCOUNT_FLAG and |
63 | SPECIAL_INSTRUCTIONSinto table handlers |
64 | 24-JUL-2000 J Rautiainen Added BR project related column |
65 | REMITTANCE_BATCH_ID |
66 | |
67 | 31-OCT-2000 Y Rakotonirainy Bug 1243304 : Added columns |
68 | address_verification_code and |
69 | approval_code and |
70 | bill_to_address_id and |
71 | edi_processed_flag and |
72 | edi_processed_status and |
73 | payment_server_order_num and |
74 | post_request_id and |
75 | request_id and |
76 | ship_to_address_id |
77 | wh_update_date |
78 | into the table handlers. |
79 | 20-Jun-2002 Sahana Bug2427456 : Added global attribute columns |
80 +===========================================================================*/
81
82
83 PROCEDURE bind_trx_variables(p_update_cursor IN integer,
84 p_trx_rec IN ra_customer_trx%rowtype) IS
85
86 BEGIN
87
88 arp_util.debug('arp_ct_pkg.bind_trx_variables()+');
89
90 /*------------------+
91 | Dummy constants |
92 +------------------*/
93
94 dbms_sql.bind_variable(p_update_cursor, ':ar_text_dummy',
95 AR_TEXT_DUMMY);
96
97 dbms_sql.bind_variable(p_update_cursor, ':ar_flag_dummy',
98 AR_FLAG_DUMMY);
99
100 dbms_sql.bind_variable(p_update_cursor, ':ar_number_dummy',
101 AR_NUMBER_DUMMY);
102
103 dbms_sql.bind_variable(p_update_cursor, ':ar_date_dummy',
104 AR_DATE_DUMMY);
105
106
107 /*------------------+
108 | WHO variables |
109 +------------------*/
110
111 dbms_sql.bind_variable(p_update_cursor, ':pg_user_id',
112 pg_user_id);
113
114 dbms_sql.bind_variable(p_update_cursor, ':pg_login_id',
115 pg_login_id);
116
117 dbms_sql.bind_variable(p_update_cursor, ':pg_conc_login_id',
118 pg_conc_login_id);
119
120
121 /*----------------------------------------------+
122 | Bind variables for all columns in the table |
123 +----------------------------------------------*/
124
125
126 dbms_sql.bind_variable(p_update_cursor, ':customer_trx_id',
127 p_trx_rec.customer_trx_id);
128
129 dbms_sql.bind_variable(p_update_cursor, ':trx_number',
130 p_trx_rec.trx_number);
131
132 dbms_sql.bind_variable(p_update_cursor, ':created_by',
133 p_trx_rec.created_by);
134
135 dbms_sql.bind_variable(p_update_cursor, ':creation_date',
136 p_trx_rec.creation_date);
137
138 dbms_sql.bind_variable(p_update_cursor, ':last_updated_by',
139 p_trx_rec.last_updated_by);
140
141 dbms_sql.bind_variable(p_update_cursor, ':last_update_date',
142 p_trx_rec.last_update_date);
143
144 dbms_sql.bind_variable(p_update_cursor, ':last_update_login',
145 p_trx_rec.last_update_login);
146
147 dbms_sql.bind_variable(p_update_cursor, ':set_of_books_id',
148 p_trx_rec.set_of_books_id);
149
150 dbms_sql.bind_variable(p_update_cursor, ':program_application_id',
151 p_trx_rec.program_application_id);
152
153 dbms_sql.bind_variable(p_update_cursor, ':program_id',
154 p_trx_rec.program_id);
155
156 dbms_sql.bind_variable(p_update_cursor, ':program_update_date',
157 p_trx_rec.program_update_date);
158
159 dbms_sql.bind_variable(p_update_cursor, ':posting_control_id',
160 p_trx_rec.posting_control_id);
161
162 dbms_sql.bind_variable(p_update_cursor, ':ra_post_loop_number',
163 p_trx_rec.ra_post_loop_number);
164
165 dbms_sql.bind_variable(p_update_cursor, ':complete_flag',
166 p_trx_rec.complete_flag);
167
168 dbms_sql.bind_variable(p_update_cursor, ':initial_customer_trx_id',
169 p_trx_rec.initial_customer_trx_id);
170
171 dbms_sql.bind_variable(p_update_cursor, ':previous_customer_trx_id',
172 p_trx_rec.previous_customer_trx_id);
173
174 dbms_sql.bind_variable(p_update_cursor, ':related_customer_trx_id',
175 p_trx_rec.related_customer_trx_id);
176
177 dbms_sql.bind_variable(p_update_cursor, ':recurred_from_trx_number',
178 p_trx_rec.recurred_from_trx_number);
179
180 dbms_sql.bind_variable(p_update_cursor, ':cust_trx_type_id',
181 p_trx_rec.cust_trx_type_id);
182
183 dbms_sql.bind_variable(p_update_cursor, ':batch_id',
184 p_trx_rec.batch_id);
185
186 dbms_sql.bind_variable(p_update_cursor, ':batch_source_id',
187 p_trx_rec.batch_source_id);
188
189 dbms_sql.bind_variable(p_update_cursor, ':agreement_id',
190 p_trx_rec.agreement_id);
191
192 dbms_sql.bind_variable(p_update_cursor, ':trx_date',
193 p_trx_rec.trx_date);
194
195 dbms_sql.bind_variable(p_update_cursor, ':bill_to_customer_id',
196 p_trx_rec.bill_to_customer_id);
197
198 dbms_sql.bind_variable(p_update_cursor, ':bill_to_contact_id',
199 p_trx_rec.bill_to_contact_id);
200
201 dbms_sql.bind_variable(p_update_cursor, ':bill_to_site_use_id',
202 p_trx_rec.bill_to_site_use_id);
203
204 dbms_sql.bind_variable(p_update_cursor, ':ship_to_customer_id',
205 p_trx_rec.ship_to_customer_id);
206
207 dbms_sql.bind_variable(p_update_cursor, ':ship_to_contact_id',
208 p_trx_rec.ship_to_contact_id);
209
210 dbms_sql.bind_variable(p_update_cursor, ':ship_to_site_use_id',
211 p_trx_rec.ship_to_site_use_id);
212
213 dbms_sql.bind_variable(p_update_cursor, ':sold_to_customer_id',
214 p_trx_rec.sold_to_customer_id);
215
216 dbms_sql.bind_variable(p_update_cursor, ':sold_to_site_use_id',
217 p_trx_rec.sold_to_site_use_id);
218
219 dbms_sql.bind_variable(p_update_cursor, ':sold_to_contact_id',
220 p_trx_rec.sold_to_contact_id);
221
222 dbms_sql.bind_variable(p_update_cursor, ':customer_reference',
223 p_trx_rec.customer_reference);
224
225 dbms_sql.bind_variable(p_update_cursor, ':customer_reference_date',
226 p_trx_rec.customer_reference_date);
227
228 dbms_sql.bind_variable(p_update_cursor, ':credit_method_for_installments',
229 p_trx_rec.credit_method_for_installments);
230
231 dbms_sql.bind_variable(p_update_cursor, ':credit_method_for_rules',
232 p_trx_rec.credit_method_for_rules);
233
234 dbms_sql.bind_variable(p_update_cursor, ':start_date_commitment',
235 p_trx_rec.start_date_commitment);
236
237 dbms_sql.bind_variable(p_update_cursor, ':end_date_commitment',
238 p_trx_rec.end_date_commitment);
239
240 dbms_sql.bind_variable(p_update_cursor, ':exchange_date',
241 p_trx_rec.exchange_date);
242
243 dbms_sql.bind_variable(p_update_cursor, ':exchange_rate',
244 p_trx_rec.exchange_rate);
245
246 dbms_sql.bind_variable(p_update_cursor, ':exchange_rate_type',
247 p_trx_rec.exchange_rate_type);
248
249 dbms_sql.bind_variable(p_update_cursor, ':customer_bank_account_id',
250 p_trx_rec.customer_bank_account_id);
251
252 dbms_sql.bind_variable(p_update_cursor, ':finance_charges',
253 p_trx_rec.finance_charges);
254
255 dbms_sql.bind_variable(p_update_cursor, ':fob_point',
256 p_trx_rec.fob_point);
257
258 dbms_sql.bind_variable(p_update_cursor, ':comments',
259 p_trx_rec.comments);
260
261 dbms_sql.bind_variable(p_update_cursor, ':internal_notes',
262 p_trx_rec.internal_notes);
263
264 dbms_sql.bind_variable(p_update_cursor, ':invoice_currency_code',
265 p_trx_rec.invoice_currency_code);
266
267 dbms_sql.bind_variable(p_update_cursor, ':invoicing_rule_id',
268 p_trx_rec.invoicing_rule_id);
269
270 dbms_sql.bind_variable(p_update_cursor, ':last_printed_sequence_num',
271 p_trx_rec.last_printed_sequence_num);
272
273 dbms_sql.bind_variable(p_update_cursor, ':orig_system_batch_name',
274 p_trx_rec.orig_system_batch_name);
275
276 dbms_sql.bind_variable(p_update_cursor, ':primary_salesrep_id',
277 p_trx_rec.primary_salesrep_id);
278
279 dbms_sql.bind_variable(p_update_cursor, ':printing_count',
280 p_trx_rec.printing_count);
281
282 dbms_sql.bind_variable(p_update_cursor, ':printing_last_printed',
283 p_trx_rec.printing_last_printed);
284
285 dbms_sql.bind_variable(p_update_cursor, ':printing_option',
286 p_trx_rec.printing_option);
287
288 dbms_sql.bind_variable(p_update_cursor, ':printing_original_date',
289 p_trx_rec.printing_original_date);
290
291 dbms_sql.bind_variable(p_update_cursor, ':printing_pending',
292 p_trx_rec.printing_pending);
293
294 dbms_sql.bind_variable(p_update_cursor, ':purchase_order',
295 p_trx_rec.purchase_order);
296
297 dbms_sql.bind_variable(p_update_cursor, ':purchase_order_date',
298 p_trx_rec.purchase_order_date);
299
300 dbms_sql.bind_variable(p_update_cursor, ':purchase_order_revision',
301 p_trx_rec.purchase_order_revision);
302
303 dbms_sql.bind_variable(p_update_cursor, ':receipt_method_id',
304 p_trx_rec.receipt_method_id);
305
306 dbms_sql.bind_variable(p_update_cursor, ':remit_to_address_id',
307 p_trx_rec.remit_to_address_id);
308
309 dbms_sql.bind_variable(p_update_cursor, ':shipment_id',
310 p_trx_rec.shipment_id);
311
312 dbms_sql.bind_variable(p_update_cursor, ':ship_date_actual',
313 p_trx_rec.ship_date_actual);
314
315 dbms_sql.bind_variable(p_update_cursor, ':ship_via',
316 p_trx_rec.ship_via);
317
318 dbms_sql.bind_variable(p_update_cursor, ':term_due_date',
319 p_trx_rec.term_due_date);
320
321 dbms_sql.bind_variable(p_update_cursor, ':term_id',
322 p_trx_rec.term_id);
323
324 dbms_sql.bind_variable(p_update_cursor, ':territory_id',
325 p_trx_rec.territory_id);
326
327 dbms_sql.bind_variable(p_update_cursor, ':waybill_number',
328 p_trx_rec.waybill_number);
329
330 dbms_sql.bind_variable(p_update_cursor, ':status_trx',
331 p_trx_rec.status_trx);
332
333 dbms_sql.bind_variable(p_update_cursor, ':reason_code',
334 p_trx_rec.reason_code);
335
336 dbms_sql.bind_variable(p_update_cursor, ':doc_sequence_id',
337 p_trx_rec.doc_sequence_id);
338
339 dbms_sql.bind_variable(p_update_cursor, ':doc_sequence_value',
340 p_trx_rec.doc_sequence_value);
341
342 dbms_sql.bind_variable(p_update_cursor, ':paying_customer_id',
343 p_trx_rec.paying_customer_id);
344
345 dbms_sql.bind_variable(p_update_cursor, ':paying_site_use_id',
346 p_trx_rec.paying_site_use_id);
347
348 dbms_sql.bind_variable(p_update_cursor, ':related_batch_source_id',
349 p_trx_rec.related_batch_source_id);
350
351 dbms_sql.bind_variable(p_update_cursor, ':default_tax_exempt_flag',
352 p_trx_rec.default_tax_exempt_flag);
353
354 dbms_sql.bind_variable(p_update_cursor, ':created_from',
355 p_trx_rec.created_from);
356
357 dbms_sql.bind_variable(p_update_cursor, ':default_ussgl_trx_code_context',
358 p_trx_rec.default_ussgl_trx_code_context);
359
360 dbms_sql.bind_variable(p_update_cursor, ':default_ussgl_transaction_code',
361 p_trx_rec.default_ussgl_transaction_code);
362
363 dbms_sql.bind_variable(p_update_cursor, ':old_trx_number',
364 p_trx_rec.old_trx_number);
365
366 dbms_sql.bind_variable(p_update_cursor, ':interface_header_context',
367 p_trx_rec.interface_header_context);
368
369 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute1',
370 p_trx_rec.interface_header_attribute1);
371
372 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute2',
373 p_trx_rec.interface_header_attribute2);
374
375 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute3',
376 p_trx_rec.interface_header_attribute3);
377
378 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute4',
379 p_trx_rec.interface_header_attribute4);
380
381 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute5',
382 p_trx_rec.interface_header_attribute5);
383
384 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute6',
385 p_trx_rec.interface_header_attribute6);
386
387 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute7',
388 p_trx_rec.interface_header_attribute7);
389
390 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute8',
391 p_trx_rec.interface_header_attribute8);
392
393 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute9',
394 p_trx_rec.interface_header_attribute9);
395
396 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute10',
397 p_trx_rec.interface_header_attribute10);
398
399 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute11',
400 p_trx_rec.interface_header_attribute11);
401
402 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute12',
403 p_trx_rec.interface_header_attribute12);
404
405 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute13',
406 p_trx_rec.interface_header_attribute13);
407
408 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute14',
409 p_trx_rec.interface_header_attribute14);
410
411 dbms_sql.bind_variable(p_update_cursor, ':interface_header_attribute15',
412 p_trx_rec.interface_header_attribute15);
413
414 dbms_sql.bind_variable(p_update_cursor, ':attribute_category',
415 p_trx_rec.attribute_category);
416
417 dbms_sql.bind_variable(p_update_cursor, ':attribute1',
418 p_trx_rec.attribute1);
419
420 dbms_sql.bind_variable(p_update_cursor, ':attribute2',
421 p_trx_rec.attribute2);
422
423 dbms_sql.bind_variable(p_update_cursor, ':attribute3',
424 p_trx_rec.attribute3);
425
426 dbms_sql.bind_variable(p_update_cursor, ':attribute4',
427 p_trx_rec.attribute4);
428
429 dbms_sql.bind_variable(p_update_cursor, ':attribute5',
430 p_trx_rec.attribute5);
431
432 dbms_sql.bind_variable(p_update_cursor, ':attribute6',
433 p_trx_rec.attribute6);
434
435 dbms_sql.bind_variable(p_update_cursor, ':attribute7',
436 p_trx_rec.attribute7);
437
438 dbms_sql.bind_variable(p_update_cursor, ':attribute8',
439 p_trx_rec.attribute8);
440
441 dbms_sql.bind_variable(p_update_cursor, ':attribute9',
442 p_trx_rec.attribute9);
443
444 dbms_sql.bind_variable(p_update_cursor, ':attribute10',
445 p_trx_rec.attribute10);
446
447 dbms_sql.bind_variable(p_update_cursor, ':attribute11',
448 p_trx_rec.attribute11);
449
450 dbms_sql.bind_variable(p_update_cursor, ':attribute12',
451 p_trx_rec.attribute12);
452
453 dbms_sql.bind_variable(p_update_cursor, ':attribute13',
454 p_trx_rec.attribute13);
455
456 dbms_sql.bind_variable(p_update_cursor, ':attribute14',
457 p_trx_rec.attribute14);
458
459 dbms_sql.bind_variable(p_update_cursor, ':attribute15',
460 p_trx_rec.attribute15);
461
462 dbms_sql.bind_variable(p_update_cursor, ':br_amount',
463 p_trx_rec.br_amount);
464
465 dbms_sql.bind_variable(p_update_cursor, ':br_unpaid_flag',
466 p_trx_rec.br_unpaid_flag);
467
468 dbms_sql.bind_variable(p_update_cursor, ':br_on_hold_flag',
469 p_trx_rec.br_on_hold_flag);
470
471 dbms_sql.bind_variable(p_update_cursor, ':drawee_id',
472 p_trx_rec.drawee_id);
473
474 dbms_sql.bind_variable(p_update_cursor, ':drawee_contact_id',
475 p_trx_rec.drawee_contact_id);
476
477 dbms_sql.bind_variable(p_update_cursor, ':drawee_site_use_id',
478 p_trx_rec.drawee_site_use_id);
479
480 dbms_sql.bind_variable(p_update_cursor, ':drawee_bank_account_id',
481 p_trx_rec.drawee_bank_account_id);
482
483 dbms_sql.bind_variable(p_update_cursor, ':remittance_bank_account_id',
484 p_trx_rec.remit_bank_acct_use_id);
485
486 dbms_sql.bind_variable(p_update_cursor, ':override_remit_account_flag',
487 p_trx_rec.override_remit_account_flag);
488
489 dbms_sql.bind_variable(p_update_cursor, ':special_instructions',
490 p_trx_rec.special_instructions);
491
492 dbms_sql.bind_variable(p_update_cursor, ':remittance_batch_id',
493 p_trx_rec.remittance_batch_id);
494
495 dbms_sql.bind_variable(p_update_cursor, ':address_verification_code',
496 p_trx_rec.address_verification_code);
497
498 dbms_sql.bind_variable(p_update_cursor, ':approval_code',
499 p_trx_rec.approval_code);
500
501 dbms_sql.bind_variable(p_update_cursor, ':bill_to_address_id',
502 p_trx_rec.bill_to_address_id);
503
504 dbms_sql.bind_variable(p_update_cursor, ':edi_processed_flag',
505 p_trx_rec.edi_processed_flag);
506
507 dbms_sql.bind_variable(p_update_cursor, ':edi_processed_status',
508 p_trx_rec.edi_processed_status);
509
510 dbms_sql.bind_variable(p_update_cursor, ':payment_server_order_num',
511 p_trx_rec.payment_server_order_num);
512
513 dbms_sql.bind_variable(p_update_cursor, ':post_request_id',
514 p_trx_rec.post_request_id);
515
516 dbms_sql.bind_variable(p_update_cursor, ':request_id',
517 p_trx_rec.request_id);
518
519 dbms_sql.bind_variable(p_update_cursor, ':ship_to_address_id',
520 p_trx_rec.ship_to_address_id);
521
522 dbms_sql.bind_variable(p_update_cursor, ':wh_update_date',
523 p_trx_rec.wh_update_date);
524
525 dbms_sql.bind_variable(p_update_cursor, ':legal_entity_id',
526 p_trx_rec.legal_entity_id);
527 /* PAYMENT_UPTAKE */
528 dbms_sql.bind_variable(p_update_cursor, ':payment_trxn_extension_id',
529 p_trx_rec.payment_trxn_extension_id);
530
531 dbms_sql.bind_variable(p_update_cursor, ':billing_date',
532 p_trx_rec.billing_date);
533 /*Start of Bug2427456*/
534 dbms_sql.bind_variable(p_update_cursor, ':global_attribute_category',
535 p_trx_rec.global_attribute_category);
536
537 dbms_sql.bind_variable(p_update_cursor, ':global_attribute1',
538 p_trx_rec.global_attribute1);
539
540 dbms_sql.bind_variable(p_update_cursor, ':global_attribute2',
541 p_trx_rec.global_attribute2);
542
543 dbms_sql.bind_variable(p_update_cursor, ':global_attribute3',
544 p_trx_rec.global_attribute3);
545
546 dbms_sql.bind_variable(p_update_cursor, ':global_attribute4',
547 p_trx_rec.global_attribute4);
548
549 dbms_sql.bind_variable(p_update_cursor, ':global_attribute5',
550 p_trx_rec.global_attribute5);
551
552 dbms_sql.bind_variable(p_update_cursor, ':global_attribute6',
553 p_trx_rec.global_attribute6);
554
555 dbms_sql.bind_variable(p_update_cursor, ':global_attribute7',
556 p_trx_rec.global_attribute7);
557
558
559 dbms_sql.bind_variable(p_update_cursor, ':global_attribute8',
560 p_trx_rec.global_attribute8);
561
562 dbms_sql.bind_variable(p_update_cursor, ':global_attribute9',
563 p_trx_rec.global_attribute9);
564
565 dbms_sql.bind_variable(p_update_cursor, ':global_attribute10',
566 p_trx_rec.global_attribute10);
567
568 dbms_sql.bind_variable(p_update_cursor, ':global_attribute11',
569 p_trx_rec.global_attribute11);
570
571 dbms_sql.bind_variable(p_update_cursor, ':global_attribute12',
572 p_trx_rec.global_attribute12);
573
574 dbms_sql.bind_variable(p_update_cursor, ':global_attribute13',
575 p_trx_rec.global_attribute13);
576
577 dbms_sql.bind_variable(p_update_cursor, ':global_attribute14',
578 p_trx_rec.global_attribute14);
579
580 dbms_sql.bind_variable(p_update_cursor, ':global_attribute15',
581 p_trx_rec.global_attribute15);
582
583 dbms_sql.bind_variable(p_update_cursor, ':global_attribute16',
584 p_trx_rec.global_attribute16);
585
586 dbms_sql.bind_variable(p_update_cursor, ':global_attribute17',
587 p_trx_rec.global_attribute17);
588
589 dbms_sql.bind_variable(p_update_cursor, ':global_attribute18',
590 p_trx_rec.global_attribute18);
591
592 dbms_sql.bind_variable(p_update_cursor, ':global_attribute19',
593 p_trx_rec.global_attribute19);
594
595 dbms_sql.bind_variable(p_update_cursor, ':global_attribute20',
596 p_trx_rec.global_attribute20);
597
598 dbms_sql.bind_variable(p_update_cursor, ':global_attribute21',
599 p_trx_rec.global_attribute21);
600
601 dbms_sql.bind_variable(p_update_cursor, ':global_attribute22',
602 p_trx_rec.global_attribute22);
603
604 dbms_sql.bind_variable(p_update_cursor, ':global_attribute23',
605 p_trx_rec.global_attribute23);
606
607 dbms_sql.bind_variable(p_update_cursor, ':global_attribute24',
608 p_trx_rec.global_attribute24);
609
610 dbms_sql.bind_variable(p_update_cursor, ':global_attribute25',
611 p_trx_rec.global_attribute25);
612
613 dbms_sql.bind_variable(p_update_cursor, ':global_attribute26',
614 p_trx_rec.global_attribute26);
615
616 dbms_sql.bind_variable(p_update_cursor, ':global_attribute27',
617 p_trx_rec.global_attribute27);
618
619 dbms_sql.bind_variable(p_update_cursor, ':global_attribute28',
620 p_trx_rec.global_attribute28);
621
622 dbms_sql.bind_variable(p_update_cursor, ':global_attribute29',
623 p_trx_rec.global_attribute29);
624
625 dbms_sql.bind_variable(p_update_cursor, ':global_attribute30',
626 p_trx_rec.global_attribute30);
627
628 /*End of Bug2427456*/
629 arp_util.debug('arp_ct_pkg.bind_trx_variables()-');
630
631 EXCEPTION
632 WHEN OTHERS THEN
633 arp_util.debug('EXCEPTION: arp_ct_pkg.bind_trx_variables()');
634 RAISE;
635
636 END;
637
638
639 /*==========================================================================+
640 | PROCEDURE |
641 | construct_trx_update_stmt |
642 | |
643 | DESCRIPTION |
644 | Copies the text of the dynamic SQL update statement into the |
645 | out NOCOPY paramater. The update statement does not contain a where |
646 | clause since this is the dynamic part that is added later. |
647 | |
648 | SCOPE - PRIVATE |
649 | |
650 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
651 | arp_util.debug |
652 | |
653 | ARGUMENTS : IN: |
654 | None. |
655 | OUT: |
656 | update_text - text of the update statement |
657 | |
658 | RETURNS : NONE |
659 | |
660 | NOTES |
661 | This statement only updates columns in the trx record that do not |
662 | contain the dummy values that indicate that they should not be changed.|
663 | |
664 | MODIFICATION HISTORY |
665 | 06-JUN-95 Charlie Tomberg Created |
666 | |
667 | 20-MAR-2000 J Rautiainen Added BR project related columns |
668 | BR_AMOUNT, BR_UNPAID_FLAG,BR_ON_HOLD_FLAG, |
669 | DRAWEE_ID, DRAWEE_CONTACT_ID, |
670 | DRAWEE_SITE_USE_ID, DRAWEE_BANK_ACCOUNT_ID, |
671 | REMITTANCE_BANK_ACCOUNT_ID, |
672 | OVERRIDE_REMIT_ACCOUNT_FLAG and |
673 | SPECIAL_INSTRUCTIONSinto table handlers |
674 | 24-JUL-2000 J Rautiainen Added BR project related column |
675 | REMITTANCE_BATCH_ID |
676 | |
677 | 31-OCT-2000 Y Rakotonirainy Bug 1243304 : Added columns |
678 | address_verification_code and |
679 | approval_code and |
680 | bill_to_address_id and |
681 | edi_processed_flag and |
682 | edi_processed_status and |
683 | payment_server_order_num and |
684 | post_request_id and |
685 | request_id and |
686 | ship_to_address_id |
687 | wh_update_date |
688 | into the table handlers. |
689 | |
690 | 20-Jun-2002 Sahana Bug2427456 Added global attribute columns |
691 +==========================================================================*/
692
693 PROCEDURE construct_trx_update_stmt( update_text OUT NOCOPY varchar2) IS
694
695 BEGIN
696 arp_util.debug('arp_ct_pkg.construct_trx_update_stmt()+');
697
698 update_text :=
699 'UPDATE ra_customer_trx
700 SET customer_trx_id =
701 DECODE(:customer_trx_id,
702 :ar_number_dummy, customer_trx_id,
703 :customer_trx_id),
704 trx_number =
705 DECODE(:trx_number,
706 :ar_text_dummy, trx_number,
707 :trx_number),
708 created_by =
709 DECODE(:created_by,
710 :ar_number_dummy, created_by,
711 :created_by),
712 creation_date =
713 DECODE(:creation_date,
714 :ar_date_dummy, creation_date,
715 :creation_date),
716 last_updated_by =
717 DECODE(:last_updated_by,
718 :ar_number_dummy, :pg_user_id,
719 :last_updated_by),
720 last_update_date =
721 DECODE(:last_update_date,
722 :ar_date_dummy, sysdate,
723 :last_update_date),
724 last_update_login =
725 DECODE(:last_update_login,
726 :ar_number_dummy, nvl(:pg_conc_login_id,
727 :pg_login_id),
728 :last_update_login),
729 set_of_books_id =
730 DECODE(:set_of_books_id,
731 :ar_number_dummy, set_of_books_id,
732 :set_of_books_id),
733 program_application_id =
734 DECODE(:program_application_id,
735 :ar_number_dummy, program_application_id,
736 :program_application_id),
737 program_id =
738 DECODE(:program_id,
739 :ar_number_dummy, program_id,
740 :program_id),
741 program_update_date =
742 DECODE(:program_update_date,
743 :ar_date_dummy, program_update_date,
744 :program_update_date),
745 posting_control_id =
746 DECODE(:posting_control_id,
747 :ar_number_dummy, posting_control_id,
748 :posting_control_id),
749 ra_post_loop_number =
750 DECODE(:ra_post_loop_number,
751 :ar_number_dummy, ra_post_loop_number,
752 :ra_post_loop_number),
753 complete_flag =
754 DECODE(:complete_flag,
755 :ar_flag_dummy, complete_flag,
756 :complete_flag),
757 initial_customer_trx_id =
758 DECODE(:initial_customer_trx_id,
759 :ar_number_dummy, initial_customer_trx_id,
760 :initial_customer_trx_id),
761 previous_customer_trx_id =
762 DECODE(:previous_customer_trx_id,
763 :ar_number_dummy, previous_customer_trx_id,
764 :previous_customer_trx_id),
765 related_customer_trx_id =
766 DECODE(:related_customer_trx_id,
767 :ar_number_dummy, related_customer_trx_id,
768 :related_customer_trx_id),
769 recurred_from_trx_number =
770 DECODE(:recurred_from_trx_number,
771 :ar_text_dummy, recurred_from_trx_number,
772 :recurred_from_trx_number),
773 cust_trx_type_id =
774 DECODE(:cust_trx_type_id,
775 :ar_number_dummy, cust_trx_type_id,
776 :cust_trx_type_id),
777 batch_id =
778 DECODE(:batch_id,
779 :ar_number_dummy, batch_id,
780 :batch_id),
781 batch_source_id =
782 DECODE(:batch_source_id,
783 :ar_number_dummy, batch_source_id,
784 :batch_source_id),
785 agreement_id =
786 DECODE(:agreement_id,
787 :ar_number_dummy, agreement_id,
788 :agreement_id),
789 trx_date =
790 DECODE(:trx_date,
791 :ar_date_dummy, trx_date,
792 :trx_date),
793 bill_to_customer_id =
794 DECODE(:bill_to_customer_id,
795 :ar_number_dummy, bill_to_customer_id,
796 :bill_to_customer_id),
797 bill_to_contact_id =
798 DECODE(:bill_to_contact_id,
799 :ar_number_dummy, bill_to_contact_id,
800 :bill_to_contact_id),
801 bill_to_site_use_id =
802 DECODE(:bill_to_site_use_id,
803 :ar_number_dummy, bill_to_site_use_id,
804 :bill_to_site_use_id),
805 ship_to_customer_id =
806 DECODE(:ship_to_customer_id,
807 :ar_number_dummy, ship_to_customer_id,
808 :ship_to_customer_id),
809 ship_to_contact_id =
810 DECODE(:ship_to_contact_id,
811 :ar_number_dummy, ship_to_contact_id,
812 :ship_to_contact_id),
813 ship_to_site_use_id =
814 DECODE(:ship_to_site_use_id,
815 :ar_number_dummy, ship_to_site_use_id,
816 :ship_to_site_use_id),
817 sold_to_customer_id =
818 DECODE(:sold_to_customer_id,
819 :ar_number_dummy, sold_to_customer_id,
820 :sold_to_customer_id),
821 sold_to_site_use_id =
822 DECODE(:sold_to_site_use_id,
823 :ar_number_dummy, sold_to_site_use_id,
824 :sold_to_site_use_id),
825 sold_to_contact_id =
826 DECODE(:sold_to_contact_id,
827 :ar_number_dummy, sold_to_contact_id,
828 :sold_to_contact_id),
829 customer_reference =
830 DECODE(:customer_reference,
831 :ar_text_dummy, customer_reference,
832 :customer_reference),
833 customer_reference_date =
834 DECODE(:customer_reference_date,
835 :ar_date_dummy, customer_reference_date,
836 :customer_reference_date),
837 credit_method_for_installments =
838 DECODE(:credit_method_for_installments,
839 :ar_text_dummy, credit_method_for_installments,
840 :credit_method_for_installments),
841 credit_method_for_rules =
842 DECODE(:credit_method_for_rules,
843 :ar_text_dummy, credit_method_for_rules,
844 :credit_method_for_rules),
845 start_date_commitment =
846 DECODE(:start_date_commitment,
847 :ar_date_dummy, start_date_commitment,
848 :start_date_commitment),
849 end_date_commitment =
850 DECODE(:end_date_commitment,
851 :ar_date_dummy, end_date_commitment,
852 :end_date_commitment),
853 exchange_date =
854 DECODE(:exchange_date,
855 :ar_date_dummy, exchange_date,
856 :exchange_date),
857 exchange_rate =
858 DECODE(:exchange_rate,
859 :ar_number_dummy, exchange_rate,
860 :exchange_rate),
861 exchange_rate_type =
862 DECODE(:exchange_rate_type,
863 :ar_text_dummy, exchange_rate_type,
864 :exchange_rate_type),
865 customer_bank_account_id =
866 DECODE(:customer_bank_account_id,
867 :ar_number_dummy, customer_bank_account_id,
868 :customer_bank_account_id),
869 finance_charges =
870 DECODE(:finance_charges,
871 :ar_flag_dummy, finance_charges,
872 :finance_charges),
873 fob_point =
874 DECODE(:fob_point,
875 :ar_text_dummy, fob_point,
876 :fob_point),
877 comments =
878 DECODE(:comments,
879 :ar_text_dummy, comments,
880 :comments),
881 internal_notes =
882 DECODE(:internal_notes,
883 :ar_text_dummy, internal_notes,
884 :internal_notes),
885 invoice_currency_code =
886 DECODE(:invoice_currency_code,
887 :ar_text_dummy, invoice_currency_code,
888 :invoice_currency_code),
889 invoicing_rule_id =
890 DECODE(:invoicing_rule_id,
891 :ar_number_dummy, invoicing_rule_id,
892 :invoicing_rule_id),
893 last_printed_sequence_num =
894 DECODE(:last_printed_sequence_num,
895 :ar_number_dummy, last_printed_sequence_num,
896 :last_printed_sequence_num),
897 orig_system_batch_name =
898 DECODE(:orig_system_batch_name,
899 :ar_text_dummy, orig_system_batch_name,
900 :orig_system_batch_name),
901 primary_salesrep_id =
902 DECODE(:primary_salesrep_id,
903 :ar_number_dummy, primary_salesrep_id,
904 :primary_salesrep_id),
905 printing_count =
906 DECODE(:printing_count,
907 :ar_number_dummy, printing_count,
908 :printing_count),
909 printing_last_printed =
910 DECODE(:printing_last_printed,
911 :ar_date_dummy, printing_last_printed,
912 :printing_last_printed),
913 printing_option =
914 DECODE(:printing_option,
915 :ar_text_dummy, printing_option,
916 :printing_option),
917 printing_original_date =
918 DECODE(:printing_original_date,
919 :ar_date_dummy, printing_original_date,
920 :printing_original_date),
921 printing_pending =
922 DECODE(:printing_option,
923 printing_option, printing_pending,
924 DECODE(:printing_option,
925 ''PRI'', ''Y'',
926 ''NOT'', ''N'',
927 DECODE(:printing_pending,
928 :ar_flag_dummy,
929 printing_pending,
930 :printing_pending)
931 )
932 ),
933 purchase_order =
934 DECODE(:purchase_order,
935 :ar_text_dummy, purchase_order,
936 :purchase_order),
937 purchase_order_date =
938 DECODE(:purchase_order_date,
939 :ar_date_dummy, purchase_order_date,
940 :purchase_order_date),
941 purchase_order_revision =
942 DECODE(:purchase_order_revision,
943 :ar_text_dummy, purchase_order_revision,
944 :purchase_order_revision),
945 receipt_method_id =
946 DECODE(:receipt_method_id,
947 :ar_number_dummy, receipt_method_id,
948 :receipt_method_id),
949 remit_to_address_id =
950 DECODE(:remit_to_address_id,
951 :ar_number_dummy, remit_to_address_id,
952 :remit_to_address_id),
953 shipment_id =
954 DECODE(:shipment_id,
955 :ar_number_dummy, shipment_id,
956 :shipment_id),
957 ship_date_actual =
958 DECODE(:ship_date_actual,
959 :ar_date_dummy, ship_date_actual,
960 :ship_date_actual),
961 ship_via =
962 DECODE(:ship_via,
963 :ar_text_dummy, ship_via,
964 :ship_via),
965 term_due_date =
966 DECODE(:term_due_date,
967 :ar_date_dummy, term_due_date,
968 :term_due_date),
969 term_id =
970 DECODE(:term_id,
971 :ar_number_dummy, term_id,
972 :term_id),
973 territory_id =
974 DECODE(:territory_id,
975 :ar_number_dummy, territory_id,
976 :territory_id),
977 waybill_number =
978 DECODE(:waybill_number,
979 :ar_text_dummy, waybill_number,
980 :waybill_number),
981 status_trx =
982 DECODE(:status_trx,
983 :ar_text_dummy, status_trx,
984 :status_trx),
985 reason_code =
986 DECODE(:reason_code,
987 :ar_text_dummy, reason_code,
988 :reason_code),
989 doc_sequence_id =
990 DECODE(:doc_sequence_id,
991 :ar_number_dummy, doc_sequence_id,
992 :doc_sequence_id),
993 doc_sequence_value =
994 DECODE(:doc_sequence_value,
995 :ar_number_dummy, doc_sequence_value,
996 :doc_sequence_value),
997 paying_customer_id =
998 DECODE(:paying_customer_id,
999 :ar_number_dummy, paying_customer_id,
1000 :paying_customer_id),
1001 paying_site_use_id =
1002 DECODE(:paying_site_use_id,
1003 :ar_number_dummy, paying_site_use_id,
1004 :paying_site_use_id),
1005 related_batch_source_id =
1006 DECODE(:related_batch_source_id,
1007 :ar_number_dummy, related_batch_source_id,
1008 :related_batch_source_id),
1009 default_tax_exempt_flag =
1010 DECODE(:default_tax_exempt_flag,
1011 :ar_flag_dummy, default_tax_exempt_flag,
1012 :default_tax_exempt_flag),
1013 created_from =
1014 DECODE(:created_from,
1015 :ar_text_dummy, created_from,
1016 :created_from),
1017 default_ussgl_trx_code_context =
1018 DECODE(:default_ussgl_trx_code_context,
1019 :ar_text_dummy, default_ussgl_trx_code_context,
1020 :default_ussgl_trx_code_context),
1021 default_ussgl_transaction_code =
1022 DECODE(:default_ussgl_transaction_code,
1023 :ar_text_dummy, default_ussgl_transaction_code,
1024 :default_ussgl_transaction_code),
1025 old_trx_number =
1026 DECODE(:old_trx_number,
1027 :ar_text_dummy, old_trx_number,
1028 :old_trx_number),
1029 interface_header_context =
1030 DECODE(:interface_header_context,
1031 :ar_text_dummy, interface_header_context,
1032 :interface_header_context),
1033 interface_header_attribute1 =
1034 DECODE(:interface_header_attribute1,
1035 :ar_text_dummy, interface_header_attribute1,
1036 :interface_header_attribute1),
1037 interface_header_attribute2 =
1038 DECODE(:interface_header_attribute2,
1039 :ar_text_dummy, interface_header_attribute2,
1040 :interface_header_attribute2),
1041 interface_header_attribute3 =
1042 DECODE(:interface_header_attribute3,
1043 :ar_text_dummy, interface_header_attribute3,
1044 :interface_header_attribute3),
1045 interface_header_attribute4 =
1046 DECODE(:interface_header_attribute4,
1047 :ar_text_dummy, interface_header_attribute4,
1048 :interface_header_attribute4),
1049 interface_header_attribute5 =
1050 DECODE(:interface_header_attribute5,
1051 :ar_text_dummy, interface_header_attribute5,
1052 :interface_header_attribute5),
1053 interface_header_attribute6 =
1054 DECODE(:interface_header_attribute6,
1055 :ar_text_dummy, interface_header_attribute6,
1056 :interface_header_attribute6),
1057 interface_header_attribute7 =
1058 DECODE(:interface_header_attribute7,
1059 :ar_text_dummy, interface_header_attribute7,
1060 :interface_header_attribute7),
1061 interface_header_attribute8 =
1062 DECODE(:interface_header_attribute8,
1063 :ar_text_dummy, interface_header_attribute8,
1064 :interface_header_attribute8),
1065 interface_header_attribute9 =
1066 DECODE(:interface_header_attribute9,
1067 :ar_text_dummy, interface_header_attribute9,
1068 :interface_header_attribute9),
1069 interface_header_attribute10 =
1070 DECODE(:interface_header_attribute10,
1071 :ar_text_dummy, interface_header_attribute10,
1072 :interface_header_attribute10),
1073 interface_header_attribute11 =
1074 DECODE(:interface_header_attribute11,
1075 :ar_text_dummy, interface_header_attribute11,
1076 :interface_header_attribute11),
1077 interface_header_attribute12 =
1078 DECODE(:interface_header_attribute12,
1079 :ar_text_dummy, interface_header_attribute12,
1080 :interface_header_attribute12),
1081 interface_header_attribute13 =
1082 DECODE(:interface_header_attribute13,
1083 :ar_text_dummy, interface_header_attribute13,
1084 :interface_header_attribute13),
1085 interface_header_attribute14 =
1086 DECODE(:interface_header_attribute14,
1087 :ar_text_dummy, interface_header_attribute14,
1088 :interface_header_attribute14),
1089 interface_header_attribute15 =
1090 DECODE(:interface_header_attribute15,
1091 :ar_text_dummy, interface_header_attribute15,
1092 :interface_header_attribute15),
1093 attribute_category =
1094 DECODE(:attribute_category,
1095 :ar_text_dummy, attribute_category,
1096 :attribute_category),
1097 attribute1 =
1098 DECODE(:attribute1,
1099 :ar_text_dummy, attribute1,
1100 :attribute1),
1101 attribute2 =
1102 DECODE(:attribute2,
1103 :ar_text_dummy, attribute2,
1104 :attribute2),
1105 attribute3 =
1106 DECODE(:attribute3,
1107 :ar_text_dummy, attribute3,
1108 :attribute3),
1109 attribute4 =
1110 DECODE(:attribute4,
1111 :ar_text_dummy, attribute4,
1112 :attribute4),
1113 attribute5 =
1114 DECODE(:attribute5,
1115 :ar_text_dummy, attribute5,
1116 :attribute5),
1117 attribute6 =
1118 DECODE(:attribute6,
1119 :ar_text_dummy, attribute6,
1120 :attribute6),
1121 attribute7 =
1122 DECODE(:attribute7,
1123 :ar_text_dummy, attribute7,
1124 :attribute7),
1125 attribute8 =
1126 DECODE(:attribute8,
1127 :ar_text_dummy, attribute8,
1128 :attribute8),
1129 attribute9 =
1130 DECODE(:attribute9,
1131 :ar_text_dummy, attribute9,
1132 :attribute9),
1133 attribute10 =
1134 DECODE(:attribute10,
1135 :ar_text_dummy, attribute10,
1136 :attribute10),
1137 attribute11 =
1138 DECODE(:attribute11,
1139 :ar_text_dummy, attribute11,
1140 :attribute11),
1141 attribute12 =
1142 DECODE(:attribute12,
1143 :ar_text_dummy, attribute12,
1144 :attribute12),
1145 attribute13 =
1146 DECODE(:attribute13,
1147 :ar_text_dummy, attribute13,
1148 :attribute13),
1149 attribute14 =
1150 DECODE(:attribute14,
1151 :ar_text_dummy, attribute14,
1152 :attribute14),
1153 attribute15 =
1154 DECODE(:attribute15,
1155 :ar_text_dummy, attribute15,
1156 :attribute15),
1157 br_amount =
1158 DECODE(:br_amount,
1159 :ar_number_dummy, br_amount,
1160 :br_amount),
1161 br_unpaid_flag =
1162 DECODE(:br_unpaid_flag,
1163 :ar_flag_dummy, br_unpaid_flag,
1164 :br_unpaid_flag),
1165 br_on_hold_flag =
1166 DECODE(:br_on_hold_flag,
1167 :ar_flag_dummy, br_on_hold_flag,
1168 :br_on_hold_flag),
1169 drawee_id =
1170 DECODE(:drawee_id,
1171 :ar_number_dummy, drawee_id,
1172 :drawee_id),
1173 drawee_contact_id =
1174 DECODE(:drawee_contact_id,
1175 :ar_number_dummy, drawee_contact_id,
1176 :drawee_contact_id),
1177 drawee_site_use_id =
1178 DECODE(:drawee_site_use_id,
1179 :ar_number_dummy, drawee_site_use_id,
1180 :drawee_site_use_id),
1181 drawee_bank_account_id =
1182 DECODE(:drawee_bank_account_id,
1183 :ar_number_dummy, drawee_bank_account_id,
1184 :drawee_bank_account_id),
1185 remit_bank_acct_use_id =
1186 DECODE(:remittance_bank_account_id,
1187 :ar_number_dummy, remit_bank_acct_use_id,
1188 :remittance_bank_account_id),
1189 override_remit_account_flag =
1190 DECODE(:override_remit_account_flag,
1191 :ar_flag_dummy, override_remit_account_flag,
1192 :override_remit_account_flag),
1193 special_instructions =
1194 DECODE(:special_instructions,
1195 :ar_text_dummy, special_instructions,
1196 :special_instructions),
1197 remittance_batch_id =
1198 DECODE(:remittance_batch_id,
1199 :ar_number_dummy, remittance_batch_id,
1200 :remittance_batch_id) ,
1201 address_verification_code =
1202 DECODE(:address_verification_code,
1203 :ar_text_dummy, address_verification_code,
1204 :address_verification_code),
1205 approval_code =
1206 DECODE(:approval_code,
1207 :ar_text_dummy, approval_code,
1208 :approval_code),
1209 bill_to_address_id =
1210 DECODE(:bill_to_address_id,
1211 :ar_number_dummy, bill_to_address_id,
1212 :bill_to_address_id),
1213 edi_processed_flag =
1214 DECODE(:edi_processed_flag,
1215 :ar_flag_dummy, edi_processed_flag,
1216 :edi_processed_flag),
1217 edi_processed_status =
1218 DECODE(:edi_processed_status,
1219 :ar_text_dummy, edi_processed_status,
1220 :edi_processed_status),
1221 payment_server_order_num =
1222 DECODE(:payment_server_order_num,
1223 :ar_text_dummy, payment_server_order_num,
1224 :payment_server_order_num),
1225 post_request_id =
1226 DECODE(:post_request_id,
1227 :ar_number_dummy, post_request_id,
1228 :post_request_id),
1229 request_id =
1230 DECODE(:request_id,
1231 :ar_number_dummy, request_id,
1232 :request_id),
1233 ship_to_address_id =
1234 DECODE(:ship_to_address_id,
1235 :ar_number_dummy, ship_to_address_id,
1236 :ship_to_address_id),
1237 wh_update_date =
1238 DECODE(:wh_update_date,
1239 :ar_date_dummy,wh_update_date,
1240 :wh_update_date),
1241 legal_entity_id =
1242 DECODE(:legal_entity_id,
1243 :ar_number_dummy, legal_entity_id,
1244 :legal_entity_id) ,
1245 /* PAYMENT_UPTAKE */
1246 payment_trxn_extension_id =
1247 DECODE(:payment_trxn_extension_id,
1248 :ar_number_dummy, payment_trxn_extension_id,
1249 :payment_trxn_extension_id),
1250 billing_date =
1251 DECODE(:billing_date,
1252 :ar_date_dummy, billing_date,
1253 :billing_date)';
1254
1255 arp_util.debug('arp_ct_pkg.construct_trx_update_stmt()-');
1256
1257 EXCEPTION
1258 WHEN OTHERS THEN
1259 arp_util.debug('EXCEPTION: arp_ct_pkg.construct_trx_update_stmt()');
1260 RAISE;
1261
1262 END;
1263
1264
1265 /*===========================================================================+
1266 | PROCEDURE |
1267 | construct_global_attr_stmt |
1268 | |
1269 | DESCRIPTION |
1270 | Copies the text of the dynamic SQL update statement for the |
1271 | global_attribute_category and global_attributes(1-30) into the |
1272 | out NOCOPY paramater. The update statement contains a where clause |
1273 | since this is the dynamic part that is added later. |
1274 | |
1275 | SCOPE - PRIVATE |
1276 | |
1277 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1278 | arp_util.debug |
1279 | |
1280 | ARGUMENTS : IN: |
1281 | None |
1282 | OUT: |
1283 | update_text - text of the update statement |
1284 | |
1285 | RETURNS : NONE |
1286 | |
1287 | NOTES |
1288 | |
1289 | MODIFICATION HISTORY |
1290 | 22-JUN-02 skoukunt Created for Bug2427456 |
1291 | |
1292 +===========================================================================*/
1293 PROCEDURE construct_global_attr_stmt( update_text OUT NOCOPY varchar2) IS
1294 BEGIN
1295 arp_util.debug('arp_ct_pkg.construct_global_attr_stmt()+');
1296 update_text := '
1297 ,global_attribute_category =
1298 DECODE(:global_attribute_category,
1299 :ar_text_dummy, global_attribute_category,
1300 :global_attribute_category),
1301 global_attribute1 =
1302 DECODE(:global_attribute1,
1303 :ar_text_dummy, global_attribute1,
1304 :global_attribute1),
1305 global_attribute2 =
1306 DECODE(:global_attribute2,
1307 :ar_text_dummy, global_attribute2,
1308 :global_attribute2),
1309 global_attribute3 =
1310 DECODE(:global_attribute3,
1311 :ar_text_dummy, global_attribute3,
1312 :global_attribute3),
1313 global_attribute4 =
1314 DECODE(:global_attribute4,
1315 :ar_text_dummy, global_attribute4,
1316 :global_attribute4),
1317 global_attribute5 =
1318 DECODE(:global_attribute5,
1319 :ar_text_dummy, global_attribute5,
1320 :global_attribute5),
1321 global_attribute6 =
1322 DECODE(:global_attribute6,
1323 :ar_text_dummy, global_attribute6,
1324 :global_attribute6),
1325 global_attribute7 =
1326 DECODE(:global_attribute7,
1327 :ar_text_dummy, global_attribute7,
1328 :global_attribute7),
1329 global_attribute8 =
1330 DECODE(:global_attribute8,
1331 :ar_text_dummy, global_attribute8,
1332 :global_attribute8),
1333 global_attribute9 =
1334 DECODE(:global_attribute9,
1335 :ar_text_dummy, global_attribute9,
1336 :global_attribute9),
1337 global_attribute10 =
1338 DECODE(:global_attribute10,
1339 :ar_text_dummy, global_attribute10,
1340 :global_attribute10),
1341 global_attribute11 =
1342 DECODE(:global_attribute11,
1343 :ar_text_dummy, global_attribute11,
1344 :global_attribute11),
1345 global_attribute12 =
1346 DECODE(:global_attribute12,
1347 :ar_text_dummy, global_attribute12,
1348 :global_attribute12),
1349 global_attribute13 =
1350 DECODE(:global_attribute13,
1351 :ar_text_dummy, global_attribute13,
1352 :global_attribute13),
1353 global_attribute14 =
1354 DECODE(:global_attribute14,
1355 :ar_text_dummy, global_attribute14,
1356 :global_attribute14),
1357 global_attribute15 =
1358 DECODE(:global_attribute15,
1359 :ar_text_dummy, global_attribute15,
1360 :global_attribute15),
1361 global_attribute16 =
1362 DECODE(:global_attribute16,
1363 :ar_text_dummy, global_attribute16,
1364 :global_attribute16),
1365 global_attribute17 =
1366 DECODE(:global_attribute17,
1367 :ar_text_dummy, global_attribute17,
1368 :global_attribute17),
1369 global_attribute18 =
1370 DECODE(:global_attribute18,
1371 :ar_text_dummy, global_attribute18,
1372 :global_attribute18),
1373 global_attribute19 =
1374 DECODE(:global_attribute19,
1375 :ar_text_dummy, global_attribute19,
1376 :global_attribute19),
1377 global_attribute20 =
1378 DECODE(:global_attribute20,
1379 :ar_text_dummy, global_attribute20,
1380 :global_attribute20),
1381 global_attribute21 =
1382 DECODE(:global_attribute21,
1383 :ar_text_dummy, global_attribute21,
1384 :global_attribute21),
1385 global_attribute22 =
1386 DECODE(:global_attribute22,
1387 :ar_text_dummy, global_attribute22,
1388 :global_attribute22),
1389 global_attribute23 =
1390 DECODE(:global_attribute23,
1391 :ar_text_dummy, global_attribute23,
1392 :global_attribute23),
1393 global_attribute24 =
1394 DECODE(:global_attribute24,
1395 :ar_text_dummy, global_attribute24,
1396 :global_attribute24),
1397 global_attribute25 =
1398 DECODE(:global_attribute25,
1399 :ar_text_dummy, global_attribute25,
1400 :global_attribute25),
1401 global_attribute26 =
1402 DECODE(:global_attribute26,
1403 :ar_text_dummy, global_attribute26,
1404 :global_attribute26),
1405 global_attribute27 =
1406 DECODE(:global_attribute27,
1407 :ar_text_dummy, global_attribute27,
1408 :global_attribute27),
1409 global_attribute28 =
1410 DECODE(:global_attribute28,
1411 :ar_text_dummy, global_attribute28,
1412 :global_attribute28),
1413 global_attribute29 =
1414 DECODE(:global_attribute29,
1415 :ar_text_dummy, global_attribute29,
1416 :global_attribute29),
1417 global_attribute30 =
1418 DECODE(:global_attribute30,
1419 :ar_text_dummy, global_attribute30,
1420 :global_attribute30)';
1421
1422 arp_util.debug('arp_ct_pkg.construct_global_attr_stmt()-');
1423 EXCEPTION
1424 WHEN OTHERS THEN
1425 arp_util.debug('EXCEPTION: arp_ct_pkg.construct_global_attr_stmt()');
1426 RAISE;
1427
1428 END;
1429
1430 /*===========================================================================+
1431 | PROCEDURE |
1432 | generic_update |
1433 | |
1434 | DESCRIPTION |
1435 | This procedure Updates records in ra_customer_trx identified by the |
1436 | where clause that is passed in as a parameter. Only those columns in |
1437 | the trx record parameter that do not contain the special dummy values |
1438 | are updated. |
1439 | |
1440 | SCOPE - PRIVATE |
1441 | |
1442 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1443 | arp_util.debug |
1444 | dbms_sql.open_cursor |
1445 | dbms_sql.parse |
1446 | dbms_sql.execute |
1447 | dbms_sql.close_cursor |
1448 | |
1449 | ARGUMENTS : IN: |
1450 | p_update_cursor - identifies the cursor to use |
1451 | p_where_clause - identifies which rows to update |
1452 | p_where1 - value to bind into where clause |
1453 | p_trx_rec - contains the new trx values |
1454 | OUT: |
1455 | None |
1456 | |
1457 | RETURNS : NONE |
1458 | |
1459 | NOTES |
1460 | |
1461 | MODIFICATION HISTORY |
1462 | 06-JUN-95 Charlie Tomberg Created |
1463 | 08-NOV-01 Debbie Jancis Added calls to MRC engine for |
1464 | RA_CUSTOMER_TRX processing |
1465 | |
1466 +===========================================================================*/
1467
1468 PROCEDURE generic_update(p_update_cursor IN OUT NOCOPY integer,
1469 p_where_clause IN varchar2,
1470 p_where1 IN number,
1471 p_trx_rec IN ra_customer_trx%rowtype) IS
1472
1473 l_count number;
1474 l_update_statement_1 varchar2(30000);
1475 l_update_statement_2 varchar2(30000);
1476 l_update_statement long;
1477 ctrx_array dbms_sql.number_table;
1478
1479 BEGIN
1480 arp_util.debug('arp_ct_pkg.generic_update()+');
1481
1482 /*--------------------------------------------------------------+
1483 | If this update statement has not already been parsed, |
1484 | construct the statement and parse it. |
1485 | Otherwise, use the already parsed statement and rebind its |
1486 | variables. |
1487 +--------------------------------------------------------------*/
1488
1489 IF (p_update_cursor is null)
1490 THEN
1491
1492 p_update_cursor := dbms_sql.open_cursor;
1493
1494 /*---------------------------------+
1495 | Construct the update statement |
1496 +---------------------------------*/
1497
1498 arp_ct_pkg.construct_trx_update_stmt(l_update_statement_1);
1499 arp_ct_pkg.construct_global_attr_stmt(l_update_statement_2);
1500
1501 l_update_statement := l_update_statement_1 || l_update_statement_2;
1502
1503 l_update_statement := l_update_statement || p_where_clause;
1504
1505 /*---------------------------------------+
1506 | add on mrc variables for bulk collect |
1507 +---------------------------------------*/
1508
1509 l_update_statement := l_update_statement ||
1510 ' RETURNING customer_trx_id INTO :ctrx_key_value ';
1511
1512 /*-----------------------------------------------+
1513 | Parse, bind, execute and close the statement |
1514 +-----------------------------------------------*/
1515
1516 dbms_sql.parse(p_update_cursor,
1517 l_update_statement,
1518 dbms_sql.v7);
1519
1520 END IF;
1521
1522 arp_ct_pkg.bind_trx_variables(p_update_cursor, p_trx_rec);
1523
1524 /*----------------------------+
1525 | Bind output variable |
1526 +----------------------------*/
1527
1528 dbms_sql.bind_array(p_update_cursor, ':ctrx_key_value',
1529 ctrx_array);
1530
1531 /*-----------------------------------------+
1532 | Bind the variables in the where clause |
1533 +-----------------------------------------*/
1534
1535 dbms_sql.bind_variable(p_update_cursor, ':where_1',
1536 p_where1);
1537
1538 l_count := dbms_sql.execute(p_update_cursor);
1539
1540 arp_util.debug( to_char(l_count) || ' rows updated');
1541
1542 /*------------------------------------------+
1543 | get RETURNING COLUMN into OUT NOCOPY bind array |
1544 +------------------------------------------*/
1545
1546 dbms_sql.variable_value( p_update_cursor, ':ctrx_key_value', ctrx_array);
1547
1548
1549 /*------------------------------------------------------------+
1550 | Raise the NO_DATA_FOUND exception if no rows were updated |
1551 +------------------------------------------------------------*/
1552
1553 IF (l_count = 0)
1554 THEN RAISE NO_DATA_FOUND;
1555 END IF;
1556
1557 --{BUG4301323
1558 -- FOR I in ctrx_array.FIRST..ctrx_array.LAST LOOP
1559 /*------------------------------------------------+
1560 | call mrc engine to update RA_MC_CUSTOMER_TRX |
1561 +------------------------------------------------*/
1562 -- ar_mrc_engine.maintain_mrc_data(
1563 -- p_event_mode => 'UPDATE',
1564 -- p_table_name => 'RA_CUSTOMER_TRX',
1565 -- p_mode => 'SINGLE',
1566 -- p_key_value => ctrx_array(I));
1567 -- END LOOP;
1568
1569
1570
1571 arp_util.debug('arp_ct_pkg.generic_update()-');
1572
1573 EXCEPTION
1574 WHEN OTHERS THEN
1575 arp_util.debug('EXCEPTION: arp_ct_pkg.generic_update()');
1576 arp_util.debug(l_update_statement);
1577 arp_util.debug('Error at character: ' ||
1578 to_char(dbms_sql.last_error_position));
1579 RAISE;
1580 END;
1581
1582 /*===========================================================================+
1583 | PROCEDURE |
1584 | set_to_dummy |
1585 | |
1586 | DESCRIPTION |
1587 | This procedure initializes all columns in the parameter trx record |
1588 | to the appropriate dummy value for its datatype. |
1589 | |
1590 | The dummy values are defined in the following package level constants: |
1591 | AR_TEXT_DUMMY |
1592 | AR_FLAG_DUMMY |
1593 | AR_NUMBER_DUMMY |
1594 | AR_DATE_DUMMY |
1595 | |
1596 | SCOPE - PUBLIC |
1597 | |
1598 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1599 | arp_util.debug |
1600 | |
1601 | ARGUMENTS : IN: |
1602 | None |
1603 | OUT: |
1604 | p_trx_rec - The record to initialize |
1605 | |
1606 | RETURNS : NONE |
1607 | |
1608 | NOTES |
1609 | |
1610 | MODIFICATION HISTORY |
1611 | 06-JUN-95 Charlie Tomberg Created |
1612 | |
1613 | 20-MAR-2000 J Rautiainen Added BR project related columns |
1614 | BR_AMOUNT, BR_UNPAID_FLAG,BR_ON_HOLD_FLAG, |
1615 | DRAWEE_ID, DRAWEE_CONTACT_ID, |
1616 | DRAWEE_SITE_USE_ID,DRAWEE_BANK_ACCOUNT_ID, |
1617 | REMITTANCE_BANK_ACCOUNT_ID, |
1618 | OVERRIDE_REMIT_ACCOUNT_FLAG and |
1619 | SPECIAL_INSTRUCTIONSinto table handlers |
1620 | 24-JUL-2000 J Rautiainen Added BR project related column |
1621 | REMITTANCE_BATCH_ID |
1622 | |
1623 | 31-OCT-2000 Y Rakotonirainy Bug 1243304 : Added columns |
1624 | address_verification_code and |
1625 | approval_code and |
1626 | bill_to_address_id and |
1627 | edi_processed_flag and |
1628 | edi_processed_status and |
1629 | payment_server_order_num and |
1630 | post_request_id and |
1631 | request_id and |
1632 | ship_to_address_id |
1633 | wh_update_date |
1634 | into the table handlers. |
1635 | 20-Jun-2002 Sahana Bug2427456 : Added Global Attribute Columns |
1636 +===========================================================================*/
1637
1638 PROCEDURE set_to_dummy( p_trx_rec OUT NOCOPY ra_customer_trx%rowtype) IS
1639
1640 BEGIN
1641
1642 arp_util.debug('arp_ct_pkg.set_to_dummy()+');
1643
1644 p_trx_rec.customer_trx_id := AR_NUMBER_DUMMY;
1645 p_trx_rec.trx_number := AR_TEXT_DUMMY;
1646 p_trx_rec.created_by := AR_NUMBER_DUMMY;
1647 p_trx_rec.creation_date := AR_DATE_DUMMY;
1648 p_trx_rec.last_updated_by := AR_NUMBER_DUMMY;
1649 p_trx_rec.last_update_date := AR_DATE_DUMMY;
1650 p_trx_rec.last_update_login := AR_NUMBER_DUMMY;
1651 p_trx_rec.set_of_books_id := AR_NUMBER_DUMMY;
1652 p_trx_rec.program_application_id := AR_NUMBER_DUMMY;
1653 p_trx_rec.program_id := AR_NUMBER_DUMMY;
1654 p_trx_rec.program_update_date := AR_DATE_DUMMY;
1655 p_trx_rec.posting_control_id := AR_NUMBER_DUMMY;
1656 p_trx_rec.ra_post_loop_number := AR_NUMBER_DUMMY;
1657 p_trx_rec.complete_flag := AR_FLAG_DUMMY;
1658 p_trx_rec.initial_customer_trx_id := AR_NUMBER_DUMMY;
1659 p_trx_rec.previous_customer_trx_id := AR_NUMBER_DUMMY;
1660 p_trx_rec.related_customer_trx_id := AR_NUMBER_DUMMY;
1661 p_trx_rec.recurred_from_trx_number := AR_TEXT_DUMMY;
1662 p_trx_rec.cust_trx_type_id := AR_NUMBER_DUMMY;
1663 p_trx_rec.batch_id := AR_NUMBER_DUMMY;
1664 p_trx_rec.batch_source_id := AR_NUMBER_DUMMY;
1665 p_trx_rec.agreement_id := AR_NUMBER_DUMMY;
1666 p_trx_rec.trx_date := AR_DATE_DUMMY;
1667 p_trx_rec.bill_to_customer_id := AR_NUMBER_DUMMY;
1668 p_trx_rec.bill_to_contact_id := AR_NUMBER_DUMMY;
1669 p_trx_rec.bill_to_site_use_id := AR_NUMBER_DUMMY;
1670 p_trx_rec.ship_to_customer_id := AR_NUMBER_DUMMY;
1671 p_trx_rec.ship_to_contact_id := AR_NUMBER_DUMMY;
1672 p_trx_rec.ship_to_site_use_id := AR_NUMBER_DUMMY;
1673 p_trx_rec.sold_to_customer_id := AR_NUMBER_DUMMY;
1674 p_trx_rec.sold_to_site_use_id := AR_NUMBER_DUMMY;
1675 p_trx_rec.sold_to_contact_id := AR_NUMBER_DUMMY;
1676 p_trx_rec.customer_reference := AR_TEXT_DUMMY;
1677 p_trx_rec.customer_reference_date := AR_DATE_DUMMY;
1678 p_trx_rec.credit_method_for_installments := AR_TEXT_DUMMY;
1679 p_trx_rec.credit_method_for_rules := AR_TEXT_DUMMY;
1680 p_trx_rec.start_date_commitment := AR_DATE_DUMMY;
1681 p_trx_rec.end_date_commitment := AR_DATE_DUMMY;
1682 p_trx_rec.exchange_date := AR_DATE_DUMMY;
1683 p_trx_rec.exchange_rate := AR_NUMBER_DUMMY;
1684 p_trx_rec.exchange_rate_type := AR_TEXT_DUMMY;
1685 p_trx_rec.customer_bank_account_id := AR_NUMBER_DUMMY;
1686 p_trx_rec.finance_charges := AR_FLAG_DUMMY;
1687 p_trx_rec.fob_point := AR_TEXT_DUMMY;
1688 p_trx_rec.comments := AR_TEXT_DUMMY;
1689 p_trx_rec.internal_notes := AR_TEXT_DUMMY;
1690 p_trx_rec.invoice_currency_code := AR_TEXT_DUMMY;
1691 p_trx_rec.invoicing_rule_id := AR_NUMBER_DUMMY;
1692 p_trx_rec.last_printed_sequence_num := AR_NUMBER_DUMMY;
1693 p_trx_rec.orig_system_batch_name := AR_TEXT_DUMMY;
1694 p_trx_rec.primary_salesrep_id := AR_NUMBER_DUMMY;
1695 p_trx_rec.printing_count := AR_NUMBER_DUMMY;
1696 p_trx_rec.printing_last_printed := AR_DATE_DUMMY;
1697 p_trx_rec.printing_option := AR_TEXT_DUMMY;
1698 p_trx_rec.printing_original_date := AR_DATE_DUMMY;
1699 p_trx_rec.printing_pending := AR_FLAG_DUMMY;
1700 p_trx_rec.purchase_order := AR_TEXT_DUMMY;
1701 p_trx_rec.purchase_order_date := AR_DATE_DUMMY;
1702 p_trx_rec.purchase_order_revision := AR_TEXT_DUMMY;
1703 p_trx_rec.receipt_method_id := AR_NUMBER_DUMMY;
1704 p_trx_rec.remit_to_address_id := AR_NUMBER_DUMMY;
1705 p_trx_rec.shipment_id := AR_NUMBER_DUMMY;
1706 p_trx_rec.ship_date_actual := AR_DATE_DUMMY;
1707 p_trx_rec.ship_via := AR_TEXT_DUMMY;
1708 p_trx_rec.term_due_date := AR_DATE_DUMMY;
1709 p_trx_rec.term_id := AR_NUMBER_DUMMY;
1710 p_trx_rec.territory_id := AR_NUMBER_DUMMY;
1711 p_trx_rec.waybill_number := AR_TEXT_DUMMY;
1712 p_trx_rec.status_trx := AR_TEXT_DUMMY;
1713 p_trx_rec.reason_code := AR_TEXT_DUMMY;
1714 p_trx_rec.doc_sequence_id := AR_NUMBER_DUMMY;
1715 p_trx_rec.doc_sequence_value := AR_NUMBER_DUMMY;
1716 p_trx_rec.paying_customer_id := AR_NUMBER_DUMMY;
1717 p_trx_rec.paying_site_use_id := AR_NUMBER_DUMMY;
1718 p_trx_rec.related_batch_source_id := AR_NUMBER_DUMMY;
1719 p_trx_rec.default_tax_exempt_flag := AR_FLAG_DUMMY;
1720 p_trx_rec.created_from := AR_TEXT_DUMMY;
1721 p_trx_rec.default_ussgl_trx_code_context := AR_TEXT_DUMMY;
1722 p_trx_rec.default_ussgl_transaction_code := AR_TEXT_DUMMY;
1723 p_trx_rec.old_trx_number := AR_TEXT_DUMMY;
1724 p_trx_rec.interface_header_context := AR_TEXT_DUMMY;
1725 p_trx_rec.interface_header_attribute1 := AR_TEXT_DUMMY;
1726 p_trx_rec.interface_header_attribute2 := AR_TEXT_DUMMY;
1727 p_trx_rec.interface_header_attribute3 := AR_TEXT_DUMMY;
1728 p_trx_rec.interface_header_attribute4 := AR_TEXT_DUMMY;
1729 p_trx_rec.interface_header_attribute5 := AR_TEXT_DUMMY;
1730 p_trx_rec.interface_header_attribute6 := AR_TEXT_DUMMY;
1731 p_trx_rec.interface_header_attribute7 := AR_TEXT_DUMMY;
1732 p_trx_rec.interface_header_attribute8 := AR_TEXT_DUMMY;
1733 p_trx_rec.interface_header_attribute9 := AR_TEXT_DUMMY;
1734 p_trx_rec.interface_header_attribute10 := AR_TEXT_DUMMY;
1735 p_trx_rec.interface_header_attribute11 := AR_TEXT_DUMMY;
1736 p_trx_rec.interface_header_attribute12 := AR_TEXT_DUMMY;
1737 p_trx_rec.interface_header_attribute13 := AR_TEXT_DUMMY;
1738 p_trx_rec.interface_header_attribute14 := AR_TEXT_DUMMY;
1739 p_trx_rec.interface_header_attribute15 := AR_TEXT_DUMMY;
1740 p_trx_rec.attribute_category := AR_TEXT_DUMMY;
1741 p_trx_rec.attribute1 := AR_TEXT_DUMMY;
1742 p_trx_rec.attribute2 := AR_TEXT_DUMMY;
1743 p_trx_rec.attribute3 := AR_TEXT_DUMMY;
1744 p_trx_rec.attribute4 := AR_TEXT_DUMMY;
1745 p_trx_rec.attribute5 := AR_TEXT_DUMMY;
1746 p_trx_rec.attribute6 := AR_TEXT_DUMMY;
1747 p_trx_rec.attribute7 := AR_TEXT_DUMMY;
1748 p_trx_rec.attribute8 := AR_TEXT_DUMMY;
1749 p_trx_rec.attribute9 := AR_TEXT_DUMMY;
1750 p_trx_rec.attribute10 := AR_TEXT_DUMMY;
1751 p_trx_rec.attribute11 := AR_TEXT_DUMMY;
1752 p_trx_rec.attribute12 := AR_TEXT_DUMMY;
1753 p_trx_rec.attribute13 := AR_TEXT_DUMMY;
1754 p_trx_rec.attribute14 := AR_TEXT_DUMMY;
1755 p_trx_rec.attribute15 := AR_TEXT_DUMMY;
1756
1757 p_trx_rec.br_amount := AR_NUMBER_DUMMY;
1758 p_trx_rec.br_unpaid_flag := AR_FLAG_DUMMY;
1759 p_trx_rec.br_on_hold_flag := AR_FLAG_DUMMY;
1760 p_trx_rec.drawee_id := AR_NUMBER_DUMMY;
1761 p_trx_rec.drawee_contact_id := AR_NUMBER_DUMMY;
1762 p_trx_rec.drawee_site_use_id := AR_NUMBER_DUMMY;
1763 p_trx_rec.drawee_bank_account_id := AR_NUMBER_DUMMY;
1764 p_trx_rec.remit_bank_acct_use_id := AR_NUMBER_DUMMY;
1765 p_trx_rec.override_remit_account_flag := AR_FLAG_DUMMY;
1766 p_trx_rec.special_instructions := AR_TEXT_DUMMY;
1767 p_trx_rec.remittance_batch_id := AR_NUMBER_DUMMY;
1768 p_trx_rec.address_verification_code := AR_TEXT_DUMMY;
1769 p_trx_rec.approval_code := AR_TEXT_DUMMY;
1770 p_trx_rec.bill_to_address_id := AR_NUMBER_DUMMY;
1771 p_trx_rec.edi_processed_flag := AR_FLAG_DUMMY;
1772 p_trx_rec.edi_processed_status := AR_TEXT_DUMMY;
1773 p_trx_rec.payment_server_order_num := AR_TEXT_DUMMY;
1774 p_trx_rec.post_request_id := AR_NUMBER_DUMMY;
1775 p_trx_rec.request_id := AR_NUMBER_DUMMY;
1776 p_trx_rec.ship_to_address_id := AR_NUMBER_DUMMY;
1777 p_trx_rec.wh_update_date := AR_DATE_DUMMY;
1778
1779 p_trx_rec.global_attribute_category := AR_TEXT_DUMMY;
1780 p_trx_rec.global_attribute1 := AR_TEXT_DUMMY;
1781 p_trx_rec.global_attribute2 := AR_TEXT_DUMMY;
1782 p_trx_rec.global_attribute3 := AR_TEXT_DUMMY;
1783 p_trx_rec.global_attribute4 := AR_TEXT_DUMMY;
1784 p_trx_rec.global_attribute5 := AR_TEXT_DUMMY;
1785 p_trx_rec.global_attribute6 := AR_TEXT_DUMMY;
1786 p_trx_rec.global_attribute7 := AR_TEXT_DUMMY;
1787 p_trx_rec.global_attribute8 := AR_TEXT_DUMMY;
1788 p_trx_rec.global_attribute9 := AR_TEXT_DUMMY;
1789 p_trx_rec.global_attribute10 := AR_TEXT_DUMMY;
1790 p_trx_rec.global_attribute11 := AR_TEXT_DUMMY;
1791 p_trx_rec.global_attribute12 := AR_TEXT_DUMMY;
1792 p_trx_rec.global_attribute13 := AR_TEXT_DUMMY;
1793 p_trx_rec.global_attribute14 := AR_TEXT_DUMMY;
1794 p_trx_rec.global_attribute15 := AR_TEXT_DUMMY;
1795 p_trx_rec.global_attribute16 := AR_TEXT_DUMMY;
1796 p_trx_rec.global_attribute17 := AR_TEXT_DUMMY;
1797 p_trx_rec.global_attribute18 := AR_TEXT_DUMMY;
1798 p_trx_rec.global_attribute19 := AR_TEXT_DUMMY;
1799 p_trx_rec.global_attribute20 := AR_TEXT_DUMMY;
1800 p_trx_rec.global_attribute21 := AR_TEXT_DUMMY;
1801 p_trx_rec.global_attribute22 := AR_TEXT_DUMMY;
1802 p_trx_rec.global_attribute23 := AR_TEXT_DUMMY;
1803 p_trx_rec.global_attribute24 := AR_TEXT_DUMMY;
1804 p_trx_rec.global_attribute25 := AR_TEXT_DUMMY;
1805 p_trx_rec.global_attribute26:= AR_TEXT_DUMMY;
1806 p_trx_rec.global_attribute27:= AR_TEXT_DUMMY;
1807 p_trx_rec.global_attribute28 := AR_TEXT_DUMMY;
1808 p_trx_rec.global_attribute29 := AR_TEXT_DUMMY;
1809 p_trx_rec.global_attribute30 := AR_TEXT_DUMMY;
1810
1811 p_trx_rec.legal_entity_id := AR_NUMBER_DUMMY;
1812 /* PAYMENT_UPTAKE */
1813 p_trx_rec.payment_trxn_extension_id := AR_NUMBER_DUMMY;
1814 p_trx_rec.billing_date := AR_DATE_DUMMY;
1815
1816 arp_util.debug('arp_ct_pkg.set_to_dummy()-');
1817
1818 EXCEPTION
1819 WHEN OTHERS THEN
1820 arp_util.debug('EXCEPTION: arp_ct_pkg.set_to_dummy()');
1821 RAISE;
1822
1823 END;
1824
1825
1826 /*===========================================================================+
1827 | PROCEDURE |
1828 | lock_p |
1829 | |
1830 | DESCRIPTION |
1831 | This procedure locks the ra_customer_trx row identified by the |
1832 | p_customer_trx_id parameter. |
1833 | |
1834 | SCOPE - PUBLIC |
1835 | |
1836 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1837 | arp_util.debug |
1838 | |
1839 | ARGUMENTS : IN: |
1840 | p_customer_trx_id - identifies the row to lock |
1841 | OUT: |
1842 | None |
1843 | |
1844 | RETURNS : NONE |
1845 | |
1846 | NOTES |
1847 | |
1848 | MODIFICATION HISTORY |
1849 | 07-JUN-95 Charlie Tomberg Created |
1850 | |
1851 +===========================================================================*/
1852
1853 PROCEDURE lock_p( p_customer_trx_id IN ra_customer_trx.customer_trx_id%type )
1854 IS
1855
1856 l_customer_trx_id ra_customer_trx.customer_trx_id%type;
1857
1858 BEGIN
1859 arp_util.debug('arp_ct_pkg.lock_p()+');
1860
1861
1862 SELECT customer_trx_id
1863 INTO l_customer_trx_id
1864 FROM ra_customer_trx
1865 WHERE customer_trx_id = p_customer_trx_id
1866 FOR UPDATE OF customer_trx_id NOWAIT;
1867
1868 arp_util.debug('arp_ct_pkg.lock_p()-');
1869
1870 EXCEPTION
1871 WHEN OTHERS THEN
1872 arp_util.debug( 'EXCEPTION: arp_ct_pkg.lock_p' );
1873 RAISE;
1874 END;
1875
1876 /*===========================================================================+
1877 | PROCEDURE |
1878 | lock_fetch_p |
1879 | |
1880 | DESCRIPTION |
1881 | This procedure locks the ra_customer_trx row identified by the |
1882 | p_ra_customer_trx parameter and populates the p_trx_rec parameter with |
1883 | the row that was locked. |
1884 | |
1885 | SCOPE - PUBLIC |
1886 | |
1887 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1888 | arp_util.debug |
1889 | |
1890 | ARGUMENTS : IN: |
1891 | p_customer_trx_id - identifies the row to lock |
1892 | OUT: |
1893 | p_trx_rec - contains the locked row |
1894 | |
1895 | RETURNS : NONE |
1896 | |
1897 | NOTES |
1898 | |
1899 | MODIFICATION HISTORY |
1900 | 07-JUN-95 Charlie Tomberg Created |
1901 | |
1902 +===========================================================================*/
1903
1904 PROCEDURE lock_fetch_p( p_trx_rec IN OUT NOCOPY ra_customer_trx%rowtype,
1905 p_customer_trx_id IN
1906 ra_customer_trx.customer_trx_id%type ) IS
1907
1908 BEGIN
1909 arp_util.debug('arp_ct_pkg.lock_fetch_p()+');
1910
1911 SELECT *
1912 INTO p_trx_rec
1913 FROM ra_customer_trx
1914 WHERE customer_trx_id = p_customer_trx_id
1915 FOR UPDATE OF customer_trx_id NOWAIT;
1916
1917 arp_util.debug('arp_ct_pkg.lock_fetch_p()-');
1918
1919 EXCEPTION
1920 WHEN OTHERS THEN
1921 arp_util.debug( 'EXCEPTION: arp_ct_pkg.lock_fetch_p' );
1922 RAISE;
1923 END;
1924
1925 /*============================================================================+
1926 | PROCEDURE |
1927 | lock_compare_p |
1928 | |
1929 | DESCRIPTION |
1930 | This procedure locks the ra_customer_trx row identified by the |
1931 | p_customer_trx_id parameter only if no columns in that row have |
1932 | changed from when they were first selected in the form. |
1933 | |
1934 | SCOPE - PUBLIC |
1935 | |
1936 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1937 | arp_util.debug |
1938 | |
1939 | ARGUMENTS : IN: |
1940 | p_customer_trx_id - identifies the row to lock |
1941 | p_trx_rec - trx record for comparison |
1942 | OUT: |
1943 | None |
1944 | |
1945 | RETURNS : NONE |
1946 | |
1947 | NOTES |
1948 | |
1949 | MODIFICATION HISTORY |
1950 | 07-JUN-95 Charlie Tomberg Created |
1951 | 29-JUN-95 Charlie Tomberg Modified to use select for update |
1952 | 20-MAR-2000 J Rautiainen Added BR project related columns |
1953 | BR_AMOUNT, BR_UNPAID_FLAG,BR_ON_HOLD_FLAG, |
1954 | DRAWEE_ID, DRAWEE_CONTACT_ID, |
1955 | DRAWEE_SITE_USE_ID |
1956 | DRAWEE_BANK_ACCOUNT_ID, |
1957 | REMITTANCE_BANK_ACCOUNT_ID, |
1958 | OVERRIDE_REMIT_ACCOUNT_FLAG and |
1959 | SPECIAL_INSTRUCTIONSinto table handlers |
1960 | 24-JUL-2000 J Rautiainen Added BR project related column |
1961 | REMITTANCE_BATCH_ID |
1962 | 31-OCT-2000 Y Rakotonirainy Bug 1243304 : Added columns |
1963 | address_verification_code and |
1964 | approval_code and |
1965 | bill_to_address_id and |
1966 | edi_processed_flag and |
1967 | edi_processed_status and |
1968 | payment_server_order_num and |
1969 | post_request_id and |
1970 | request_id and |
1971 | ship_to_address_id |
1972 | wh_update_date |
1973 | into the table handlers. |
1974 | |
1975 | 20-Jun-2002 Sahana Bug2427456: Added global attribute columns |
1976 | 18-May-2005 Debbie Jancis Added Legal entity Id for LE project |
1977 | 09-Aug-2005 Surendra Rajan Added payment_trxn_extension_id |
1978 +============================================================================*/
1979
1980 PROCEDURE lock_compare_p( p_trx_rec IN ra_customer_trx%rowtype,
1981 p_customer_trx_id IN
1982 ra_customer_trx.customer_trx_id%type) IS
1983
1984 l_new_trx_rec ra_customer_trx%rowtype;
1985
1986 BEGIN
1987 arp_util.debug('arp_ct_pkg.lock_compare_p()+');
1988
1989 SELECT *
1990 INTO l_new_trx_rec
1991 FROM ra_customer_trx trx
1992 WHERE trx.customer_trx_id = p_customer_trx_id
1993 AND
1994 (
1995 NVL(trx.trx_number, AR_TEXT_DUMMY) =
1996 NVL(
1997 DECODE(p_trx_rec.trx_number,
1998 AR_TEXT_DUMMY, trx.trx_number,
1999 p_trx_rec.trx_number),
2000 AR_TEXT_DUMMY
2001 )
2002 AND
2003 NVL(trx.customer_trx_id, AR_NUMBER_DUMMY) =
2004 NVL(
2005 DECODE(p_trx_rec.customer_trx_id,
2006 AR_NUMBER_DUMMY, trx.customer_trx_id,
2007 p_trx_rec.customer_trx_id),
2008 AR_NUMBER_DUMMY
2009 )
2010 AND
2011 NVL(trx.created_by, AR_NUMBER_DUMMY) =
2012 NVL(
2013 DECODE(p_trx_rec.created_by,
2014 AR_NUMBER_DUMMY, trx.created_by,
2015 p_trx_rec.created_by),
2016 AR_NUMBER_DUMMY
2017 )
2018 AND
2019 NVL(TRUNC(trx.creation_date), AR_DATE_DUMMY) =
2020 NVL(
2021 DECODE(TRUNC(p_trx_rec.creation_date),
2022 AR_DATE_DUMMY, TRUNC(trx.creation_date),
2023 TRUNC(p_trx_rec.creation_date)),
2024 AR_DATE_DUMMY
2025 )
2026 AND
2027 NVL(trx.last_updated_by, AR_NUMBER_DUMMY) =
2028 NVL(
2029 DECODE(p_trx_rec.last_updated_by,
2030 AR_NUMBER_DUMMY, trx.last_updated_by,
2031 p_trx_rec.last_updated_by),
2032 AR_NUMBER_DUMMY
2033 )
2034 AND
2035 NVL(TRUNC(trx.last_update_date), AR_DATE_DUMMY) =
2036 NVL(
2037 DECODE(TRUNC(p_trx_rec.last_update_date),
2038 AR_DATE_DUMMY, TRUNC(trx.last_update_date),
2039 TRUNC(p_trx_rec.last_update_date)),
2040 AR_DATE_DUMMY
2041 )
2042 AND
2043 NVL(trx.last_update_login, AR_NUMBER_DUMMY) =
2044 NVL(
2045 DECODE(p_trx_rec.last_update_login,
2046 AR_NUMBER_DUMMY, trx.last_update_login,
2047 p_trx_rec.last_update_login),
2048 AR_NUMBER_DUMMY
2049 )
2050 AND
2051 NVL(trx.set_of_books_id, AR_NUMBER_DUMMY) =
2052 NVL(
2053 DECODE(p_trx_rec.set_of_books_id,
2054 AR_NUMBER_DUMMY, trx.set_of_books_id,
2055 p_trx_rec.set_of_books_id),
2056 AR_NUMBER_DUMMY
2057 )
2058 AND
2059 NVL(trx.program_application_id, AR_NUMBER_DUMMY) =
2060 NVL(
2061 DECODE(p_trx_rec.program_application_id,
2062 AR_NUMBER_DUMMY, trx.program_application_id,
2063 p_trx_rec.program_application_id),
2064 AR_NUMBER_DUMMY
2065 )
2066 AND
2067 NVL(trx.program_id, AR_NUMBER_DUMMY) =
2068 NVL(
2069 DECODE(p_trx_rec.program_id,
2070 AR_NUMBER_DUMMY, trx.program_id,
2071 p_trx_rec.program_id),
2072 AR_NUMBER_DUMMY
2073 )
2074 AND
2075 NVL(TRUNC(trx.program_update_date), AR_DATE_DUMMY) =
2076 NVL(
2077 DECODE(TRUNC(p_trx_rec.program_update_date),
2078 AR_DATE_DUMMY, TRUNC(trx.program_update_date),
2079 TRUNC(p_trx_rec.program_update_date)),
2080 AR_DATE_DUMMY
2081 )
2082 AND
2083 NVL(trx.posting_control_id, AR_NUMBER_DUMMY) =
2084 NVL(
2085 DECODE(p_trx_rec.posting_control_id,
2086 AR_NUMBER_DUMMY, trx.posting_control_id,
2087 p_trx_rec.posting_control_id),
2088 AR_NUMBER_DUMMY
2089 )
2090 AND
2091 NVL(trx.ra_post_loop_number, AR_NUMBER_DUMMY) =
2092 NVL(
2093 DECODE(p_trx_rec.ra_post_loop_number,
2094 AR_NUMBER_DUMMY, trx.ra_post_loop_number,
2095 p_trx_rec.ra_post_loop_number),
2096 AR_NUMBER_DUMMY
2097 )
2098 AND
2099 NVL(trx.complete_flag, AR_FLAG_DUMMY) =
2100 NVL(
2101 DECODE(p_trx_rec.complete_flag,
2102 AR_FLAG_DUMMY, trx.complete_flag,
2103 p_trx_rec.complete_flag),
2104 AR_FLAG_DUMMY
2105 )
2106 AND
2107 NVL(trx.initial_customer_trx_id, AR_NUMBER_DUMMY) =
2108 NVL(
2109 DECODE(p_trx_rec.initial_customer_trx_id,
2110 AR_NUMBER_DUMMY, trx.initial_customer_trx_id,
2111 p_trx_rec.initial_customer_trx_id),
2112 AR_NUMBER_DUMMY
2113 )
2114 AND
2115 NVL(trx.previous_customer_trx_id, AR_NUMBER_DUMMY) =
2116 NVL(
2117 DECODE(p_trx_rec.previous_customer_trx_id,
2118 AR_NUMBER_DUMMY, trx.previous_customer_trx_id,
2119 p_trx_rec.previous_customer_trx_id),
2120 AR_NUMBER_DUMMY
2121 )
2122 AND
2123 NVL(trx.related_customer_trx_id, AR_NUMBER_DUMMY) =
2124 NVL(
2125 DECODE(p_trx_rec.related_customer_trx_id,
2126 AR_NUMBER_DUMMY, trx.related_customer_trx_id,
2127 p_trx_rec.related_customer_trx_id),
2128 AR_NUMBER_DUMMY
2129 )
2130 AND
2131 NVL(trx.recurred_from_trx_number, AR_TEXT_DUMMY) =
2132 NVL(
2133 DECODE(p_trx_rec.recurred_from_trx_number,
2134 AR_TEXT_DUMMY, trx.recurred_from_trx_number,
2135 p_trx_rec.recurred_from_trx_number),
2136 AR_TEXT_DUMMY
2137 )
2138 AND
2139 NVL(trx.cust_trx_type_id, AR_NUMBER_DUMMY) =
2140 NVL(
2141 DECODE(p_trx_rec.cust_trx_type_id,
2142 AR_NUMBER_DUMMY, trx.cust_trx_type_id,
2143 p_trx_rec.cust_trx_type_id),
2144 AR_NUMBER_DUMMY
2145 )
2146 AND
2147 NVL(trx.batch_id, AR_NUMBER_DUMMY) =
2148 NVL(
2149 DECODE(p_trx_rec.batch_id,
2150 AR_NUMBER_DUMMY, trx.batch_id,
2151 p_trx_rec.batch_id),
2152 AR_NUMBER_DUMMY
2153 )
2154 AND
2155 NVL(trx.batch_source_id, AR_NUMBER_DUMMY) =
2156 NVL(
2157 DECODE(p_trx_rec.batch_source_id,
2158 AR_NUMBER_DUMMY, trx.batch_source_id,
2159 p_trx_rec.batch_source_id),
2160 AR_NUMBER_DUMMY
2161 )
2162 AND
2163 NVL(trx.agreement_id, AR_NUMBER_DUMMY) =
2164 NVL(
2165 DECODE(p_trx_rec.agreement_id,
2166 AR_NUMBER_DUMMY, trx.agreement_id,
2167 p_trx_rec.agreement_id),
2168 AR_NUMBER_DUMMY
2169 )
2170 AND
2171 NVL(TRUNC(trx.trx_date), AR_DATE_DUMMY) =
2172 NVL(
2173 DECODE(TRUNC(p_trx_rec.trx_date),
2174 AR_DATE_DUMMY, TRUNC(trx.trx_date),
2175 TRUNC(p_trx_rec.trx_date)),
2176 AR_DATE_DUMMY
2177 )
2178 AND
2179 NVL(trx.bill_to_customer_id, AR_NUMBER_DUMMY) =
2180 NVL(
2181 DECODE(p_trx_rec.bill_to_customer_id,
2182 AR_NUMBER_DUMMY, trx.bill_to_customer_id,
2183 p_trx_rec.bill_to_customer_id),
2184 AR_NUMBER_DUMMY
2185 )
2186 AND
2187 NVL(trx.bill_to_contact_id, AR_NUMBER_DUMMY) =
2188 NVL(
2189 DECODE(p_trx_rec.bill_to_contact_id,
2190 AR_NUMBER_DUMMY, trx.bill_to_contact_id,
2191 p_trx_rec.bill_to_contact_id),
2192 AR_NUMBER_DUMMY
2193 )
2194 AND
2195 NVL(trx.bill_to_site_use_id, AR_NUMBER_DUMMY) =
2196 NVL(
2197 DECODE(p_trx_rec.bill_to_site_use_id,
2198 AR_NUMBER_DUMMY, trx.bill_to_site_use_id,
2199 p_trx_rec.bill_to_site_use_id),
2200 AR_NUMBER_DUMMY
2201 )
2202 AND
2203 NVL(trx.ship_to_customer_id, AR_NUMBER_DUMMY) =
2204 NVL(
2205 DECODE(p_trx_rec.ship_to_customer_id,
2206 AR_NUMBER_DUMMY, trx.ship_to_customer_id,
2207 p_trx_rec.ship_to_customer_id),
2208 AR_NUMBER_DUMMY
2209 )
2210 AND
2211 NVL(trx.ship_to_contact_id, AR_NUMBER_DUMMY) =
2212 NVL(
2213 DECODE(p_trx_rec.ship_to_contact_id,
2214 AR_NUMBER_DUMMY, trx.ship_to_contact_id,
2215 p_trx_rec.ship_to_contact_id),
2216 AR_NUMBER_DUMMY
2217 )
2218 AND
2219 NVL(trx.ship_to_site_use_id, AR_NUMBER_DUMMY) =
2220 NVL(
2221 DECODE(p_trx_rec.ship_to_site_use_id,
2222 AR_NUMBER_DUMMY, trx.ship_to_site_use_id,
2223 p_trx_rec.ship_to_site_use_id),
2224 AR_NUMBER_DUMMY
2225 )
2226 AND
2227 NVL(trx.sold_to_customer_id, AR_NUMBER_DUMMY) =
2228 NVL(
2229 DECODE(p_trx_rec.sold_to_customer_id,
2230 AR_NUMBER_DUMMY, trx.sold_to_customer_id,
2231 p_trx_rec.sold_to_customer_id),
2232 AR_NUMBER_DUMMY
2233 )
2234 AND
2235 NVL(trx.sold_to_site_use_id, AR_NUMBER_DUMMY) =
2236 NVL(
2237 DECODE(p_trx_rec.sold_to_site_use_id,
2238 AR_NUMBER_DUMMY, trx.sold_to_site_use_id,
2239 p_trx_rec.sold_to_site_use_id),
2240 AR_NUMBER_DUMMY
2241 )
2242 AND
2243 NVL(trx.sold_to_contact_id, AR_NUMBER_DUMMY) =
2244 NVL(
2245 DECODE(p_trx_rec.sold_to_contact_id,
2246 AR_NUMBER_DUMMY, trx.sold_to_contact_id,
2247 p_trx_rec.sold_to_contact_id),
2248 AR_NUMBER_DUMMY
2249 )
2250 AND
2251 NVL(trx.customer_reference, AR_TEXT_DUMMY) =
2252 NVL(
2253 DECODE(p_trx_rec.customer_reference,
2254 AR_TEXT_DUMMY, trx.customer_reference,
2255 p_trx_rec.customer_reference),
2256 AR_TEXT_DUMMY
2257 )
2258 AND
2259 NVL(TRUNC(trx.customer_reference_date), AR_DATE_DUMMY) =
2260 NVL(
2261 DECODE(TRUNC(p_trx_rec.customer_reference_date),
2262 AR_DATE_DUMMY, TRUNC(trx.customer_reference_date),
2263 TRUNC(p_trx_rec.customer_reference_date)),
2264 AR_DATE_DUMMY
2265 )
2266 AND
2267 NVL(trx.credit_method_for_installments, AR_TEXT_DUMMY) =
2268 NVL(
2269 DECODE(p_trx_rec.credit_method_for_installments,
2270 AR_TEXT_DUMMY, trx.credit_method_for_installments,
2271 p_trx_rec.credit_method_for_installments),
2272 AR_TEXT_DUMMY
2273 )
2274 AND
2275 NVL(trx.credit_method_for_rules, AR_TEXT_DUMMY) =
2276 NVL(
2277 DECODE(p_trx_rec.credit_method_for_rules,
2278 AR_TEXT_DUMMY, trx.credit_method_for_rules,
2279 p_trx_rec.credit_method_for_rules),
2280 AR_TEXT_DUMMY
2281 )
2282 AND
2283 NVL(TRUNC(trx.start_date_commitment), AR_DATE_DUMMY) =
2284 NVL(
2285 DECODE(TRUNC(p_trx_rec.start_date_commitment),
2286 AR_DATE_DUMMY, TRUNC(trx.start_date_commitment),
2287 TRUNC(p_trx_rec.start_date_commitment)),
2288 AR_DATE_DUMMY
2289 )
2290 AND
2291 NVL(TRUNC(trx.end_date_commitment), AR_DATE_DUMMY) =
2292 NVL(
2293 DECODE(TRUNC(p_trx_rec.end_date_commitment),
2294 AR_DATE_DUMMY, TRUNC(trx.end_date_commitment),
2295 TRUNC(p_trx_rec.end_date_commitment)),
2296 AR_DATE_DUMMY
2297 )
2298 AND
2299 NVL(TRUNC(trx.exchange_date), AR_DATE_DUMMY) =
2300 NVL(
2301 DECODE(TRUNC(p_trx_rec.exchange_date),
2302 AR_DATE_DUMMY, TRUNC(trx.exchange_date),
2303 TRUNC(p_trx_rec.exchange_date)),
2304 AR_DATE_DUMMY
2305 )
2306 AND
2307 NVL(trx.exchange_rate, AR_NUMBER_DUMMY) =
2308 NVL(
2309 DECODE(p_trx_rec.exchange_rate,
2310 AR_NUMBER_DUMMY, trx.exchange_rate,
2311 p_trx_rec.exchange_rate),
2312 AR_NUMBER_DUMMY
2313 )
2314 AND
2315 NVL(trx.exchange_rate_type, AR_TEXT_DUMMY) =
2316 NVL(
2317 DECODE(p_trx_rec.exchange_rate_type,
2318 AR_TEXT_DUMMY, trx.exchange_rate_type,
2319 p_trx_rec.exchange_rate_type),
2320 AR_TEXT_DUMMY
2321 )
2322 AND
2323 NVL(trx.customer_bank_account_id, AR_NUMBER_DUMMY) =
2324 NVL(
2325 DECODE(p_trx_rec.customer_bank_account_id,
2326 AR_NUMBER_DUMMY, trx.customer_bank_account_id,
2327 p_trx_rec.customer_bank_account_id),
2328 AR_NUMBER_DUMMY
2329 )
2330 AND
2331 NVL(trx.finance_charges, AR_FLAG_DUMMY) =
2332 NVL(
2333 DECODE(p_trx_rec.finance_charges,
2334 AR_FLAG_DUMMY, trx.finance_charges,
2335 p_trx_rec.finance_charges),
2336 AR_FLAG_DUMMY
2337 )
2338 AND
2339 NVL(trx.fob_point, AR_TEXT_DUMMY) =
2340 NVL(
2341 DECODE(p_trx_rec.fob_point,
2342 AR_TEXT_DUMMY, trx.fob_point,
2343 p_trx_rec.fob_point),
2344 AR_TEXT_DUMMY
2345 )
2346 AND
2347 NVL(trx.comments, AR_TEXT_DUMMY) =
2348 NVL(
2349 DECODE(p_trx_rec.comments,
2350 AR_TEXT_DUMMY, trx.comments,
2351 p_trx_rec.comments),
2352 AR_TEXT_DUMMY
2353 )
2354 AND
2355 NVL(trx.internal_notes, AR_TEXT_DUMMY) =
2356 NVL(
2357 DECODE(p_trx_rec.internal_notes,
2358 AR_TEXT_DUMMY, trx.internal_notes,
2359 p_trx_rec.internal_notes),
2360 AR_TEXT_DUMMY
2361 )
2362 AND
2363 NVL(trx.invoice_currency_code, AR_TEXT_DUMMY) =
2364 NVL(
2365 DECODE(p_trx_rec.invoice_currency_code,
2366 AR_TEXT_DUMMY, trx.invoice_currency_code,
2367 p_trx_rec.invoice_currency_code),
2368 AR_TEXT_DUMMY
2369 )
2370 AND
2371 NVL(trx.invoicing_rule_id, AR_NUMBER_DUMMY) =
2372 NVL(
2373 DECODE(p_trx_rec.invoicing_rule_id,
2374 AR_NUMBER_DUMMY, trx.invoicing_rule_id,
2375 p_trx_rec.invoicing_rule_id),
2376 AR_NUMBER_DUMMY
2377 )
2378 AND
2379 NVL(trx.last_printed_sequence_num, AR_NUMBER_DUMMY) =
2380 NVL(
2381 DECODE(p_trx_rec.last_printed_sequence_num,
2382 AR_NUMBER_DUMMY, trx.last_printed_sequence_num,
2383 p_trx_rec.last_printed_sequence_num),
2384 AR_NUMBER_DUMMY
2385 )
2386 AND
2387 NVL(trx.orig_system_batch_name, AR_TEXT_DUMMY) =
2388 NVL(
2389 DECODE(p_trx_rec.orig_system_batch_name,
2390 AR_TEXT_DUMMY, trx.orig_system_batch_name,
2391 p_trx_rec.orig_system_batch_name),
2392 AR_TEXT_DUMMY
2393 )
2394 AND
2395 NVL(trx.primary_salesrep_id, AR_NUMBER_DUMMY) =
2396 NVL(
2397 DECODE(p_trx_rec.primary_salesrep_id,
2398 AR_NUMBER_DUMMY, trx.primary_salesrep_id,
2399 p_trx_rec.primary_salesrep_id),
2400 AR_NUMBER_DUMMY
2401 )
2402 AND
2403 NVL(trx.printing_count, AR_NUMBER_DUMMY) =
2404 NVL(
2405 DECODE(p_trx_rec.printing_count,
2406 AR_NUMBER_DUMMY, trx.printing_count,
2407 p_trx_rec.printing_count),
2408 AR_NUMBER_DUMMY
2409 )
2410 AND
2411 NVL(TRUNC(trx.printing_last_printed), AR_DATE_DUMMY) =
2412 NVL(
2413 DECODE(TRUNC(p_trx_rec.printing_last_printed),
2414 AR_DATE_DUMMY, TRUNC(trx.printing_last_printed),
2415 TRUNC(p_trx_rec.printing_last_printed)),
2416 AR_DATE_DUMMY
2417 )
2418 AND
2419 NVL(trx.printing_option, AR_TEXT_DUMMY) =
2420 NVL(
2421 DECODE(p_trx_rec.printing_option,
2422 AR_TEXT_DUMMY, trx.printing_option,
2423 p_trx_rec.printing_option),
2424 AR_TEXT_DUMMY
2425 )
2426 )
2427 AND
2428 (
2429 NVL(TRUNC(trx.printing_original_date), AR_DATE_DUMMY) =
2430 NVL(
2431 DECODE(TRUNC(p_trx_rec.printing_original_date),
2432 AR_DATE_DUMMY, TRUNC(trx.printing_original_date),
2433 TRUNC(p_trx_rec.printing_original_date)),
2434 AR_DATE_DUMMY
2435 )
2436 AND
2437 NVL(trx.printing_pending, AR_FLAG_DUMMY) =
2438 NVL(
2439 DECODE(p_trx_rec.printing_pending,
2440 AR_FLAG_DUMMY, trx.printing_pending,
2441 p_trx_rec.printing_pending),
2442 AR_FLAG_DUMMY
2443 )
2444 AND
2445 NVL(trx.purchase_order, AR_TEXT_DUMMY) =
2446 NVL(
2447 DECODE(p_trx_rec.purchase_order,
2448 AR_TEXT_DUMMY, trx.purchase_order,
2449 p_trx_rec.purchase_order),
2450 AR_TEXT_DUMMY
2451 )
2452 AND
2453 NVL(TRUNC(trx.purchase_order_date), AR_DATE_DUMMY) =
2454 NVL(
2455 DECODE(TRUNC(p_trx_rec.purchase_order_date),
2456 AR_DATE_DUMMY, TRUNC(trx.purchase_order_date),
2457 TRUNC(p_trx_rec.purchase_order_date)),
2458 AR_DATE_DUMMY
2459 )
2460 AND
2461 NVL(trx.purchase_order_revision, AR_TEXT_DUMMY) =
2462 NVL(
2463 DECODE(p_trx_rec.purchase_order_revision,
2464 AR_TEXT_DUMMY, trx.purchase_order_revision,
2465 p_trx_rec.purchase_order_revision),
2466 AR_TEXT_DUMMY
2467 )
2468 AND
2469 NVL(trx.receipt_method_id, AR_NUMBER_DUMMY) =
2470 NVL(
2471 DECODE(p_trx_rec.receipt_method_id,
2472 AR_NUMBER_DUMMY, trx.receipt_method_id,
2473 p_trx_rec.receipt_method_id),
2474 AR_NUMBER_DUMMY
2475 )
2476 AND
2477 NVL(trx.remit_to_address_id, AR_NUMBER_DUMMY) =
2478 NVL(
2479 DECODE(p_trx_rec.remit_to_address_id,
2480 AR_NUMBER_DUMMY, trx.remit_to_address_id,
2481 p_trx_rec.remit_to_address_id),
2482 AR_NUMBER_DUMMY
2483 )
2484 AND
2485 NVL(trx.shipment_id, AR_NUMBER_DUMMY) =
2486 NVL(
2487 DECODE(p_trx_rec.shipment_id,
2488 AR_NUMBER_DUMMY, trx.shipment_id,
2489 p_trx_rec.shipment_id),
2490 AR_NUMBER_DUMMY
2491 )
2492 AND
2493 NVL(TRUNC(trx.ship_date_actual), AR_DATE_DUMMY) =
2494 NVL(
2495 DECODE(TRUNC(p_trx_rec.ship_date_actual),
2496 AR_DATE_DUMMY, TRUNC(trx.ship_date_actual),
2497 TRUNC(p_trx_rec.ship_date_actual)),
2498 AR_DATE_DUMMY
2499 )
2500 AND
2501 NVL(trx.ship_via, AR_TEXT_DUMMY) =
2502 NVL(
2503 DECODE(p_trx_rec.ship_via,
2504 AR_TEXT_DUMMY, trx.ship_via,
2505 p_trx_rec.ship_via),
2506 AR_TEXT_DUMMY
2507 )
2508 AND
2509 NVL(TRUNC(trx.term_due_date), AR_DATE_DUMMY) =
2510 NVL(
2511 DECODE(TRUNC(p_trx_rec.term_due_date),
2512 AR_DATE_DUMMY, TRUNC(trx.term_due_date),
2513 TRUNC(p_trx_rec.term_due_date)),
2514 AR_DATE_DUMMY
2515 )
2516 AND
2517 NVL(trx.term_id, AR_NUMBER_DUMMY) =
2518 NVL(
2519 DECODE(p_trx_rec.term_id,
2520 AR_NUMBER_DUMMY, trx.term_id,
2521 p_trx_rec.term_id),
2522 AR_NUMBER_DUMMY
2523 )
2524 AND
2525 NVL(trx.territory_id, AR_NUMBER_DUMMY) =
2526 NVL(
2527 DECODE(p_trx_rec.territory_id,
2528 AR_NUMBER_DUMMY, trx.territory_id,
2529 p_trx_rec.territory_id),
2530 AR_NUMBER_DUMMY
2531 )
2532 AND
2533 NVL(trx.waybill_number, AR_TEXT_DUMMY) =
2534 NVL(
2535 DECODE(p_trx_rec.waybill_number,
2536 AR_TEXT_DUMMY, trx.waybill_number,
2537 p_trx_rec.waybill_number),
2538 AR_TEXT_DUMMY
2539 )
2540 AND
2541 NVL(trx.status_trx, AR_TEXT_DUMMY) =
2542 NVL(
2543 DECODE(p_trx_rec.status_trx,
2544 AR_TEXT_DUMMY, trx.status_trx,
2545 p_trx_rec.status_trx),
2546 AR_TEXT_DUMMY
2547 )
2548 AND
2549 NVL(trx.reason_code, AR_TEXT_DUMMY) =
2550 NVL(
2551 DECODE(p_trx_rec.reason_code,
2552 AR_TEXT_DUMMY, trx.reason_code,
2553 p_trx_rec.reason_code),
2554 AR_TEXT_DUMMY
2555 )
2556 AND
2557 NVL(trx.doc_sequence_id, AR_NUMBER_DUMMY) =
2558 NVL(
2559 DECODE(p_trx_rec.doc_sequence_id,
2560 AR_NUMBER_DUMMY, trx.doc_sequence_id,
2561 p_trx_rec.doc_sequence_id),
2562 AR_NUMBER_DUMMY
2563 )
2564 AND
2565 NVL(trx.doc_sequence_value, AR_NUMBER_DUMMY) =
2566 NVL(
2567 DECODE(p_trx_rec.doc_sequence_value,
2568 AR_NUMBER_DUMMY, trx.doc_sequence_value,
2569 p_trx_rec.doc_sequence_value),
2570 AR_NUMBER_DUMMY
2571 )
2572 AND
2573 NVL(trx.paying_customer_id, AR_NUMBER_DUMMY) =
2574 NVL(
2575 DECODE(p_trx_rec.paying_customer_id,
2576 AR_NUMBER_DUMMY, trx.paying_customer_id,
2577 p_trx_rec.paying_customer_id),
2578 AR_NUMBER_DUMMY
2579 )
2580 AND
2581 NVL(trx.paying_site_use_id, AR_NUMBER_DUMMY) =
2582 NVL(
2583 DECODE(p_trx_rec.paying_site_use_id,
2584 AR_NUMBER_DUMMY, trx.paying_site_use_id,
2585 p_trx_rec.paying_site_use_id),
2586 AR_NUMBER_DUMMY
2587 )
2588 AND
2589 NVL(trx.related_batch_source_id, AR_NUMBER_DUMMY) =
2590 NVL(
2591 DECODE(p_trx_rec.related_batch_source_id,
2592 AR_NUMBER_DUMMY, trx.related_batch_source_id,
2593 p_trx_rec.related_batch_source_id),
2594 AR_NUMBER_DUMMY
2595 )
2596 AND
2597 NVL(trx.default_tax_exempt_flag, AR_FLAG_DUMMY) =
2598 NVL(
2599 DECODE(p_trx_rec.default_tax_exempt_flag,
2600 AR_FLAG_DUMMY, trx.default_tax_exempt_flag,
2601 p_trx_rec.default_tax_exempt_flag),
2602 AR_FLAG_DUMMY
2603 )
2604 AND
2605 NVL(trx.created_from, AR_TEXT_DUMMY) =
2606 NVL(
2607 DECODE(p_trx_rec.created_from,
2608 AR_TEXT_DUMMY, trx.created_from,
2609 p_trx_rec.created_from),
2610 AR_TEXT_DUMMY
2611 )
2612 AND
2613 NVL(trx.default_ussgl_trx_code_context, AR_TEXT_DUMMY) =
2614 NVL(
2615 DECODE(p_trx_rec.default_ussgl_trx_code_context,
2616 AR_TEXT_DUMMY, trx.default_ussgl_trx_code_context,
2617 p_trx_rec.default_ussgl_trx_code_context),
2618 AR_TEXT_DUMMY
2619 )
2620 AND
2621 NVL(trx.default_ussgl_transaction_code, AR_TEXT_DUMMY) =
2622 NVL(
2623 DECODE(p_trx_rec.default_ussgl_transaction_code,
2624 AR_TEXT_DUMMY, trx.default_ussgl_transaction_code,
2625 p_trx_rec.default_ussgl_transaction_code),
2626 AR_TEXT_DUMMY
2627 )
2628 AND
2629 NVL(trx.old_trx_number, AR_TEXT_DUMMY) =
2630 NVL(
2631 DECODE(p_trx_rec.old_trx_number,
2632 AR_TEXT_DUMMY, trx.old_trx_number,
2633 p_trx_rec.old_trx_number),
2634 AR_TEXT_DUMMY
2635 )
2636 AND
2637 NVL(trx.interface_header_context, AR_TEXT_DUMMY) =
2638 NVL(
2639 DECODE(p_trx_rec.interface_header_context,
2640 AR_TEXT_DUMMY, trx.interface_header_context,
2641 p_trx_rec.interface_header_context),
2642 AR_TEXT_DUMMY
2643 )
2644 AND
2645 NVL(trx.interface_header_attribute1, AR_TEXT_DUMMY) =
2646 NVL(
2647 DECODE(p_trx_rec.interface_header_attribute1,
2648 AR_TEXT_DUMMY, trx.interface_header_attribute1,
2649 p_trx_rec.interface_header_attribute1),
2650 AR_TEXT_DUMMY
2651 )
2652 AND
2653 NVL(trx.interface_header_attribute2, AR_TEXT_DUMMY) =
2654 NVL(
2655 DECODE(p_trx_rec.interface_header_attribute2,
2656 AR_TEXT_DUMMY, trx.interface_header_attribute2,
2657 p_trx_rec.interface_header_attribute2),
2658 AR_TEXT_DUMMY
2659 )
2660 AND
2661 NVL(trx.interface_header_attribute3, AR_TEXT_DUMMY) =
2662 NVL(
2663 DECODE(p_trx_rec.interface_header_attribute3,
2664 AR_TEXT_DUMMY, trx.interface_header_attribute3,
2665 p_trx_rec.interface_header_attribute3),
2666 AR_TEXT_DUMMY
2667 )
2668 AND
2669 NVL(trx.interface_header_attribute4, AR_TEXT_DUMMY) =
2670 NVL(
2671 DECODE(p_trx_rec.interface_header_attribute4,
2672 AR_TEXT_DUMMY, trx.interface_header_attribute4,
2673 p_trx_rec.interface_header_attribute4),
2674 AR_TEXT_DUMMY
2675 )
2676 AND
2677 NVL(trx.interface_header_attribute5, AR_TEXT_DUMMY) =
2678 NVL(
2679 DECODE(p_trx_rec.interface_header_attribute5,
2680 AR_TEXT_DUMMY, trx.interface_header_attribute5,
2681 p_trx_rec.interface_header_attribute5),
2682 AR_TEXT_DUMMY
2683 )
2684 AND
2685 NVL(trx.interface_header_attribute6, AR_TEXT_DUMMY) =
2686 NVL(
2687 DECODE(p_trx_rec.interface_header_attribute6,
2688 AR_TEXT_DUMMY, trx.interface_header_attribute6,
2689 p_trx_rec.interface_header_attribute6),
2690 AR_TEXT_DUMMY
2691 )
2692 AND
2693 NVL(trx.interface_header_attribute7, AR_TEXT_DUMMY) =
2694 NVL(
2695 DECODE(p_trx_rec.interface_header_attribute7,
2696 AR_TEXT_DUMMY, trx.interface_header_attribute7,
2697 p_trx_rec.interface_header_attribute7),
2698 AR_TEXT_DUMMY
2699 )
2700 AND
2701 NVL(trx.interface_header_attribute8, AR_TEXT_DUMMY) =
2702 NVL(
2703 DECODE(p_trx_rec.interface_header_attribute8,
2704 AR_TEXT_DUMMY, trx.interface_header_attribute8,
2705 p_trx_rec.interface_header_attribute8),
2706 AR_TEXT_DUMMY
2707 )
2708 AND
2709 NVL(trx.interface_header_attribute9, AR_TEXT_DUMMY) =
2710 NVL(
2711 DECODE(p_trx_rec.interface_header_attribute9,
2712 AR_TEXT_DUMMY, trx.interface_header_attribute9,
2713 p_trx_rec.interface_header_attribute9),
2714 AR_TEXT_DUMMY
2715 )
2716 AND
2717 NVL(trx.interface_header_attribute10, AR_TEXT_DUMMY) =
2718 NVL(
2719 DECODE(p_trx_rec.interface_header_attribute10,
2720 AR_TEXT_DUMMY, trx.interface_header_attribute10,
2721 p_trx_rec.interface_header_attribute10),
2722 AR_TEXT_DUMMY
2723 )
2724 AND
2725 NVL(trx.interface_header_attribute11, AR_TEXT_DUMMY) =
2726 NVL(
2727 DECODE(p_trx_rec.interface_header_attribute11,
2728 AR_TEXT_DUMMY, trx.interface_header_attribute11,
2729 p_trx_rec.interface_header_attribute11),
2730 AR_TEXT_DUMMY
2731 )
2732 AND
2733 NVL(trx.interface_header_attribute12, AR_TEXT_DUMMY) =
2734 NVL(
2735 DECODE(p_trx_rec.interface_header_attribute12,
2736 AR_TEXT_DUMMY, trx.interface_header_attribute12,
2737 p_trx_rec.interface_header_attribute12),
2738 AR_TEXT_DUMMY
2739 )
2740 AND
2741 NVL(trx.interface_header_attribute13, AR_TEXT_DUMMY) =
2742 NVL(
2743 DECODE(p_trx_rec.interface_header_attribute13,
2744 AR_TEXT_DUMMY, trx.interface_header_attribute13,
2745 p_trx_rec.interface_header_attribute13),
2746 AR_TEXT_DUMMY
2747 )
2748 AND
2749 NVL(trx.interface_header_attribute14, AR_TEXT_DUMMY) =
2750 NVL(
2751 DECODE(p_trx_rec.interface_header_attribute14,
2752 AR_TEXT_DUMMY, trx.interface_header_attribute14,
2753 p_trx_rec.interface_header_attribute14),
2754 AR_TEXT_DUMMY
2755 )
2756 AND
2757 NVL(trx.interface_header_attribute15, AR_TEXT_DUMMY) =
2758 NVL(
2759 DECODE(p_trx_rec.interface_header_attribute15,
2760 AR_TEXT_DUMMY, trx.interface_header_attribute15,
2761 p_trx_rec.interface_header_attribute15),
2762 AR_TEXT_DUMMY
2763 )
2764 AND
2765 NVL(trx.attribute_category, AR_TEXT_DUMMY) =
2766 NVL(
2767 DECODE(p_trx_rec.attribute_category,
2768 AR_TEXT_DUMMY, trx.attribute_category,
2769 p_trx_rec.attribute_category),
2770 AR_TEXT_DUMMY
2771 )
2772 AND
2773 NVL(trx.attribute1, AR_TEXT_DUMMY) =
2774 NVL(
2775 DECODE(p_trx_rec.attribute1,
2776 AR_TEXT_DUMMY, trx.attribute1,
2777 p_trx_rec.attribute1),
2778 AR_TEXT_DUMMY
2779 )
2780 AND
2781 NVL(trx.attribute2, AR_TEXT_DUMMY) =
2782 NVL(
2783 DECODE(p_trx_rec.attribute2,
2784 AR_TEXT_DUMMY, trx.attribute2,
2785 p_trx_rec.attribute2),
2786 AR_TEXT_DUMMY
2787 )
2788 AND
2789 NVL(trx.attribute3, AR_TEXT_DUMMY) =
2790 NVL(
2791 DECODE(p_trx_rec.attribute3,
2792 AR_TEXT_DUMMY, trx.attribute3,
2793 p_trx_rec.attribute3),
2794 AR_TEXT_DUMMY
2795 )
2796 AND
2797 NVL(trx.attribute4, AR_TEXT_DUMMY) =
2798 NVL(
2799 DECODE(p_trx_rec.attribute4,
2800 AR_TEXT_DUMMY, trx.attribute4,
2801 p_trx_rec.attribute4),
2802 AR_TEXT_DUMMY
2803 )
2804 )
2805 AND
2806 (
2807 NVL(trx.attribute5, AR_TEXT_DUMMY) =
2808 NVL(
2809 DECODE(p_trx_rec.attribute5,
2810 AR_TEXT_DUMMY, trx.attribute5,
2811 p_trx_rec.attribute5),
2812 AR_TEXT_DUMMY
2813 )
2814 AND
2815 NVL(trx.attribute6, AR_TEXT_DUMMY) =
2816 NVL(
2817 DECODE(p_trx_rec.attribute6,
2818 AR_TEXT_DUMMY, trx.attribute6,
2819 p_trx_rec.attribute6),
2820 AR_TEXT_DUMMY
2821 )
2822 AND
2823 NVL(trx.attribute7, AR_TEXT_DUMMY) =
2824 NVL(
2825 DECODE(p_trx_rec.attribute7,
2826 AR_TEXT_DUMMY, trx.attribute7,
2827 p_trx_rec.attribute7),
2828 AR_TEXT_DUMMY
2829 )
2830 AND
2831 NVL(trx.attribute8, AR_TEXT_DUMMY) =
2832 NVL(
2833 DECODE(p_trx_rec.attribute8,
2834 AR_TEXT_DUMMY, trx.attribute8,
2835 p_trx_rec.attribute8),
2836 AR_TEXT_DUMMY
2837 )
2838 AND
2839 NVL(trx.attribute9, AR_TEXT_DUMMY) =
2840 NVL(
2841 DECODE(p_trx_rec.attribute9,
2842 AR_TEXT_DUMMY, trx.attribute9,
2843 p_trx_rec.attribute9),
2844 AR_TEXT_DUMMY
2845 )
2846 AND
2847 NVL(trx.attribute10, AR_TEXT_DUMMY) =
2848 NVL(
2849 DECODE(p_trx_rec.attribute10,
2850 AR_TEXT_DUMMY, trx.attribute10,
2851 p_trx_rec.attribute10),
2852 AR_TEXT_DUMMY
2853 )
2854 AND
2855 NVL(trx.attribute11, AR_TEXT_DUMMY) =
2856 NVL(
2857 DECODE(p_trx_rec.attribute11,
2858 AR_TEXT_DUMMY, trx.attribute11,
2859 p_trx_rec.attribute11),
2860 AR_TEXT_DUMMY
2861 )
2862 AND
2863 NVL(trx.attribute12, AR_TEXT_DUMMY) =
2864 NVL(
2865 DECODE(p_trx_rec.attribute12,
2866 AR_TEXT_DUMMY, trx.attribute12,
2867 p_trx_rec.attribute12),
2868 AR_TEXT_DUMMY
2869 )
2870 AND
2871 NVL(trx.attribute13, AR_TEXT_DUMMY) =
2872 NVL(
2873 DECODE(p_trx_rec.attribute13,
2874 AR_TEXT_DUMMY, trx.attribute13,
2875 p_trx_rec.attribute13),
2876 AR_TEXT_DUMMY
2877 )
2878 AND
2879 NVL(trx.attribute14, AR_TEXT_DUMMY) =
2880 NVL(
2881 DECODE(p_trx_rec.attribute14,
2882 AR_TEXT_DUMMY, trx.attribute14,
2883 p_trx_rec.attribute14),
2884 AR_TEXT_DUMMY
2885 )
2886 AND
2887 NVL(trx.attribute15, AR_TEXT_DUMMY) =
2888 NVL(
2889 DECODE(p_trx_rec.attribute15,
2890 AR_TEXT_DUMMY, trx.attribute15,
2891 p_trx_rec.attribute15),
2892 AR_TEXT_DUMMY
2893 )
2894
2895 AND
2896 NVL(trx.br_amount, AR_NUMBER_DUMMY) =
2897 NVL(
2898 DECODE(p_trx_rec.br_amount,
2899 AR_NUMBER_DUMMY, trx.br_amount,
2900 p_trx_rec.br_amount),
2901 AR_NUMBER_DUMMY
2902 )
2903 AND
2904 NVL(trx.br_unpaid_flag, AR_FLAG_DUMMY) =
2905 NVL(
2906 DECODE(p_trx_rec.br_unpaid_flag,
2907 AR_FLAG_DUMMY, trx.br_unpaid_flag,
2908 p_trx_rec.br_unpaid_flag),
2909 AR_FLAG_DUMMY
2910 )
2911 AND
2912 NVL(trx.br_on_hold_flag, AR_FLAG_DUMMY) =
2913 NVL(
2914 DECODE(p_trx_rec.br_on_hold_flag,
2915 AR_FLAG_DUMMY, trx.br_on_hold_flag,
2916 p_trx_rec.br_on_hold_flag),
2917 AR_FLAG_DUMMY
2918 )
2919 AND
2920 NVL(trx.drawee_id, AR_NUMBER_DUMMY) =
2921 NVL(
2922 DECODE(p_trx_rec.drawee_id,
2923 AR_NUMBER_DUMMY, trx.drawee_id,
2924 p_trx_rec.drawee_id),
2925 AR_NUMBER_DUMMY
2926 )
2927 AND
2928 NVL(trx.drawee_contact_id, AR_NUMBER_DUMMY) =
2929 NVL(
2930 DECODE(p_trx_rec.drawee_contact_id,
2931 AR_NUMBER_DUMMY, trx.drawee_contact_id,
2932 p_trx_rec.drawee_contact_id),
2933 AR_NUMBER_DUMMY
2934 )
2935 AND
2936 NVL(trx.drawee_site_use_id, AR_NUMBER_DUMMY) =
2937 NVL(
2938 DECODE(p_trx_rec.drawee_site_use_id,
2939 AR_NUMBER_DUMMY, trx.drawee_site_use_id,
2940 p_trx_rec.drawee_site_use_id),
2941 AR_NUMBER_DUMMY
2942 )
2943 /*Bug7313869, Removed the check for drawee_bank_account_id*/
2944 AND
2945 NVL(trx.remit_bank_acct_use_id, AR_NUMBER_DUMMY) =
2946 NVL(
2947 DECODE(p_trx_rec.remit_bank_acct_use_id,
2948 AR_NUMBER_DUMMY, trx.remit_bank_acct_use_id,
2949 p_trx_rec.remit_bank_acct_use_id),
2950 AR_NUMBER_DUMMY
2951 )
2952 AND
2953 NVL(trx.override_remit_account_flag, AR_FLAG_DUMMY) =
2954 NVL(
2955 DECODE(p_trx_rec.override_remit_account_flag,
2956 AR_FLAG_DUMMY, trx.override_remit_account_flag,
2957 p_trx_rec.override_remit_account_flag),
2958 AR_FLAG_DUMMY
2959 )
2960 AND
2961 NVL(trx.special_instructions, AR_TEXT_DUMMY) =
2962 NVL(
2963 DECODE(p_trx_rec.special_instructions,
2964 AR_TEXT_DUMMY, trx.special_instructions,
2965 p_trx_rec.special_instructions),
2966 AR_TEXT_DUMMY
2967 )
2968 AND
2969 NVL(trx.remittance_batch_id, AR_NUMBER_DUMMY) =
2970 NVL(
2971 DECODE(p_trx_rec.remittance_batch_id,
2972 AR_NUMBER_DUMMY, trx.remittance_batch_id,
2973 p_trx_rec.remittance_batch_id),
2974 AR_NUMBER_DUMMY
2975 )
2976 AND
2977 NVL(trx.address_verification_code, AR_TEXT_DUMMY) =
2978 NVL(
2979 DECODE(p_trx_rec.address_verification_code,
2980 AR_TEXT_DUMMY, trx.address_verification_code,
2981 p_trx_rec.address_verification_code),
2982 AR_TEXT_DUMMY
2983 )
2984 AND
2985 NVL(trx.approval_code, AR_TEXT_DUMMY) =
2986 NVL(
2987 DECODE(p_trx_rec.approval_code,
2988 AR_TEXT_DUMMY, trx.approval_code,
2989 p_trx_rec.approval_code),
2990 AR_TEXT_DUMMY
2991 )
2992 AND
2993 NVL(trx.bill_to_address_id, AR_NUMBER_DUMMY) =
2994 NVL(
2995 DECODE(p_trx_rec.bill_to_address_id,
2996 AR_NUMBER_DUMMY, trx.bill_to_address_id,
2997 p_trx_rec.bill_to_address_id),
2998 AR_NUMBER_DUMMY
2999 )
3000 AND
3001 NVL(trx.edi_processed_flag, AR_FLAG_DUMMY) =
3002 NVL(
3003 DECODE(p_trx_rec.edi_processed_flag,
3004 AR_FLAG_DUMMY, trx.edi_processed_flag,
3005 p_trx_rec.edi_processed_flag),
3006 AR_FLAG_DUMMY
3007 )
3008 AND
3009 NVL(trx.edi_processed_status, AR_TEXT_DUMMY) =
3010 NVL(
3011 DECODE(p_trx_rec.edi_processed_status,
3012 AR_TEXT_DUMMY, trx.edi_processed_status,
3013 p_trx_rec.edi_processed_status),
3014 AR_TEXT_DUMMY
3015 )
3016 AND
3017 NVL(trx.payment_server_order_num, AR_TEXT_DUMMY) =
3018 NVL(
3019 DECODE(p_trx_rec.payment_server_order_num,
3020 AR_TEXT_DUMMY, trx.payment_server_order_num,
3021 p_trx_rec.payment_server_order_num),
3022 AR_TEXT_DUMMY
3023 )
3024 AND
3025 NVL(trx.post_request_id, AR_NUMBER_DUMMY) =
3026 NVL(
3027 DECODE(p_trx_rec.post_request_id,
3028 AR_NUMBER_DUMMY, trx.post_request_id,
3029 p_trx_rec.post_request_id),
3030 AR_NUMBER_DUMMY
3031 )
3032 AND
3033 NVL(trx.request_id, AR_NUMBER_DUMMY) =
3034 NVL(
3035 DECODE(p_trx_rec.request_id,
3036 AR_NUMBER_DUMMY, trx.request_id,
3037 p_trx_rec.request_id),
3038 AR_NUMBER_DUMMY
3039 )
3040 AND
3041 NVL(trx.ship_to_address_id, AR_NUMBER_DUMMY) =
3042 NVL(
3043 DECODE(p_trx_rec.ship_to_address_id,
3044 AR_NUMBER_DUMMY, trx.ship_to_address_id,
3045 p_trx_rec.ship_to_address_id),
3046 AR_NUMBER_DUMMY
3047 )
3048 AND
3049 NVL(trx.wh_update_date, AR_DATE_DUMMY) =
3050 NVL(
3051 DECODE(p_trx_rec.wh_update_date,
3052 AR_DATE_DUMMY, trx.wh_update_date,
3053 p_trx_rec.wh_update_date),
3054 AR_DATE_DUMMY
3055 )
3056 AND
3057 NVL(trx.global_attribute_category, AR_TEXT_DUMMY) =
3058 NVL(
3059 DECODE(p_trx_rec.global_attribute_category,
3060 AR_TEXT_DUMMY, trx.global_attribute_category,
3061 p_trx_rec.global_attribute_category),
3062 AR_TEXT_DUMMY
3063 )
3064 AND
3065 NVL(trx.global_attribute1, AR_TEXT_DUMMY) =
3066 NVL(
3067 DECODE(p_trx_rec.global_attribute1,
3068 AR_TEXT_DUMMY, trx.global_attribute1,
3069 p_trx_rec.global_attribute1),
3070 AR_TEXT_DUMMY
3071 )
3072 AND
3073 NVL(trx.global_attribute2, AR_TEXT_DUMMY) =
3074 NVL(
3075 DECODE(p_trx_rec.global_attribute2,
3076 AR_TEXT_DUMMY, trx.global_attribute2,
3077 p_trx_rec.global_attribute2),
3078 AR_TEXT_DUMMY
3079 )
3080 AND
3081 NVL(trx.global_attribute3, AR_TEXT_DUMMY) =
3082 NVL(
3083 DECODE(p_trx_rec.global_attribute3,
3084 AR_TEXT_DUMMY, trx.global_attribute3,
3085 p_trx_rec.global_attribute3),
3086 AR_TEXT_DUMMY
3087 )
3088 AND
3089 NVL(trx.global_attribute4, AR_TEXT_DUMMY) =
3090 NVL(
3091 DECODE(p_trx_rec.global_attribute4,
3092 AR_TEXT_DUMMY, trx.global_attribute4,
3093 p_trx_rec.global_attribute4),
3094 AR_TEXT_DUMMY
3095 )
3096 AND
3097 NVL(trx.global_attribute5, AR_TEXT_DUMMY) =
3098 NVL(
3099 DECODE(p_trx_rec.global_attribute5,
3100 AR_TEXT_DUMMY, trx.global_attribute5,
3101 p_trx_rec.global_attribute5),
3102 AR_TEXT_DUMMY
3103 )
3104 AND
3105 NVL(trx.global_attribute6, AR_TEXT_DUMMY) =
3106 NVL(
3107 DECODE(p_trx_rec.global_attribute6,
3108 AR_TEXT_DUMMY, trx.global_attribute6,
3109 p_trx_rec.global_attribute6),
3110 AR_TEXT_DUMMY
3111 )
3112 AND
3113 NVL(trx.global_attribute7, AR_TEXT_DUMMY) =
3114 NVL(
3115 DECODE(p_trx_rec.global_attribute7,
3116 AR_TEXT_DUMMY, trx.global_attribute7,
3117 p_trx_rec.global_attribute7),
3118 AR_TEXT_DUMMY
3119 )
3120 AND
3121 NVL(trx.global_attribute8, AR_TEXT_DUMMY) =
3122 NVL(
3123 DECODE(p_trx_rec.global_attribute8,
3124 AR_TEXT_DUMMY, trx.global_attribute8,
3125 p_trx_rec.global_attribute8),
3126 AR_TEXT_DUMMY
3127 )
3128 AND
3129 NVL(trx.global_attribute9, AR_TEXT_DUMMY) =
3130 NVL(
3131 DECODE(p_trx_rec.global_attribute9,
3132 AR_TEXT_DUMMY, trx.global_attribute9,
3133 p_trx_rec.global_attribute9),
3134 AR_TEXT_DUMMY
3135 )
3136 AND
3137 NVL(trx.global_attribute10, AR_TEXT_DUMMY) =
3138 NVL(
3139 DECODE(p_trx_rec.global_attribute10,
3140 AR_TEXT_DUMMY, trx.global_attribute10,
3141 p_trx_rec.global_attribute10),
3142 AR_TEXT_DUMMY
3143 )
3144 AND
3145 NVL(trx.global_attribute11, AR_TEXT_DUMMY) =
3146 NVL(
3147 DECODE(p_trx_rec.global_attribute11,
3148 AR_TEXT_DUMMY, trx.global_attribute11,
3149 p_trx_rec.global_attribute11),
3150 AR_TEXT_DUMMY
3151 )
3152 AND
3153 NVL(trx.global_attribute12, AR_TEXT_DUMMY) =
3154 NVL(
3155 DECODE(p_trx_rec.global_attribute12,
3156 AR_TEXT_DUMMY, trx.global_attribute12,
3157 p_trx_rec.global_attribute12),
3158 AR_TEXT_DUMMY
3159 )
3160 AND
3161 NVL(trx.global_attribute13, AR_TEXT_DUMMY) =
3162 NVL(
3163 DECODE(p_trx_rec.global_attribute13,
3164 AR_TEXT_DUMMY, trx.global_attribute13,
3165 p_trx_rec.global_attribute13),
3166 AR_TEXT_DUMMY
3167 )
3168 AND
3169 NVL(trx.global_attribute14, AR_TEXT_DUMMY) =
3170 NVL(
3171 DECODE(p_trx_rec.global_attribute14,
3172 AR_TEXT_DUMMY, trx.global_attribute14,
3173 p_trx_rec.global_attribute14),
3174 AR_TEXT_DUMMY
3175 )
3176 AND
3177 NVL(trx.global_attribute15, AR_TEXT_DUMMY) =
3178 NVL(
3179 DECODE(p_trx_rec.global_attribute15,
3180 AR_TEXT_DUMMY, trx.global_attribute15,
3181 p_trx_rec.global_attribute15),
3182 AR_TEXT_DUMMY
3183 )
3184 AND
3185 NVL(trx.global_attribute16, AR_TEXT_DUMMY) =
3186 NVL(
3187 DECODE(p_trx_rec.global_attribute16,
3188 AR_TEXT_DUMMY, trx.global_attribute16,
3189 p_trx_rec.global_attribute16),
3190 AR_TEXT_DUMMY
3191 )
3192 AND
3193 NVL(trx.global_attribute17, AR_TEXT_DUMMY) =
3194 NVL(
3195 DECODE(p_trx_rec.global_attribute17,
3196 AR_TEXT_DUMMY, trx.global_attribute17,
3197 p_trx_rec.global_attribute17),
3198 AR_TEXT_DUMMY
3199 )
3200 AND
3201 NVL(trx.global_attribute18, AR_TEXT_DUMMY) =
3202 NVL(
3203 DECODE(p_trx_rec.global_attribute18,
3204 AR_TEXT_DUMMY, trx.global_attribute18,
3205 p_trx_rec.global_attribute18),
3206 AR_TEXT_DUMMY
3207 )
3208 AND
3209 NVL(trx.global_attribute19, AR_TEXT_DUMMY) =
3210 NVL(
3211 DECODE(p_trx_rec.global_attribute19,
3212 AR_TEXT_DUMMY, trx.global_attribute19,
3213 p_trx_rec.global_attribute19),
3214 AR_TEXT_DUMMY
3215 )
3216 AND
3217 NVL(trx.global_attribute20, AR_TEXT_DUMMY) =
3218 NVL(
3219 DECODE(p_trx_rec.global_attribute20,
3220 AR_TEXT_DUMMY, trx.global_attribute20,
3221 p_trx_rec.global_attribute20),
3222 AR_TEXT_DUMMY
3223 )
3224 AND
3225 NVL(trx.global_attribute21, AR_TEXT_DUMMY) =
3226 NVL(
3227 DECODE(p_trx_rec.global_attribute21,
3228 AR_TEXT_DUMMY, trx.global_attribute21,
3229 p_trx_rec.global_attribute21),
3230 AR_TEXT_DUMMY
3231 )
3232 AND
3233 NVL(trx.global_attribute22, AR_TEXT_DUMMY) =
3234 NVL(
3235 DECODE(p_trx_rec.global_attribute22,
3236 AR_TEXT_DUMMY, trx.global_attribute22,
3237 p_trx_rec.global_attribute22),
3238 AR_TEXT_DUMMY
3239 )
3240 AND
3241 NVL(trx.global_attribute23, AR_TEXT_DUMMY) =
3242 NVL(
3243 DECODE(p_trx_rec.global_attribute23,
3244 AR_TEXT_DUMMY, trx.global_attribute23,
3245 p_trx_rec.global_attribute23),
3246 AR_TEXT_DUMMY
3247 )
3248 AND
3249 NVL(trx.global_attribute24, AR_TEXT_DUMMY) =
3250 NVL(
3251 DECODE(p_trx_rec.global_attribute24,
3252 AR_TEXT_DUMMY, trx.global_attribute24,
3253 p_trx_rec.global_attribute24),
3254 AR_TEXT_DUMMY
3255 )
3256 AND
3257 NVL(trx.global_attribute25, AR_TEXT_DUMMY) =
3258 NVL(
3259 DECODE(p_trx_rec.global_attribute25,
3260 AR_TEXT_DUMMY, trx.global_attribute25,
3261 p_trx_rec.global_attribute25),
3262 AR_TEXT_DUMMY
3263 )
3264 AND
3265 NVL(trx.global_attribute26, AR_TEXT_DUMMY) =
3266 NVL(
3267 DECODE(p_trx_rec.global_attribute26,
3268 AR_TEXT_DUMMY, trx.global_attribute26,
3269 p_trx_rec.global_attribute26),
3270 AR_TEXT_DUMMY
3271 )
3272 AND
3273 NVL(trx.global_attribute27, AR_TEXT_DUMMY) =
3274 NVL(
3275 DECODE(p_trx_rec.global_attribute27,
3276 AR_TEXT_DUMMY, trx.global_attribute27,
3277 p_trx_rec.global_attribute27),
3278 AR_TEXT_DUMMY
3279 )
3280 AND
3281 NVL(trx.global_attribute28, AR_TEXT_DUMMY) =
3282 NVL(
3283 DECODE(p_trx_rec.global_attribute28,
3284 AR_TEXT_DUMMY, trx.global_attribute28,
3285 p_trx_rec.global_attribute28),
3286 AR_TEXT_DUMMY
3287 )
3288 AND
3289 NVL(trx.global_attribute29, AR_TEXT_DUMMY) =
3290 NVL(
3291 DECODE(p_trx_rec.global_attribute29,
3292 AR_TEXT_DUMMY, trx.global_attribute29,
3293 p_trx_rec.global_attribute29),
3294 AR_TEXT_DUMMY
3295 )
3296 AND
3297 NVL(trx.global_attribute30, AR_TEXT_DUMMY) =
3298 NVL(
3299 DECODE(p_trx_rec.global_attribute30,
3300 AR_TEXT_DUMMY, trx.global_attribute30,
3301 p_trx_rec.global_attribute30),
3302 AR_TEXT_DUMMY
3303 )
3304 AND
3305 NVL(trx.legal_entity_id, AR_NUMBER_DUMMY) =
3306 NVL(
3307 DECODE(p_trx_rec.legal_entity_id,
3308 AR_NUMBER_DUMMY, trx.legal_entity_id,
3309 p_trx_rec.legal_entity_id),
3310 AR_NUMBER_DUMMY
3311 )
3312 )
3313 AND
3314 NVL(trx.payment_trxn_extension_id, AR_NUMBER_DUMMY) =
3315 NVL(
3316 DECODE(p_trx_rec.payment_trxn_extension_id,
3317 AR_NUMBER_DUMMY, trx.payment_trxn_extension_id,
3318 p_trx_rec.payment_trxn_extension_id),
3319 AR_NUMBER_DUMMY
3320 ) /* PAYMENT_UPAKE */
3321 AND
3322 NVL(trx.billing_date, AR_DATE_DUMMY) =
3323 NVL(
3324 DECODE(p_trx_rec.billing_date,
3325 AR_DATE_DUMMY, trx.billing_date,
3326 p_trx_rec.billing_date),
3327 AR_DATE_DUMMY
3328 )
3329
3330 FOR UPDATE OF customer_trx_id NOWAIT;
3331
3332 arp_util.debug('arp_ct_pkg.lock_compare_p()-');
3333
3334 EXCEPTION
3335 WHEN NO_DATA_FOUND THEN
3336 arp_util.debug(
3337 'EXCEPTION: arp_ct_pkg.lock_compare_p NO_DATA_FOUND' );
3338
3339 arp_util.debug('');
3340 arp_util.debug('============= Old Record =============');
3341 display_header_p(p_customer_trx_id);
3342 arp_util.debug('');
3343 arp_util.debug('============= New Record =============');
3344 display_header_rec(p_trx_rec);
3345
3346 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
3347 APP_EXCEPTION.Raise_Exception;
3348 WHEN OTHERS THEN
3349 arp_util.debug( 'EXCEPTION: arp_ct_pkg.lock_compare_p' );
3350 RAISE;
3351 END;
3352
3353
3354 /*===========================================================================+
3355 | PROCEDURE |
3356 | fetch_p |
3357 | |
3358 | DESCRIPTION |
3359 | This procedure fetches a single row from ra_customer_trx into a |
3360 | variable specified as a parameter based on the table's primary key, |
3361 | customer_trx_id. |
3362 | |
3363 | SCOPE - PUBLIC |
3364 | |
3365 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
3366 | arp_util.debug |
3367 | |
3368 | ARGUMENTS : IN: |
3369 | p_customer_trx_id - identifies the record to fetch |
3370 | OUT: |
3371 | p_trx_rec - contains the fetched record |
3372 | |
3373 | RETURNS : NONE |
3374 | |
3375 | NOTES |
3376 | |
3377 | MODIFICATION HISTORY |
3378 | 07-JUN-95 Charlie Tomberg Created |
3379 | |
3380 +===========================================================================*/
3381
3382 PROCEDURE fetch_p( p_trx_rec OUT NOCOPY ra_customer_trx%rowtype,
3383 p_customer_trx_id IN ra_customer_trx.customer_trx_id%type )
3384 IS
3385
3386 BEGIN
3387 arp_util.debug('arp_ct_pkg.fetch_p()+');
3388
3389 SELECT *
3390 INTO p_trx_rec
3391 FROM ra_customer_trx
3392 WHERE customer_trx_id = p_customer_trx_id;
3393
3394 arp_util.debug('arp_ct_pkg.fetch_p()-');
3395
3396 EXCEPTION
3397 WHEN OTHERS THEN
3398 arp_util.debug( 'EXCEPTION: arp_ct_pkg.fetch_p' );
3399 RAISE;
3400 END;
3401
3402 /*===========================================================================+
3403 | PROCEDURE |
3404 | delete_p |
3405 | |
3406 | DESCRIPTION |
3407 | This procedure deletes the ra_customeR_trx row identified by the |
3408 | p_customer_trx_id parameter. |
3409 | |
3410 | SCOPE - PUBLIC |
3411 | |
3412 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
3413 | arp_util.debug |
3414 | |
3415 | ARGUMENTS : IN: |
3416 | p_customer_trx_id - identifies the row to delete |
3417 | OUT: |
3418 | None |
3419 | |
3420 | RETURNS : NONE |
3421 | |
3422 | NOTES |
3423 | |
3424 | MODIFICATION HISTORY |
3425 | 07-JUN-95 Charlie Tomberg Created |
3426 | 08-NOV-01 Debbie Jancis Added calls to MRC engine for |
3427 | RA_CUSTOMER_TRX processing |
3428 | |
3429 +===========================================================================*/
3430
3431 procedure delete_p( p_customer_trx_id IN ra_customer_trx.customer_trx_id%type)
3432 IS
3433
3434
3435 BEGIN
3436
3437
3438 arp_util.debug('arp_ct_pkg.delete_p()+');
3439
3440 DELETE FROM ra_customer_trx
3441 WHERE customer_trx_id = p_customer_trx_id;
3442
3443 /*---------------------------------+
3444 | Calling central MRC library |
3445 | for MRC Integration |
3446 +---------------------------------*/
3447 --{BUG4301323
3448 -- ar_mrc_engine.maintain_mrc_data(
3449 -- p_event_mode => 'DELETE',
3450 -- p_table_name => 'RA_CUSTOMER_TRX',
3451 -- p_mode => 'SINGLE',
3452 -- p_key_value => p_customer_trx_id);
3453 --}
3454 --
3455 arp_util.debug('arp_ct_pkg.delete_p()-');
3456
3457 EXCEPTION
3458 WHEN OTHERS THEN
3459 arp_util.debug('EXCEPTION: arp_ct_pkg.delete_p()');
3460
3461 RAISE;
3462
3463 END;
3464
3465 /*===========================================================================+
3466 | PROCEDURE |
3467 | update_p |
3468 | |
3469 | DESCRIPTION |
3470 | This procedure updates the ra_customer_trx row identified by the |
3471 | p_customer_trx_id parameter. |
3472 | |
3473 | SCOPE - PUBLIC |
3474 | |
3475 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
3476 | arp_util.debug |
3477 | |
3478 | ARGUMENTS : IN: |
3479 | p_customer_trx_id - identifies the row to update |
3480 | p_trx_rec - contains the new column values |
3481 | OUT: |
3482 | None |
3483 | |
3484 | RETURNS : NONE |
3485 | |
3486 | NOTES |
3487 | set_to_dummy must be called before the values in p_trx_rec are |
3488 | changed and this function is called. |
3489 | |
3490 | MODIFICATION HISTORY |
3491 | 06-JUN-95 Charlie Tomberg Created |
3492 | |
3493 +===========================================================================*/
3494
3495 PROCEDURE update_p( p_trx_rec IN ra_customer_trx%rowtype,
3496 p_customer_trx_id IN
3497 ra_customer_trx.customer_trx_id%type) IS
3498
3499 --2528261 begin
3500 l_ct_reference varchar2(30);
3501 --2528261 end
3502 BEGIN
3503
3504 arp_util.debug('arp_ct_pkg.update_p()+ ' ||
3505 to_char(sysdate, 'HH:MI:SS'));
3506
3507 arp_ct_pkg.generic_update( pg_cursor1,
3508 ' WHERE customer_trx_id = :where_1',
3509 p_customer_trx_id,
3510 p_trx_rec);
3511
3512 arp_util.debug('arp_ct_pkg.update_p()- ' ||
3513 to_char(sysdate, 'HH:MI:SS'));
3514 --2528261 begin
3515 begin
3516 SELECT DECODE(DEFAULT_REFERENCE,
3517 '1', p_trx_rec.interface_header_attribute1,
3518 '2', p_trx_rec.interface_header_attribute2,
3519 '3', p_trx_rec.interface_header_attribute3,
3520 '4', p_trx_rec.interface_header_attribute4,
3521 '5', p_trx_rec.interface_header_attribute5,
3522 '6', p_trx_rec.interface_header_attribute6,
3523 '7', p_trx_rec.interface_header_attribute7,
3524 '8', p_trx_rec.interface_header_attribute8,
3525 '9', p_trx_rec.interface_header_attribute9,
3526 '10', p_trx_rec.interface_header_attribute10,
3527 '11', p_trx_rec.interface_header_attribute11,
3528 '12', p_trx_rec.interface_header_attribute12,
3529 '13', p_trx_rec.interface_header_attribute13,
3530 '14', p_trx_rec.interface_header_attribute14,
3531 '15', p_trx_rec.interface_header_attribute15,
3532 NULL, p_trx_rec.ct_reference,
3533 NULL ) /* Bug fix 5330712 */
3534 INTO l_ct_reference
3535 FROM ra_batch_sources
3536 WHERE batch_source_id = p_trx_rec.batch_source_id;
3537 exception
3538 when no_data_found then
3539 l_ct_reference:=null;
3540 when others then
3541 l_ct_reference:=null;
3542 end;
3543 if l_ct_reference is not null then
3544 update ra_customer_trx
3545 set ct_reference =l_ct_reference
3546 where customer_trx_id = p_trx_rec.customer_trx_id;
3547 end if;
3548
3549 --2528261 end
3550
3551
3552
3553 EXCEPTION
3554 WHEN OTHERS THEN
3555 arp_util.debug('EXCEPTION: arp_ct_pkg.update_p()');
3556 RAISE;
3557 END;
3558
3559 /*===========================================================================+
3560 | PROCEDURE |
3561 | update_p_print |
3562 | |
3563 | DESCRIPTION |
3564 | This procedure updates the ra_customer_trx row identified by the |
3565 | p_customer_trx_id parameter. It calls update_p, then
3566 | arp_etax_util.global_document_update. |
3567 | |
3568 | SCOPE - PUBLIC |
3569 | |
3570 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
3571 | arp_util.debug |
3572 | |
3573 | ARGUMENTS : IN: |
3574 | p_customer_trx_id - identifies the row to update |
3575 | p_trx_rec - contains the new column values |
3576 | OUT: |
3577 | None |
3578 | |
3579 | RETURNS : NONE |
3580 | |
3581 | NOTES |
3582 | set_to_dummy must be called before the values in p_trx_rec are |
3583 | changed and this function is called. This function is
3584 | specifically intended for use by outside products that are
3585 | updating the ra_customer_trx.print-related fields to
3586 | indicate a 'print' event.
3587 | |
3588 | MODIFICATION HISTORY |
3589 | 24-JAN-06 M Raymond Created |
3590 | |
3591 +===========================================================================*/
3592
3593 PROCEDURE update_p_print( p_trx_rec IN ra_customer_trx%rowtype,
3594 p_customer_trx_id IN
3595 ra_customer_trx.customer_trx_id%type) IS
3596 BEGIN
3597 /* Call update_p to carry out the actual update */
3598 update_p(p_trx_rec, p_customer_trx_id);
3599
3600 /* Call GDU to notify etax of the print event */
3601 arp_etax_util.global_document_update(p_customer_trx_id,
3602 null,
3603 'PRINT');
3604 EXCEPTION
3605 WHEN OTHERS THEN
3606 arp_util.debug('EXCEPTION: arp_ct_pkg.update_p_print()');
3607 RAISE;
3608 END;
3609
3610
3611
3612 /*===========================================================================+
3613 | PROCEDURE |
3614 | insert_p |
3615 | |
3616 | DESCRIPTION |
3617 | This procedure inserts a row into ra_customer_trx that contains the |
3618 | column values specified in the p_trx_rec parameter. |
3619 | |
3620 | SCOPE - PUBLIC |
3621 | |
3622 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
3623 | arp_util.debug |
3624 | arp_global.set_of_books_id |
3625 | |
3626 | ARGUMENTS : IN: |
3627 | p_trx_rec - contains the new column values |
3628 | OUT: |
3629 | p_trx_number - transaction number of new row |
3630 | p_customer_trx_id - unique ID of the new row |
3631 | |
3632 | RETURNS : NONE |
3633 | |
3634 | NOTES |
3635 | |
3636 | MODIFICATION HISTORY |
3637 | 06-JUN-95 Charlie Tomberg Created |
3638 | 12-JUL-95 Martin Johnson Added OUT NOCOPY parameter p_trx_number. |
3639 | 20-MAR-2000 J Rautiainen Added BR project related columns |
3640 | BR_AMOUNT, BR_UNPAID_FLAG,BR_ON_HOLD_FLAG, |
3641 | DRAWEE_ID, DRAWEE_CONTACT_ID, |
3642 | DRAWEE_SITE_USE_ID |
3643 | DRAWEE_BANK_ACCOUNT_ID, |
3644 | REMITTANCE_BANK_ACCOUNT_ID, |
3645 | OVERRIDE_REMIT_ACCOUNT_FLAG and |
3646 | SPECIAL_INSTRUCTIONSinto table handlers |
3647 | 24-JUL-2000 J Rautiainen Added BR project related column |
3648 | REMITTANCE_BATCH_ID |
3649 | 31-OCT-2000 Y Rakotonirainy Bug 1243304 : Added columns |
3650 | address_verification_code and |
3651 | approval_code and |
3652 | bill_to_address_id and |
3653 | edi_processed_flag and |
3654 | edi_processed_status and |
3655 | payment_server_order_num and |
3656 | post_request_id and |
3657 | request_id and |
3658 | ship_to_address_id |
3659 | wh_update_date |
3660 | into the table handlers. |
3661 | 6-Jul-2001 yreddy Bug1738914 - Added 'Copy doc num to |
3662 | Trx Number' |
3663 | functionality for chargebacks. |
3664 | 08-NOV-01 Debbie Jancis Added calls to MRC engine for |
3665 | RA_CUSTOMER_TRX processing |
3666 | |
3667 | 20-Jun-02 Sahana Bug2427456: Added global attribute columns |
3668 | 18-May-05 Debbie Jancis Added Legal Entity ID for LE project |
3669 +===========================================================================*/
3670
3671 PROCEDURE insert_p(
3672 p_trx_rec IN ra_customer_trx%rowtype,
3673 p_trx_number OUT NOCOPY ra_customer_trx.trx_number%type,
3674 p_customer_trx_id OUT NOCOPY ra_customer_trx.customer_trx_id%type
3675 ) IS
3676
3677
3678 l_customer_trx_id ra_customer_trx.customer_trx_id%type;
3679 l_org_id integer;
3680 l_org_str varchar2(30);
3681 l_trx_num_cursor integer;
3682 l_dummy integer;
3683 l_trx_number ra_customer_trx.trx_number%type;
3684 l_trx_str VARCHAR2(1000);
3685 l_copy_doc_number_flag varchar2(1):='N'; --Bug1738914
3686 l_old_trx_number ra_customer_trx.old_trx_number%type; --Bug1738914
3687 l_ct_reference varchar2(30);
3688 l_legal_entity_id number;
3689
3690 BEGIN
3691
3692 arp_util.debug('arp_ct_pkg.insert_p()+');
3693
3694 p_trx_number := '';
3695 p_customer_trx_id := '';
3696
3697 /*---------------------------------------------------------------*
3698 | validate that the transaction and document numbers are unique |
3699 *---------------------------------------------------------------*/
3700
3701 arp_trx_validate.validate_trx_number( p_trx_rec.batch_source_id,
3702 p_trx_rec.trx_number,
3703 p_trx_rec.customer_trx_id);
3704
3705 arp_trx_validate.validate_doc_number( p_trx_rec.cust_trx_type_id,
3706 p_trx_rec.doc_sequence_value,
3707 p_trx_rec.customer_trx_id);
3708
3709
3710 /*---------------------------*
3711 | Get the unique identifier |
3712 *---------------------------*/
3713
3714 SELECT RA_CUSTOMER_TRX_S.NEXTVAL
3715 INTO l_customer_trx_id
3716 FROM DUAL;
3717
3718 /*----------------------------*
3719 | Get the transaction number |
3720 *----------------------------*/
3721
3722 IF (p_trx_rec.trx_number is null)
3723 THEN
3724 SELECT MIN(org_id)
3725 INTO l_org_id
3726 FROM ar_system_parameters;
3727
3728 IF (l_org_id IS NOT NULL) THEN
3729 l_org_str := '_'||to_char(l_org_id);
3730 ELSE
3731 l_org_str := NULL;
3732 END IF;
3733
3734 -- Bug 1185665 : change dbms_sql to use native dynamic sql
3735
3736 /* Bug 1738914 : Selecting copy_doc_number_flag. Chargebacks are always
3737 numbered automatically , so this piece of code gets executed all the time */
3738
3739 l_trx_str := 'select ra_trx_number_' ||
3740 REPLACE(p_trx_rec.batch_source_id, '-', 'N') ||
3741 l_org_str||
3742 '_s.nextval trx_number,copy_doc_number_flag ' ||
3743 'from ra_batch_sources ' ||
3744 'where batch_source_id = ' ||
3745 p_trx_rec.batch_source_id ||
3746 ' and auto_trx_numbering_flag = ''Y''';
3747
3748 EXECUTE IMMEDIATE l_trx_str
3749 INTO l_trx_number,l_copy_doc_number_flag;
3750
3751 /*
3752 l_trx_num_cursor := dbms_sql.open_cursor;
3753
3754 dbms_sql.parse(l_trx_num_cursor,
3755 'select ra_trx_number_' ||
3756 REPLACE(p_trx_rec.batch_source_id, '-', 'N') ||
3757 l_org_str||
3758 '_s.nextval trx_number ' ||
3759 'from ra_batch_sources ' ||
3760 'where batch_source_id = ' ||
3761 p_trx_rec.batch_source_id ||
3762 ' and auto_trx_numbering_flag = ''Y''',
3763 dbms_sql.v7);
3764
3765 dbms_sql.define_column(l_trx_num_cursor, 1, l_trx_number, 20);
3766
3767 l_dummy := dbms_sql.execute_and_fetch(l_trx_num_cursor, TRUE);
3768
3769 dbms_sql.column_value(l_trx_num_cursor, 1, l_trx_number);
3770
3771 dbms_sql.close_cursor(l_trx_num_cursor);
3772 */
3773 ELSE
3774 l_trx_number := p_trx_rec.trx_number;
3775 END IF;
3776
3777 /*-----------------------------------------------------------------------*
3778 | Bug 1738914: When the 'Copy doc Num to Trx Number' checkbox is ticked |
3779 | for the 'Chargeback' source ( batch_source_id = 12 ) , the document |
3780 | number will be copied to the trx_number .As the chargeback is saved |
3781 | as completed,the copy logic is added here . |
3782 *-----------------------------------------------------------------------*/
3783
3784 l_old_trx_number := p_trx_rec.old_trx_number;
3785
3786 IF ( p_trx_rec.batch_source_id = 12 AND
3787 Nvl(l_copy_doc_number_flag,'N') = 'Y' AND
3788 p_trx_rec.doc_sequence_value IS NOT NULL ) THEN
3789 l_old_trx_number := l_trx_number;
3790 l_trx_number := p_trx_rec.doc_sequence_value;
3791 END IF;
3792 --2528261 begin
3793 begin
3794 SELECT DECODE(DEFAULT_REFERENCE,
3795 '1', p_trx_rec.interface_header_attribute1,
3796 '2', p_trx_rec.interface_header_attribute2,
3797 '3', p_trx_rec.interface_header_attribute3,
3798 '4', p_trx_rec.interface_header_attribute4,
3799 '5', p_trx_rec.interface_header_attribute5,
3800 '6', p_trx_rec.interface_header_attribute6,
3801 '7', p_trx_rec.interface_header_attribute7,
3802 '8', p_trx_rec.interface_header_attribute8,
3803 '9', p_trx_rec.interface_header_attribute9,
3804 '10', p_trx_rec.interface_header_attribute10,
3805 '11', p_trx_rec.interface_header_attribute11,
3806 '12', p_trx_rec.interface_header_attribute12,
3807 '13', p_trx_rec.interface_header_attribute13,
3808 '14', p_trx_rec.interface_header_attribute14,
3809 '15', p_trx_rec.interface_header_attribute15,
3810 NULL,p_trx_rec.ct_reference, /* Bug fix 5330712*/
3811 NULL )
3812 INTO l_ct_reference
3813 FROM ra_batch_sources
3814 WHERE batch_source_id = p_trx_rec.batch_source_id;
3815 exception
3816 when no_data_found then
3817 l_ct_reference:=null;
3818 when others then
3819 l_ct_reference:=null;
3820 end;
3821
3822 /*-------------------*
3823 | Insert the record |
3824 *-------------------*/
3825
3826 INSERT INTO ra_customer_trx
3827 (
3828 customer_trx_id,
3829 trx_number,
3830 created_by,
3831 creation_date,
3832 last_updated_by,
3833 last_update_date,
3834 last_update_login,
3835 set_of_books_id,
3836 program_application_id,
3837 program_id,
3838 program_update_date,
3839 posting_control_id,
3840 ra_post_loop_number,
3841 complete_flag,
3842 initial_customer_trx_id,
3843 previous_customer_trx_id,
3844 related_customer_trx_id,
3845 recurred_from_trx_number,
3846 cust_trx_type_id,
3847 batch_id,
3848 batch_source_id,
3849 agreement_id,
3850 trx_date,
3851 bill_to_customer_id,
3852 bill_to_contact_id,
3853 bill_to_site_use_id,
3854 ship_to_customer_id,
3855 ship_to_contact_id,
3856 ship_to_site_use_id,
3857 sold_to_customer_id,
3858 sold_to_site_use_id,
3859 sold_to_contact_id,
3860 customer_reference,
3861 customer_reference_date,
3862 credit_method_for_installments,
3863 credit_method_for_rules,
3864 start_date_commitment,
3865 end_date_commitment,
3866 exchange_date,
3867 exchange_rate,
3868 exchange_rate_type,
3869 customer_bank_account_id,
3870 finance_charges,
3871 fob_point,
3872 comments,
3873 internal_notes,
3874 invoice_currency_code,
3875 invoicing_rule_id,
3876 last_printed_sequence_num,
3877 orig_system_batch_name,
3878 primary_salesrep_id,
3879 printing_count,
3880 printing_last_printed,
3881 printing_option,
3882 printing_original_date,
3883 printing_pending,
3884 purchase_order,
3885 purchase_order_date,
3886 purchase_order_revision,
3887 receipt_method_id,
3888 remit_to_address_id,
3889 shipment_id,
3890 ship_date_actual,
3891 ship_via,
3892 term_due_date,
3893 term_id,
3894 territory_id,
3895 waybill_number,
3896 status_trx,
3897 reason_code,
3898 doc_sequence_id,
3899 doc_sequence_value,
3900 paying_customer_id,
3901 paying_site_use_id,
3902 related_batch_source_id,
3903 default_tax_exempt_flag,
3904 created_from,
3905 default_ussgl_trx_code_context,
3906 default_ussgl_transaction_code,
3907 old_trx_number,
3908 interface_header_context,
3909 interface_header_attribute1,
3910 interface_header_attribute2,
3911 interface_header_attribute3,
3912 interface_header_attribute4,
3913 interface_header_attribute5,
3914 interface_header_attribute6,
3915 interface_header_attribute7,
3916 interface_header_attribute8,
3917 interface_header_attribute9,
3918 interface_header_attribute10,
3919 interface_header_attribute11,
3920 interface_header_attribute12,
3921 interface_header_attribute13,
3922 interface_header_attribute14,
3923 interface_header_attribute15,
3924 attribute_category,
3925 attribute1,
3926 attribute2,
3927 attribute3,
3928 attribute4,
3929 attribute5,
3930 attribute6,
3931 attribute7,
3932 attribute8,
3933 attribute9,
3934 attribute10,
3935 attribute11,
3936 attribute12,
3937 attribute13,
3938 attribute14,
3939 attribute15,
3940 br_amount,
3941 br_unpaid_flag,
3942 br_on_hold_flag,
3943 drawee_id,
3944 drawee_contact_id,
3945 drawee_site_use_id,
3946 drawee_bank_account_id,
3947 remit_bank_acct_use_id,
3948 override_remit_account_flag,
3949 special_instructions,
3950 remittance_batch_id,
3951 address_verification_code,
3952 approval_code,
3953 bill_to_address_id,
3954 edi_processed_flag,
3955 edi_processed_status,
3956 payment_server_order_num,
3957 post_request_id,
3958 request_id,
3959 ship_to_address_id,
3960 wh_update_date,
3961 global_attribute_category,
3962 global_attribute1,
3963 global_attribute2,
3964 global_attribute3,
3965 global_attribute4,
3966 global_attribute5,
3967 global_attribute6,
3968 global_attribute7,
3969 global_attribute8,
3970 global_attribute9,
3971 global_attribute10,
3972 global_attribute11,
3973 global_attribute12,
3974 global_attribute13,
3975 global_attribute14,
3976 global_attribute15,
3977 global_attribute16,
3978 global_attribute17,
3979 global_attribute18,
3980 global_attribute19,
3981 global_attribute20,
3982 global_attribute21,
3983 global_attribute22,
3984 global_attribute23,
3985 global_attribute24,
3986 global_attribute25,
3987 global_attribute26,
3988 global_attribute27,
3989 global_attribute28,
3990 global_attribute29,
3991 global_attribute30
3992 ,ct_reference
3993 ,org_id
3994 ,legal_entity_id -- LE
3995 ,payment_trxn_extension_id /* PAYMENT_UPTAKE */
3996 ,billing_date
3997 )
3998 VALUES
3999 (
4000 l_customer_trx_id,
4001 l_trx_number,
4002 pg_user_id, /* created_by */
4003 sysdate, /* creation_date */
4004 pg_user_id, /* last_updated_by */
4005 sysdate, /* last_update_date */
4006 nvl(pg_conc_login_id,
4007 pg_login_id), /* last_update_login */
4008 arp_global.set_of_books_id, /* set_of_books_id */
4009 pg_prog_appl_id, /* program_application_id */
4010 pg_conc_program_id, /* program_id */
4011 sysdate, /* program_update_date */
4012 p_trx_rec.posting_control_id,
4013 p_trx_rec.ra_post_loop_number,
4014 p_trx_rec.complete_flag,
4015 p_trx_rec.initial_customer_trx_id,
4016 p_trx_rec.previous_customer_trx_id,
4017 p_trx_rec.related_customer_trx_id,
4018 p_trx_rec.recurred_from_trx_number,
4019 p_trx_rec.cust_trx_type_id,
4020 p_trx_rec.batch_id,
4021 p_trx_rec.batch_source_id,
4022 p_trx_rec.agreement_id,
4023 p_trx_rec.trx_date,
4024 p_trx_rec.bill_to_customer_id,
4025 p_trx_rec.bill_to_contact_id,
4026 p_trx_rec.bill_to_site_use_id,
4027 p_trx_rec.ship_to_customer_id,
4028 p_trx_rec.ship_to_contact_id,
4029 p_trx_rec.ship_to_site_use_id,
4030 p_trx_rec.sold_to_customer_id,
4031 p_trx_rec.sold_to_site_use_id,
4032 p_trx_rec.sold_to_contact_id,
4033 p_trx_rec.customer_reference,
4034 p_trx_rec.customer_reference_date,
4035 p_trx_rec.credit_method_for_installments,
4036 p_trx_rec.credit_method_for_rules,
4037 p_trx_rec.start_date_commitment,
4038 p_trx_rec.end_date_commitment,
4039 p_trx_rec.exchange_date,
4040 p_trx_rec.exchange_rate,
4041 p_trx_rec.exchange_rate_type,
4042 p_trx_rec.customer_bank_account_id,
4043 p_trx_rec.finance_charges,
4044 p_trx_rec.fob_point,
4045 p_trx_rec.comments,
4046 p_trx_rec.internal_notes,
4047 p_trx_rec.invoice_currency_code,
4048 p_trx_rec.invoicing_rule_id,
4049 p_trx_rec.last_printed_sequence_num,
4050 p_trx_rec.orig_system_batch_name,
4051 p_trx_rec.primary_salesrep_id,
4052 p_trx_rec.printing_count,
4053 p_trx_rec.printing_last_printed,
4054 p_trx_rec.printing_option,
4055 p_trx_rec.printing_original_date,
4056 decode(p_trx_rec.printing_option,
4057 'PRI', 'Y',
4058 'NOT', 'N',
4059 p_trx_rec.printing_pending),
4060 p_trx_rec.purchase_order,
4061 p_trx_rec.purchase_order_date,
4062 p_trx_rec.purchase_order_revision,
4063 p_trx_rec.receipt_method_id,
4064 p_trx_rec.remit_to_address_id,
4065 p_trx_rec.shipment_id,
4066 p_trx_rec.ship_date_actual,
4067 p_trx_rec.ship_via,
4068 p_trx_rec.term_due_date,
4069 p_trx_rec.term_id,
4070 p_trx_rec.territory_id,
4071 p_trx_rec.waybill_number,
4072 p_trx_rec.status_trx,
4073 p_trx_rec.reason_code,
4074 p_trx_rec.doc_sequence_id,
4075 p_trx_rec.doc_sequence_value,
4076 p_trx_rec.paying_customer_id,
4077 p_trx_rec.paying_site_use_id,
4078 p_trx_rec.related_batch_source_id,
4079 p_trx_rec.default_tax_exempt_flag,
4080 p_trx_rec.created_from,
4081 p_trx_rec.default_ussgl_trx_code_context,
4082 p_trx_rec.default_ussgl_transaction_code,
4083 l_old_trx_number, --Bug1738914
4084 p_trx_rec.interface_header_context,
4085 p_trx_rec.interface_header_attribute1,
4086 p_trx_rec.interface_header_attribute2,
4087 p_trx_rec.interface_header_attribute3,
4088 p_trx_rec.interface_header_attribute4,
4089 p_trx_rec.interface_header_attribute5,
4090 p_trx_rec.interface_header_attribute6,
4091 p_trx_rec.interface_header_attribute7,
4092 p_trx_rec.interface_header_attribute8,
4093 p_trx_rec.interface_header_attribute9,
4094 p_trx_rec.interface_header_attribute10,
4095 p_trx_rec.interface_header_attribute11,
4096 p_trx_rec.interface_header_attribute12,
4097 p_trx_rec.interface_header_attribute13,
4098 p_trx_rec.interface_header_attribute14,
4099 p_trx_rec.interface_header_attribute15,
4100 p_trx_rec.attribute_category,
4101 p_trx_rec.attribute1,
4102 p_trx_rec.attribute2,
4103 p_trx_rec.attribute3,
4104 p_trx_rec.attribute4,
4105 p_trx_rec.attribute5,
4106 p_trx_rec.attribute6,
4107 p_trx_rec.attribute7,
4108 p_trx_rec.attribute8,
4109 p_trx_rec.attribute9,
4110 p_trx_rec.attribute10,
4111 p_trx_rec.attribute11,
4112 p_trx_rec.attribute12,
4113 p_trx_rec.attribute13,
4114 p_trx_rec.attribute14,
4115 p_trx_rec.attribute15,
4116 p_trx_rec.br_amount,
4117 p_trx_rec.br_unpaid_flag,
4118 p_trx_rec.br_on_hold_flag,
4119 p_trx_rec.drawee_id,
4120 p_trx_rec.drawee_contact_id,
4121 p_trx_rec.drawee_site_use_id,
4122 p_trx_rec.drawee_bank_account_id,
4123 p_trx_rec.remit_bank_acct_use_id,
4124 p_trx_rec.override_remit_account_flag,
4125 p_trx_rec.special_instructions,
4126 p_trx_rec.remittance_batch_id,
4127 p_trx_rec.address_verification_code,
4128 p_trx_rec.approval_code,
4129 p_trx_rec.bill_to_address_id,
4130 p_trx_rec.edi_processed_flag,
4131 p_trx_rec.edi_processed_status,
4132 p_trx_rec.payment_server_order_num,
4133 p_trx_rec.post_request_id,
4134 p_trx_rec.request_id,
4135 p_trx_rec.ship_to_address_id,
4136 p_trx_rec.wh_update_date,
4137 p_trx_rec.global_attribute_category,
4138 p_trx_rec.global_attribute1,
4139 p_trx_rec.global_attribute2,
4140 p_trx_rec.global_attribute3,
4141 p_trx_rec.global_attribute4,
4142 p_trx_rec.global_attribute5,
4143 p_trx_rec.global_attribute6,
4144 p_trx_rec.global_attribute7,
4145 p_trx_rec.global_attribute8,
4146 p_trx_rec.global_attribute9,
4147 p_trx_rec.global_attribute10,
4148 p_trx_rec.global_attribute11,
4149 p_trx_rec.global_attribute12,
4150 p_trx_rec.global_attribute13,
4151 p_trx_rec.global_attribute14,
4152 p_trx_rec.global_attribute15,
4153 p_trx_rec.global_attribute16,
4154 p_trx_rec.global_attribute17,
4155 p_trx_rec.global_attribute18,
4156 p_trx_rec.global_attribute19,
4157 p_trx_rec.global_attribute20,
4158 p_trx_rec.global_attribute21,
4159 p_trx_rec.global_attribute22,
4160 p_trx_rec.global_attribute23,
4161 p_trx_rec.global_attribute24,
4162 p_trx_rec.global_attribute25,
4163 p_trx_rec.global_attribute26,
4164 p_trx_rec.global_attribute27,
4165 p_trx_rec.global_attribute28,
4166 p_trx_rec.global_attribute29,
4167 p_trx_rec.global_attribute30,
4168 l_ct_reference,
4169 arp_standard.sysparm.org_id, /* SSA changes anuj */
4170 p_trx_rec.legal_entity_id, --LE
4171 p_trx_rec.payment_trxn_extension_id, /* PAYMENT_UPTAKE */
4172 p_trx_rec.billing_date
4173 );
4174
4175 /*---------------------------------+
4176 | Calling central MRC library |
4177 | for MRC Integration |
4178 +---------------------------------*/
4179 --{BUG4301323
4180 -- ar_mrc_engine.maintain_mrc_data(
4181 -- p_event_mode => 'INSERT',
4182 -- p_table_name => 'RA_CUSTOMER_TRX',
4183 -- p_mode => 'SINGLE',
4184 -- p_key_value => l_customer_trx_id);
4185 --}
4186
4187 p_trx_number := l_trx_number;
4188 p_customer_trx_id := l_customer_trx_id;
4189
4190 arp_util.debug('arp_ct_pkg.insert_p()-');
4191
4192 EXCEPTION
4193 WHEN OTHERS THEN
4194 arp_util.debug('EXCEPTION: arp_ct_pkg.insert_p()');
4195 RAISE;
4196 END;
4197
4198 /*===========================================================================+
4199 | PROCEDURE |
4200 | display_header_p |
4201 | |
4202 | DESCRIPTION |
4203 | Displays the values of all columns except creation_date and |
4204 | last_update_date. |
4205 | |
4206 | SCOPE - PRIVATE |
4207 | |
4208 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
4209 | arp_util.debug |
4210 | |
4211 | ARGUMENTS : IN: |
4212 | p_customer_trx_id |
4213 | OUT: |
4214 | IN/ OUT: |
4215 | |
4216 | RETURNS : NONE |
4217 | |
4218 | NOTES |
4219 | |
4220 | MODIFICATION HISTORY |
4221 | 13-JUL-95 Martin Johnson Created |
4222 | |
4223 +===========================================================================*/
4224
4225 PROCEDURE display_header_p(
4226 p_customer_trx_id IN ra_customer_trx.customer_trx_id%type) IS
4227
4228 l_trx_rec ra_customer_trx%rowtype;
4229
4230 BEGIN
4231
4232 arp_util.debug('arp_ct_pkg.display_header_p()+');
4233
4234 arp_ct_pkg.fetch_p(l_trx_rec, p_customer_trx_id);
4235
4236 arp_ct_pkg.display_header_rec(l_trx_rec);
4237
4238 arp_util.debug('arp_ct_pkg.display_header_p()-');
4239
4240 EXCEPTION
4241 WHEN OTHERS THEN
4242 arp_util.debug('EXCEPTION: arp_ct_pkg.display_header_p()');
4243 RAISE;
4244
4245 END;
4246
4247 /*==========================================================================+
4248 | PROCEDURE |
4249 | display_header_rec |
4250 | |
4251 | DESCRIPTION |
4252 | Displays the values of all columns except creation_date and |
4253 | last_update_date. |
4254 | |
4255 | SCOPE - PRIVATE |
4256 | |
4257 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
4258 | arp_util.debug |
4259 | |
4260 | ARGUMENTS : IN: |
4261 | p_customer_trx_id |
4262 | OUT: |
4263 | IN/ OUT: |
4264 | |
4265 | RETURNS : NONE |
4266 | |
4267 | NOTES |
4268 | |
4269 | MODIFICATION HISTORY |
4270 | 19-JUL-95 Martin Johnson Created |
4271 | 20-MAR-2000 J Rautiainen Added BR project related columns |
4272 | BR_AMOUNT, BR_UNPAID_FLAG,BR_ON_HOLD_FLAG, |
4273 | DRAWEE_ID, DRAWEE_CONTACT_ID, |
4274 | DRAWEE_SITE_USE_ID,DRAWEE_BANK_ACCOUNT_ID, |
4275 | REMITTANCE_BANK_ACCOUNT_ID, |
4276 | OVERRIDE_REMIT_ACCOUNT_FLAG and |
4277 | SPECIAL_INSTRUCTIONSinto table handlers |
4278 | 24-JUL-2000 J Rautiainen Added BR project related column |
4279 | REMITTANCE_BATCH_ID |
4280 | 31-OCT-2000 Y Rakotonirainy Bug 1243304 : Added columns |
4281 | address_verification_code and |
4282 | approval_code and |
4283 | bill_to_address_id and |
4284 | edi_processed_flag and |
4285 | edi_processed_status and |
4286 | payment_server_order_num and |
4287 | post_request_id and |
4288 | request_id and |
4289 | ship_to_address_id |
4290 | wh_update_date |
4291 | into the table handlers. |
4292 +==========================================================================*/
4293
4294 PROCEDURE display_header_rec ( p_trx_rec IN ra_customer_trx%rowtype ) IS
4295
4296 BEGIN
4297
4298 arp_util.debug('arp_ct_pkg.display_header_rec()+');
4299
4300 arp_util.debug('************ Dump of ra_customer_trx record ************');
4301 arp_util.debug('customer_trx_id: ' || p_trx_rec.customer_trx_id);
4302 arp_util.debug('trx_number: ' || p_trx_rec.trx_number);
4303 arp_util.debug('created_by: ' || p_trx_rec.created_by);
4304 arp_util.debug('last_updated_by: ' || p_trx_rec.last_updated_by);
4305 arp_util.debug('last_update_login: ' || p_trx_rec.last_update_login);
4306 arp_util.debug('set_of_books_id: ' || p_trx_rec.set_of_books_id);
4307 arp_util.debug('program_application_id: ' ||
4308 p_trx_rec.program_application_id);
4309 arp_util.debug('program_id: ' || p_trx_rec.program_id);
4310 arp_util.debug('program_update_date: ' || p_trx_rec.program_update_date);
4311 arp_util.debug('posting_control_id: ' || p_trx_rec.posting_control_id);
4312 arp_util.debug('ra_post_loop_number: ' || p_trx_rec.ra_post_loop_number);
4313 arp_util.debug('complete_flag: ' || p_trx_rec.complete_flag);
4314 arp_util.debug('initial_customer_trx_id: '||
4315 p_trx_rec.initial_customer_trx_id);
4316 arp_util.debug('previous_customer_trx_id: ' ||
4317 p_trx_rec.previous_customer_trx_id);
4318 arp_util.debug('related_customer_trx_id: '||
4319 p_trx_rec.related_customer_trx_id);
4320 arp_util.debug('recurred_from_trx_number: ' ||
4321 p_trx_rec.recurred_from_trx_number);
4322 arp_util.debug('cust_trx_type_id: ' || p_trx_rec.cust_trx_type_id);
4323 arp_util.debug('batch_id: ' || p_trx_rec.batch_id);
4324 arp_util.debug('batch_source_id: ' || p_trx_rec.batch_source_id);
4325 arp_util.debug('agreement_id: ' || p_trx_rec.agreement_id);
4326 arp_util.debug('trx_date: ' || p_trx_rec.trx_date);
4327 arp_util.debug('bill_to_customer_id: ' || p_trx_rec.bill_to_customer_id);
4328 arp_util.debug('bill_to_contact_id: ' || p_trx_rec.bill_to_contact_id);
4329 arp_util.debug('bill_to_site_use_id: ' || p_trx_rec.bill_to_site_use_id);
4330 arp_util.debug('ship_to_customer_id: ' || p_trx_rec.ship_to_customer_id);
4331 arp_util.debug('ship_to_contact_id: ' || p_trx_rec.ship_to_contact_id);
4332 arp_util.debug('ship_to_site_use_id: ' || p_trx_rec.ship_to_site_use_id);
4333 arp_util.debug('sold_to_customer_id: ' || p_trx_rec.sold_to_customer_id);
4334 arp_util.debug('sold_to_site_use_id: ' || p_trx_rec.sold_to_site_use_id);
4335 arp_util.debug('sold_to_contact_id: ' || p_trx_rec.sold_to_contact_id);
4336 arp_util.debug('customer_reference: ' || p_trx_rec.customer_reference);
4337 arp_util.debug('customer_reference_date: '||
4338 p_trx_rec.customer_reference_date);
4339 arp_util.debug('credit_method_for_installments: ' ||
4340 p_trx_rec.credit_method_for_installments);
4341 arp_util.debug('credit_method_for_rules: ' ||
4342 p_trx_rec.credit_method_for_rules);
4343 arp_util.debug('start_date_commitment: ' ||
4344 p_trx_rec.start_date_commitment);
4345 arp_util.debug('end_date_commitment: ' ||
4346 p_trx_rec.end_date_commitment);
4347 arp_util.debug('exchange_date: ' || p_trx_rec.exchange_date);
4348 arp_util.debug('exchange_rate: ' || p_trx_rec.exchange_rate);
4349 arp_util.debug('exchange_rate_type: ' || p_trx_rec.exchange_rate_type);
4350 arp_util.debug('customer_bank_account_id: '||
4351 p_trx_rec.customer_bank_account_id);
4352 arp_util.debug('finance_charges: ' || p_trx_rec.finance_charges);
4353 arp_util.debug('fob_point: ' || p_trx_rec.fob_point);
4354 arp_util.debug('comments: ' || p_trx_rec.comments);
4355 arp_util.debug('internal_notes: ' || p_trx_rec.internal_notes);
4356 arp_util.debug('invoice_currency_code: ' ||
4357 p_trx_rec.invoice_currency_code);
4358 arp_util.debug('invoicing_rule_id: ' || p_trx_rec.invoicing_rule_id);
4359 arp_util.debug('last_printed_sequence_num: ' ||
4360 p_trx_rec.last_printed_sequence_num);
4361 arp_util.debug('orig_system_batch_name: ' ||
4362 p_trx_rec.orig_system_batch_name);
4363 arp_util.debug('primary_salesrep_id: ' ||
4364 p_trx_rec.primary_salesrep_id);
4365 arp_util.debug('printing_count: ' || p_trx_rec.printing_count);
4366 arp_util.debug('printing_last_printed: ' ||
4367 p_trx_rec.printing_last_printed);
4368 arp_util.debug('printing_option: ' || p_trx_rec.printing_option);
4369 arp_util.debug('printing_original_date: ' ||
4370 p_trx_rec.printing_original_date);
4371 arp_util.debug('printing_pending: ' || p_trx_rec.printing_pending);
4372 arp_util.debug('purchase_order: ' || p_trx_rec.purchase_order);
4373 arp_util.debug('purchase_order_date: ' || p_trx_rec.purchase_order_date);
4374 arp_util.debug('purchase_order_revision: ' ||
4375 p_trx_rec.purchase_order_revision);
4376 arp_util.debug('receipt_method_id: ' || p_trx_rec.receipt_method_id);
4377 arp_util.debug('remit_to_address_id: ' || p_trx_rec.remit_to_address_id);
4378 arp_util.debug('shipment_id: ' || p_trx_rec.shipment_id);
4379 arp_util.debug('ship_date_actual: ' || p_trx_rec.ship_date_actual);
4380 arp_util.debug('ship_via: ' || p_trx_rec.ship_via);
4381 arp_util.debug('term_due_date: ' || p_trx_rec.term_due_date);
4382 arp_util.debug('term_id: ' || p_trx_rec.term_id);
4383 arp_util.debug('territory_id: ' || p_trx_rec.territory_id);
4384 arp_util.debug('waybill_number: ' || p_trx_rec.waybill_number);
4385 arp_util.debug('status_trx: ' || p_trx_rec.status_trx);
4386 arp_util.debug('reason_code: ' || p_trx_rec.reason_code);
4387 arp_util.debug('doc_sequence_id: ' || p_trx_rec.doc_sequence_id);
4388 arp_util.debug('doc_sequence_value: ' || p_trx_rec.doc_sequence_value);
4389 arp_util.debug('paying_customer_id: ' || p_trx_rec.paying_customer_id);
4390 arp_util.debug('paying_site_use_id: ' || p_trx_rec.paying_site_use_id);
4391 arp_util.debug('related_batch_source_id: '||
4392 p_trx_rec.related_batch_source_id);
4393 arp_util.debug('default_tax_exempt_flag: '||
4394 p_trx_rec.default_tax_exempt_flag);
4395 arp_util.debug('created_from: ' || p_trx_rec.created_from);
4396 arp_util.debug('default_ussgl_trx_code_context: ' ||
4397 p_trx_rec.default_ussgl_trx_code_context);
4398 arp_util.debug('default_ussgl_transaction_code: ' ||
4399 p_trx_rec.default_ussgl_transaction_code);
4400 arp_util.debug('old_trx_number: ' || p_trx_rec.old_trx_number);
4401 arp_util.debug('interface_header_context: ' ||
4402 p_trx_rec.interface_header_context);
4403 arp_util.debug('interface_header_attribute1: ' ||
4404 p_trx_rec.interface_header_attribute1);
4405 arp_util.debug('interface_header_attribute2: ' ||
4406 p_trx_rec.interface_header_attribute2);
4407 arp_util.debug('interface_header_attribute3: ' ||
4408 p_trx_rec.interface_header_attribute3);
4409 arp_util.debug('interface_header_attribute4: ' ||
4410 p_trx_rec.interface_header_attribute4);
4411 arp_util.debug('interface_header_attribute5: ' ||
4412 p_trx_rec.interface_header_attribute5);
4413 arp_util.debug('interface_header_attribute6: ' ||
4414 p_trx_rec.interface_header_attribute6);
4415 arp_util.debug('interface_header_attribute7: ' ||
4416 p_trx_rec.interface_header_attribute7);
4417 arp_util.debug('interface_header_attribute8: ' ||
4418 p_trx_rec.interface_header_attribute8);
4419 arp_util.debug('interface_header_attribute9: ' ||
4420 p_trx_rec.interface_header_attribute9);
4421 arp_util.debug('interface_header_attribute10: '||
4422 p_trx_rec.interface_header_attribute10);
4423 arp_util.debug('interface_header_attribute11: '||
4424 p_trx_rec.interface_header_attribute11);
4425 arp_util.debug('interface_header_attribute12: '||
4426 p_trx_rec.interface_header_attribute12);
4427 arp_util.debug('interface_header_attribute13: '||
4428 p_trx_rec.interface_header_attribute13);
4429 arp_util.debug('interface_header_attribute14: '||
4430 p_trx_rec.interface_header_attribute14);
4431 arp_util.debug('interface_header_attribute15: '||
4432 p_trx_rec.interface_header_attribute15);
4433 arp_util.debug('attribute_category: ' || p_trx_rec.attribute_category);
4434 arp_util.debug('attribute1: ' || p_trx_rec.attribute1);
4435 arp_util.debug('attribute2: ' || p_trx_rec.attribute2);
4436 arp_util.debug('attribute3: ' || p_trx_rec.attribute3);
4437 arp_util.debug('attribute4: ' || p_trx_rec.attribute4);
4438 arp_util.debug('attribute5: ' || p_trx_rec.attribute5);
4439 arp_util.debug('attribute6: ' || p_trx_rec.attribute6);
4440 arp_util.debug('attribute7: ' || p_trx_rec.attribute7);
4441 arp_util.debug('attribute8: ' || p_trx_rec.attribute8);
4442 arp_util.debug('attribute9: ' || p_trx_rec.attribute9);
4443 arp_util.debug('attribute10: ' || p_trx_rec.attribute10);
4444 arp_util.debug('attribute11: ' || p_trx_rec.attribute11);
4445 arp_util.debug('attribute12: ' || p_trx_rec.attribute12);
4446 arp_util.debug('attribute13: ' || p_trx_rec.attribute13);
4447 arp_util.debug('attribute14: ' || p_trx_rec.attribute14);
4448 arp_util.debug('attribute15: ' || p_trx_rec.attribute15);
4449 arp_util.debug('br_amount: ' || p_trx_rec.br_amount);
4450 arp_util.debug('br_unpaid_flag: ' || p_trx_rec.br_unpaid_flag);
4451 arp_util.debug('br_on_hold_flag: ' || p_trx_rec.br_on_hold_flag);
4452 arp_util.debug('drawee_id: ' || p_trx_rec.drawee_id);
4453 arp_util.debug('drawee_contact_id: ' || p_trx_rec.drawee_contact_id);
4454 arp_util.debug('drawee_site_use_id: ' || p_trx_rec.drawee_site_use_id);
4455 arp_util.debug('drawee_bank_account_id: ' || p_trx_rec.drawee_bank_account_id);
4456 arp_util.debug('remit_bank_acct_use_id: ' || p_trx_rec.remit_bank_acct_use_id);
4457 arp_util.debug('override_remit_account_flag: ' || p_trx_rec.override_remit_account_flag);
4458 arp_util.debug('special_instructions: ' || p_trx_rec.special_instructions);
4459 arp_util.debug('remittance_batch_id: ' || p_trx_rec.remittance_batch_id);
4460 arp_util.debug('address_verification_code: ' || p_trx_rec.address_verification_code);
4461 arp_util.debug('approval_code: ' || p_trx_rec.approval_code);
4462 arp_util.debug('bill_to_address_id: ' || p_trx_rec.bill_to_address_id);
4463 arp_util.debug('edi_processed_flag: ' || p_trx_rec.edi_processed_flag);
4464 arp_util.debug('edi_processed_status: ' || p_trx_rec.edi_processed_status);
4465 arp_util.debug('payment_server_order_num: ' || p_trx_rec.payment_server_order_num);
4466 arp_util.debug('post_request_id: ' || p_trx_rec.post_request_id);
4467 arp_util.debug('request_id: ' || p_trx_rec.request_id);
4468 arp_util.debug('ship_to_address_id: ' || p_trx_rec.ship_to_address_id);
4469 arp_util.debug('wh_update_date: ' || p_trx_rec.wh_update_date);
4470
4471 arp_util.debug('global_attribute_category: ' || p_trx_rec.global_attribute_category);
4472 arp_util.debug('global_attribute1: ' || p_trx_rec.global_attribute1);
4473 arp_util.debug('global_attribute2: ' || p_trx_rec.global_attribute2);
4474 arp_util.debug('global_attribute3: ' || p_trx_rec.global_attribute3);
4475 arp_util.debug('global_attribute4: ' || p_trx_rec.global_attribute4);
4476 arp_util.debug('global_attribute5: ' || p_trx_rec.global_attribute5);
4477 arp_util.debug('global_attribute6: ' || p_trx_rec.global_attribute6);
4478 arp_util.debug('global_attribute7: ' || p_trx_rec.global_attribute7);
4479 arp_util.debug('global_attribute8: ' || p_trx_rec.global_attribute8);
4480 arp_util.debug('global_attribute9: ' || p_trx_rec.global_attribute9);
4481 arp_util.debug('global_attribute10: ' || p_trx_rec.global_attribute10);
4482 arp_util.debug('global_attribute11: ' || p_trx_rec.global_attribute11);
4483 arp_util.debug('global_attribute12: ' || p_trx_rec.global_attribute12);
4484 arp_util.debug('global_attribute13: ' || p_trx_rec.global_attribute13);
4485 arp_util.debug('global_attribute14: ' || p_trx_rec.global_attribute14);
4486 arp_util.debug('global_attribute15: ' || p_trx_rec.global_attribute15);
4487 arp_util.debug('global_attribute16: ' || p_trx_rec.global_attribute16);
4488 arp_util.debug('global_attribute17: ' || p_trx_rec.global_attribute17);
4489 arp_util.debug('global_attribute18: ' || p_trx_rec.global_attribute18);
4490 arp_util.debug('global_attribute19: ' || p_trx_rec.global_attribute19);
4491 arp_util.debug('global_attribute20: ' || p_trx_rec.global_attribute20);
4492 arp_util.debug('global_attribute21: ' || p_trx_rec.global_attribute21);
4493 arp_util.debug('global_attribute22: ' || p_trx_rec.global_attribute22);
4494 arp_util.debug('global_attribute23: ' || p_trx_rec.global_attribute23);
4495 arp_util.debug('global_attribute24: ' || p_trx_rec.global_attribute24);
4496 arp_util.debug('global_attribute25: ' || p_trx_rec.global_attribute25);
4497 arp_util.debug('global_attribute26: ' || p_trx_rec.global_attribute26);
4498 arp_util.debug('global_attribute27: ' || p_trx_rec.global_attribute27);
4499 arp_util.debug('global_attribute28: ' || p_trx_rec.global_attribute28);
4500 arp_util.debug('global_attribute29: ' || p_trx_rec.global_attribute29);
4501 arp_util.debug('global_attribute30: ' || p_trx_rec.global_attribute30);
4502
4503 arp_util.debug('legal_entity_id: ' || to_char(p_trx_rec.legal_entity_id));
4504 arp_util.debug('payment_trxn_extension_id: ' || to_char(p_trx_rec.payment_trxn_extension_id));
4505 arp_util.debug('billing_date: ' || p_trx_rec.billing_date);
4506
4507 arp_util.debug('************* End ra_customer_trx record *************');
4508
4509 arp_util.debug('arp_ct_pkg.display_header_rec()-');
4510
4511 EXCEPTION
4512 WHEN OTHERS THEN
4513 arp_util.debug('EXCEPTION: arp_ct_pkg.display_header_rec()');
4514 RAISE;
4515
4516 END;
4517
4518 /*===========================================================================+
4519 | PROCEDURE |
4520 | lock_compare_frt_cover |
4521 | |
4522 | DESCRIPTION |
4523 | Converts column parameters to a transaction header record and |
4524 | locks the transaction header. |
4525 | |
4526 | SCOPE - PUBLIC |
4527 | |
4528 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
4529 | arp_util.debug |
4530 | |
4531 | ARGUMENTS : IN: |
4532 | p_customer_trx_id |
4533 | p_ship_via |
4534 | p_ship_date_actual |
4535 | p_waybill_number |
4536 | p_fob_point |
4537 | OUT: |
4538 | None |
4539 | IN/ OUT: |
4540 | None |
4541 | |
4542 | RETURNS : NONE |
4543 | |
4544 | NOTES |
4545 | |
4546 | MODIFICATION HISTORY |
4547 | 15-OCT-95 Subash Chadalavada Created |
4548 | |
4549 +===========================================================================*/
4550 PROCEDURE lock_compare_frt_cover(
4551 p_customer_trx_id IN ra_customer_trx.customer_trx_id%type,
4552 p_ship_via IN ra_customer_trx.ship_via%type,
4553 p_ship_date_actual IN ra_customer_trx.ship_date_actual%type,
4554 p_waybill_number IN ra_customer_trx.waybill_number%type,
4555 p_fob_point IN ra_customer_trx.fob_point%type)
4556 IS
4557 l_trx_rec ra_customer_trx%rowtype;
4558 BEGIN
4559 arp_util.debug('arp_ct_pkg.lock_compare_frt_cover()+');
4560
4561 /*------------------------------------------------+
4562 | Populate the header record with the values |
4563 | passed in as parameters. |
4564 +------------------------------------------------*/
4565
4566 arp_ct_pkg.set_to_dummy(l_trx_rec);
4567
4568 l_trx_rec.customer_trx_id := p_customer_trx_id;
4569 l_trx_rec.ship_via := p_ship_via;
4570 l_trx_rec.ship_date_actual := p_ship_date_actual;
4571 l_trx_rec.waybill_number := p_waybill_number;
4572 l_trx_rec.fob_point := p_fob_point;
4573
4574 /*-----------------------------------------+
4575 | Call the standard header table handler |
4576 +-----------------------------------------*/
4577 arp_util.debug('calling lock compare p with p_customer_trx_id = ' || to_char(p_customer_trx_id));
4578
4579 lock_compare_p( l_trx_rec, p_customer_trx_id);
4580
4581 arp_util.debug('arp_ct_pkg.lock_compare_frt_cover()-');
4582
4583 EXCEPTION
4584 WHEN OTHERS THEN
4585 arp_util.debug('EXCEPTION : arp_ct_pkg.lock_compare_frt_cover()');
4586
4587 arp_util.debug('----- parameters for lock_compare_frt_cover() ' ||
4588 '-----');
4589 arp_util.debug('p_customer_trx_id = ' || p_customer_trx_id );
4590 arp_util.debug('p_ship_via = ' || p_ship_via );
4591 arp_util.debug('p_ship_date_actual = ' || p_ship_date_actual );
4592 arp_util.debug('p_waybill_number = ' || p_waybill_number );
4593 arp_util.debug('p_fob_point = ' || p_fob_point );
4594
4595 RAISE;
4596
4597 END;
4598
4599 /*===========================================================================+
4600 | PROCEDURE |
4601 | lock_compare_cover |
4602 | |
4603 | DESCRIPTION |
4604 | Converts column parameters to a transaction header record and |
4605 | locks the transaction header. |
4606 | |
4607 | SCOPE - PUBLIC |
4608 | |
4609 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
4610 | arp_util.debug |
4611 | |
4612 | ARGUMENTS : IN: |
4613 | p_customer_trx_id |
4614 | p_trx_number |
4615 | p_posting_control_id |
4616 | p_ra_post_loop_number |
4617 | p_complete_flag |
4618 | p_initial_customer_trx_id |
4619 | p_previous_customer_trx_id |
4620 | p_related_customer_trx_id |
4621 | p_recurred_from_trx_number |
4622 | p_cust_trx_type_id |
4623 | p_batch_id |
4624 | p_batch_source_id |
4625 | p_agreement_id |
4626 | p_trx_date |
4627 | p_bill_to_customer_id |
4628 | p_bill_to_contact_id |
4629 | p_bill_to_site_use_id |
4630 | p_ship_to_customer_id |
4631 | p_ship_to_contact_id |
4632 | p_ship_to_site_use_id |
4633 | p_sold_to_customer_id |
4634 | p_sold_to_site_use_id |
4635 | p_sold_to_contact_id |
4636 | p_customer_reference |
4637 | p_customer_reference_date |
4638 | p_cr_method_for_installments |
4639 | p_credit_method_for_rules |
4640 | p_start_date_commitment |
4641 | p_end_date_commitment |
4642 | p_exchange_date |
4643 | p_exchange_rate |
4644 | p_exchange_rate_type |
4645 | p_customer_bank_account_id |
4646 | p_finance_charges |
4647 | p_fob_point |
4648 | p_comments |
4649 | p_internal_notes |
4650 | p_invoice_currency_code |
4651 | p_invoicing_rule_id |
4652 | p_last_printed_sequence_num |
4653 | p_orig_system_batch_name |
4654 | p_primary_salesrep_id |
4655 | p_printing_count |
4656 | p_printing_last_printed |
4657 | p_printing_option |
4658 | p_printing_original_date |
4659 | p_printing_pending |
4660 | p_purchase_order |
4661 | p_purchase_order_date |
4662 | p_purchase_order_revision |
4663 | p_receipt_method_id |
4664 | p_remit_to_address_id |
4665 | p_shipment_id |
4666 | p_ship_date_actual |
4667 | p_ship_via |
4668 | p_term_due_date |
4669 | p_term_id |
4670 | p_territory_id |
4671 | p_waybill_number |
4672 | p_status_trx |
4673 | p_reason_code |
4674 | p_doc_sequence_id |
4675 | p_doc_sequence_value |
4676 | p_paying_customer_id |
4677 | p_paying_site_use_id |
4678 | p_related_batch_source_id |
4679 | p_default_tax_exempt_flag |
4680 | p_created_from |
4681 | p_deflt_ussgl_trx_code_context |
4682 | p_deflt_ussgl_transaction_code |
4683 | p_old_trx_number |
4684 | p_interface_header_context |
4685 | p_interface_header_attribute1 |
4686 | p_interface_header_attribute2 |
4687 | p_interface_header_attribute3 |
4688 | p_interface_header_attribute4 |
4689 | p_interface_header_attribute5 |
4690 | p_interface_header_attribute6 |
4691 | p_interface_header_attribute7 |
4692 | p_interface_header_attribute8 |
4693 | p_interface_header_attribute9 |
4694 | p_interface_header_attribute10 |
4695 | p_interface_header_attribute11 |
4696 | p_interface_header_attribute12 |
4697 | p_interface_header_attribute13 |
4698 | p_interface_header_attribute14 |
4699 | p_interface_header_attribute15 |
4700 | p_attribute_category |
4701 | p_attribute1 |
4702 | p_attribute2 |
4703 | p_attribute3 |
4704 | p_attribute4 |
4705 | p_attribute5 |
4706 | p_attribute6 |
4707 | p_attribute7 |
4708 | p_attribute8 |
4709 | p_attribute9 |
4710 | p_attribute10 |
4711 | p_attribute11 |
4712 | p_attribute12 |
4713 | p_attribute13 |
4714 | p_attribute14 |
4715 | p_attribute15 |
4716 | |
4717 | OUT: |
4718 | None |
4719 | IN/ OUT: |
4720 | None |
4721 | |
4722 | RETURNS : NONE |
4723 | |
4724 | NOTES |
4725 | |
4726 | MODIFICATION HISTORY |
4727 | 27-NOV-95 Charlie Tomberg Created |
4728 | |
4729 +===========================================================================*/
4730
4731 PROCEDURE lock_compare_cover(
4732 p_customer_trx_id IN ra_customer_trx.customer_trx_id%type,
4733 p_trx_number IN ra_customer_trx.trx_number%type,
4734 p_posting_control_id IN ra_customer_trx.posting_control_id%type,
4735 p_ra_post_loop_number IN ra_customer_trx.ra_post_loop_number%type,
4736 p_complete_flag IN ra_customer_trx.complete_flag%type,
4737 p_initial_customer_trx_id IN ra_customer_trx.initial_customer_trx_id%type,
4738 p_previous_customer_trx_id IN ra_customer_trx.previous_customer_trx_id%type,
4739 p_related_customer_trx_id IN ra_customer_trx.related_customer_trx_id%type,
4740 p_recurred_from_trx_number IN ra_customer_trx.recurred_from_trx_number%type,
4741 p_cust_trx_type_id IN ra_customer_trx.cust_trx_type_id%type,
4742 p_batch_id IN ra_customer_trx.batch_id%type,
4743 p_batch_source_id IN ra_customer_trx.batch_source_id%type,
4744 p_agreement_id IN ra_customer_trx.agreement_id%type,
4745 p_trx_date IN ra_customer_trx.trx_date%type,
4746 p_bill_to_customer_id IN ra_customer_trx.bill_to_customer_id%type,
4747 p_bill_to_contact_id IN ra_customer_trx.bill_to_contact_id%type,
4748 p_bill_to_site_use_id IN ra_customer_trx.bill_to_site_use_id%type,
4749 p_ship_to_customer_id IN ra_customer_trx.ship_to_customer_id%type,
4750 p_ship_to_contact_id IN ra_customer_trx.ship_to_contact_id%type,
4751 p_ship_to_site_use_id IN ra_customer_trx.ship_to_site_use_id%type,
4752 p_sold_to_customer_id IN ra_customer_trx.sold_to_customer_id%type,
4753 p_sold_to_site_use_id IN ra_customer_trx.sold_to_site_use_id%type,
4754 p_sold_to_contact_id IN ra_customer_trx.sold_to_contact_id%type,
4755 p_customer_reference IN ra_customer_trx.customer_reference%type,
4756 p_customer_reference_date IN ra_customer_trx.customer_reference_date%type,
4757 p_cr_method_for_installments IN
4758 ra_customer_trx.credit_method_for_installments%type,
4759 p_credit_method_for_rules IN ra_customer_trx.credit_method_for_rules%type,
4760 p_start_date_commitment IN ra_customer_trx.start_date_commitment%type,
4761 p_end_date_commitment IN ra_customer_trx.end_date_commitment%type,
4762 p_exchange_date IN ra_customer_trx.exchange_date%type,
4763 p_exchange_rate IN ra_customer_trx.exchange_rate%type,
4764 p_exchange_rate_type IN ra_customer_trx.exchange_rate_type%type,
4765 p_customer_bank_account_id IN ra_customer_trx.customer_bank_account_id%type,
4766 p_finance_charges IN ra_customer_trx.finance_charges%type,
4767 p_fob_point IN ra_customer_trx.fob_point%type,
4768 p_comments IN ra_customer_trx.comments%type,
4769 p_internal_notes IN ra_customer_trx.internal_notes%type,
4770 p_invoice_currency_code IN ra_customer_trx.invoice_currency_code%type,
4771 p_invoicing_rule_id IN ra_customer_trx.invoicing_rule_id%type,
4772 p_last_printed_sequence_num IN
4773 ra_customer_trx.last_printed_sequence_num%type,
4774 p_orig_system_batch_name IN ra_customer_trx.orig_system_batch_name%type,
4775 p_primary_salesrep_id IN ra_customer_trx.primary_salesrep_id%type,
4776 p_printing_count IN ra_customer_trx.printing_count%type,
4777 p_printing_last_printed IN ra_customer_trx.printing_last_printed%type,
4778 p_printing_option IN ra_customer_trx.printing_option%type,
4779 p_printing_original_date IN ra_customer_trx.printing_original_date%type,
4780 p_printing_pending IN ra_customer_trx.printing_pending%type,
4781 p_purchase_order IN ra_customer_trx.purchase_order%type,
4782 p_purchase_order_date IN ra_customer_trx.purchase_order_date%type,
4783 p_purchase_order_revision IN ra_customer_trx.purchase_order_revision%type,
4784 p_receipt_method_id IN ra_customer_trx.receipt_method_id%type,
4785 p_remit_to_address_id IN ra_customer_trx.remit_to_address_id%type,
4786 p_shipment_id IN ra_customer_trx.shipment_id%type,
4787 p_ship_date_actual IN ra_customer_trx.ship_date_actual%type,
4788 p_ship_via IN ra_customer_trx.ship_via%type,
4789 p_term_due_date IN ra_customer_trx.term_due_date%type,
4790 p_term_id IN ra_customer_trx.term_id%type,
4791 p_territory_id IN ra_customer_trx.territory_id%type,
4792 p_waybill_number IN ra_customer_trx.waybill_number%type,
4793 p_status_trx IN ra_customer_trx.status_trx%type,
4794 p_reason_code IN ra_customer_trx.reason_code%type,
4795 p_doc_sequence_id IN ra_customer_trx.doc_sequence_id%type,
4796 p_doc_sequence_value IN ra_customer_trx.doc_sequence_value%type,
4797 p_paying_customer_id IN ra_customer_trx.paying_customer_id%type,
4798 p_paying_site_use_id IN ra_customer_trx.paying_site_use_id%type,
4799 p_related_batch_source_id IN ra_customer_trx.related_batch_source_id%type,
4800 p_default_tax_exempt_flag IN ra_customer_trx.default_tax_exempt_flag%type,
4801 p_created_from IN ra_customer_trx.created_from%type,
4802 p_deflt_ussgl_trx_code_context IN
4803 ra_customer_trx.default_ussgl_trx_code_context%type,
4804 p_deflt_ussgl_transaction_code IN
4805 ra_customer_trx.default_ussgl_transaction_code%type,
4806 p_old_trx_number IN ra_customer_trx.old_trx_number%type,
4807 p_interface_header_context IN
4808 ra_customer_trx.interface_header_context%type,
4809 p_interface_header_attribute1 IN
4810 ra_customer_trx.interface_header_attribute1%type,
4811 p_interface_header_attribute2 IN
4812 ra_customer_trx.interface_header_attribute2%type,
4813 p_interface_header_attribute3 IN
4814 ra_customer_trx.interface_header_attribute3%type,
4815 p_interface_header_attribute4 IN
4816 ra_customer_trx.interface_header_attribute4%type,
4817 p_interface_header_attribute5 IN
4818 ra_customer_trx.interface_header_attribute5%type,
4819 p_interface_header_attribute6 IN
4820 ra_customer_trx.interface_header_attribute6%type,
4821 p_interface_header_attribute7 IN
4822 ra_customer_trx.interface_header_attribute7%type,
4823 p_interface_header_attribute8 IN
4824 ra_customer_trx.interface_header_attribute8%type,
4825 p_interface_header_attribute9 IN
4826 ra_customer_trx.interface_header_attribute9%type,
4827 p_interface_header_attribute10 IN
4828 ra_customer_trx.interface_header_attribute10%type,
4829 p_interface_header_attribute11 IN
4830 ra_customer_trx.interface_header_attribute11%type,
4831 p_interface_header_attribute12 IN
4832 ra_customer_trx.interface_header_attribute12%type,
4833 p_interface_header_attribute13 IN
4834 ra_customer_trx.interface_header_attribute13%type,
4835 p_interface_header_attribute14 IN
4836 ra_customer_trx.interface_header_attribute14%type,
4837 p_interface_header_attribute15 IN
4838 ra_customer_trx.interface_header_attribute15%type,
4839 p_attribute_category IN ra_customer_trx.attribute_category%type,
4840 p_attribute1 IN ra_customer_trx.attribute1%type,
4841 p_attribute2 IN ra_customer_trx.attribute2%type,
4842 p_attribute3 IN ra_customer_trx.attribute3%type,
4843 p_attribute4 IN ra_customer_trx.attribute4%type,
4844 p_attribute5 IN ra_customer_trx.attribute5%type,
4845 p_attribute6 IN ra_customer_trx.attribute6%type,
4846 p_attribute7 IN ra_customer_trx.attribute7%type,
4847 p_attribute8 IN ra_customer_trx.attribute8%type,
4848 p_attribute9 IN ra_customer_trx.attribute9%type,
4849 p_attribute10 IN ra_customer_trx.attribute10%type,
4850 p_attribute11 IN ra_customer_trx.attribute11%type,
4851 p_attribute12 IN ra_customer_trx.attribute12%type,
4852 p_attribute13 IN ra_customer_trx.attribute13%type,
4853 p_attribute14 IN ra_customer_trx.attribute14%type,
4854 p_attribute15 IN ra_customer_trx.attribute15%type,
4855 p_legal_entity_id IN ra_customer_trx.legal_entity_id%type,
4856 p_payment_trxn_extension_id IN ra_customer_trx.payment_trxn_extension_id%type,
4857 p_billing_date IN ra_customer_trx.billing_date%type)
4858
4859
4860 IS
4861
4862 l_trx_rec ra_customer_trx%rowtype;
4863
4864 BEGIN
4865 arp_util.debug('arp_ct_pkg.lock_compare_cover()+');
4866
4867 /*------------------------------------------------+
4868 | Populate the header record with the values |
4869 | passed in as parameters. |
4870 +------------------------------------------------*/
4871
4872 arp_ct_pkg.set_to_dummy(l_trx_rec);
4873
4874 l_trx_rec.customer_trx_id := p_customer_trx_id;
4875 l_trx_rec.trx_number := p_trx_number;
4876
4877 --
4878 -- commented out NOCOPY posting_control_id, ra_post_loop_number so as to
4879 -- reduce the no of columns in the view
4880 --
4881 -- l_trx_rec.posting_control_id := p_posting_control_id;
4882 -- l_trx_rec.ra_post_loop_number := p_ra_post_loop_number;
4883
4884 l_trx_rec.complete_flag := p_complete_flag;
4885 l_trx_rec.initial_customer_trx_id := p_initial_customer_trx_id;
4886 l_trx_rec.previous_customer_trx_id := p_previous_customer_trx_id;
4887 l_trx_rec.related_customer_trx_id := p_related_customer_trx_id;
4888 l_trx_rec.recurred_from_trx_number := p_recurred_from_trx_number;
4889 l_trx_rec.cust_trx_type_id := p_cust_trx_type_id;
4890 l_trx_rec.batch_id := p_batch_id;
4891 l_trx_rec.batch_source_id := p_batch_source_id;
4892 l_trx_rec.agreement_id := p_agreement_id;
4893 l_trx_rec.trx_date := p_trx_date;
4894 l_trx_rec.bill_to_customer_id := p_bill_to_customer_id;
4895 l_trx_rec.bill_to_contact_id := p_bill_to_contact_id;
4896 l_trx_rec.bill_to_site_use_id := p_bill_to_site_use_id;
4897 l_trx_rec.ship_to_customer_id := p_ship_to_customer_id;
4898 l_trx_rec.ship_to_contact_id := p_ship_to_contact_id;
4899 l_trx_rec.ship_to_site_use_id := p_ship_to_site_use_id;
4900 l_trx_rec.sold_to_customer_id := p_sold_to_customer_id;
4901 l_trx_rec.sold_to_site_use_id := p_sold_to_site_use_id;
4902 l_trx_rec.sold_to_contact_id := p_sold_to_contact_id;
4903 l_trx_rec.customer_reference := p_customer_reference;
4904 l_trx_rec.customer_reference_date := p_customer_reference_date;
4905 l_trx_rec.credit_method_for_installments := p_cr_method_for_installments;
4906 l_trx_rec.credit_method_for_rules := p_credit_method_for_rules;
4907 l_trx_rec.start_date_commitment := p_start_date_commitment;
4908 l_trx_rec.end_date_commitment := p_end_date_commitment;
4909 l_trx_rec.exchange_date := p_exchange_date;
4910 l_trx_rec.exchange_rate := p_exchange_rate;
4911 l_trx_rec.exchange_rate_type := p_exchange_rate_type;
4912 l_trx_rec.customer_bank_account_id := p_customer_bank_account_id;
4913 l_trx_rec.finance_charges := p_finance_charges;
4914 l_trx_rec.fob_point := p_fob_point;
4915 l_trx_rec.comments := p_comments;
4916 l_trx_rec.internal_notes := p_internal_notes;
4917 l_trx_rec.invoice_currency_code := p_invoice_currency_code;
4918 l_trx_rec.invoicing_rule_id := p_invoicing_rule_id;
4919 l_trx_rec.last_printed_sequence_num := p_last_printed_sequence_num;
4920 l_trx_rec.orig_system_batch_name := p_orig_system_batch_name;
4921 l_trx_rec.primary_salesrep_id := p_primary_salesrep_id;
4922 l_trx_rec.printing_count := p_printing_count;
4923 l_trx_rec.printing_last_printed := p_printing_last_printed;
4924 l_trx_rec.printing_option := p_printing_option;
4925 l_trx_rec.printing_original_date := p_printing_original_date;
4926 -- l_trx_rec.printing_pending := p_printing_pending;
4927 l_trx_rec.purchase_order := p_purchase_order;
4928 l_trx_rec.purchase_order_date := p_purchase_order_date;
4929 l_trx_rec.purchase_order_revision := p_purchase_order_revision;
4930 l_trx_rec.receipt_method_id := p_receipt_method_id;
4931 l_trx_rec.remit_to_address_id := p_remit_to_address_id;
4932 l_trx_rec.shipment_id := p_shipment_id;
4933 l_trx_rec.ship_date_actual := p_ship_date_actual;
4934 l_trx_rec.ship_via := p_ship_via;
4935 l_trx_rec.term_id := p_term_id;
4936 l_trx_rec.territory_id := p_territory_id;
4937 l_trx_rec.waybill_number := p_waybill_number;
4938 l_trx_rec.status_trx := p_status_trx;
4939 l_trx_rec.reason_code := p_reason_code;
4940 l_trx_rec.doc_sequence_id := p_doc_sequence_id;
4941 l_trx_rec.doc_sequence_value := p_doc_sequence_value;
4942 l_trx_rec.paying_customer_id := p_paying_customer_id;
4943 l_trx_rec.paying_site_use_id := p_paying_site_use_id;
4944 l_trx_rec.related_batch_source_id := p_related_batch_source_id;
4945 l_trx_rec.default_tax_exempt_flag := p_default_tax_exempt_flag;
4946 l_trx_rec.created_from := p_created_from;
4947 l_trx_rec.default_ussgl_trx_code_context := p_deflt_ussgl_trx_code_context;
4948 l_trx_rec.default_ussgl_transaction_code := p_deflt_ussgl_transaction_code;
4949 l_trx_rec.old_trx_number := p_old_trx_number;
4950 l_trx_rec.interface_header_context := p_interface_header_context;
4951 l_trx_rec.interface_header_attribute1 := p_interface_header_attribute1;
4952 l_trx_rec.interface_header_attribute2 := p_interface_header_attribute2;
4953 l_trx_rec.interface_header_attribute3 := p_interface_header_attribute3;
4954 l_trx_rec.interface_header_attribute4 := p_interface_header_attribute4;
4955 l_trx_rec.interface_header_attribute5 := p_interface_header_attribute5;
4956 l_trx_rec.interface_header_attribute6 := p_interface_header_attribute6;
4957 l_trx_rec.interface_header_attribute7 := p_interface_header_attribute7;
4958 l_trx_rec.interface_header_attribute8 := p_interface_header_attribute8;
4959 l_trx_rec.interface_header_attribute9 := p_interface_header_attribute9;
4960 l_trx_rec.interface_header_attribute10 := p_interface_header_attribute10;
4961 l_trx_rec.interface_header_attribute11 := p_interface_header_attribute11;
4962 l_trx_rec.interface_header_attribute12 := p_interface_header_attribute12;
4963 l_trx_rec.interface_header_attribute13 := p_interface_header_attribute13;
4964 l_trx_rec.interface_header_attribute14 := p_interface_header_attribute14;
4965 l_trx_rec.interface_header_attribute15 := p_interface_header_attribute15;
4966 l_trx_rec.attribute_category := p_attribute_category;
4967 l_trx_rec.attribute1 := p_attribute1;
4968 l_trx_rec.attribute2 := p_attribute2;
4969 l_trx_rec.attribute3 := p_attribute3;
4970 l_trx_rec.attribute4 := p_attribute4;
4971 l_trx_rec.attribute5 := p_attribute5;
4972 l_trx_rec.attribute6 := p_attribute6;
4973 l_trx_rec.attribute7 := p_attribute7;
4974 l_trx_rec.attribute8 := p_attribute8;
4975 l_trx_rec.attribute9 := p_attribute9;
4976 l_trx_rec.attribute10 := p_attribute10;
4977 l_trx_rec.attribute11 := p_attribute11;
4978 l_trx_rec.attribute12 := p_attribute12;
4979 l_trx_rec.attribute13 := p_attribute13;
4980 l_trx_rec.attribute14 := p_attribute14;
4981 l_trx_rec.attribute15 := p_attribute15;
4982 l_trx_rec.legal_entity_id := p_legal_entity_id;
4983 /* PAYMENT_UPTAKE */
4984 l_trx_rec.payment_trxn_extension_id := p_payment_trxn_extension_id;
4985 l_trx_rec.billing_date := p_billing_date;
4986
4987 /*-----------------------------------------+
4988 | Call the standard header table handler |
4989 +-----------------------------------------*/
4990
4991 lock_compare_p( l_trx_rec, p_customer_trx_id);
4992
4993 arp_util.debug('arp_ct_pkg.lock_compare_cover()-');
4994
4995 EXCEPTION
4996 WHEN OTHERS THEN
4997 arp_util.debug('EXCEPTION : arp_ct_pkg.lock_compare_cover()');
4998
4999 arp_util.debug('----- parameters for lock_compare_cover() ' ||
5000 '-----');
5001 arp_util.debug('p_customer_trx_id = ' ||
5002 TO_CHAR(p_customer_trx_id));
5003 arp_util.debug('p_trx_number = ' ||
5004 p_trx_number);
5005 arp_util.debug('p_posting_control_id = ' ||
5006 TO_CHAR(p_posting_control_id));
5007 arp_util.debug('p_ra_post_loop_number = ' ||
5008 p_ra_post_loop_number);
5009 arp_util.debug('p_complete_flag = ' ||
5010 p_complete_flag);
5011 arp_util.debug('p_initial_customer_trx_id = ' ||
5012 TO_CHAR(p_initial_customer_trx_id));
5013 arp_util.debug('p_previous_customer_trx_id = ' ||
5014 TO_CHAR(p_previous_customer_trx_id));
5015 arp_util.debug('p_related_customer_trx_id = ' ||
5016 TO_CHAR(p_related_customer_trx_id));
5017 arp_util.debug('p_recurred_from_trx_number = ' ||
5018 p_recurred_from_trx_number);
5019 arp_util.debug('p_cust_trx_type_id = ' ||
5020 TO_CHAR(p_cust_trx_type_id));
5021 arp_util.debug('p_batch_id = ' ||
5022 TO_CHAR(p_batch_id));
5023 arp_util.debug('p_batch_source_id = ' ||
5024 TO_CHAR(p_batch_source_id));
5025 arp_util.debug('p_agreement_id = ' ||
5026 TO_CHAR(p_agreement_id));
5027 arp_util.debug('p_trx_date = ' ||
5028 p_trx_date);
5029 arp_util.debug('p_bill_to_customer_id = ' ||
5030 TO_CHAR(p_bill_to_customer_id));
5031 arp_util.debug('p_bill_to_contact_id = ' ||
5032 TO_CHAR(p_bill_to_contact_id));
5033 arp_util.debug('p_bill_to_site_use_id = ' ||
5034 TO_CHAR(p_bill_to_site_use_id));
5035 arp_util.debug('p_ship_to_customer_id = ' ||
5036 TO_CHAR(p_ship_to_customer_id));
5037 arp_util.debug('p_ship_to_contact_id = ' ||
5038 TO_CHAR(p_ship_to_contact_id));
5039 arp_util.debug('p_ship_to_site_use_id = ' ||
5040 TO_CHAR(p_ship_to_site_use_id));
5041 arp_util.debug('p_sold_to_customer_id = ' ||
5042 TO_CHAR(p_sold_to_customer_id));
5043 arp_util.debug('p_sold_to_site_use_id = ' ||
5044 TO_CHAR(p_sold_to_site_use_id));
5045 arp_util.debug('p_sold_to_contact_id = ' ||
5046 TO_CHAR(p_sold_to_contact_id));
5047 arp_util.debug('p_customer_reference = ' ||
5048 p_customer_reference);
5049 arp_util.debug('p_customer_reference_date = ' ||
5050 p_customer_reference_date);
5051 arp_util.debug('p_cr_method_for_installments = ' ||
5052 p_cr_method_for_installments);
5053 arp_util.debug('p_credit_method_for_rules = ' ||
5054 p_credit_method_for_rules);
5055 arp_util.debug('p_start_date_commitment = ' ||
5056 p_start_date_commitment);
5057 arp_util.debug('p_end_date_commitment = ' ||
5058 p_end_date_commitment);
5059 arp_util.debug('p_exchange_date = ' ||
5060 p_exchange_date);
5061 arp_util.debug('p_exchange_rate = ' ||
5062 p_exchange_rate);
5063 arp_util.debug('p_exchange_rate_type = ' ||
5064 p_exchange_rate_type);
5065 arp_util.debug('p_customer_bank_account_id = ' ||
5066 TO_CHAR(p_customer_bank_account_id));
5067 arp_util.debug('p_finance_charges = ' ||
5068 p_finance_charges);
5069 arp_util.debug('p_fob_point = ' ||
5070 p_fob_point);
5071 arp_util.debug('p_comments = ' ||
5072 p_comments);
5073 arp_util.debug('p_internal_notes = ' ||
5074 p_internal_notes);
5075 arp_util.debug('p_invoice_currency_code = ' ||
5076 p_invoice_currency_code);
5077 arp_util.debug('p_invoicing_rule_id = ' ||
5078 TO_CHAR(p_invoicing_rule_id));
5079 arp_util.debug('p_last_printed_sequence_num = ' ||
5080 p_last_printed_sequence_num);
5081 arp_util.debug('p_orig_system_batch_name = ' ||
5082 p_orig_system_batch_name);
5083 arp_util.debug('p_primary_salesrep_id = ' ||
5084 TO_CHAR(p_primary_salesrep_id));
5085 arp_util.debug('p_printing_count = ' ||
5086 p_printing_count);
5087 arp_util.debug('p_printing_last_printed = ' ||
5088 p_printing_last_printed);
5089 arp_util.debug('p_printing_option = ' ||
5090 p_printing_option);
5091 arp_util.debug('p_printing_original_date = ' ||
5092 p_printing_original_date);
5093 arp_util.debug('p_printing_pending = ' ||
5094 p_printing_pending);
5095 arp_util.debug('p_purchase_order = ' ||
5096 p_purchase_order);
5097 arp_util.debug('p_purchase_order_date = ' ||
5098 p_purchase_order_date);
5099 arp_util.debug('p_purchase_order_revision = ' ||
5100 p_purchase_order_revision);
5101 arp_util.debug('p_receipt_method_id = ' ||
5102 TO_CHAR(p_receipt_method_id));
5103 arp_util.debug('p_remit_to_address_id = ' ||
5104 TO_CHAR(p_remit_to_address_id));
5105 arp_util.debug('p_shipment_id = ' ||
5106 TO_CHAR(p_shipment_id));
5107 arp_util.debug('p_ship_date_actual = ' ||
5108 p_ship_date_actual);
5109 arp_util.debug('p_ship_via = ' ||
5110 p_ship_via);
5111 arp_util.debug('p_term_due_date = ' ||
5112 p_term_due_date);
5113 arp_util.debug('p_term_id = ' ||
5114 TO_CHAR(p_term_id));
5115 arp_util.debug('p_territory_id = ' ||
5116 TO_CHAR(p_territory_id));
5117 arp_util.debug('p_waybill_number = ' ||
5118 p_waybill_number);
5119 arp_util.debug('p_status_trx = ' ||
5120 p_status_trx);
5121 arp_util.debug('p_reason_code = ' ||
5122 p_reason_code);
5123 arp_util.debug('p_doc_sequence_id = ' ||
5124 TO_CHAR(p_doc_sequence_id));
5125 arp_util.debug('p_doc_sequence_value = ' ||
5126 p_doc_sequence_value);
5127 arp_util.debug('p_paying_customer_id = ' ||
5128 TO_CHAR(p_paying_customer_id));
5129 arp_util.debug('p_paying_site_use_id = ' ||
5130 TO_CHAR(p_paying_site_use_id));
5131 arp_util.debug('p_related_batch_source_id = ' ||
5132 TO_CHAR(p_related_batch_source_id));
5133 arp_util.debug('p_default_tax_exempt_flag = ' ||
5134 p_default_tax_exempt_flag);
5135 arp_util.debug('p_created_from = ' ||
5136 p_created_from);
5137 arp_util.debug('p_deflt_ussgl_trx_code_context = ' ||
5138 p_deflt_ussgl_trx_code_context);
5139 arp_util.debug('p_deflt_ussgl_transaction_code = ' ||
5140 p_deflt_ussgl_transaction_code);
5141 arp_util.debug('p_old_trx_number = ' ||
5142 p_old_trx_number);
5143 arp_util.debug('p_interface_header_context = ' ||
5144 p_interface_header_context);
5145 arp_util.debug('p_interface_header_attribute1 = ' ||
5146 p_interface_header_attribute1);
5147 arp_util.debug('p_interface_header_attribute2 = ' ||
5148 p_interface_header_attribute2);
5149 arp_util.debug('p_interface_header_attribute3 = ' ||
5150 p_interface_header_attribute3);
5151 arp_util.debug('p_interface_header_attribute4 = ' ||
5152 p_interface_header_attribute4);
5153 arp_util.debug('p_interface_header_attribute5 = ' ||
5154 p_interface_header_attribute5);
5155 arp_util.debug('p_interface_header_attribute6 = ' ||
5156 p_interface_header_attribute6);
5157 arp_util.debug('p_interface_header_attribute7 = ' ||
5158 p_interface_header_attribute7);
5159 arp_util.debug('p_interface_header_attribute8 = ' ||
5160 p_interface_header_attribute8);
5161 arp_util.debug('p_interface_header_attribute9 = ' ||
5162 p_interface_header_attribute9);
5163 arp_util.debug('p_interface_header_attribute10 = ' ||
5164 p_interface_header_attribute10);
5165 arp_util.debug('p_interface_header_attribute11 = ' ||
5166 p_interface_header_attribute11);
5167 arp_util.debug('p_interface_header_attribute12 = ' ||
5168 p_interface_header_attribute12);
5169 arp_util.debug('p_interface_header_attribute13 = ' ||
5170 p_interface_header_attribute13);
5171 arp_util.debug('p_interface_header_attribute14 = ' ||
5172 p_interface_header_attribute14);
5173 arp_util.debug('p_interface_header_attribute15 = ' ||
5174 p_interface_header_attribute15);
5175 arp_util.debug('p_attribute_category = ' ||
5176 p_attribute_category);
5177 arp_util.debug('p_attribute1 = ' ||
5178 p_attribute1);
5179 arp_util.debug('p_attribute2 = ' ||
5180 p_attribute2);
5181 arp_util.debug('p_attribute3 = ' ||
5182 p_attribute3);
5183 arp_util.debug('p_attribute4 = ' ||
5184 p_attribute4);
5185 arp_util.debug('p_attribute5 = ' ||
5186 p_attribute5);
5187 arp_util.debug('p_attribute6 = ' ||
5188 p_attribute6);
5189 arp_util.debug('p_attribute7 = ' ||
5190 p_attribute7);
5191 arp_util.debug('p_attribute8 = ' ||
5192 p_attribute8);
5193 arp_util.debug('p_attribute9 = ' ||
5194 p_attribute9);
5195 arp_util.debug('p_attribute10 = ' ||
5196 p_attribute10);
5197 arp_util.debug('p_attribute11 = ' ||
5198 p_attribute11);
5199 arp_util.debug('p_attribute12 = ' ||
5200 p_attribute12);
5201 arp_util.debug('p_attribute13 = ' ||
5202 p_attribute13);
5203 arp_util.debug('p_attribute14 = ' ||
5204 p_attribute14);
5205 arp_util.debug('p_attribute15 = ' ||
5206 p_attribute15);
5207
5208 RAISE;
5209
5210 END;
5211
5212 /*===========================================================================+
5213 | FUNCTION |
5214 | get_text_dummy |
5215 | |
5216 | DESCRIPTION |
5217 | This procedure returns the value of the AR_TEXT_DUMMY constant. |
5218 | |
5219 | SCOPE - PUBLIC |
5220 | |
5221 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
5222 | arp_util.debug |
5223 | |
5224 | ARGUMENTS : IN: |
5225 | None |
5226 | OUT: |
5227 | None |
5228 | |
5229 | RETURNS : value of AR_TEXT_DUMMY |
5230 | |
5231 | NOTES |
5232 | |
5233 | MODIFICATION HISTORY |
5234 | 18-AUG-95 Martin Johnson Created |
5235 | |
5236 +===========================================================================*/
5237
5238 FUNCTION get_text_dummy(p_null IN NUMBER DEFAULT null) RETURN varchar2 IS
5239
5240 BEGIN
5241
5242 arp_util.debug('arp_ct_pkg.get_text_dummy()+');
5243
5244 arp_util.debug('arp_ct_pkg.get_text_dummy()-');
5245
5246 return(AR_TEXT_DUMMY);
5247
5248 EXCEPTION
5249 WHEN OTHERS THEN
5250 arp_util.debug('EXCEPTION: arp_ct_pkg.get_text_dummy()');
5251 RAISE;
5252
5253 END;
5254
5255
5256
5257 /*===========================================================================+
5258 | FUNCTION |
5259 | get_flag_dummy |
5260 | |
5261 | DESCRIPTION |
5262 | This procedure returns the value of the AR_FLAG_DUMMY constant. |
5263 | |
5264 | SCOPE - PUBLIC |
5265 | |
5266 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
5267 | arp_util.debug |
5268 | |
5269 | ARGUMENTS : IN: |
5270 | None |
5271 | OUT: |
5272 | None |
5273 | |
5274 | RETURNS : value of AR_FLAG_DUMMY |
5275 | |
5276 | NOTES |
5277 | |
5278 | MODIFICATION HISTORY |
5279 | 19-JUL-95 Martin Johnson Created |
5280 | |
5281 +===========================================================================*/
5282
5283 FUNCTION get_flag_dummy(p_null IN NUMBER DEFAULT null) RETURN varchar2 IS
5284
5285 BEGIN
5286
5287 arp_util.debug('arp_ct_pkg.get_flag_dummy()+');
5288
5289 arp_util.debug('arp_ct_pkg.get_flag_dummy()-');
5290
5291 return(AR_FLAG_DUMMY);
5292
5293 EXCEPTION
5294 WHEN OTHERS THEN
5295 arp_util.debug('EXCEPTION: arp_ct_pkg.get_flag_dummy()');
5296 RAISE;
5297
5298 END;
5299
5300 /*===========================================================================+
5301 | FUNCTION |
5302 | get_number_dummy |
5303 | |
5304 | DESCRIPTION |
5305 | This procedure returns the value of the AR_NUMBER DUMMY constant. |
5306 | |
5307 | SCOPE - PUBLIC |
5308 | |
5309 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
5310 | arp_util.debug |
5311 | |
5312 | ARGUMENTS : IN: |
5313 | None |
5314 | OUT: |
5315 | None |
5316 | |
5317 | RETURNS : value of AR_NUMBER_DUMMY |
5318 | |
5319 | NOTES |
5320 | |
5321 | MODIFICATION HISTORY |
5322 | 19-JUL-95 Martin Johnson Created |
5323 | |
5324 +===========================================================================*/
5325
5326 FUNCTION get_number_dummy(p_null IN NUMBER DEFAULT null) RETURN number IS
5327
5328 BEGIN
5329
5330 arp_util.debug('arp_ct_pkg.get_number_dummy()+');
5331
5332 arp_util.debug('arp_ct_pkg.get_number_dummy()-');
5333
5334 return(AR_NUMBER_DUMMY);
5335
5336 EXCEPTION
5337 WHEN OTHERS THEN
5338 arp_util.debug('EXCEPTION: arp_ct_pkg.get_number_dummy()');
5339 RAISE;
5340
5341 END;
5342
5343 /*===========================================================================+
5344 | FUNCTION |
5345 | get_date_dummy |
5346 | |
5347 | DESCRIPTION |
5348 | This procedure returns the value of the AR_DATE_DUMMY constant. |
5349 | |
5350 | SCOPE - PUBLIC |
5351 | |
5352 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
5353 | arp_util.debug |
5354 | |
5355 | ARGUMENTS : IN: |
5356 | None |
5357 | OUT: |
5358 | None |
5359 | |
5360 | RETURNS : value of AR_DATE_DUMMY |
5361 | |
5362 | NOTES |
5363 | |
5364 | MODIFICATION HISTORY |
5365 | 19-JUL-95 Martin Johnson Created |
5366 | |
5367 +===========================================================================*/
5368
5369 FUNCTION get_date_dummy(p_null IN NUMBER DEFAULT null) RETURN date IS
5370
5371 BEGIN
5372
5373 arp_util.debug('arp_ct_pkg.get_date_dummy()+');
5374
5375 arp_util.debug('arp_ct_pkg.get_date_dummy()-');
5376
5377 return(AR_DATE_DUMMY);
5378
5379 EXCEPTION
5380 WHEN OTHERS THEN
5381 arp_util.debug('EXCEPTION: arp_ct_pkg.get_date_dummy()');
5382 RAISE;
5383
5384 END;
5385
5386
5387 /*===========================================================================+
5388 | PROCEDURE |
5389 | update_tax |
5390 | |
5391 | DESCRIPTION |
5392 | This procedure updates the ra_customer_trx row identified by the |
5393 | p_customer_trx_id parameter. |
5394 | |
5395 | SCOPE - PUBLIC |
5396 | |
5397 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
5398 | arp_util.debug |
5399 | |
5400 | ARGUMENTS : IN: |
5401 | p_customer_trx_id - identifies the row to update |
5402 | p_trx_rec - contains the new column values |
5403 | OUT: |
5404 | None |
5405 | |
5406 | RETURNS : NONE |
5407 | |
5408 | NOTES |
5409 | set_to_dummy must be called before the values in p_trx_rec are |
5410 | changed and this function is called. |
5411 | |
5412 | MODIFICATION HISTORY |
5413 | 20-DEC-96 Vikas Mahajan Created |
5414 | 13-AUG-97 Govind Jayanth New parameter to check enforcement of tax|
5415 | from Natural Account. If TRUE, call the |
5416 | new 'get_default_tax_code()' to default |
5417 | tax code from GL natural account. |
5418 | 21-AUG-02 B Chatterjee Bug2503883 Changed the nvl value of |
5419 | autotax to 'N' |
5420 | 07-FEB-07 M Raymond 5594741 - Updated parameters on
5421 | get_default_tax_classification to
5422 | correctly differentiate between org
5423 | and warehouse_id
5424 +===========================================================================*/
5425
5426
5427 PROCEDURE update_tax( p_ship_to_site_use_id IN ra_customer_trx.ship_to_site_use_id%type,
5428 p_bill_to_site_use_id IN ra_customer_trx.bill_to_site_use_id%type,
5429 p_trx_date IN ra_customer_trx.trx_date%type,
5430 p_cust_trx_type_id IN ra_customer_trx.cust_trx_type_id%type,
5431 p_customer_trx_id IN ra_customer_trx.customer_trx_id%type,
5432 P_TAX_AFFECT_FLAG in varchar2,
5433 p_enforce_nat_acc_flag IN BOOLEAN) IS
5434
5435 CURSOR update_header_lines IS
5436 SELECT customer_trx_line_id,
5437 inventory_item_id,
5438 memo_line_id,
5439 warehouse_id
5440 FROM ra_customer_trx_lines
5441 WHERE customer_trx_id = p_customer_trx_id
5442 AND line_type = 'LINE';--3872371
5443
5444 l_tax_code VARCHAR2(50);
5445 l_vat_tax_id NUMBER ;
5446 l_organization_id NUMBER ;
5447 l_warehouse_id NUMBER;
5448 l_sob_id NUMBER;
5449 l_customer_trx_line_id ra_customer_trx_lines.customer_trx_line_id%type;
5450 l_inventory_item_id ra_customer_trx_lines.inventory_item_id%type;
5451 l_autotax ra_customer_trx_lines.autotax%type;
5452 l_amt_incl_tax_flag ar_vat_tax.amount_includes_tax_flag%type;
5453 l_amt_incl_tax_override ar_vat_tax.amount_includes_tax_override%type;
5454 /* bug fix : 1070949 */
5455 l_tax_calculation_flag varchar2(1);
5456
5457 l_event_class_code VARCHAR2(80); /* Etax */
5458 l_event_type_code VARCHAR2(80); /* Etax */
5459 l_success BOOLEAN;
5460
5461 BEGIN
5462
5463 arp_util.debug('arp_ct_pkg.update_tax()+ ' ||
5464 to_char(sysdate, 'HH:MI:SS'));
5465
5466 /*------------------------------------------------+
5467 | Call Tax API to get the value of vat_tax_id |
5468 +------------------------------------------------*/
5469
5470 l_warehouse_id := oe_profile.value('SO_ORGANIZATION_ID');
5471 l_organization_id := arp_global.sysparam.org_id;
5472 l_sob_id := arp_global.set_of_books_id;
5473
5474 arp_util.debug('default warehouse_id ' || to_char(l_warehouse_id));
5475 arp_util.debug('ship_to_site_use_id ' || to_char(p_ship_to_site_use_id ));
5476 arp_util.debug('bill_to_site_use_id ' || to_char(p_bill_to_site_use_id ));
5477 arp_util.debug('organization_id ' || to_char(l_organization_id));
5478 arp_util.debug('set_of_books_id ' || to_char(arp_global.set_of_books_id ));
5479 arp_util.debug('trx_date ' || to_char(p_trx_date ));
5480 arp_util.debug('p_affect_tax_flag ' || p_tax_affect_flag);
5481 l_autotax := 'Y';
5482
5483 /* bug fix : 1070949 */
5484 BEGIN
5485 SELECT tax_calculation_flag
5486 INTO l_tax_calculation_flag
5487 FROM RA_CUST_TRX_TYPES
5488 WHERE cust_trx_type_id = p_cust_trx_type_id ;
5489 EXCEPTION
5490 WHEN OTHERS THEN
5491 arp_util.debug('arp_ct_pkd.update_tax - exception for select');
5492 END;
5493
5494 l_success := arp_etax_util.get_event_information(
5495 p_customer_trx_id => p_customer_trx_id,
5496 p_action => 'UPDATE',
5497 p_event_class_code => l_event_class_code,
5498 p_event_type_code => l_event_type_code);
5499
5500
5501 IF (p_enforce_nat_acc_flag)
5502 THEN
5503 /*
5504 * Enforce tax code from GL natural account for all lines
5505 * including those with manually updated tax codes.
5506 */
5507
5508 For line in update_header_lines
5509 LOOP
5510 BEGIN
5511
5512 /*------------------------------------------------+
5513 | ETax: get the event_class_code and then call |
5514 | get_default_tax_classification to get the |
5515 | tax code |
5516 +------------------------------------------------*/
5517
5518
5519 arp_etax_util.get_default_tax_classification(
5520 p_ship_to_site_use_id => p_ship_to_site_use_id,
5521 p_bill_to_site_use_id => p_bill_to_site_use_id,
5522 p_inv_item_id => line.inventory_item_id,
5523 p_org_id => l_organization_id,
5524 p_warehouse_id =>
5525 NVL(line.warehouse_id, l_warehouse_id),
5526 p_sob_id => l_sob_id,
5527 p_trx_date => p_trx_date,
5528 p_trx_type_id => p_cust_trx_type_id,
5529 p_cust_trx_id => p_customer_trx_id,
5530 p_cust_trx_line_id => line.customer_trx_line_id,
5531 p_customer_id => NULL,
5532 p_memo_line_id => line.memo_line_id,
5533 p_entity_code => 'RA_CUSTOMER_TRX',
5534 p_event_class_code => l_event_class_code,
5535 p_function_short_name => 'GL_ACCT_FIXUP',
5536 p_tax_classification_code => l_tax_code );
5537
5538 arp_util.debug('line.inventory_item_id ' ||
5539 to_char(line.inventory_item_id ));
5540 arp_util.debug('line.warehouse_id ' ||
5541 to_char(line.warehouse_id));
5542 arp_util.debug('returned tax_code/classification: ' || l_tax_code);
5543
5544 EXCEPTION
5545 WHEN NO_DATA_FOUND THEN
5546 l_autotax := 'Y';
5547 l_tax_code := NULL;
5548 END;
5549
5550 IF l_tax_code IS NOT NULL
5551 THEN
5552 --- UPDATE RA_CUSTOMER_TRX_LINES with new
5553 --- tax_code and autotax='Y'
5554 update ra_customer_trx_lines
5555 set tax_classification_code = l_tax_code,
5556 autotax = l_autotax
5557 where customer_trx_line_id = line.customer_trx_line_id;
5558 END IF;
5559 END LOOP;
5560 ELSE
5561 /* Existing logic */
5562 For line in update_header_lines
5563 LOOP
5564 BEGIN
5565 /*------------------------------------------------+
5566 | Call Tax API to get the value of vat_tax_id |
5567 +------------------------------------------------*/
5568
5569 IF (l_tax_calculation_flag = 'Y') THEN
5570 arp_etax_util.get_default_tax_classification(
5571 p_ship_to_site_use_id => p_ship_to_site_use_id,
5572 p_bill_to_site_use_id => p_bill_to_site_use_id,
5573 p_inv_item_id => line.inventory_item_id,
5574 p_org_id => l_organization_id,
5575 p_sob_id => l_sob_id,
5576 p_warehouse_id =>
5577 NVL(line.warehouse_id, l_warehouse_id),
5578 p_trx_date => p_trx_date,
5579 p_trx_type_id => p_cust_trx_type_id,
5580 p_cust_trx_id => p_customer_trx_id,
5581 p_cust_trx_line_id => line.customer_trx_line_id,
5582 p_customer_id => NULL,
5583 p_memo_line_id => line.memo_line_id,
5584 p_entity_code => 'RA_CUSTOMER_TRX',
5585 p_event_class_code => l_event_class_code,
5586 p_function_short_name => 'ACCT_DIST',
5587 p_tax_classification_code => l_tax_code );
5588 ELSE
5589 l_tax_code := NULL;
5590 l_autotax := 'Y';
5591 END IF;
5592
5593 arp_util.debug('line.inventory_item_id ' ||
5594 to_char(line.inventory_item_id ));
5595 arp_util.debug('line.warehouse_id ' ||
5596 to_char(line.warehouse_id));
5597 arp_util.debug('returned tax_code/classif: ' || l_tax_code);
5598
5599 EXCEPTION
5600 WHEN NO_DATA_FOUND THEN
5601 l_tax_code := NULL;
5602 l_autotax := 'Y';
5603 END;
5604
5605 update ra_customer_trx_lines
5606 set tax_classification_code = l_tax_code,
5607 autotax = l_autotax
5608 where customer_trx_line_id = line.customer_trx_line_id;
5609
5610 END LOOP;
5611 END IF;
5612 arp_util.debug('arp_ct_pkg.update_tax()- ' ||
5613 to_char(sysdate, 'HH:MI:SS'));
5614
5615
5616 EXCEPTION
5617 WHEN OTHERS THEN
5618 arp_util.debug('EXCEPTION: arp_ct_pkg.update_tax()');
5619 RAISE;
5620 END ;
5621
5622 /*===========================================================================+
5623 | PROCEDURE |
5624 | lock_compare_cover (Overloaded) |
5625 | |
5626 | DESCRIPTION |
5627 | Converts column parameters to a transaction header record and |
5628 | locks the transaction header. |
5629 | |
5630 | SCOPE - PUBLIC |
5631 | |
5632 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
5633 | arp_util.debug |
5634 | |
5635 | ARGUMENTS : IN: |
5636 | p_customer_trx_id |
5637 | p_trx_number |
5638 | p_posting_control_id |
5639 | p_ra_post_loop_number |
5640 | p_complete_flag |
5641 | p_initial_customer_trx_id |
5642 | p_previous_customer_trx_id |
5643 | p_related_customer_trx_id |
5644 | p_recurred_from_trx_number |
5645 | p_cust_trx_type_id |
5646 | p_batch_id |
5647 | p_batch_source_id |
5648 | p_agreement_id |
5649 | p_trx_date |
5650 | p_bill_to_customer_id |
5651 | p_bill_to_contact_id |
5652 | p_bill_to_site_use_id |
5653 | p_ship_to_customer_id |
5654 | p_ship_to_contact_id |
5655 | p_ship_to_site_use_id |
5656 | p_sold_to_customer_id |
5657 | p_sold_to_site_use_id |
5658 | p_sold_to_contact_id |
5659 | p_customer_reference |
5660 | p_customer_reference_date |
5661 | p_cr_method_for_installments |
5662 | p_credit_method_for_rules |
5663 | p_start_date_commitment |
5664 | p_end_date_commitment |
5665 | p_exchange_date |
5666 | p_exchange_rate |
5667 | p_exchange_rate_type |
5668 | p_customer_bank_account_id |
5669 | p_finance_charges |
5670 | p_fob_point |
5671 | p_comments |
5672 | p_internal_notes |
5673 | p_invoice_currency_code |
5674 | p_invoicing_rule_id |
5675 | p_last_printed_sequence_num |
5676 | p_orig_system_batch_name |
5677 | p_primary_salesrep_id |
5678 | p_printing_count |
5679 | p_printing_last_printed |
5680 | p_printing_option |
5681 | p_printing_original_date |
5682 | p_printing_pending |
5683 | p_purchase_order |
5684 | p_purchase_order_date |
5685 | p_purchase_order_revision |
5686 | p_receipt_method_id |
5687 | p_remit_to_address_id |
5688 | p_shipment_id |
5689 | p_ship_date_actual |
5690 | p_ship_via |
5691 | p_term_due_date |
5692 | p_term_id |
5693 | p_territory_id |
5694 | p_waybill_number |
5695 | p_status_trx |
5696 | p_reason_code |
5697 | p_doc_sequence_id |
5698 | p_doc_sequence_value |
5699 | p_paying_customer_id |
5700 | p_paying_site_use_id |
5701 | p_related_batch_source_id |
5702 | p_default_tax_exempt_flag |
5703 | p_created_from |
5704 | p_deflt_ussgl_trx_code_context |
5705 | p_deflt_ussgl_transaction_code |
5706 | p_old_trx_number |
5707 | p_interface_header_context |
5708 | p_interface_header_attribute1 |
5709 | p_interface_header_attribute2 |
5710 | p_interface_header_attribute3 |
5711 | p_interface_header_attribute4 |
5712 | p_interface_header_attribute5 |
5713 | p_interface_header_attribute6 |
5714 | p_interface_header_attribute7 |
5715 | p_interface_header_attribute8 |
5716 | p_interface_header_attribute9 |
5717 | p_interface_header_attribute10 |
5718 | p_interface_header_attribute11 |
5719 | p_interface_header_attribute12 |
5720 | p_interface_header_attribute13 |
5721 | p_interface_header_attribute14 |
5722 | p_interface_header_attribute15 |
5723 | p_attribute_category |
5724 | p_attribute1 |
5725 | p_attribute2 |
5726 | p_attribute3 |
5727 | p_attribute4 |
5728 | p_attribute5 |
5729 | p_attribute6 |
5730 | p_attribute7 |
5731 | p_attribute8 |
5732 | p_attribute9 |
5733 | p_attribute10 |
5734 | p_attribute11 |
5735 | p_attribute12 |
5736 | p_attribute13 |
5737 | p_attribute14 |
5738 | p_attribute15 |
5739 | p_global_attribute_category |
5740 | p_global_attribute1 |
5741 | p_global_attribute2 |
5742 | p_global_attribute3 |
5743 | p_global_attribute4 |
5744 | p_global_attribute5 |
5745 | p_global_attribute6 |
5746 | p_global_attribute7 |
5747 | p_global_attribute8 |
5748 | p_global_attribute9 |
5749 | p_global_attribute10 |
5750 | p_global_attribute11 |
5751 | p_global_attribute12 |
5752 | p_global_attribute13 |
5753 | p_global_attribute14 |
5754 | p_global_attribute15 |
5755 | p_global_attribute16 |
5756 | p_global_attribute17 |
5757 | p_global_attribute18 |
5758 | p_global_attribute19 |
5759 | p_global_attribute20 |
5760 | p_global_attribute21 |
5761 | p_global_attribute22 |
5762 | p_global_attribute23 |
5763 | p_global_attribute24 |
5764 | p_global_attribute25 |
5765 | p_global_attribute26 |
5766 | p_global_attribute27 |
5767 | p_global_attribute28 |
5768 | p_global_attribute29 |
5769 | p_global_attribute30 |
5770 | |
5771 | OUT: |
5772 | None |
5773 | IN/ OUT: |
5774 | None |
5775 | |
5776 | RETURNS : NONE |
5777 | |
5778 | NOTES |
5779 | |
5780 | MODIFICATION HISTORY |
5781 | 20-Jun-2002 Sahana Created for Bug2427456. Overloaded version. |
5782 | Global parameters are also passed. |
5783 +===========================================================================*/
5784
5785 PROCEDURE lock_compare_cover(
5786 p_customer_trx_id IN ra_customer_trx.customer_trx_id%type,
5787 p_trx_number IN ra_customer_trx.trx_number%type,
5788 p_posting_control_id IN ra_customer_trx.posting_control_id%type,
5789 p_ra_post_loop_number IN ra_customer_trx.ra_post_loop_number%type,
5790 p_complete_flag IN ra_customer_trx.complete_flag%type,
5791 p_initial_customer_trx_id IN ra_customer_trx.initial_customer_trx_id%type,
5792 p_previous_customer_trx_id IN ra_customer_trx.previous_customer_trx_id%type,
5793 p_related_customer_trx_id IN ra_customer_trx.related_customer_trx_id%type,
5794 p_recurred_from_trx_number IN ra_customer_trx.recurred_from_trx_number%type,
5795 p_cust_trx_type_id IN ra_customer_trx.cust_trx_type_id%type,
5796 p_batch_id IN ra_customer_trx.batch_id%type,
5797 p_batch_source_id IN ra_customer_trx.batch_source_id%type,
5798 p_agreement_id IN ra_customer_trx.agreement_id%type,
5799 p_trx_date IN ra_customer_trx.trx_date%type,
5800 p_bill_to_customer_id IN ra_customer_trx.bill_to_customer_id%type,
5801 p_bill_to_contact_id IN ra_customer_trx.bill_to_contact_id%type,
5802 p_bill_to_site_use_id IN ra_customer_trx.bill_to_site_use_id%type,
5803 p_ship_to_customer_id IN ra_customer_trx.ship_to_customer_id%type,
5804 p_ship_to_contact_id IN ra_customer_trx.ship_to_contact_id%type,
5805 p_ship_to_site_use_id IN ra_customer_trx.ship_to_site_use_id%type,
5806 p_sold_to_customer_id IN ra_customer_trx.sold_to_customer_id%type,
5807 p_sold_to_site_use_id IN ra_customer_trx.sold_to_site_use_id%type,
5808 p_sold_to_contact_id IN ra_customer_trx.sold_to_contact_id%type,
5809 p_customer_reference IN ra_customer_trx.customer_reference%type,
5810 p_customer_reference_date IN ra_customer_trx.customer_reference_date%type,
5811 p_cr_method_for_installments IN
5812 ra_customer_trx.credit_method_for_installments%type,
5813 p_credit_method_for_rules IN ra_customer_trx.credit_method_for_rules%type,
5814 p_start_date_commitment IN ra_customer_trx.start_date_commitment%type,
5815 p_end_date_commitment IN ra_customer_trx.end_date_commitment%type,
5816 p_exchange_date IN ra_customer_trx.exchange_date%type,
5817 p_exchange_rate IN ra_customer_trx.exchange_rate%type,
5818 p_exchange_rate_type IN ra_customer_trx.exchange_rate_type%type,
5819 p_customer_bank_account_id IN ra_customer_trx.customer_bank_account_id%type,
5820 p_finance_charges IN ra_customer_trx.finance_charges%type,
5821 p_fob_point IN ra_customer_trx.fob_point%type,
5822 p_comments IN ra_customer_trx.comments%type,
5823 p_internal_notes IN ra_customer_trx.internal_notes%type,
5824 p_invoice_currency_code IN ra_customer_trx.invoice_currency_code%type,
5825 p_invoicing_rule_id IN ra_customer_trx.invoicing_rule_id%type,
5826 p_last_printed_sequence_num IN
5827 ra_customer_trx.last_printed_sequence_num%type,
5828 p_orig_system_batch_name IN ra_customer_trx.orig_system_batch_name%type,
5829 p_primary_salesrep_id IN ra_customer_trx.primary_salesrep_id%type,
5830 p_printing_count IN ra_customer_trx.printing_count%type,
5831 p_printing_last_printed IN ra_customer_trx.printing_last_printed%type,
5832 p_printing_option IN ra_customer_trx.printing_option%type,
5833 p_printing_original_date IN ra_customer_trx.printing_original_date%type,
5834 p_printing_pending IN ra_customer_trx.printing_pending%type,
5835 p_purchase_order IN ra_customer_trx.purchase_order%type,
5836 p_purchase_order_date IN ra_customer_trx.purchase_order_date%type,
5837 p_purchase_order_revision IN ra_customer_trx.purchase_order_revision%type,
5838 p_receipt_method_id IN ra_customer_trx.receipt_method_id%type,
5839 p_remit_to_address_id IN ra_customer_trx.remit_to_address_id%type,
5840 p_shipment_id IN ra_customer_trx.shipment_id%type,
5841 p_ship_date_actual IN ra_customer_trx.ship_date_actual%type,
5842 p_ship_via IN ra_customer_trx.ship_via%type,
5843 p_term_due_date IN ra_customer_trx.term_due_date%type,
5844 p_term_id IN ra_customer_trx.term_id%type,
5845 p_territory_id IN ra_customer_trx.territory_id%type,
5846 p_waybill_number IN ra_customer_trx.waybill_number%type,
5847 p_status_trx IN ra_customer_trx.status_trx%type,
5848 p_reason_code IN ra_customer_trx.reason_code%type,
5849 p_doc_sequence_id IN ra_customer_trx.doc_sequence_id%type,
5850 p_doc_sequence_value IN ra_customer_trx.doc_sequence_value%type,
5851 p_paying_customer_id IN ra_customer_trx.paying_customer_id%type,
5852 p_paying_site_use_id IN ra_customer_trx.paying_site_use_id%type,
5853 p_related_batch_source_id IN ra_customer_trx.related_batch_source_id%type,
5854 p_default_tax_exempt_flag IN ra_customer_trx.default_tax_exempt_flag%type,
5855 p_created_from IN ra_customer_trx.created_from%type,
5856 p_deflt_ussgl_trx_code_context IN
5857 ra_customer_trx.default_ussgl_trx_code_context%type,
5858 p_deflt_ussgl_transaction_code IN
5859 ra_customer_trx.default_ussgl_transaction_code%type,
5860 p_old_trx_number IN ra_customer_trx.old_trx_number%type,
5861 p_interface_header_context IN
5862 ra_customer_trx.interface_header_context%type,
5863 p_interface_header_attribute1 IN
5864 ra_customer_trx.interface_header_attribute1%type,
5865 p_interface_header_attribute2 IN
5866 ra_customer_trx.interface_header_attribute2%type,
5867 p_interface_header_attribute3 IN
5868 ra_customer_trx.interface_header_attribute3%type,
5869 p_interface_header_attribute4 IN
5870 ra_customer_trx.interface_header_attribute4%type,
5871 p_interface_header_attribute5 IN
5872 ra_customer_trx.interface_header_attribute5%type,
5873 p_interface_header_attribute6 IN
5874 ra_customer_trx.interface_header_attribute6%type,
5875 p_interface_header_attribute7 IN
5876 ra_customer_trx.interface_header_attribute7%type,
5877 p_interface_header_attribute8 IN
5878 ra_customer_trx.interface_header_attribute8%type,
5879 p_interface_header_attribute9 IN
5880 ra_customer_trx.interface_header_attribute9%type,
5881 p_interface_header_attribute10 IN
5882 ra_customer_trx.interface_header_attribute10%type,
5883 p_interface_header_attribute11 IN
5884 ra_customer_trx.interface_header_attribute11%type,
5885 p_interface_header_attribute12 IN
5886 ra_customer_trx.interface_header_attribute12%type,
5887 p_interface_header_attribute13 IN
5888 ra_customer_trx.interface_header_attribute13%type,
5889 p_interface_header_attribute14 IN
5890 ra_customer_trx.interface_header_attribute14%type,
5891 p_interface_header_attribute15 IN
5892 ra_customer_trx.interface_header_attribute15%type,
5893 p_attribute_category IN ra_customer_trx.attribute_category%type,
5894 p_attribute1 IN ra_customer_trx.attribute1%type,
5895 p_attribute2 IN ra_customer_trx.attribute2%type,
5896 p_attribute3 IN ra_customer_trx.attribute3%type,
5897 p_attribute4 IN ra_customer_trx.attribute4%type,
5898 p_attribute5 IN ra_customer_trx.attribute5%type,
5899 p_attribute6 IN ra_customer_trx.attribute6%type,
5900 p_attribute7 IN ra_customer_trx.attribute7%type,
5901 p_attribute8 IN ra_customer_trx.attribute8%type,
5902 p_attribute9 IN ra_customer_trx.attribute9%type,
5903 p_attribute10 IN ra_customer_trx.attribute10%type,
5904 p_attribute11 IN ra_customer_trx.attribute11%type,
5905 p_attribute12 IN ra_customer_trx.attribute12%type,
5906 p_attribute13 IN ra_customer_trx.attribute13%type,
5907 p_attribute14 IN ra_customer_trx.attribute14%type,
5908 p_attribute15 IN ra_customer_trx.attribute15%type,
5909 p_global_attribute_category IN ra_customer_trx.global_attribute_category%type,
5910 p_global_attribute1 IN ra_customer_trx.global_attribute1%type,
5911 p_global_attribute2 IN ra_customer_trx.global_attribute2%type,
5912 p_global_attribute3 IN ra_customer_trx.global_attribute3%type,
5913 p_global_attribute4 IN ra_customer_trx.global_attribute4%type,
5914 p_global_attribute5 IN ra_customer_trx.global_attribute5%type,
5915 p_global_attribute6 IN ra_customer_trx.global_attribute6%type,
5916 p_global_attribute7 IN ra_customer_trx.global_attribute7%type,
5917 p_global_attribute8 IN ra_customer_trx.global_attribute8%type,
5918 p_global_attribute9 IN ra_customer_trx.global_attribute9%type,
5919 p_global_attribute10 IN ra_customer_trx.global_attribute10%type,
5920 p_global_attribute11 IN ra_customer_trx.global_attribute11%type,
5921 p_global_attribute12 IN ra_customer_trx.global_attribute12%type,
5922 p_global_attribute13 IN ra_customer_trx.global_attribute13%type,
5923 p_global_attribute14 IN ra_customer_trx.global_attribute14%type,
5924 p_global_attribute15 IN ra_customer_trx.global_attribute15%type,
5925 p_global_attribute16 IN ra_customer_trx.global_attribute16%type,
5926 p_global_attribute17 IN ra_customer_trx.global_attribute17%type,
5927 p_global_attribute18 IN ra_customer_trx.global_attribute18%type,
5928 p_global_attribute19 IN ra_customer_trx.global_attribute19%type,
5929 p_global_attribute20 IN ra_customer_trx.global_attribute20%type,
5930 p_global_attribute21 IN ra_customer_trx.global_attribute21%type,
5931 p_global_attribute22 IN ra_customer_trx.global_attribute22%type,
5932 p_global_attribute23 IN ra_customer_trx.global_attribute23%type,
5933 p_global_attribute24 IN ra_customer_trx.global_attribute24%type,
5934 p_global_attribute25 IN ra_customer_trx.global_attribute25%type,
5935 p_global_attribute26 IN ra_customer_trx.global_attribute26%type,
5936 p_global_attribute27 IN ra_customer_trx.global_attribute27%type,
5937 p_global_attribute28 IN ra_customer_trx.global_attribute28%type,
5938 p_global_attribute29 IN ra_customer_trx.global_attribute29%type,
5939 p_global_attribute30 IN ra_customer_trx.global_attribute30%type,
5940 p_legal_entity_id IN ra_customer_trx.legal_entity_id%type,
5941 p_payment_trxn_extension_id IN ra_customer_trx.payment_trxn_extension_id%type,
5942 p_billing_date IN ra_customer_trx.billing_date%type)
5943
5944
5945 IS
5946
5947 l_trx_rec ra_customer_trx%rowtype;
5948
5949 BEGIN
5950 arp_util.debug('arp_ct_pkg.lock_compare_cover()+');
5951
5952 /*------------------------------------------------+
5953 | Populate the header record with the values |
5954 | passed in as parameters. |
5955 +------------------------------------------------*/
5956
5957 arp_ct_pkg.set_to_dummy(l_trx_rec);
5958
5959 l_trx_rec.customer_trx_id := p_customer_trx_id;
5960 l_trx_rec.trx_number := p_trx_number;
5961
5962 --
5963 -- commented out NOCOPY posting_control_id, ra_post_loop_number so as to
5964 -- reduce the no of columns in the view
5965 --
5966 -- l_trx_rec.posting_control_id := p_posting_control_id;
5967 -- l_trx_rec.ra_post_loop_number := p_ra_post_loop_number;
5968
5969 l_trx_rec.complete_flag := p_complete_flag;
5970 l_trx_rec.initial_customer_trx_id := p_initial_customer_trx_id;
5971 l_trx_rec.previous_customer_trx_id := p_previous_customer_trx_id;
5972 l_trx_rec.related_customer_trx_id := p_related_customer_trx_id;
5973 l_trx_rec.recurred_from_trx_number := p_recurred_from_trx_number;
5974 l_trx_rec.cust_trx_type_id := p_cust_trx_type_id;
5975 l_trx_rec.batch_id := p_batch_id;
5976 l_trx_rec.batch_source_id := p_batch_source_id;
5977 l_trx_rec.agreement_id := p_agreement_id;
5978 l_trx_rec.trx_date := p_trx_date;
5979 l_trx_rec.bill_to_customer_id := p_bill_to_customer_id;
5980 l_trx_rec.bill_to_contact_id := p_bill_to_contact_id;
5981 l_trx_rec.bill_to_site_use_id := p_bill_to_site_use_id;
5982 l_trx_rec.ship_to_customer_id := p_ship_to_customer_id;
5983 l_trx_rec.ship_to_contact_id := p_ship_to_contact_id;
5984 l_trx_rec.ship_to_site_use_id := p_ship_to_site_use_id;
5985 l_trx_rec.sold_to_customer_id := p_sold_to_customer_id;
5986 l_trx_rec.sold_to_site_use_id := p_sold_to_site_use_id;
5987 l_trx_rec.sold_to_contact_id := p_sold_to_contact_id;
5988 l_trx_rec.customer_reference := p_customer_reference;
5989 l_trx_rec.customer_reference_date := p_customer_reference_date;
5990 l_trx_rec.credit_method_for_installments := p_cr_method_for_installments;
5991 l_trx_rec.credit_method_for_rules := p_credit_method_for_rules;
5992 l_trx_rec.start_date_commitment := p_start_date_commitment;
5993 l_trx_rec.end_date_commitment := p_end_date_commitment;
5994 l_trx_rec.exchange_date := p_exchange_date;
5995 l_trx_rec.exchange_rate := p_exchange_rate;
5996 l_trx_rec.exchange_rate_type := p_exchange_rate_type;
5997 l_trx_rec.customer_bank_account_id := p_customer_bank_account_id;
5998 l_trx_rec.finance_charges := p_finance_charges;
5999 l_trx_rec.fob_point := p_fob_point;
6000 l_trx_rec.comments := p_comments;
6001 l_trx_rec.internal_notes := p_internal_notes;
6002 l_trx_rec.invoice_currency_code := p_invoice_currency_code;
6003 l_trx_rec.invoicing_rule_id := p_invoicing_rule_id;
6004 l_trx_rec.last_printed_sequence_num := p_last_printed_sequence_num;
6005 l_trx_rec.orig_system_batch_name := p_orig_system_batch_name;
6006 l_trx_rec.primary_salesrep_id := p_primary_salesrep_id;
6007 l_trx_rec.printing_count := p_printing_count;
6008 l_trx_rec.printing_last_printed := p_printing_last_printed;
6009 l_trx_rec.printing_option := p_printing_option;
6010 l_trx_rec.printing_original_date := p_printing_original_date;
6011 -- l_trx_rec.printing_pending := p_printing_pending;
6012 l_trx_rec.purchase_order := p_purchase_order;
6013 l_trx_rec.purchase_order_date := p_purchase_order_date;
6014 l_trx_rec.purchase_order_revision := p_purchase_order_revision;
6015 l_trx_rec.receipt_method_id := p_receipt_method_id;
6016 l_trx_rec.remit_to_address_id := p_remit_to_address_id;
6017 l_trx_rec.shipment_id := p_shipment_id;
6018 l_trx_rec.ship_date_actual := p_ship_date_actual;
6019 l_trx_rec.ship_via := p_ship_via;
6020 l_trx_rec.term_id := p_term_id;
6021 l_trx_rec.territory_id := p_territory_id;
6022 l_trx_rec.waybill_number := p_waybill_number;
6023 l_trx_rec.status_trx := p_status_trx;
6024 l_trx_rec.reason_code := p_reason_code;
6025 l_trx_rec.doc_sequence_id := p_doc_sequence_id;
6026 l_trx_rec.doc_sequence_value := p_doc_sequence_value;
6027 l_trx_rec.paying_customer_id := p_paying_customer_id;
6028 l_trx_rec.paying_site_use_id := p_paying_site_use_id;
6029 l_trx_rec.related_batch_source_id := p_related_batch_source_id;
6030 l_trx_rec.default_tax_exempt_flag := p_default_tax_exempt_flag;
6031 l_trx_rec.created_from := p_created_from;
6032 l_trx_rec.default_ussgl_trx_code_context := p_deflt_ussgl_trx_code_context;
6033 l_trx_rec.default_ussgl_transaction_code := p_deflt_ussgl_transaction_code;
6034 l_trx_rec.old_trx_number := p_old_trx_number;
6035 l_trx_rec.interface_header_context := p_interface_header_context;
6036 l_trx_rec.interface_header_attribute1 := p_interface_header_attribute1;
6037 l_trx_rec.interface_header_attribute2 := p_interface_header_attribute2;
6038 l_trx_rec.interface_header_attribute3 := p_interface_header_attribute3;
6039 l_trx_rec.interface_header_attribute4 := p_interface_header_attribute4;
6040 l_trx_rec.interface_header_attribute5 := p_interface_header_attribute5;
6041 l_trx_rec.interface_header_attribute6 := p_interface_header_attribute6;
6042 l_trx_rec.interface_header_attribute7 := p_interface_header_attribute7;
6043 l_trx_rec.interface_header_attribute8 := p_interface_header_attribute8;
6044 l_trx_rec.interface_header_attribute9 := p_interface_header_attribute9;
6045 l_trx_rec.interface_header_attribute10 := p_interface_header_attribute10;
6046 l_trx_rec.interface_header_attribute11 := p_interface_header_attribute11;
6047 l_trx_rec.interface_header_attribute12 := p_interface_header_attribute12;
6048 l_trx_rec.interface_header_attribute13 := p_interface_header_attribute13;
6049 l_trx_rec.interface_header_attribute14 := p_interface_header_attribute14;
6050 l_trx_rec.interface_header_attribute15 := p_interface_header_attribute15;
6051 l_trx_rec.attribute_category := p_attribute_category;
6052 l_trx_rec.attribute1 := p_attribute1;
6053 l_trx_rec.attribute2 := p_attribute2;
6054 l_trx_rec.attribute3 := p_attribute3;
6055 l_trx_rec.attribute4 := p_attribute4;
6056 l_trx_rec.attribute5 := p_attribute5;
6057 l_trx_rec.attribute6 := p_attribute6;
6058 l_trx_rec.attribute7 := p_attribute7;
6059 l_trx_rec.attribute8 := p_attribute8;
6060 l_trx_rec.attribute9 := p_attribute9;
6061 l_trx_rec.attribute10 := p_attribute10;
6062 l_trx_rec.attribute11 := p_attribute11;
6063 l_trx_rec.attribute12 := p_attribute12;
6064 l_trx_rec.attribute13 := p_attribute13;
6065 l_trx_rec.attribute14 := p_attribute14;
6066 l_trx_rec.attribute15 := p_attribute15;
6067 l_trx_rec.global_attribute_category := p_global_attribute_category;
6068 l_trx_rec.global_attribute1 := p_global_attribute1;
6069 l_trx_rec.global_attribute2 := p_global_attribute2;
6070 l_trx_rec.global_attribute3 := p_global_attribute3;
6071 l_trx_rec.global_attribute4 := p_global_attribute4;
6072 l_trx_rec.global_attribute5 := p_global_attribute5;
6073 l_trx_rec.global_attribute6 := p_global_attribute6;
6074 l_trx_rec.global_attribute7 := p_global_attribute7;
6075 l_trx_rec.global_attribute8 := p_global_attribute8;
6076 l_trx_rec.global_attribute9 := p_global_attribute9;
6077 l_trx_rec.global_attribute10 := p_global_attribute10;
6078 l_trx_rec.global_attribute11 := p_global_attribute11;
6079 l_trx_rec.global_attribute12 := p_global_attribute12;
6080 l_trx_rec.global_attribute13 := p_global_attribute13;
6081 l_trx_rec.global_attribute14 := p_global_attribute14;
6082 l_trx_rec.global_attribute15 := p_global_attribute15;
6083 l_trx_rec.global_attribute16 := p_global_attribute16;
6084 l_trx_rec.global_attribute17 := p_global_attribute17;
6085 l_trx_rec.global_attribute18 := p_global_attribute18;
6086 l_trx_rec.global_attribute19 := p_global_attribute19;
6087 l_trx_rec.global_attribute20 := p_global_attribute20;
6088 l_trx_rec.global_attribute21 := p_global_attribute21;
6089 l_trx_rec.global_attribute22 := p_global_attribute22;
6090 l_trx_rec.global_attribute23 := p_global_attribute23;
6091 l_trx_rec.global_attribute24 := p_global_attribute24;
6092 l_trx_rec.global_attribute25 := p_global_attribute25;
6093 l_trx_rec.global_attribute26 := p_global_attribute26;
6094 l_trx_rec.global_attribute27 := p_global_attribute27;
6095 l_trx_rec.global_attribute28 := p_global_attribute28;
6096 l_trx_rec.global_attribute29 := p_global_attribute29;
6097 l_trx_rec.global_attribute30 := p_global_attribute30;
6098 l_trx_rec.legal_entity_id := p_legal_entity_id;
6099 /* PAYMENT_UPTAKE */
6100 l_trx_rec.payment_trxn_extension_id := p_payment_trxn_extension_id;
6101 l_trx_rec.billing_date := p_billing_date;
6102
6103
6104 /*-----------------------------------------+
6105 | Call the standard header table handler |
6106 +-----------------------------------------*/
6107
6108 lock_compare_p( l_trx_rec, p_customer_trx_id);
6109
6110 arp_util.debug('arp_ct_pkg.lock_compare_cover()-');
6111
6112 EXCEPTION
6113 WHEN OTHERS THEN
6114 arp_util.debug('EXCEPTION : arp_ct_pkg.lock_compare_cover()');
6115
6116 arp_util.debug('----- parameters for lock_compare_cover() ' ||
6117 '-----');
6118 arp_util.debug('p_customer_trx_id = ' ||
6119 TO_CHAR(p_customer_trx_id));
6120 arp_util.debug('p_trx_number = ' ||
6121 p_trx_number);
6122 arp_util.debug('p_posting_control_id = ' ||
6123 TO_CHAR(p_posting_control_id));
6124 arp_util.debug('p_ra_post_loop_number = ' ||
6125 p_ra_post_loop_number);
6126 arp_util.debug('p_complete_flag = ' ||
6127 p_complete_flag);
6128 arp_util.debug('p_initial_customer_trx_id = ' ||
6129 TO_CHAR(p_initial_customer_trx_id));
6130 arp_util.debug('p_previous_customer_trx_id = ' ||
6131 TO_CHAR(p_previous_customer_trx_id));
6132 arp_util.debug('p_related_customer_trx_id = ' ||
6133 TO_CHAR(p_related_customer_trx_id));
6134 arp_util.debug('p_recurred_from_trx_number = ' ||
6135 p_recurred_from_trx_number);
6136 arp_util.debug('p_cust_trx_type_id = ' ||
6137 TO_CHAR(p_cust_trx_type_id));
6138 arp_util.debug('p_batch_id = ' ||
6139 TO_CHAR(p_batch_id));
6140 arp_util.debug('p_batch_source_id = ' ||
6141 TO_CHAR(p_batch_source_id));
6142 arp_util.debug('p_agreement_id = ' ||
6143 TO_CHAR(p_agreement_id));
6144 arp_util.debug('p_trx_date = ' ||
6145 p_trx_date);
6146 arp_util.debug('p_bill_to_customer_id = ' ||
6147 TO_CHAR(p_bill_to_customer_id));
6148 arp_util.debug('p_bill_to_contact_id = ' ||
6149 TO_CHAR(p_bill_to_contact_id));
6150 arp_util.debug('p_bill_to_site_use_id = ' ||
6151 TO_CHAR(p_bill_to_site_use_id));
6152 arp_util.debug('p_ship_to_customer_id = ' ||
6153 TO_CHAR(p_ship_to_customer_id));
6154 arp_util.debug('p_ship_to_contact_id = ' ||
6155 TO_CHAR(p_ship_to_contact_id));
6156 arp_util.debug('p_ship_to_site_use_id = ' ||
6157 TO_CHAR(p_ship_to_site_use_id));
6158 arp_util.debug('p_sold_to_customer_id = ' ||
6159 TO_CHAR(p_sold_to_customer_id));
6160 arp_util.debug('p_sold_to_site_use_id = ' ||
6161 TO_CHAR(p_sold_to_site_use_id));
6162 arp_util.debug('p_sold_to_contact_id = ' ||
6163 TO_CHAR(p_sold_to_contact_id));
6164 arp_util.debug('p_customer_reference = ' ||
6165 p_customer_reference);
6166 arp_util.debug('p_customer_reference_date = ' ||
6167 p_customer_reference_date);
6168 arp_util.debug('p_cr_method_for_installments = ' ||
6169 p_cr_method_for_installments);
6170 arp_util.debug('p_credit_method_for_rules = ' ||
6171 p_credit_method_for_rules);
6172 arp_util.debug('p_start_date_commitment = ' ||
6173 p_start_date_commitment);
6174 arp_util.debug('p_end_date_commitment = ' ||
6175 p_end_date_commitment);
6176 arp_util.debug('p_exchange_date = ' ||
6177 p_exchange_date);
6178 arp_util.debug('p_exchange_rate = ' ||
6179 p_exchange_rate);
6180 arp_util.debug('p_exchange_rate_type = ' ||
6181 p_exchange_rate_type);
6182 arp_util.debug('p_customer_bank_account_id = ' ||
6183 TO_CHAR(p_customer_bank_account_id));
6184 arp_util.debug('p_finance_charges = ' ||
6185 p_finance_charges);
6186 arp_util.debug('p_fob_point = ' ||
6187 p_fob_point);
6188 arp_util.debug('p_comments = ' ||
6189 p_comments);
6190 arp_util.debug('p_internal_notes = ' ||
6191 p_internal_notes);
6192 arp_util.debug('p_invoice_currency_code = ' ||
6193 p_invoice_currency_code);
6194 arp_util.debug('p_invoicing_rule_id = ' ||
6195 TO_CHAR(p_invoicing_rule_id));
6196 arp_util.debug('p_last_printed_sequence_num = ' ||
6197 p_last_printed_sequence_num);
6198 arp_util.debug('p_orig_system_batch_name = ' ||
6199 p_orig_system_batch_name);
6200 arp_util.debug('p_primary_salesrep_id = ' ||
6201 TO_CHAR(p_primary_salesrep_id));
6202 arp_util.debug('p_printing_count = ' ||
6203 p_printing_count);
6204 arp_util.debug('p_printing_last_printed = ' ||
6205 p_printing_last_printed);
6206 arp_util.debug('p_printing_option = ' ||
6207 p_printing_option);
6208 arp_util.debug('p_printing_original_date = ' ||
6209 p_printing_original_date);
6210 arp_util.debug('p_printing_pending = ' ||
6211 p_printing_pending);
6212 arp_util.debug('p_purchase_order = ' ||
6213 p_purchase_order);
6214 arp_util.debug('p_purchase_order_date = ' ||
6215 p_purchase_order_date);
6216 arp_util.debug('p_purchase_order_revision = ' ||
6217 p_purchase_order_revision);
6218 arp_util.debug('p_receipt_method_id = ' ||
6219 TO_CHAR(p_receipt_method_id));
6220 arp_util.debug('p_remit_to_address_id = ' ||
6221 TO_CHAR(p_remit_to_address_id));
6222 arp_util.debug('p_shipment_id = ' ||
6223 TO_CHAR(p_shipment_id));
6224 arp_util.debug('p_ship_date_actual = ' ||
6225 p_ship_date_actual);
6226 arp_util.debug('p_ship_via = ' ||
6227 p_ship_via);
6228 arp_util.debug('p_term_due_date = ' ||
6229 p_term_due_date);
6230 arp_util.debug('p_term_id = ' ||
6231 TO_CHAR(p_term_id));
6232 arp_util.debug('p_territory_id = ' ||
6233 TO_CHAR(p_territory_id));
6234 arp_util.debug('p_waybill_number = ' ||
6235 p_waybill_number);
6236 arp_util.debug('p_status_trx = ' ||
6237 p_status_trx);
6238 arp_util.debug('p_reason_code = ' ||
6239 p_reason_code);
6240 arp_util.debug('p_doc_sequence_id = ' ||
6241 TO_CHAR(p_doc_sequence_id));
6242 arp_util.debug('p_doc_sequence_value = ' ||
6243 p_doc_sequence_value);
6244 arp_util.debug('p_paying_customer_id = ' ||
6245 TO_CHAR(p_paying_customer_id));
6246 arp_util.debug('p_paying_site_use_id = ' ||
6247 TO_CHAR(p_paying_site_use_id));
6248 arp_util.debug('p_related_batch_source_id = ' ||
6249 TO_CHAR(p_related_batch_source_id));
6250 arp_util.debug('p_default_tax_exempt_flag = ' ||
6251 p_default_tax_exempt_flag);
6252 arp_util.debug('p_created_from = ' ||
6253 p_created_from);
6254 arp_util.debug('p_deflt_ussgl_trx_code_context = ' ||
6255 p_deflt_ussgl_trx_code_context);
6256 arp_util.debug('p_deflt_ussgl_transaction_code = ' ||
6257 p_deflt_ussgl_transaction_code);
6258 arp_util.debug('p_old_trx_number = ' ||
6259 p_old_trx_number);
6260 arp_util.debug('p_interface_header_context = ' ||
6261 p_interface_header_context);
6262 arp_util.debug('p_interface_header_attribute1 = ' ||
6263 p_interface_header_attribute1);
6264 arp_util.debug('p_interface_header_attribute2 = ' ||
6265 p_interface_header_attribute2);
6266 arp_util.debug('p_interface_header_attribute3 = ' ||
6267 p_interface_header_attribute3);
6268 arp_util.debug('p_interface_header_attribute4 = ' ||
6269 p_interface_header_attribute4);
6270 arp_util.debug('p_interface_header_attribute5 = ' ||
6271 p_interface_header_attribute5);
6272 arp_util.debug('p_interface_header_attribute6 = ' ||
6273 p_interface_header_attribute6);
6274 arp_util.debug('p_interface_header_attribute7 = ' ||
6275 p_interface_header_attribute7);
6276 arp_util.debug('p_interface_header_attribute8 = ' ||
6277 p_interface_header_attribute8);
6278 arp_util.debug('p_interface_header_attribute9 = ' ||
6279 p_interface_header_attribute9);
6280 arp_util.debug('p_interface_header_attribute10 = ' ||
6281 p_interface_header_attribute10);
6282 arp_util.debug('p_interface_header_attribute11 = ' ||
6283 p_interface_header_attribute11);
6284 arp_util.debug('p_interface_header_attribute12 = ' ||
6285 p_interface_header_attribute12);
6286 arp_util.debug('p_interface_header_attribute13 = ' ||
6287 p_interface_header_attribute13);
6288 arp_util.debug('p_interface_header_attribute14 = ' ||
6289 p_interface_header_attribute14);
6290 arp_util.debug('p_interface_header_attribute15 = ' ||
6291 p_interface_header_attribute15);
6292 arp_util.debug('p_attribute_category = ' ||
6293 p_attribute_category);
6294 arp_util.debug('p_attribute1 = ' ||
6295 p_attribute1);
6296 arp_util.debug('p_attribute2 = ' ||
6297 p_attribute2);
6298 arp_util.debug('p_attribute3 = ' ||
6299 p_attribute3);
6300 arp_util.debug('p_attribute4 = ' ||
6301 p_attribute4);
6302 arp_util.debug('p_attribute5 = ' ||
6303 p_attribute5);
6304 arp_util.debug('p_attribute6 = ' ||
6305 p_attribute6);
6306 arp_util.debug('p_attribute7 = ' ||
6307 p_attribute7);
6308 arp_util.debug('p_attribute8 = ' ||
6309 p_attribute8);
6310 arp_util.debug('p_attribute9 = ' ||
6311 p_attribute9);
6312 arp_util.debug('p_attribute10 = ' ||
6313 p_attribute10);
6314 arp_util.debug('p_attribute11 = ' ||
6315 p_attribute11);
6316 arp_util.debug('p_attribute12 = ' ||
6317 p_attribute12);
6318 arp_util.debug('p_attribute13 = ' ||
6319 p_attribute13);
6320 arp_util.debug('p_attribute14 = ' ||
6321 p_attribute14);
6322 arp_util.debug('p_attribute15 = ' ||
6323 p_attribute15);
6324
6325 RAISE;
6326
6327 END;
6328
6329 /*---------------------------------------------+
6330 | Package initialization section. |
6331 | Sets WHO column variables for later use. |
6332 +---------------------------------------------*/
6333
6334 BEGIN
6335
6336 pg_user_id := fnd_global.user_id;
6337 pg_conc_login_id := fnd_global.conc_login_id;
6338 pg_login_id := fnd_global.login_id;
6339 pg_prog_appl_id := fnd_global.prog_appl_id;
6340 pg_conc_program_id := fnd_global.conc_program_id;
6341
6342
6343 END ARP_CT_PKG;