PACKAGE BODY: APPS.ARP_PROCESS_INST

Source

1 PACKAGE BODY ARP_PROCESS_INST AS
2 /* $Header: ARTEINSB.pls 115.2 2002/11/18 22:36:37 anukumar ship $ */
3 
4 PROCEDURE update_inst(
5   p_form_name              IN varchar2,
6   p_form_version           IN number,
7   p_ct_id                  IN  ra_customer_trx.customer_trx_id%type,
8   p_prev_ct_id             IN  ra_customer_trx.customer_trx_id%type,
9   p_prev_ps_id             IN  ar_payment_schedules.payment_schedule_id%type,
10   p_currency_code          IN  ar_payment_schedules.invoice_currency_code%type,
11   p_line_credit            IN
12                    ar_payment_schedules.amount_line_items_remaining%type,
13   p_chrg_credit            IN
14                    ar_payment_schedules.amount_line_items_remaining%type,
15   p_tax_credit             IN
16                    ar_receivable_applications.tax_applied%type,
17   p_freight_credit         IN
18                    ar_receivable_applications.freight_applied%type)
19 IS
20   l_commit_amount   number;
21 BEGIN
22 
23     arp_util.debug('arp_process_inst.update_inst()+');
24 
25     arp_maintain_ps.maintain_payment_schedules(
26                         'U',
27                         p_ct_id,
28                         p_prev_ps_id,
29                         p_line_credit,
30                         p_tax_credit,
31                         p_freight_credit,
32                         p_chrg_credit,
33                         l_commit_amount);
34 
35     arp_util.debug('arp_process_inst.update_inst()-');
36 
37 EXCEPTION
38   WHEN OTHERS THEN
39     arp_util.debug('EXCEPTION : arp_process_inst.update_inst');
40     arp_util.debug('p_ct_id            : '||p_ct_id);
41     arp_util.debug('p_prev_ct_id       : '||p_prev_ct_id);
42     arp_util.debug('p_prev_ps_id       : '||p_prev_ps_id);
43     arp_util.debug('p_currency_code    : '||p_currency_code);
44     arp_util.debug('p_line_credit      : '||p_line_credit);
45     arp_util.debug('p_chrg_credit      : '||p_chrg_credit);
46     arp_util.debug('p_tax_credit       : '||p_tax_credit);
47     arp_util.debug('p_freight_credit   : '||p_freight_credit);
48     RAISE;
49 END;
50 
51 END ARP_PROCESS_INST;