eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.ARP_PROCESS_CREDIT_UPD_COVER

Source


1 PACKAGE BODY ARP_PROCESS_CREDIT_UPD_COVER AS
2 /* $Header: ARTCCMUB.pls 115.8 2003/10/10 14:27:37 mraymond ship $ */
3 
4 PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
5 
6 PROCEDURE update_header_cover(
7   p_form_name                   IN varchar2,
8   p_form_version                IN number,
9   p_customer_trx_id             IN ra_customer_trx.customer_trx_id%type,
10   p_trx_number                  IN ra_customer_trx.trx_number%type,
11   p_batch_id                    IN ra_batches.batch_id%type,
12   p_trx_date                    IN ra_customer_trx.trx_date%type,
13   p_gl_date                     IN ra_cust_trx_line_gl_dist.gl_date%type,
14   p_complete_flag               IN ra_customer_trx.complete_flag%type,
15   p_prev_customer_trx_id        IN ra_customer_trx.customer_trx_id%type,
16   p_batch_source_id             IN ra_batch_sources.batch_source_id%type,
17   p_cust_trx_type_id            IN ra_cust_trx_types.cust_trx_type_id%type,
18   p_currency_code               IN fnd_currencies.currency_code%type,
19   p_exchange_date               IN ra_customer_trx.exchange_date%type,
20   p_exchange_rate_type          IN ra_customer_trx.exchange_rate_type%type,
21   p_exchange_rate               IN ra_customer_trx.exchange_rate%type,
22   p_invoicing_rule_id           IN ra_customer_trx.invoicing_rule_id%type,
23   p_method_for_rules            IN
24                            ra_customer_trx.credit_method_for_rules%type,
25   p_split_term_method           IN
26                            ra_customer_trx.credit_method_for_installments%type,
27   p_initial_customer_trx_id     IN
28                            ra_customer_trx.initial_customer_trx_id%type,
29   p_primary_salesrep_id         IN ra_customer_trx.primary_salesrep_id%type,
30   p_bill_to_customer_id         IN ra_customer_trx.bill_to_customer_id%type,
31   p_bill_to_address_id          IN ra_customer_trx.bill_to_address_id%type,
32   p_bill_to_site_use_id         IN ra_customer_trx.bill_to_site_use_id%type,
33   p_bill_to_contact_id          IN ra_customer_trx.bill_to_contact_id%type,
34   p_ship_to_customer_id         IN ra_customer_trx.ship_to_customer_id%type,
35   p_ship_to_address_id          IN ra_customer_trx.ship_to_address_id%type,
36   p_ship_to_site_use_id         IN ra_customer_trx.ship_to_site_use_id%type,
37   p_ship_to_contact_id          IN ra_customer_trx.ship_to_contact_id%type,
38   p_receipt_method_id           IN ra_customer_trx.receipt_method_id%type,
39   p_paying_customer_id          IN ra_customer_trx.paying_customer_id%type,
40   p_paying_site_use_id          IN ra_customer_trx.paying_site_use_id%type,
41   p_customer_bank_account_id    IN
42                             ra_customer_trx.customer_bank_account_id%type,
43   p_printing_option             IN ra_customer_trx.printing_option%type,
44   p_printing_last_printed       IN ra_customer_trx.printing_last_printed%type,
45   p_printing_pending            IN ra_customer_trx.printing_pending%type,
46   p_doc_sequence_value          IN ra_customer_trx.doc_sequence_value%type,
47   p_doc_sequence_id             IN ra_customer_trx.doc_sequence_id%type,
48   p_reason_code                 IN ra_customer_trx.reason_code%type,
49   p_customer_reference          IN ra_customer_trx.customer_reference%type,
50   p_customer_reference_date     IN
51                            ra_customer_trx.customer_reference_date%type,
52   p_internal_notes              IN ra_customer_trx.internal_notes%type,
53   p_set_of_books_id             IN ra_customer_trx.set_of_books_id%type,
54   p_created_from                IN ra_customer_trx.created_from%type,
55   p_old_trx_number              IN ra_customer_trx.old_trx_number%type,
56   p_attribute_category          IN ra_customer_trx.attribute_category%type,
57   p_attribute1                  IN ra_customer_trx.attribute1%type,
58   p_attribute2                  IN ra_customer_trx.attribute2%type,
59   p_attribute3                  IN ra_customer_trx.attribute3%type,
60   p_attribute4                  IN ra_customer_trx.attribute4%type,
61   p_attribute5                  IN ra_customer_trx.attribute5%type,
62   p_attribute6                  IN ra_customer_trx.attribute6%type,
63   p_attribute7                  IN ra_customer_trx.attribute7%type,
64   p_attribute8                  IN ra_customer_trx.attribute8%type,
65   p_attribute9                  IN ra_customer_trx.attribute9%type,
66   p_attribute10                 IN ra_customer_trx.attribute10%type,
67   p_attribute11                 IN ra_customer_trx.attribute11%type,
68   p_attribute12                 IN ra_customer_trx.attribute12%type,
69   p_attribute13                 IN ra_customer_trx.attribute13%type,
70   p_attribute14                 IN ra_customer_trx.attribute14%type,
71   p_attribute15                 IN ra_customer_trx.attribute15%type,
72   p_interface_header_context    IN
73                         ra_customer_trx.interface_header_context%type,
74   p_interface_header_attribute1 IN
75                         ra_customer_trx.interface_header_attribute1%type,
76   p_interface_header_attribute2 IN
77                         ra_customer_trx.interface_header_attribute2%type,
78   p_interface_header_attribute3 IN
79                         ra_customer_trx.interface_header_attribute3%type,
80   p_interface_header_attribute4 IN
81                         ra_customer_trx.interface_header_attribute4%type,
82   p_interface_header_attribute5 IN
83                         ra_customer_trx.interface_header_attribute5%type,
84   p_interface_header_attribute6 IN
85                         ra_customer_trx.interface_header_attribute6%type,
86   p_interface_header_attribute7 IN
87                         ra_customer_trx.interface_header_attribute7%type,
88   p_interface_header_attribute8 IN
89                         ra_customer_trx.interface_header_attribute8%type,
90   p_interface_header_attribute9     IN
91                         ra_customer_trx.interface_header_attribute9%type,
92   p_interface_header_attribute10    IN
93                         ra_customer_trx.interface_header_attribute10%type,
94   p_interface_header_attribute11    IN
95                         ra_customer_trx.interface_header_attribute11%type,
96   p_interface_header_attribute12    IN
97                         ra_customer_trx.interface_header_attribute12%type,
98   p_interface_header_attribute13    IN
99                         ra_customer_trx.interface_header_attribute13%type,
100   p_interface_header_attribute14    IN
101                         ra_customer_trx.interface_header_attribute14%type,
102   p_interface_header_attribute15    IN
103                         ra_customer_trx.interface_header_attribute15%type,
104   p_default_ussgl_trx_code IN
105                      ra_customer_trx.default_ussgl_transaction_code%type,
106   p_line_percent                IN number,
107   p_freight_percent             IN number,
108   p_line_amount                 IN ra_customer_trx_lines.extended_amount%type,
109   p_freight_amount              IN ra_customer_trx_lines.extended_amount%type,
110   p_credit_amount               IN ra_customer_trx_lines.extended_amount%type,
111   p_cr_txn_invoicing_rule_id    IN ra_customer_trx.invoicing_rule_id%type,
112   p_rederive_credit_info        IN varchar2,
113   p_rerun_aa                    IN varchar2,
114   p_rerun_cm_module             IN varchar2,
115   p_compute_tax                 IN varchar2,
116   p_comments                    IN ra_customer_trx.comments%type,
117   p_tax_percent             IN OUT NOCOPY number,
118   p_tax_amount              IN OUT NOCOPY ra_customer_trx_lines.extended_amount%type,
119   p_status                     OUT NOCOPY varchar2)
120 IS
121   l_cm_header              ra_customer_trx%rowtype;
122 BEGIN
123     IF PG_DEBUG in ('Y', 'C') THEN
124        arp_util.debug('arp_process_credit_cover.update_header_cover()+');
125     END IF;
126 
127     arp_ct_pkg.set_to_dummy(l_cm_header);
128     --
129     --  populate the record with only the required columns
130     --
131    l_cm_header.batch_id                 := p_batch_id;
132    l_cm_header.trx_number               := p_trx_number;
133    l_cm_header.trx_date                 := p_trx_date;
134    l_cm_header.complete_flag            := p_complete_flag;
135    l_cm_header.previous_customer_trx_id := p_prev_customer_trx_id;
136    l_cm_header.batch_source_id          := p_batch_source_id;
137    l_cm_header.cust_trx_type_id         := p_cust_trx_type_id;
138    l_cm_header.invoice_currency_code    := p_currency_code;
139    l_cm_header.exchange_date            := p_exchange_date;
140    l_cm_header.exchange_rate_type       := p_exchange_rate_type;
141    l_cm_header.exchange_rate            := p_exchange_rate;
142    l_cm_header.credit_method_for_rules  := p_method_for_rules;
143    l_cm_header.credit_method_for_installments := p_split_term_method;
144    l_cm_header.initial_customer_trx_id  := p_initial_customer_trx_id;
145    l_cm_header.reason_code              := p_reason_code;
146    l_cm_header.doc_sequence_id          := p_doc_sequence_id; -- Bug 1115787 doc_sequence_id also is added
147    l_cm_header.doc_sequence_value       := p_doc_sequence_value;
148    l_cm_header.customer_reference       := p_customer_reference;
149    l_cm_header.internal_notes           := p_internal_notes;
150    l_cm_header.set_of_books_id          := p_set_of_books_id;
151    l_cm_header.created_from             := p_created_from;
152    l_cm_header.old_trx_number           := p_old_trx_number;
153    l_cm_header.attribute_category       := p_attribute_category;
154    l_cm_header.attribute1               := p_attribute1;
155    l_cm_header.attribute2               := p_attribute2;
156    l_cm_header.attribute3               := p_attribute3;
157    l_cm_header.attribute4               := p_attribute4;
158    l_cm_header.attribute5               := p_attribute5;
159    l_cm_header.attribute6               := p_attribute6;
160    l_cm_header.attribute7               := p_attribute7;
161    l_cm_header.attribute8               := p_attribute8;
162    l_cm_header.attribute9               := p_attribute9;
163    l_cm_header.attribute10              := p_attribute10;
164    l_cm_header.attribute11              := p_attribute11;
165    l_cm_header.attribute12              := p_attribute12;
166    l_cm_header.attribute13              := p_attribute13;
167    l_cm_header.attribute14              := p_attribute14;
168    l_cm_header.attribute15              := p_attribute15;
169    l_cm_header.interface_header_context     := p_interface_header_context;
170    l_cm_header.interface_header_attribute1  := p_interface_header_attribute1;
171    l_cm_header.interface_header_attribute2  := p_interface_header_attribute2;
172    l_cm_header.interface_header_attribute3  := p_interface_header_attribute3;
173    l_cm_header.interface_header_attribute4  := p_interface_header_attribute4;
174    l_cm_header.interface_header_attribute5  := p_interface_header_attribute5;
175    l_cm_header.interface_header_attribute6  := p_interface_header_attribute6;
176    l_cm_header.interface_header_attribute7  := p_interface_header_attribute7;
177    l_cm_header.interface_header_attribute8  := p_interface_header_attribute8;
178    l_cm_header.interface_header_attribute9  := p_interface_header_attribute9;
179    l_cm_header.interface_header_attribute10 := p_interface_header_attribute10;
180    l_cm_header.interface_header_attribute11 := p_interface_header_attribute11;
181    l_cm_header.interface_header_attribute12 := p_interface_header_attribute12;
182    l_cm_header.interface_header_attribute13 := p_interface_header_attribute13;
183    l_cm_header.interface_header_attribute14 := p_interface_header_attribute14;
184    l_cm_header.interface_header_attribute15 := p_interface_header_attribute15;
185    l_cm_header.default_ussgl_transaction_code :=
186                                                p_default_ussgl_trx_code;
187 
188    l_cm_header.comments := p_comments;
189 
190     --
191     -- call the entity handler
192     --
193     arp_process_credit.update_header(
194              p_form_name,
195              p_form_version,
196              p_customer_trx_id,
197              l_cm_header,
198              'CM',
199              p_gl_date,
200              p_primary_salesrep_id,
201              p_currency_code,
202              p_prev_customer_trx_id,
203              p_line_percent,
204              p_freight_percent,
205              p_line_amount,
206              p_freight_amount,
207              p_credit_amount,
208              p_cr_txn_invoicing_rule_id,
209              p_rederive_credit_info,
210              p_rerun_aa,
211              p_rerun_cm_module,
212              p_compute_tax,
213              p_tax_percent,
214              p_tax_amount,
215              p_status);
216 
217     IF PG_DEBUG in ('Y', 'C') THEN
218        arp_util.debug('arp_process_credit_cover.update_header_cover()-');
219     END IF;
220 
221 EXCEPTION
222   WHEN OTHERS THEN
223     IF PG_DEBUG in ('Y', 'C') THEN
224        arp_util.debug('arp_process_credit_cover.update_header_cover');
225     END IF;
226     RAISE;
227 END update_header_cover;
228 
229 
230 END arp_process_credit_upd_cover;
231