[Home] [Help]
PACKAGE BODY: APPS.ARP_PROCESS_RECUR_COVER
Source
1 PACKAGE BODY ARP_PROCESS_RECUR_COVER AS
2 /* $Header: ARTERCCB.pls 120.4 2006/01/17 15:36:38 vcrisost ship $ */
3
4 PROCEDURE insert_recur_cover( p_form_name IN varchar2 ,
5 p_form_version IN number,
6 p_customer_trx_id IN ra_recur_interim.customer_trx_id%type,
7 p_trx_number IN ra_recur_interim.trx_number%type,
8 p_trx_date IN ra_recur_interim.trx_date%type,
9 p_term_due_date IN ra_recur_interim.term_due_date%type,
10 p_gl_date IN ra_recur_interim.gl_date%type,
11 p_term_discount_date IN ra_recur_interim.term_discount_date%type,
12 p_request_id IN ra_recur_interim.request_id%type,
13 p_doc_sequence_value IN ra_recur_interim.doc_sequence_value%type,
14 p_new_customer_trx_id IN ra_recur_interim.new_customer_trx_id%type,
15 p_batch_source_id IN ra_batch_sources.batch_source_id%type,
16 p_cust_trx_type_id IN number,
17 p_trx_no OUT NOCOPY ra_recur_interim.trx_number%type,
18 p_billing_date IN ra_recur_interim.billing_date%type DEFAULT NULL) IS
19 l_rec_rec ra_recur_interim%rowtype;
20 l_trx_no ra_recur_interim.trx_number%type;
21
22 Begin
23
24 arp_util.debug('arp_recur_inv.insert_recur_cover()+');
25 l_rec_rec.customer_trx_id := p_customer_trx_id;
26 l_rec_rec.trx_number := p_trx_number;
27 l_rec_rec.trx_date := p_trx_date;
28 l_rec_rec.term_due_date := p_term_due_date;
29 l_rec_rec.gl_date := p_gl_date;
30 l_rec_rec.term_discount_date := p_term_discount_date;
31 l_rec_rec.request_id := p_request_id;
32 l_rec_rec.doc_sequence_value := p_doc_sequence_value;
33 l_rec_rec.new_customer_trx_id := p_new_customer_trx_id;
34 l_rec_rec.billing_date := p_billing_date;
35
36 arp_process_recur.insert_recur( p_form_name,
37 p_form_version,
38 l_rec_rec,
39 p_batch_source_id,
40 p_cust_trx_type_id,
41 l_trx_no );
42
43 p_trx_no := l_trx_no;
44
45 arp_util.debug('arp_process_recur_cover.trx_no is'||l_trx_no);
46 arp_util.debug('arp_process_recur_cover.document_sequence_value is'||l_trx_no);
47 arp_util.debug('arp_recur_inv.insert_recur_cover()-');
48
49 EXCEPTION
50 WHEN OTHERS THEN
51 arp_util.debug('EXCEPTION : arp_recur_inv.insert_recur_cover');
52 arp_util.debug('p_form_name : '||p_form_name);
53 arp_util.debug('p_form_version : '||p_form_version);
54 arp_util.debug('p_trx_date : '||p_trx_date);
55 arp_util.debug('p_billing_date : '||p_billing_date);
56 arp_util.debug('p_term_due_date : '||p_term_due_date);
57 arp_util.debug('p_customer_trx_id : '||p_customer_trx_id);
58 arp_util.debug('p_customer_trx_id : '||p_customer_trx_id);
59 arp_util.debug('p_customer_trx_id : '||p_customer_trx_id);
60 arp_util.debug('p_customer_trx_id : '||p_customer_trx_id);
61
62 RAISE;
63
64 End;
65 END ARP_PROCESS_RECUR_COVER;