DBA Data[Home] [Help]

PACKAGE BODY: APPS.ARP_PROCESS_HEADER_UPDTE_COVER

Source


1 PACKAGE BODY ARP_PROCESS_HEADER_UPDTE_COVER AS
2 /* $Header: ARTEHECB.pls 120.18 2010/06/11 05:18:43 manishri ship $ */
3 
4 
5 
6 /*===========================================================================+
7  | PROCEDURE                                                                 |
8  |    update_header_cover                                                    |
9  |                                                                           |
10  | DESCRIPTION                                                               |
11  |    Updates a record in ra_customer_trx.                                   |
12  |                                                                           |
13  | SCOPE - PUBLIC                                                            |
14  |                                                                           |
15  | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED                                   |
16  |    arp_util.debug                                                         |
17  |    arp_process_header.update_header                                       |
18  |                                                                           |
19  | ARGUMENTS  : IN:                                                          |
20  |                 p_form_name                                               |
21  |                 p_form_version                                            |
22  |                 p_trx_amount                                              |
23  |                 p_trx_class                                               |
24  |                 p_gl_date                                                 |
25  |                 p_term_in_use_flag                                        |
26  |                 p_open_rec_flag                                           |
27  |                 p_recalc_tax_flag                                         |
28  |                 p_rerun_autoacc_flag                                      |
29  |                 p_receivable_ccid                                         |
30  |                 p_customer_trx_id                                         |
31  |                 p_trx_number                                              |
32  |                 p_posting_control_id                                      |
33  |                 p_ra_post_loop_number                                     |
34  |                 p_complete_flag                                           |
35  |                 p_initial_customer_trx_id                                 |
36  |                 p_initial_customer_trx_line_id                            |
37  |                 p_previous_customer_trx_id                                |
38  |                 p_related_customer_trx_id                                 |
39  |                 p_recurred_from_trx_number                                |
40  |                 p_cust_trx_type_id                                        |
41  |                 p_batch_id                                                |
42  |                 p_batch_source_id                                         |
43  |                 p_agreement_id                                            |
44  |                 p_trx_date                                                |
45  |                 p_bill_to_customer_id                                     |
46  |                 p_bill_to_contact_id                                      |
47  |                 p_bill_to_site_use_id                                     |
48  |                 p_ship_to_customer_id                                     |
49  |                 p_ship_to_contact_id                                      |
50  |                 p_ship_to_site_use_id                                     |
51  |                 p_sold_to_customer_id                                     |
52  |                 p_sold_to_site_use_id                                     |
53  |                 p_sold_to_contact_id                                      |
54  |                 p_customer_reference                                      |
55  |                 p_customer_reference_date                                 |
56  |                 p_cr_method_for_installments                              |
57  |                 p_credit_method_for_rules                                 |
58  |                 p_start_date_commitment                                   |
59  |                 p_end_date_commitment                                     |
60  |                 p_exchange_date                                           |
61  |                 p_exchange_rate                                           |
62  |                 p_exchange_rate_type                                      |
63  |                 p_customer_bank_account_id                                |
64  |                 p_finance_charges                                         |
65  |                 p_fob_point                                               |
66  |                 p_comments                                                |
67  |                 p_internal_notes                                          |
68  |                 p_invoice_currency_code                                   |
69  |                 p_invoicing_rule_id                                       |
70  |                 p_last_printed_sequence_num                               |
71  |                 p_orig_system_batch_name                                  |
72  |                 p_primary_salesrep_id                                     |
73  |                 p_printing_count                                          |
74  |                 p_printing_last_printed                                   |
75  |                 p_printing_option                                         |
76  |                 p_printing_original_date                                  |
77  |                 p_printing_pending                                        |
78  |                 p_purchase_order                                          |
79  |                 p_purchase_order_date                                     |
80  |                 p_purchase_order_revision                                 |
81  |                 p_receipt_method_id                                       |
82  |                 p_remit_to_address_id                                     |
83  |                 p_shipment_id                                             |
84  |                 p_ship_date_actual                                        |
85  |                 p_ship_via                                                |
86  |                 p_term_due_date                                           |
87  |                 p_term_id                                                 |
88  |                 p_territory_id                                            |
89  |                 p_waybill_number                                          |
90  |                 p_status_trx                                              |
91  |                 p_reason_code                                             |
92  |                 p_doc_sequence_id                                         |
93  |                 p_doc_sequence_value                                      |
94  |                 p_paying_customer_id                                      |
95  |                 p_paying_site_use_id                                      |
96  |                 p_related_batch_source_id                                 |
97  |                 p_default_tax_exempt_flag                                 |
98  |                 p_created_from                                            |
99  |                 p_ps_dispute_amount                                       |
100  |                 p_ps_dispute_date                                         |
101  |                 p_deflt_ussgl_trx_code_context                            |
102  |                 p_deflt_ussgl_transaction_code                            |
103  |                 p_old_trx_number                                          |
104  |                 p_interface_header_context                                |
105  |                 p_interface_header_attribute1                             |
106  |                 p_interface_header_attribute2                             |
107  |                 p_interface_header_attribute3                             |
108  |                 p_interface_header_attribute4                             |
109  |                 p_interface_header_attribute5                             |
110  |                 p_interface_header_attribute6                             |
111  |                 p_interface_header_attribute7                             |
112  |                 p_interface_header_attribute8                             |
113  |                 p_interface_header_attribute9                             |
114  |                 p_interface_header_attribute10                            |
115  |                 p_interface_header_attribute11                            |
116  |                 p_interface_header_attribute12                            |
117  |                 p_interface_header_attribute13                            |
118  |                 p_interface_header_attribute14                            |
119  |                 p_interface_header_attribute15                            |
120  |                 p_attribute_category                                      |
121  |                 p_attribute1                                              |
122  |                 p_attribute2                                              |
123  |                 p_attribute3                                              |
124  |                 p_attribute4                                              |
125  |                 p_attribute5                                              |
126  |                 p_attribute6                                              |
127  |                 p_attribute7                                              |
128  |                 p_attribute8                                              |
129  |                 p_attribute9                                              |
130  |                 p_attribute10                                             |
131  |                 p_attribute11                                             |
132  |                 p_attribute12                                             |
133  |                 p_attribute13                                             |
134  |                 p_attribute14                                             |
135  |                 p_attribute15                                             |
136  |                 p_commit_customer_trx_line_id                             |
137  |                 p_commit_inventory_item_id                                |
138  |                 p_commit_memo_line_id                                     |
139  |                 p_commit_description                                      |
140  |                 p_commit_extended_amount                                  |
141  |                 p_commit_interface_line_attr1                             |
142  |                 p_commit_interface_line_attr2                             |
143  |                 p_commit_interface_line_attr3                             |
144  |                 p_commit_interface_line_attr4                             |
145  |                 p_commit_interface_line_attr5                             |
146  |                 p_commit_interface_line_attr6                             |
147  |                 p_commit_interface_line_attr7                             |
148  |                 p_commit_interface_line_attr8                             |
149  |                 p_commit_interface_line_attr9                             |
150  |                 p_commit_interface_line_attr10                            |
151  |                 p_commit_interface_line_attr11                            |
152  |                 p_commit_interface_line_attr12                            |
153  |                 p_commit_interface_line_attr13                            |
154  |                 p_commit_interface_line_attr14                            |
155  |                 p_commit_interface_line_attr15                            |
156  |                 p_commit_interface_line_contxt                            |
157  |                 p_commit_attribute_category                               |
158  |                 p_commit_attribute1                                       |
159  |                 p_commit_attribute2                                       |
160  |                 p_commit_attribute3                                       |
161  |                 p_commit_attribute4                                       |
162  |                 p_commit_attribute5                                       |
163  |                 p_commit_attribute6                                       |
164  |                 p_commit_attribute7                                       |
165  |                 p_commit_attribute8                                       |
166  |                 p_commit_attribute9                                       |
167  |                 p_commit_attribute10                                      |
168  |                 p_commit_attribute11                                      |
169  |                 p_commit_attribute12                                      |
170  |                 p_commit_attribute13                                      |
171  |                 p_commit_attribute14                                      |
172  |                 p_commit_attribute15                                      |
173  |              OUT:                                                         |
174  |                 p_trx_number                                              |
175  |                 p_customer_trx_id                                         |
176  |          IN/ OUT:                                                         |
177  |                                                                           |
178  | RETURNS    : NONE                                                         |
179  |                                                                           |
180  | NOTES                                                                     |
181  |                                                                           |
182  | MODIFICATION HISTORY                                                      |
183  |     27-NOV-95  Martin Johnson      Created                                |
184  |     18-May-05  Debbie Sue Jancis   Added Legal Entity Id for LE project   |
185  |   28-MAR-2006  Herve Yu            BUG#4897183 call update XLA events     |
186  |                                                                           |
187  +===========================================================================*/
188 
189 PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
190 
191 PROCEDURE update_header_cover(
192   p_form_name                           IN varchar2,
193   p_form_version                        IN number,
194   p_trx_amount                          IN number,
195   p_trx_class                           IN VARCHAR2,
196   p_gl_date                             IN DATE,
197   p_term_in_use_flag                    IN varchar2,
198   p_open_rec_flag                       IN VARCHAR2,
199   p_recalc_tax_flag                     IN varchar2,
200   p_rerun_autoacc_flag                  IN varchar2,
201   p_receivable_ccid                     IN NUMBER,
202   p_customer_trx_id                     IN NUMBER,
203   p_trx_number                          IN VARCHAR2,
204   p_posting_control_id                  IN NUMBER,
205   p_ra_post_loop_number                 IN NUMBER,
206   p_complete_flag                       IN VARCHAR2,
207   p_initial_customer_trx_id             IN NUMBER,
208   p_initial_customer_trx_line_id        IN NUMBER,
209   p_previous_customer_trx_id            IN NUMBER,
210   p_related_customer_trx_id             IN NUMBER,
211   p_recurred_from_trx_number            IN VARCHAR2,
212   p_cust_trx_type_id                    IN NUMBER,
213   p_batch_id                            IN NUMBER,
214   p_batch_source_id                     IN NUMBER,
215   p_agreement_id                        IN NUMBER,
216   p_trx_date                            IN DATE,
217   p_bill_to_customer_id                 IN NUMBER,
218   p_bill_to_contact_id                  IN NUMBER,
219   p_bill_to_site_use_id                 IN NUMBER,
220   p_ship_to_customer_id                 IN NUMBER,
221   p_ship_to_contact_id                  IN NUMBER,
222   p_ship_to_site_use_id                 IN NUMBER,
223   p_sold_to_customer_id                 IN NUMBER,
224   p_sold_to_site_use_id                 IN NUMBER,
225   p_sold_to_contact_id                  IN NUMBER,
226   p_customer_reference                  IN VARCHAR2,
227   p_customer_reference_date             IN DATE,
228   p_cr_method_for_installments          IN VARCHAR2,
229   p_credit_method_for_rules             IN VARCHAR2,
230   p_start_date_commitment               IN DATE,
231   p_end_date_commitment                 IN DATE,
232   p_exchange_date                       IN DATE,
233   p_exchange_rate                       IN NUMBER,
234   p_exchange_rate_type                  IN VARCHAR2,
235   p_customer_bank_account_id            IN NUMBER,
236   p_finance_charges                     IN VARCHAR2,
237   p_fob_point                           IN VARCHAR2,
238   p_comments                            IN VARCHAR2,
239   p_internal_notes                      IN VARCHAR2,
240   p_invoice_currency_code               IN VARCHAR2,
241   p_invoicing_rule_id                   IN NUMBER,
242   p_last_printed_sequence_num           IN NUMBER,
243   p_orig_system_batch_name              IN VARCHAR2,
244   p_primary_salesrep_id                 IN NUMBER,
245   p_printing_count                      IN NUMBER,
246   p_printing_last_printed               IN DATE,
247   p_printing_option                     IN VARCHAR2,
248   p_printing_original_date              IN DATE,
249   p_printing_pending                    IN VARCHAR2,
250   p_purchase_order                      IN VARCHAR2,
251   p_purchase_order_date                 IN DATE,
252   p_purchase_order_revision             IN VARCHAR2,
253   p_receipt_method_id                   IN NUMBER,
254   p_remit_to_address_id                 IN NUMBER,
255   p_shipment_id                         IN NUMBER,
256   p_ship_date_actual                    IN DATE,
257   p_ship_via                            IN VARCHAR2,
258   p_term_due_date                       IN DATE,
259   p_term_id                             IN NUMBER,
260   p_territory_id                        IN NUMBER,
261   p_waybill_number                      IN VARCHAR2,
262   p_status_trx                          IN VARCHAR2,
263   p_reason_code                         IN VARCHAR2,
264   p_doc_sequence_id                     IN NUMBER,
265   p_doc_sequence_value                  IN NUMBER,
266   p_paying_customer_id                  IN NUMBER,
267   p_paying_site_use_id                  IN NUMBER,
268   p_related_batch_source_id             IN NUMBER,
269   p_default_tax_exempt_flag             IN VARCHAR2,
270   p_created_from                        IN VARCHAR2,
271   p_ps_dispute_amount                   IN number,
272   p_ps_dispute_date                     IN date,
273   p_deflt_ussgl_trx_code_context        IN VARCHAR2,
274   p_deflt_ussgl_transaction_code        IN VARCHAR2,
275   p_old_trx_number                      IN VARCHAR2,
276   p_interface_header_context            IN VARCHAR2,
277   p_interface_header_attribute1         IN VARCHAR2,
278   p_interface_header_attribute2         IN VARCHAR2,
279   p_interface_header_attribute3         IN VARCHAR2,
280   p_interface_header_attribute4         IN VARCHAR2,
281   p_interface_header_attribute5         IN VARCHAR2,
282   p_interface_header_attribute6         IN VARCHAR2,
283   p_interface_header_attribute7         IN VARCHAR2,
284   p_interface_header_attribute8         IN VARCHAR2,
285   p_interface_header_attribute9         IN VARCHAR2,
286   p_interface_header_attribute10        IN VARCHAR2,
287   p_interface_header_attribute11        IN VARCHAR2,
288   p_interface_header_attribute12        IN VARCHAR2,
289   p_interface_header_attribute13        IN VARCHAR2,
290   p_interface_header_attribute14        IN VARCHAR2,
291   p_interface_header_attribute15        IN VARCHAR2,
292   p_attribute_category                  IN VARCHAR2,
293   p_attribute1                          IN VARCHAR2,
294   p_attribute2                          IN VARCHAR2,
295   p_attribute3                          IN VARCHAR2,
296   p_attribute4                          IN VARCHAR2,
297   p_attribute5                          IN VARCHAR2,
298   p_attribute6                          IN VARCHAR2,
299   p_attribute7                          IN VARCHAR2,
300   p_attribute8                          IN VARCHAR2,
301   p_attribute9                          IN VARCHAR2,
302   p_attribute10                         IN VARCHAR2,
303   p_attribute11                         IN VARCHAR2,
304   p_attribute12                         IN VARCHAR2,
305   p_attribute13                         IN VARCHAR2,
306   p_attribute14                         IN VARCHAR2,
307   p_attribute15                         IN VARCHAR2,
308   p_commit_customer_trx_line_id         IN NUMBER,
309   p_commit_inventory_item_id            IN NUMBER,
310   p_commit_memo_line_id			IN NUMBER,
311   p_commit_description                  IN VARCHAR2,
312   p_commit_extended_amount              IN NUMBER,
313   p_commit_interface_line_attr1         IN VARCHAR2,
314   p_commit_interface_line_attr2         IN VARCHAR2,
315   p_commit_interface_line_attr3         IN VARCHAR2,
316   p_commit_interface_line_attr4         IN VARCHAR2,
317   p_commit_interface_line_attr5         IN VARCHAR2,
318   p_commit_interface_line_attr6         IN VARCHAR2,
319   p_commit_interface_line_attr7         IN VARCHAR2,
320   p_commit_interface_line_attr8         IN VARCHAR2,
321   p_commit_interface_line_attr9         IN VARCHAR2,
322   p_commit_interface_line_attr10        IN VARCHAR2,
323   p_commit_interface_line_attr11        IN VARCHAR2,
324   p_commit_interface_line_attr12        IN VARCHAR2,
325   p_commit_interface_line_attr13        IN VARCHAR2,
326   p_commit_interface_line_attr14        IN VARCHAR2,
327   p_commit_interface_line_attr15        IN VARCHAR2,
328   p_commit_interface_line_contxt        IN VARCHAR2,
329   p_commit_attribute_category           IN VARCHAR2,
330   p_commit_attribute1                   IN VARCHAR2,
331   p_commit_attribute2                   IN VARCHAR2,
332   p_commit_attribute3                   IN VARCHAR2,
333   p_commit_attribute4                   IN VARCHAR2,
334   p_commit_attribute5                   IN VARCHAR2,
335   p_commit_attribute6                   IN VARCHAR2,
336   p_commit_attribute7                   IN VARCHAR2,
337   p_commit_attribute8                   IN VARCHAR2,
338   p_commit_attribute9                   IN VARCHAR2,
339   p_commit_attribute10                  IN VARCHAR2,
340   p_commit_attribute11                  IN VARCHAR2,
341   p_commit_attribute12                  IN VARCHAR2,
342   p_commit_attribute13                  IN VARCHAR2,
343   p_commit_attribute14                  IN VARCHAR2,
344   p_commit_attribute15                  IN VARCHAR2,
345   p_ctl_default_ussgl_trx_code          IN varchar2,
346   p_status                             OUT NOCOPY varchar2,
347   p_legal_entity_id                     IN NUMBER DEFAULT NULL,
348   p_payment_trxn_extension_id           IN NUMBER DEFAULT NULL,
349   p_billing_date                        IN DATE   DEFAULT NULL,
350   p_ct_reference			IN VARCHAR2 DEFAULT NULL)  IS /* Bug fix 5330712 */
351 
352 --{BUG#4897183
353 CURSOR cev IS
354 SELECT t.trx_date,
355        d.gl_date,
356        t.org_id,
357        d.set_of_books_id,
358        t.term_id,
359        t.exchange_rate,
360        t.exchange_date,
361        t.exchange_rate_type,
362        t.complete_flag         -- Bug 8936486
363   FROM ra_customer_trx t,
364        ra_cust_trx_line_gl_dist d
365  WHERE t.customer_trx_id = p_customer_trx_id
366    AND t.customer_trx_id = d.customer_trx_id
367    AND d.account_class   = 'REC' ;
368 
369 CURSOR c_line (p_trx_id NUMBER) IS
370 SELECT customer_trx_line_id
371 FROM   ra_customer_trx_lines_all
372 WHERE  customer_trx_id = p_trx_id
373 AND    line_type = 'LINE';
374 
375 /* manishri, 07-Jun-2010. Bug 9693686 */
376 CURSOR c_get_old_complete_flag (p_customer_trx_id ra_customer_trx_all.customer_trx_id%type) IS
377 SELECT complete_flag
378 FROM ra_customer_trx_all
379 WHERE customer_trx_id = p_customer_trx_id;
380 /* end of change, manishri, 07-Jun-2010. Bug 9693686 */
381 
382   l_trx_date   DATE;
383   l_gl_date    DATE;
384   l_org_id     NUMBER;
385   l_sob_id     NUMBER;
386   l_term_id    NUMBER;
387   lf           BOOLEAN;
388   x_event_id   NUMBER;
389   l_exch_rate  NUMBER;
390   l_exch_date  DATE;
391   l_exch_type  VARCHAR2(30);
392 --}
393 
394   l_commit_rec          arp_process_commitment.commitment_rec_type;
395   l_trx_rec             ra_customer_trx%rowtype;
396   l_recalc_tax_flag     boolean;
397   l_rerun_autoacc_flag  boolean;
398   l_return_status       NUMBER;
399 
400   /* Bug 8936486 */
401   l_db_complete_flag      VARCHAR2(1);
402   l_tax_validation_status VARCHAR2(1);
403   l_error_count           NUMBER;
404 
405 BEGIN
406 
407    IF PG_DEBUG in ('Y', 'C') THEN
408       arp_util.debug('arp_process_header_updte_cover.update_header_cover()+');
409    END IF;
410 
411    /* manishri, 07-Jun-2010. Bug 9693686 */
412    OPEN c_get_old_complete_flag(p_customer_trx_id);
413    FETCH c_get_old_complete_flag INTO g_old_complete_flag;
414    CLOSE c_get_old_complete_flag;
415    arp_util.debug('Old Complete Flag  = ' || g_old_complete_flag);
416    /* End of change, manishri, 07-Jun-2010. Bug 9693686 */
417 
418    arp_ct_pkg.set_to_dummy(l_trx_rec);
419    arp_process_commitment.set_to_dummy(l_commit_rec);
420 
421    l_trx_rec.customer_trx_id                := p_customer_trx_id;
422    l_trx_rec.trx_number                     := p_trx_number;
423    l_trx_rec.complete_flag                  := p_complete_flag;
424    l_trx_rec.initial_customer_trx_id        := p_initial_customer_trx_id;
425    l_trx_rec.previous_customer_trx_id       := p_previous_customer_trx_id;
426    l_trx_rec.related_customer_trx_id        := p_related_customer_trx_id;
427    l_trx_rec.recurred_from_trx_number       := p_recurred_from_trx_number;
428    l_trx_rec.cust_trx_type_id               := p_cust_trx_type_id;
429    l_trx_rec.batch_id                       := p_batch_id;
430    l_trx_rec.batch_source_id                := p_batch_source_id;
431    l_trx_rec.agreement_id                   := p_agreement_id;
432    l_trx_rec.trx_date                       := p_trx_date;
433    l_trx_rec.bill_to_customer_id            := p_bill_to_customer_id;
434    l_trx_rec.bill_to_contact_id             := p_bill_to_contact_id;
435    l_trx_rec.bill_to_site_use_id            := p_bill_to_site_use_id;
436    l_trx_rec.ship_to_customer_id            := p_ship_to_customer_id;
437    l_trx_rec.ship_to_contact_id             := p_ship_to_contact_id;
438    l_trx_rec.ship_to_site_use_id            := p_ship_to_site_use_id;
439    l_trx_rec.sold_to_customer_id            := p_sold_to_customer_id;
440    l_trx_rec.sold_to_site_use_id            := p_sold_to_site_use_id;
441    l_trx_rec.sold_to_contact_id             := p_sold_to_contact_id;
442    l_trx_rec.customer_reference             := p_customer_reference;
443    l_trx_rec.customer_reference_date        := p_customer_reference_date;
444    l_trx_rec.credit_method_for_installments := p_cr_method_for_installments;
445    l_trx_rec.credit_method_for_rules        := p_credit_method_for_rules;
446    l_trx_rec.start_date_commitment          := p_start_date_commitment;
447    l_trx_rec.end_date_commitment            := p_end_date_commitment;
448    l_trx_rec.exchange_date                  := p_exchange_date;
449    l_trx_rec.exchange_rate                  := p_exchange_rate;
450    l_trx_rec.exchange_rate_type             := p_exchange_rate_type;
451    l_trx_rec.customer_bank_account_id       := p_customer_bank_account_id;
452    l_trx_rec.finance_charges                := p_finance_charges;
453    l_trx_rec.fob_point                      := p_fob_point;
454    l_trx_rec.comments                       := p_comments;
455    l_trx_rec.internal_notes                 := p_internal_notes;
456    l_trx_rec.invoice_currency_code          := p_invoice_currency_code;
457    l_trx_rec.invoicing_rule_id              := p_invoicing_rule_id;
458    l_trx_rec.last_printed_sequence_num      := p_last_printed_sequence_num;
459    l_trx_rec.orig_system_batch_name         := p_orig_system_batch_name;
460    l_trx_rec.primary_salesrep_id            := p_primary_salesrep_id;
461    l_trx_rec.printing_count                 := p_printing_count;
462    l_trx_rec.printing_last_printed          := p_printing_last_printed;
463    l_trx_rec.printing_option                := p_printing_option;
464    l_trx_rec.printing_original_date         := p_printing_original_date;
465    l_trx_rec.printing_pending               := p_printing_pending;
466    l_trx_rec.purchase_order                 := p_purchase_order;
467    l_trx_rec.purchase_order_date            := p_purchase_order_date;
468    l_trx_rec.purchase_order_revision        := p_purchase_order_revision;
469    l_trx_rec.receipt_method_id              := p_receipt_method_id;
470    l_trx_rec.remit_to_address_id            := p_remit_to_address_id;
471    l_trx_rec.shipment_id                    := p_shipment_id;
472    l_trx_rec.ship_date_actual               := p_ship_date_actual;
473    l_trx_rec.ship_via                       := p_ship_via;
474    l_trx_rec.term_due_date                  := p_term_due_date;
475    l_trx_rec.term_id                        := p_term_id;
476    l_trx_rec.territory_id                   := p_territory_id;
477    l_trx_rec.waybill_number                 := p_waybill_number;
478    l_trx_rec.status_trx                     := p_status_trx;
479    l_trx_rec.reason_code                    := p_reason_code;
480    l_trx_rec.doc_sequence_id                := p_doc_sequence_id;
481    l_trx_rec.doc_sequence_value             := p_doc_sequence_value;
482    l_trx_rec.paying_customer_id             := p_paying_customer_id;
483    l_trx_rec.paying_site_use_id             := p_paying_site_use_id;
484    l_trx_rec.related_batch_source_id        := p_related_batch_source_id;
485    l_trx_rec.default_tax_exempt_flag        := p_default_tax_exempt_flag;
486    l_trx_rec.created_from                   := p_created_from;
487    l_trx_rec.default_ussgl_trx_code_context := p_deflt_ussgl_trx_code_context;
488    l_trx_rec.default_ussgl_transaction_code := p_deflt_ussgl_transaction_code;
489    l_trx_rec.old_trx_number                 := p_old_trx_number;
490    l_trx_rec.interface_header_context       := p_interface_header_context;
491    l_trx_rec.interface_header_attribute1    := p_interface_header_attribute1;
492    l_trx_rec.interface_header_attribute2    := p_interface_header_attribute2;
493    l_trx_rec.interface_header_attribute3    := p_interface_header_attribute3;
494    l_trx_rec.interface_header_attribute4    := p_interface_header_attribute4;
495    l_trx_rec.interface_header_attribute5    := p_interface_header_attribute5;
496    l_trx_rec.interface_header_attribute6    := p_interface_header_attribute6;
497    l_trx_rec.interface_header_attribute7    := p_interface_header_attribute7;
498    l_trx_rec.interface_header_attribute8    := p_interface_header_attribute8;
499    l_trx_rec.interface_header_attribute9    := p_interface_header_attribute9;
500    l_trx_rec.interface_header_attribute10   := p_interface_header_attribute10;
501    l_trx_rec.interface_header_attribute11   := p_interface_header_attribute11;
502    l_trx_rec.interface_header_attribute12   := p_interface_header_attribute12;
503    l_trx_rec.interface_header_attribute13   := p_interface_header_attribute13;
504    l_trx_rec.interface_header_attribute14   := p_interface_header_attribute14;
505    l_trx_rec.interface_header_attribute15   := p_interface_header_attribute15;
506    l_trx_rec.attribute_category             := p_attribute_category;
507    l_trx_rec.attribute1                     := p_attribute1;
508    l_trx_rec.attribute2                     := p_attribute2;
509    l_trx_rec.attribute3                     := p_attribute3;
510    l_trx_rec.attribute4                     := p_attribute4;
511    l_trx_rec.attribute5                     := p_attribute5;
512    l_trx_rec.attribute6                     := p_attribute6;
513    l_trx_rec.attribute7                     := p_attribute7;
514    l_trx_rec.attribute8                     := p_attribute8;
515    l_trx_rec.attribute9                     := p_attribute9;
516    l_trx_rec.attribute10                    := p_attribute10;
517    l_trx_rec.attribute11                    := p_attribute11;
518    l_trx_rec.attribute12                    := p_attribute12;
519    l_trx_rec.attribute13                    := p_attribute13;
520    l_trx_rec.attribute14                    := p_attribute14;
521    l_trx_rec.attribute15                    := p_attribute15;
522 
523    l_trx_rec.legal_entity_id                := p_legal_entity_id;
524    /* PAYMENT_UPTAKE */
525    l_trx_rec.payment_trxn_extension_id      := p_payment_trxn_extension_id;
526    l_trx_rec.billing_date                   := p_billing_date;
527    l_trx_rec.ct_reference                   := p_ct_reference; /* Bug fix 5330712 */
528 
529    l_commit_rec.customer_trx_line_id        := p_commit_customer_trx_line_id;
530    l_commit_rec.inventory_item_id           := p_commit_inventory_item_id;
531    l_commit_rec.memo_line_id		    := p_commit_memo_line_id;
532    l_commit_rec.description                 := p_commit_description;
533    l_commit_rec.extended_amount             := p_commit_extended_amount;
534    l_commit_rec.interface_line_attribute1   := p_commit_interface_line_attr1;
535    l_commit_rec.interface_line_attribute2   := p_commit_interface_line_attr2;
536    l_commit_rec.interface_line_attribute3   := p_commit_interface_line_attr3;
537    l_commit_rec.interface_line_attribute4   := p_commit_interface_line_attr4;
538    l_commit_rec.interface_line_attribute5   := p_commit_interface_line_attr5;
539    l_commit_rec.interface_line_attribute6   := p_commit_interface_line_attr6;
540    l_commit_rec.interface_line_attribute7   := p_commit_interface_line_attr7;
541    l_commit_rec.interface_line_attribute8   := p_commit_interface_line_attr8;
542    l_commit_rec.interface_line_attribute9   := p_commit_interface_line_attr9;
543    l_commit_rec.interface_line_attribute10  := p_commit_interface_line_attr10;
544    l_commit_rec.interface_line_attribute11  := p_commit_interface_line_attr11;
545    l_commit_rec.interface_line_attribute12  := p_commit_interface_line_attr12;
546    l_commit_rec.interface_line_attribute13  := p_commit_interface_line_attr13;
547    l_commit_rec.interface_line_attribute14  := p_commit_interface_line_attr14;
548    l_commit_rec.interface_line_attribute15  := p_commit_interface_line_attr15;
549    l_commit_rec.interface_line_context      := p_commit_interface_line_contxt;
550    l_commit_rec.attribute_category          := p_commit_attribute_category;
551    l_commit_rec.attribute1                  := p_commit_attribute1;
552    l_commit_rec.attribute2                  := p_commit_attribute2;
553    l_commit_rec.attribute3                  := p_commit_attribute3;
554    l_commit_rec.attribute4                  := p_commit_attribute4;
555    l_commit_rec.attribute5                  := p_commit_attribute5;
556    l_commit_rec.attribute6                  := p_commit_attribute6;
557    l_commit_rec.attribute7                  := p_commit_attribute7;
558    l_commit_rec.attribute8                  := p_commit_attribute8;
559    l_commit_rec.attribute9                  := p_commit_attribute9;
560    l_commit_rec.attribute10                 := p_commit_attribute10;
561    l_commit_rec.attribute11                 := p_commit_attribute11;
562    l_commit_rec.attribute12                 := p_commit_attribute12;
563    l_commit_rec.attribute13                 := p_commit_attribute13;
564    l_commit_rec.attribute14                 := p_commit_attribute14;
565    l_commit_rec.attribute15                 := p_commit_attribute15;
566    l_commit_rec.default_ussgl_transaction_code := p_ctl_default_ussgl_trx_code;
567 
568 
569    IF PG_DEBUG in ('Y', 'C') THEN
570       arp_util.debug(  'p_customer_trx_id               = ' ||
571                   TO_CHAR(p_customer_trx_id ) );
572       arp_util.debug(  'p_trx_number                    = ' ||
573                   p_trx_number );
574       arp_util.debug(  'p_trx_amount                    = ' ||
575                   TO_CHAR(p_trx_amount ) );
576       arp_util.debug(  'p_open_rec_flag                 = '||
577                   p_open_rec_flag);
578       arp_util.debug(  'p_term_in_use_flag              = '||
579                   p_term_in_use_flag);
580       arp_util.debug(  'p_recalc_tax_flag               = '||
581                   p_recalc_tax_flag);
582       arp_util.debug(  'p_rerun_autoacc_flag            = '||
583                   p_rerun_autoacc_flag);
584       arp_util.debug(  'p_posting_control_id            = ' ||
585                   TO_CHAR(p_posting_control_id ) );
586       arp_util.debug(  'p_ra_post_loop_number           = ' ||
587                   p_ra_post_loop_number );
588       arp_util.debug(  'p_complete_flag                 = ' ||
589                   p_complete_flag );
590       arp_util.debug(  'p_initial_customer_trx_id       = ' ||
591                   TO_CHAR(p_initial_customer_trx_id ) );
592       arp_util.debug(  'p_initial_customer_trx_line_id  = ' ||
593                   TO_CHAR(p_initial_customer_trx_line_id ) );
594       arp_util.debug(  'p_previous_customer_trx_id      = ' ||
595                   TO_CHAR(p_previous_customer_trx_id ) );
596       arp_util.debug(  'p_related_customer_trx_id       = ' ||
597                   TO_CHAR(p_related_customer_trx_id ) );
598       arp_util.debug(  'p_recurred_from_trx_number      = ' ||
599                   p_recurred_from_trx_number );
600       arp_util.debug(  'p_cust_trx_type_id              = ' ||
601                   TO_CHAR(p_cust_trx_type_id ) );
602       arp_util.debug(  'p_batch_id                      = ' ||
603                   TO_CHAR(p_batch_id ) );
604       arp_util.debug(  'p_batch_source_id               = ' ||
605                   TO_CHAR(p_batch_source_id ) );
606       arp_util.debug(  'p_agreement_id                  = ' ||
607                   TO_CHAR(p_agreement_id ) );
608       arp_util.debug(  'p_trx_date                      = ' ||
609                   p_trx_date );
610       arp_util.debug(  'p_bill_to_customer_id           = ' ||
611                   TO_CHAR(p_bill_to_customer_id ) );
612       arp_util.debug(  'p_bill_to_contact_id            = ' ||
613                   TO_CHAR(p_bill_to_contact_id ) );
614       arp_util.debug(  'p_bill_to_site_use_id           = ' ||
615                   TO_CHAR(p_bill_to_site_use_id ) );
616       arp_util.debug(  'p_ship_to_customer_id           = ' ||
617                   TO_CHAR(p_ship_to_customer_id ) );
618       arp_util.debug(  'p_ship_to_contact_id            = ' ||
619                   TO_CHAR(p_ship_to_contact_id ) );
620       arp_util.debug(  'p_ship_to_site_use_id           = ' ||
621                   TO_CHAR(p_ship_to_site_use_id ) );
622       arp_util.debug(  'p_sold_to_customer_id           = ' ||
623                   TO_CHAR(p_sold_to_customer_id ) );
624       arp_util.debug(  'p_sold_to_site_use_id           = ' ||
625                   TO_CHAR(p_sold_to_site_use_id ) );
626       arp_util.debug(  'p_sold_to_contact_id            = ' ||
627                   TO_CHAR(p_sold_to_contact_id ) );
628       arp_util.debug(  'p_customer_reference            = ' ||
629                   p_customer_reference );
630       arp_util.debug(  'p_customer_reference_date       = ' ||
631                   p_customer_reference_date );
632       arp_util.debug(  'p_cr_method_for_installments    = ' ||
633                   p_cr_method_for_installments );
634       arp_util.debug(  'p_credit_method_for_rules       = ' ||
635                   p_credit_method_for_rules );
636       arp_util.debug(  'p_start_date_commitment         = ' ||
637                   p_start_date_commitment );
638       arp_util.debug(  'p_end_date_commitment           = ' ||
639                   p_end_date_commitment );
640       arp_util.debug(  'p_exchange_date                 = ' ||
641                   p_exchange_date );
642       arp_util.debug(  'p_exchange_rate                 = ' ||
643                   p_exchange_rate );
644       arp_util.debug(  'p_exchange_rate_type            = ' ||
645                   p_exchange_rate_type );
646       arp_util.debug(  'p_customer_bank_account_id      = ' ||
647                   p_customer_bank_account_id );
648       arp_util.debug(  'p_finance_charges               = ' ||
649                   p_finance_charges );
650       arp_util.debug(  'p_fob_point                     = ' ||
651                   p_fob_point );
652       arp_util.debug(  'p_comments                      = ' ||
653                   p_comments );
654       arp_util.debug(  'p_internal_notes                = ' ||
655                   p_internal_notes );
656       arp_util.debug(  'p_invoice_currency_code         = ' ||
657                   p_invoice_currency_code );
658       arp_util.debug(  'p_invoicing_rule_id             = ' ||
659                   TO_CHAR(p_invoicing_rule_id ) );
660       arp_util.debug(  'p_last_printed_sequence_num     = ' ||
661                   p_last_printed_sequence_num );
662       arp_util.debug(  'p_orig_system_batch_name        = ' ||
663                   p_orig_system_batch_name );
664       arp_util.debug(  'p_primary_salesrep_id           = ' ||
665                   TO_CHAR(p_primary_salesrep_id ) );
666       arp_util.debug(  'p_printing_count                = ' ||
667                   p_printing_count );
668       arp_util.debug(  'p_printing_last_printed         = ' ||
669                   p_printing_last_printed );
670       arp_util.debug(  'p_printing_option               = ' ||
671                   p_printing_option );
672       arp_util.debug(  'p_printing_original_date        = ' ||
673                   p_printing_original_date );
674       arp_util.debug(  'p_printing_pending              = ' ||
675                   p_printing_pending );
676       arp_util.debug(  'p_purchase_order                = ' ||
677                   p_purchase_order );
678       arp_util.debug(  'p_purchase_order_date           = ' ||
679                   p_purchase_order_date );
680       arp_util.debug(  'p_purchase_order_revision       = ' ||
681                   p_purchase_order_revision );
682       arp_util.debug(  'p_receipt_method_id             = ' ||
683                   TO_CHAR(p_receipt_method_id ) );
684       arp_util.debug(  'p_remit_to_address_id           = ' ||
685                   TO_CHAR(p_remit_to_address_id ) );
686       arp_util.debug(  'p_shipment_id                   = ' ||
687                   TO_CHAR(p_shipment_id ) );
688       arp_util.debug(  'p_ship_date_actual              = ' ||
689                   p_ship_date_actual );
690       arp_util.debug(  'p_ship_via                      = ' ||
691                   p_ship_via );
692       arp_util.debug(  'p_term_due_date                 = ' ||
693                   p_term_due_date );
694       arp_util.debug(  'p_term_id                       = ' ||
695                   TO_CHAR(p_term_id ) );
696       arp_util.debug(  'p_territory_id                  = ' ||
697                   p_territory_id );
698       arp_util.debug(  'p_waybill_number                = ' ||
699                   p_waybill_number );
700       arp_util.debug(  'p_status_trx                    = ' ||
701                   p_status_trx );
702       arp_util.debug(  'p_reason_code                   = ' ||
703                   p_reason_code );
704       arp_util.debug(  'p_doc_sequence_id               = ' ||
705                   p_doc_sequence_id );
706       arp_util.debug(  'p_doc_sequence_value            = ' ||
707                   p_doc_sequence_value );
708       arp_util.debug(  'p_paying_customer_id            = ' ||
709                   TO_CHAR(p_paying_customer_id ) );
710       arp_util.debug(  'p_paying_site_use_id            = ' ||
711                   TO_CHAR(p_paying_site_use_id ) );
712       arp_util.debug(  'p_related_batch_source_id       = ' ||
713                   p_related_batch_source_id );
714       arp_util.debug(  'p_default_tax_exempt_flag       = ' ||
715                   p_default_tax_exempt_flag );
716       arp_util.debug(  'p_created_from                  = ' ||
717                   p_created_from );
718       arp_util.debug(  'p_ps_dispute_amount             = ' ||
719                   p_ps_dispute_amount );
720       arp_util.debug(  'p_ps_dispute_date               = ' ||
721                   p_ps_dispute_date );
722       arp_util.debug(  'p_deflt_ussgl_trx_code_context  = ' ||
723                   p_deflt_ussgl_trx_code_context );
724       arp_util.debug(  'p_deflt_ussgl_transaction_code  = ' ||
725                   p_deflt_ussgl_transaction_code );
726       arp_util.debug(  'p_old_trx_number                = ' ||
727                   p_old_trx_number );
728       arp_util.debug(  'p_interface_header_context      = ' ||
729                   p_interface_header_context );
730       arp_util.debug(  'p_interface_header_attribute1   = ' ||
731                   p_interface_header_attribute1 );
732       arp_util.debug(  'p_interface_header_attribute2   = ' ||
733                   p_interface_header_attribute2 );
734       arp_util.debug(  'p_interface_header_attribute3   = ' ||
735                   p_interface_header_attribute3 );
736       arp_util.debug(  'p_interface_header_attribute4   = ' ||
737                   p_interface_header_attribute4 );
738       arp_util.debug(  'p_interface_header_attribute5   = ' ||
739                   p_interface_header_attribute5 );
740       arp_util.debug(  'p_interface_header_attribute6   = ' ||
741                   p_interface_header_attribute6 );
742       arp_util.debug(  'p_interface_header_attribute7   = ' ||
743                   p_interface_header_attribute7 );
744       arp_util.debug(  'p_interface_header_attribute8   = ' ||
745                   p_interface_header_attribute8 );
746       arp_util.debug(  'p_interface_header_attribute9   = ' ||
747                   p_interface_header_attribute9 );
748       arp_util.debug(  'p_interface_header_attribute10  = ' ||
749                   p_interface_header_attribute10 );
750       arp_util.debug(  'p_interface_header_attribute11  = ' ||
751                   p_interface_header_attribute11 );
752       arp_util.debug(  'p_interface_header_attribute12  = ' ||
753                   p_interface_header_attribute12 );
754       arp_util.debug(  'p_interface_header_attribute13  = ' ||
755                   p_interface_header_attribute13 );
756       arp_util.debug(  'p_interface_header_attribute14  = ' ||
757                   p_interface_header_attribute14 );
758       arp_util.debug(  'p_interface_header_attribute15  = ' ||
759                   p_interface_header_attribute15 );
760       arp_util.debug(  'p_attribute_category            = ' ||
761                   p_attribute_category );
762       arp_util.debug(  'p_attribute1                    = ' ||
763                   p_attribute1 );
764       arp_util.debug(  'p_attribute2                    = ' ||
765                   p_attribute2 );
766       arp_util.debug(  'p_attribute3                    = ' ||
767                   p_attribute3 );
768       arp_util.debug(  'p_attribute4                    = ' ||
769                   p_attribute4 );
770       arp_util.debug(  'p_attribute5                    = ' ||
771                   p_attribute5 );
772       arp_util.debug(  'p_attribute6                    = ' ||
773                   p_attribute6 );
774       arp_util.debug(  'p_attribute7                    = ' ||
775                   p_attribute7 );
776       arp_util.debug(  'p_attribute8                    = ' ||
777                   p_attribute8 );
778       arp_util.debug(  'p_attribute9                    = ' ||
779                   p_attribute9 );
780       arp_util.debug(  'p_attribute10                   = ' ||
781                   p_attribute10 );
782       arp_util.debug(  'p_attribute11                   = ' ||
783                   p_attribute11 );
784       arp_util.debug(  'p_attribute12                   = ' ||
785                   p_attribute12 );
786       arp_util.debug(  'p_attribute13                   = ' ||
787                   p_attribute13 );
788       arp_util.debug(  'p_attribute14                   = ' ||
789                   p_attribute14 );
790       arp_util.debug(  'p_attribute15                   = ' ||
791                   p_attribute15 );
792       arp_util.debug(  'p_commit_customer_trx_line_id   = ' ||
793                   TO_CHAR(p_commit_customer_trx_line_id ) );
794       arp_util.debug(  'p_commit_inventory_item_id      = ' ||
795                   TO_CHAR(p_commit_inventory_item_id ) );
796       arp_util.debug(  'p_commit_memo_line_id           = ' ||
797                   TO_CHAR(p_commit_memo_line_id      ) );
798       arp_util.debug(  'p_commit_description            = ' ||
799                   p_commit_description );
800       arp_util.debug(  'p_commit_extended_amount        = ' ||
801                   p_commit_extended_amount );
802       arp_util.debug(  'p_commit_interface_line_attr1   = ' ||
803                   p_commit_interface_line_attr1 );
804       arp_util.debug(  'p_commit_interface_line_attr2   = ' ||
805                   p_commit_interface_line_attr2 );
806       arp_util.debug(  'p_commit_interface_line_attr3   = ' ||
807                   p_commit_interface_line_attr3 );
808       arp_util.debug(  'p_commit_interface_line_attr4   = ' ||
809                   p_commit_interface_line_attr4 );
810       arp_util.debug(  'p_commit_interface_line_attr5   = ' ||
811                   p_commit_interface_line_attr5 );
812       arp_util.debug(  'p_commit_interface_line_attr6   = ' ||
813                   p_commit_interface_line_attr6 );
814       arp_util.debug(  'p_commit_interface_line_attr7   = ' ||
815                   p_commit_interface_line_attr7 );
816       arp_util.debug(  'p_commit_interface_line_attr8   = ' ||
817                   p_commit_interface_line_attr8 );
818       arp_util.debug(  'p_commit_interface_line_attr9   = ' ||
819                   p_commit_interface_line_attr9 );
820       arp_util.debug(  'p_commit_interface_line_attr10  = ' ||
821                   p_commit_interface_line_attr10 );
822       arp_util.debug(  'p_commit_interface_line_attr11  = ' ||
823                   p_commit_interface_line_attr11 );
824       arp_util.debug(  'p_commit_interface_line_attr12  = ' ||
825                   p_commit_interface_line_attr12 );
826       arp_util.debug(  'p_commit_interface_line_attr13  = ' ||
827                   p_commit_interface_line_attr13 );
828       arp_util.debug(  'p_commit_interface_line_attr14  = ' ||
829                   p_commit_interface_line_attr14 );
830       arp_util.debug(  'p_commit_interface_line_attr15  = ' ||
831                   p_commit_interface_line_attr15 );
832       arp_util.debug(  'p_commit_interface_line_contxt  = ' ||
833                   p_commit_interface_line_contxt );
834       arp_util.debug(  'p_commit_attribute_category     = ' ||
835                   p_commit_attribute_category );
836       arp_util.debug(  'p_commit_attribute1             = ' ||
837                   p_commit_attribute1 );
838       arp_util.debug(  'p_commit_attribute2             = ' ||
839                   p_commit_attribute2 );
840       arp_util.debug(  'p_commit_attribute3             = ' ||
841                   p_commit_attribute3 );
842       arp_util.debug(  'p_commit_attribute4             = ' ||
843                   p_commit_attribute4 );
844       arp_util.debug(  'p_commit_attribute5             = ' ||
845                   p_commit_attribute5 );
846       arp_util.debug(  'p_commit_attribute6             = ' ||
847                   p_commit_attribute6 );
848       arp_util.debug(  'p_commit_attribute7             = ' ||
849                   p_commit_attribute7 );
850       arp_util.debug(  'p_commit_attribute8             = ' ||
851                   p_commit_attribute8 );
852       arp_util.debug(  'p_commit_attribute9             = ' ||
853                   p_commit_attribute9 );
854       arp_util.debug(  'p_commit_attribute10            = ' ||
855                   p_commit_attribute10 );
856       arp_util.debug(  'p_commit_attribute11            = ' ||
857                   p_commit_attribute11 );
858       arp_util.debug(  'p_commit_attribute12            = ' ||
859                   p_commit_attribute12 );
860       arp_util.debug(  'p_commit_attribute13            = ' ||
861                   p_commit_attribute13 );
862       arp_util.debug(  'p_commit_attribute14            = ' ||
863                   p_commit_attribute14 );
864       arp_util.debug(  'p_commit_attribute15            = ' ||
865                   p_commit_attribute15 );
866       arp_util.debug(  'p_ctl_default_ussgl_trx_code    = ' ||
867                   p_ctl_default_ussgl_trx_code );
868    END IF;
869 
870 --{BUG#4897183
871 -- BUG#8349620
872 OPEN cev;
873 FETCH cev INTO l_trx_date, l_gl_date,  l_org_id,  l_sob_id, l_term_id,
874                l_exch_rate, l_exch_date, l_exch_type, l_db_complete_flag;
875 IF cev%FOUND THEN
876   lf := TRUE;
877 ELSE
878   lf := FALSE;
879 END IF;
880 CLOSE cev;
881 
882 IF  lf THEN
883 arp_acct_event_pkg.update_dates_for_trx_event
884 (p_source_id_int_1    => p_customer_trx_id,
885  p_trx_number         => p_trx_number,
886  p_legal_entity_id    => p_legal_entity_id,
887  p_ledger_id          => l_sob_id,
888  p_org_id             => l_org_id,
889  p_event_id           => NULL,
890  p_valuation_method   => NULL,
891  p_entity_type_code   => 'TRANSACTIONS',
892  p_event_type_code    => 'INV_CREATE',
893  p_curr_event_date    => l_gl_date,
894  p_event_date         => p_gl_date,
895  p_status             => 'I',
896  p_action             => 'UPDATE_EVENT_DATE',
897  p_curr_trx_date      => l_trx_date,
898  p_transaction_date   => p_trx_date,
899  x_event_id           => x_event_id);
900 
901 arp_util.debug(  'x_event_id    = ' ||x_event_id );
902 END IF;
903 --}
904 
905 
906 
907 
908 
909  /*-------------------------------------------+
910   |  Convert Y/N parameter flags to booleans  |
911   +-------------------------------------------*/
912 
913 
914    IF (p_recalc_tax_flag = 'Y')
915    THEN  l_recalc_tax_flag := TRUE;
916    ELSE  l_recalc_tax_flag := FALSE;
917    END IF;
918 
919    IF (p_rerun_autoacc_flag = 'Y')
920    THEN  l_rerun_autoacc_flag := TRUE;
921    ELSE  l_rerun_autoacc_flag := FALSE;
922    END IF;
923 
924    /*  Bug 654051:  added NVL around dispute amount */
925    /* Bug No 1311297 : added NVL around dispute amount */
926    arp_process_header.update_header(
927                                       p_form_name,
928                                       p_form_version,
929                                       l_trx_rec,
930                                       p_customer_trx_id,
931                                       NVL(p_trx_amount,0),
932                                       p_trx_class,
933                                       p_gl_date,
934                                       p_initial_customer_trx_line_id,
935                                       l_commit_rec,
936                                       p_open_rec_flag,
937                                       p_term_in_use_flag,
938                                       l_recalc_tax_flag,
939                                       l_rerun_autoacc_flag,
940                                       NVL(p_ps_dispute_amount,0),
941                                       p_ps_dispute_date,
942                                       p_status);
943 
944    /* 5468039 - call etax synchronize routine when gl_dates change */
945    /* 5594687 - call line_det_factors if term_id has changed */
946    /* 8349620 - Added Call to eTax API update_exchange_rate when
947       Exchange details updates.*/
948    IF  lf
949    THEN
950      /* Determine state for etax sync call */
951 
952     IF (p_complete_flag = 'Y') AND (NVL(p_exchange_rate, 0) <> NVL(l_exch_rate, 0) OR
953                                     NVL(p_exchange_rate_type, '$#') <> NVL(l_exch_type, '$#') OR
954 				    NOT((p_exchange_date iS NULL AND l_exch_date IS NULL) OR p_exchange_date = l_exch_date)) THEN
955 
956         arp_etax_services_pkg.update_exchange_info(
957 	              p_customer_trx_id      => p_customer_trx_id,
958 		      p_exchange_rate        => p_exchange_rate,
959 		      p_exchange_date        => p_exchange_date,
960 		      p_exchange_rate_type   => p_exchange_rate_type );
961 
962     END IF;   -- END IF for p_complete_flag chack
963 
964      IF PG_DEBUG in ('Y','C')
965      THEN
966          arp_util.debug('Header exists (lf = TRUE) ');
967          arp_util.debug('   old term_id = ' || l_term_id);
968          arp_util.debug('   new term_id = ' || p_term_id);
969          arp_util.debug('   old_gl_date = ' || l_gl_date);
970          arp_util.debug('   new_gl_date = ' || p_gl_date);
971      END IF;
972 
973      IF NVL(p_term_id, l_term_id) <> l_term_id
974      THEN
975         /* execute line_det_factor update (discount amount
976            may have changed) */
977         IF PG_DEBUG in ('Y','C')
978         THEN
979            arp_debug.debug('term has changed, execute update of LDF');
980         END IF;
981 
982         /* loop through the lines and update line det factors
983            for each */
984         FOR line IN c_line(p_customer_trx_id)
985         LOOP
986            arp_etax_services_pkg.line_det_factors(line.customer_trx_line_id,
987                                                   p_customer_trx_id,
988                                                   'UPDATE');
989         END LOOP;
990 
991         /* Bug 8936486: Start
992         When the payment term is changed for a completed
993         transaction, ETAX validate_for_tax should be called */
994 
995         IF PG_DEBUG in ('Y', 'C') THEN
996           arp_util.debug('l_db_complete_flag = '||l_db_complete_flag);
997         END IF;
998 
999         IF l_db_complete_flag = 'Y' AND p_complete_flag = 'Y' THEN
1000 
1001         arp_etax_services_pkg.validate_for_tax(
1002                                p_customer_trx_id => p_customer_trx_id,
1003                                p_error_mode      => 'STANDARD',
1004                                p_valid_for_tax   => l_tax_validation_status,
1005                                p_number_of_errors=> l_error_count);
1006 
1007         IF PG_DEBUG in ('Y', 'C') THEN
1008           arp_util.debug('num of etax validation errors = '||l_error_count);
1009         END IF;
1010 
1011         END IF;
1012 
1013         /* Bug 8936486: End */
1014 
1015      ELSIF NVL(p_gl_date, l_gl_date) <> l_gl_date
1016      THEN
1017         IF PG_DEBUG in ('Y','C')
1018         THEN
1019            arp_debug.debug('gl_date has changed, execute synchronize w/lines');
1020         END IF;
1021         /* execute synchronize w/ line update */
1022         arp_etax_util.synchronize_for_doc_seq(p_customer_trx_id,l_return_status,
1023                                             NULL,
1024                                             'Y');
1025         IF l_return_status > 0
1026         THEN
1027            arp_util.debug('EXCEPTION:  error calling eBusiness Tax, status = ' ||
1028                            l_return_status);
1029            arp_util.debug('Please review the plsql debug log for additional details.');
1030            p_status := 'SYNCH_DOC_SEQ_ERROR';
1031         END IF;
1032      ELSE
1033         /* execute synchronize w/out line update */
1034         IF PG_DEBUG in ('Y','C')
1035         THEN
1036            arp_debug.debug('execute synchronize for doc seq only');
1037         END IF;
1038 
1039         arp_etax_util.synchronize_for_doc_seq(p_customer_trx_id,l_return_status);
1040 
1041         IF l_return_status > 0
1042         THEN
1043            arp_util.debug('EXCEPTION:  error calling eBusiness Tax, status = ' ||
1044                            l_return_status);
1045            arp_util.debug('Please review the plsql debug log for additional details.');
1046            p_status := 'SYNCH_DOC_SEQ_ERROR';
1047         END IF;
1048      END IF;
1049    END IF;
1050 
1051    IF PG_DEBUG in ('Y', 'C') THEN
1052       arp_util.debug('arp_process_header_updte_cover.update_header_cover()-');
1053    END IF;
1054 
1055 EXCEPTION
1056     WHEN OTHERS THEN
1057        IF PG_DEBUG in ('Y', 'C') THEN
1058           arp_util.debug(
1059            'exception:  arp_process_header_updte_cover.update_header_cover()');
1060        END IF;
1061         RAISE;
1062 
1063 END update_header_cover;
1064 
1065 END ARP_PROCESS_HEADER_UPDTE_COVER;