DBA Data[Home] [Help]

PACKAGE BODY: APPS.ARP_CTL_PRIVATE_PKG

Source


1 PACKAGE BODY ARP_CTL_PRIVATE_PKG AS
2 /* $Header: ARTCTL2B.pls 120.2 2005/06/23 23:00:59 djancis ship $ */
3 
4 /*===========================================================================+
5  | PROCEDURE                                                                 |
6  |    display_line_rec                                                       |
7  |                                                                           |
8  | DESCRIPTION                                                               |
9  |    Displays the values of all columns except creation_date and            |
10  |    last_update_date.                                                      |
11  |                                                                           |
12  | SCOPE - PRIVATE                                                           |
13  |                                                                           |
14  | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED                                   |
15  |    arp_util.debug                                                         |
16  |                                                                           |
17  | ARGUMENTS  : IN:                                                          |
18  |                       p_line_rec                                          |
19  |              OUT:                                                         |
20  |          IN/ OUT:                                                         |
21  |                                                                           |
22  | RETURNS    : NONE                                                         |
23  |                                                                           |
24  | NOTES                                                                     |
25  |                                                                           |
26  | MODIFICATION HISTORY                                                      |
27  |     19-JUL-95  Subash C            Created                                |
28  |     07-APR-05  Debbie Sue Jancis   ETax: Added Ship to Id's               |
29  +===========================================================================*/
30 PROCEDURE display_line_rec(
31             p_line_rec IN ra_customer_trx_lines%rowtype) IS
32 BEGIN
33    arp_util.debug('arp_ctl_private_pkg.display_line_rec()+');
34 
35    arp_util.debug('******** Dump of ra_customer_trx_lines record *********');
36    arp_util.debug('customer_trx_line_id           : '||
37                                      p_line_rec.customer_trx_line_id);
38    arp_util.debug('customer_trx_id                : '||
39                                      p_line_rec.customer_trx_id);
40 
41    arp_util.debug('initial_customer_trx_line_id   : '||
42                                      p_line_rec.initial_customer_trx_line_id);
43    arp_util.debug('link_to_cust_trx_line_id       : '||
44                                      p_line_rec.link_to_cust_trx_line_id);
45 
46    arp_util.debug('line_type                      : '||p_line_rec.line_type);
47    arp_util.debug('line_number                    : '||p_line_rec.line_number);
48    arp_util.debug('inventory_item_id              : '||
49                                      p_line_rec.inventory_item_id);
50    arp_util.debug('memo_line_id                   : '||p_line_rec.memo_line_id);
51    arp_util.debug('description                    : '||p_line_rec.description);
52    arp_util.debug('quantity_ordered               : '||
53                                      p_line_rec.quantity_ordered);
54    arp_util.debug('quantity_credited              : '||
55                                      p_line_rec.quantity_credited);
56    arp_util.debug('quantity_invoiced              : '||
57                                      p_line_rec.quantity_invoiced);
58    arp_util.debug('uom_code                       : '||p_line_rec.uom_code);
59    arp_util.debug('unit_standard_price            : '||
60                                      p_line_rec.unit_standard_price);
61    arp_util.debug('unit_selling_price             : '||
62                                      p_line_rec.unit_selling_price);
63    arp_util.debug('extended_amount                : '||
64                                      p_line_rec.extended_amount);
65    arp_util.debug('revenue_amount                 : '||
66                                      p_line_rec.revenue_amount);
67 
68    arp_util.debug('reason_code                    : '||
69                                      p_line_rec.reason_code);
70    arp_util.debug('previous_customer_trx_id       : '||
71                                      p_line_rec.previous_customer_trx_id);
72    arp_util.debug('previous_customer_trx_line_id  : '||
73                                      p_line_rec.previous_customer_trx_line_id);
74 
75    arp_util.debug('accounting_rule_id             : '||
76                                      p_line_rec.accounting_rule_id);
77    arp_util.debug('accounting_rule_duration       : '||
78                                      p_line_rec.accounting_rule_duration);
79    arp_util.debug('rule_start_date                : '||
80                                      p_line_rec.rule_start_date);
81    arp_util.debug('autorule_duration_processed    : '||
82                                      p_line_rec.autorule_duration_processed);
83    arp_util.debug('autorule_complete_flag         : '||
84                                      p_line_rec.autorule_complete_flag);
85    arp_util.debug('last_period_to_credit          : '||
86                                      p_line_rec.last_period_to_credit);
87 
88    arp_util.debug('taxable_flag                   : '||p_line_rec.taxable_flag);
89    arp_util.debug('tax_precedence                 : '||
90                                      p_line_rec.tax_precedence);
91    arp_util.debug('tax_rate                       : '||p_line_rec.tax_rate);
92    arp_util.debug('item_exception_rate_id         : '||
93                                      p_line_rec.item_exception_rate_id);
94    arp_util.debug('tax_exemption_id               : '||
95                                      p_line_rec.tax_exemption_id);
96    arp_util.debug('vat_tax_id                     : '||p_line_rec.vat_tax_id);
97    arp_util.debug('autotax                        : '||p_line_rec.autotax);
98    arp_util.debug('item_context                   : '||p_line_rec.item_context);
99    arp_util.debug('tax_exempt_flag                : '||
100                                      p_line_rec.tax_exempt_flag);
101    arp_util.debug('tax_exempt_number              : '||
102                                      p_line_rec.tax_exempt_number);
103    arp_util.debug('tax_exempt_reason_code         : '||
104                                      p_line_rec.tax_exempt_reason_code);
105    arp_util.debug('tax_vendor_return_code         : '||
106                                      p_line_rec.tax_vendor_return_code);
107    arp_util.debug('sales_tax_id                   : '||
108                                      p_line_rec.sales_tax_id);
109    arp_util.debug('location_segment_id            : '||
110                                      p_line_rec.location_segment_id);
111 
112    -- arp_util.debug('last_update_date               : '||
113    --                                   p_line_rec.last_update_date);
114    arp_util.debug('last_updated_by                : '||
115                                      p_line_rec.last_updated_by);
116    -- arp_util.debug('creation_date                  : '||
117    --                                   p_line_rec.creation_date);
118    arp_util.debug('created_by                     : '||p_line_rec.created_by);
119    arp_util.debug('last_update_login              : '||
120                                      p_line_rec.last_update_login);
121    arp_util.debug('request_id                     : '||p_line_rec.request_id);
122    arp_util.debug('program_application_id         : '||
123                                      p_line_rec.program_application_id);
124    arp_util.debug('program_id                     : '||p_line_rec.program_id);
125    -- arp_util.debug('program_update_date            : '||
126    --                                   p_line_rec.program_update_date);
127 
128    arp_util.debug('set_of_books_id                : '||
129                                      p_line_rec.set_of_books_id);
130    arp_util.debug('sales_order_source             : '||
131                                      p_line_rec.sales_order_source);
132    arp_util.debug('sales_order                    : '||
133                                      p_line_rec.sales_order);
134    arp_util.debug('sales_order_revision           : '||
135                                      p_line_rec.sales_order_revision);
136    arp_util.debug('sales_order_line               : '||
137                                      p_line_rec.sales_order_line);
138    arp_util.debug('sales_order_date               : '||
139                                      p_line_rec.sales_order_date);
140    arp_util.debug('movement_id                    : '||
141                                      p_line_rec.movement_id);
142 
143    arp_util.debug('attribute_category             : '||
144                                      p_line_rec.attribute_category);
145    arp_util.debug('attribute1                     : '||p_line_rec.attribute1);
146    arp_util.debug('attribute2                     : '||p_line_rec.attribute2);
147    arp_util.debug('attribute3                     : '||p_line_rec.attribute3);
148    arp_util.debug('attribute4                     : '||p_line_rec.attribute4);
149    arp_util.debug('attribute5                     : '||p_line_rec.attribute5);
150    arp_util.debug('attribute6                     : '||p_line_rec.attribute6);
151    arp_util.debug('attribute7                     : '||p_line_rec.attribute7);
152    arp_util.debug('attribute8                     : '||p_line_rec.attribute8);
153    arp_util.debug('attribute9                     : '||p_line_rec.attribute9);
154    arp_util.debug('attribute10                    : '||p_line_rec.attribute10);
155    arp_util.debug('attribute11                    : '||p_line_rec.attribute11);
156    arp_util.debug('attribute12                    : '||p_line_rec.attribute12);
157    arp_util.debug('attribute13                    : '||p_line_rec.attribute13);
158    arp_util.debug('attribute14                    : '||p_line_rec.attribute14);
159    arp_util.debug('attribute15                    : '||p_line_rec.attribute15);
160 
161    arp_util.debug('interface_line_context         : '||
162                                      p_line_rec.interface_line_context);
163    arp_util.debug('interface_line_attribute1      : '||
164                                      p_line_rec.interface_line_attribute1);
165    arp_util.debug('interface_line_attribute2      : '||
166                                      p_line_rec.interface_line_attribute2);
167    arp_util.debug('interface_line_attribute3      : '||
168                                      p_line_rec.interface_line_attribute3);
169    arp_util.debug('interface_line_attribute4      : '||
170                                      p_line_rec.interface_line_attribute4);
171    arp_util.debug('interface_line_attribute5      : '||
172                                      p_line_rec.interface_line_attribute5);
173    arp_util.debug('interface_line_attribute6      : '||
174                                      p_line_rec.interface_line_attribute6);
175    arp_util.debug('interface_line_attribute7      : '||
176                                      p_line_rec.interface_line_attribute7);
177    arp_util.debug('interface_line_attribute8      : '||
178                                      p_line_rec.interface_line_attribute8);
179    arp_util.debug('interface_line_attribute9      : '||
180                                      p_line_rec.interface_line_attribute9);
181    arp_util.debug('interface_line_attribute10     : '||
182                                      p_line_rec.interface_line_attribute10);
183    arp_util.debug('interface_line_attribute11     : '||
184                                      p_line_rec.interface_line_attribute11);
185    arp_util.debug('interface_line_attribute12     : '||
186                                      p_line_rec.interface_line_attribute12);
187    arp_util.debug('interface_line_attribute13     : '||
188                                      p_line_rec.interface_line_attribute13);
189    arp_util.debug('interface_line_attribute14     : '||
190                                      p_line_rec.interface_line_attribute14);
191    arp_util.debug('interface_line_attribute15     : '||
192                                      p_line_rec.interface_line_attribute15);
193 
194    arp_util.debug('default_ussgl_trx_code_context : '||
195                                      p_line_rec.default_ussgl_trx_code_context);
196    arp_util.debug('default_ussgl_transaction_code : '||
197                                      p_line_rec.default_ussgl_transaction_code);
198    arp_util.debug('payment_set_id : '||
199                                      p_line_rec.payment_set_id);
200 
201    arp_util.debug('ship_to_customer_id : ' ||
202                              p_line_rec.ship_to_customer_id);
203 
204    arp_util.debug('ship_to_site_use_id : ' ||
205                              p_line_rec.ship_to_site_use_id);
206 
207    arp_util.debug('ship_to_contact_id : ' ||
208                              p_line_rec.ship_to_contact_id);
209 
210    arp_util.debug('tax_classification_code : ' ||
211                              p_line_rec.tax_classification_code);
212 
213    arp_util.debug('arp_ctl_private_pkg.display_line_rec()-');
214 
215 EXCEPTION
216     WHEN OTHERS THEN
217         arp_util.debug('EXCEPTION:  arp_ctl_private_pkg.display_line_rec()');
218         RAISE;
219 END;
220 
221 
222 /*===========================================================================+
223  | PROCEDURE                                                                 |
224  |    display_line_p                                                         |
225  |                                                                           |
226  | DESCRIPTION                                                               |
227  |    Displays the values of all columns except creation_date and            |
228  |    last_update_date.                                                      |
229  |                                                                           |
230  | SCOPE - PUBLIC                                                            |
231  |                                                                           |
232  | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED                                   |
233  |    arp_util.debug                                                         |
234  |                                                                           |
235  | ARGUMENTS  : IN:                                                          |
236  |                       p_customer_trx_line_id                              |
237  |              OUT:                                                         |
238  |          IN/ OUT:                                                         |
239  |                                                                           |
240  | RETURNS    : NONE                                                         |
241  |                                                                           |
242  | NOTES                                                                     |
243  |                                                                           |
244  | MODIFICATION HISTORY                                                      |
245  |     19-JUL-95  Subash C            Created                                |
246  |                                                                           |
247  +===========================================================================*/
248 PROCEDURE display_line_p(
249             p_customer_trx_line_id IN
250                    ra_customer_trx_lines.customer_trx_line_id%type) IS
251 
252    l_line_rec ra_customer_trx_lines%rowtype;
253 BEGIN
254    arp_util.debug('arp_ctl_private_pkg.display_line_p()+');
255 
256    arp_ctl_pkg.fetch_p(l_line_rec, p_customer_trx_line_id);
257 
258    arp_ctl_private_pkg.display_line_rec(l_line_rec);
259 
260    arp_util.debug('arp_ctl_private_pkg.display_line_p()-');
261 
262 EXCEPTION
263     WHEN OTHERS THEN
264         arp_util.debug('EXCEPTION:  arp_ctl_private_pkg.display_line_p()');
265 
266         arp_util.debug('');
267         arp_util.debug('-------- parameters for display_line_p() ------');
268         arp_util.debug('p_customer_trx_line_id  = ' ||
269                        p_customer_trx_line_id);
270 
271         RAISE;
272 END;
273 
274 /*===========================================================================+
275  | PROCEDURE                                                                 |
276  |    display_line_f_lctl_id						     |
277  |                                                                           |
281  |                                                                           |
278  | DESCRIPTION                                                               |
279  |    Displays the values of all columns except creation_date and 	     |
280  |    last_update_date.							     |
282  | SCOPE - PUBLIC                                                            |
283  |                                                                           |
284  | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED                                   |
285  |    arp_util.debug                                                         |
286  |                                                                           |
287  | ARGUMENTS  : IN:                                                          |
288  |		      p_link_to_cust_trx_line_id			     |
289  |              OUT:                                                         |
290  |		      None						     |
291  |          IN/ OUT:							     |
292  |                    None						     |
293  |                                                                           |
294  | RETURNS    : NONE                                                         |
295  |                                                                           |
296  | NOTES                                                                     |
297  |                                                                           |
298  | MODIFICATION HISTORY                                                      |
299  |     03-AUG-95  Charlie Tomberg     Created                                |
300  |                                                                           |
301  +===========================================================================*/
302 
303 
304 PROCEDURE display_line_f_lctl_id(  p_link_to_cust_trx_line_id IN
305                          ra_customer_trx_lines.link_to_cust_trx_line_id%type)
306                    IS
307 
308 
309    CURSOR line_cursor IS
310           SELECT *
311           FROM   ra_customer_trx_lines
312           WHERE  link_to_cust_trx_line_id = p_link_to_cust_trx_line_id
313           ORDER BY line_type,
314                    line_number;
315 
316 
317 BEGIN
318 
319    arp_util.debug('arp_ctl_private_pkg.display_line_f_lctl_id()+');
320 
321    arp_util.debug('=====================================================' ||
322                   '==========================');
323    arp_util.debug('========== ' ||
324                   ' Dump of ra_customer_trx_lines records for ltctlid: '||
325 		  to_char( p_link_to_cust_trx_line_id ) || ' ' ||
326                   '==========');
327 
328    FOR l_line_rec IN line_cursor LOOP
329        display_line_p(l_line_rec.customer_trx_line_id);
330    END LOOP;
331 
332    arp_util.debug('====== End ' ||
333                   ' Dump of ra_customer_trx_lines records for ltctlid: '||
334 		  to_char( p_link_to_cust_trx_line_id ) || ' ' ||
335                   '=======');
336    arp_util.debug('=====================================================' ||
337                   '==========================');
338 
339    arp_util.debug('arp_ctl_private_pkg.display_line_f_lctl_id()-');
340 
341 EXCEPTION
342  WHEN OTHERS THEN
343    arp_util.debug('EXCEPTION:  arp_ctl_private_pkg.display_line_f_lctl_id()');
344 
345         arp_util.debug('');
346         arp_util.debug('-------- parameters for display_line_p() ------');
347         arp_util.debug('p_link_to_cust_trx_line_id  = ' ||
348                        p_link_to_cust_trx_line_id);
349 
350    RAISE;
351 
352 END;
353 
354 
355 /*===========================================================================+
356  | PROCEDURE                                                                 |
357  |    display_line_f_ct_id						     |
358  |                                                                           |
359  | DESCRIPTION                                                               |
360  |    Displays the values of all columns except creation_date and 	     |
361  |    last_update_date.							     |
362  |                                                                           |
363  | SCOPE - PUBLIC                                                            |
364  |                                                                           |
365  | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED                                   |
366  |    arp_util.debug                                                         |
367  |                                                                           |
368  | ARGUMENTS  : IN:                                                          |
369  |		      p_customer_trx_id					     |
370  |              OUT:                                                         |
371  |		      None						     |
372  |          IN/ OUT:							     |
373  |                    None						     |
374  |                                                                           |
375  | RETURNS    : NONE                                                         |
376  |                                                                           |
377  | NOTES                                                                     |
378  |                                                                           |
379  | MODIFICATION HISTORY                                                      |
380  |     08-AUG-95  Charlie Tomberg     Created                                |
381  |                                                                           |
382  +===========================================================================*/
383 
384 
385 PROCEDURE display_line_f_ct_id(  p_customer_trx_id IN
386                                         ra_customer_trx.customer_trx_id%type )
387                    IS
388 
389 
390    CURSOR line_cursor IS
391           SELECT *
392           FROM   ra_customer_trx_lines
393           WHERE  customer_trx_id = p_customer_trx_id
394           ORDER BY line_type,
395                    line_number;
396 
397 
398 BEGIN
399 
400    arp_util.debug('arp_ctl_private_pkg.display_line_f_ct_id()+');
401 
402    arp_util.debug('=====================================================' ||
403                   '==========================');
404    arp_util.debug('========== ' ||
405                   ' Dump of ra_customer_trx_lines records for ctid: '||
406 		  to_char( p_customer_trx_id ) || ' ' ||
407                   '==========');
408 
409    FOR l_line_rec IN line_cursor LOOP
410        display_line_p(l_line_rec.customer_trx_line_id);
411    END LOOP;
412 
413    arp_util.debug('====== End ' ||
414                   ' Dump of ra_customer_trx_lines records for ctid: '||
415 		  to_char( p_customer_trx_id ) || ' ' ||
416                   '=======');
417    arp_util.debug('=====================================================' ||
418                   '==========================');
419 
420    arp_util.debug('arp_ctl_private_pkg.display_line_f_ct_id()-');
421 
422 EXCEPTION
423  WHEN OTHERS THEN
424    arp_util.debug('EXCEPTION:  arp_ctl_private_pkg.display_line_f_ct_id()');
425 
426    arp_util.debug('');
427    arp_util.debug('-------- parameters for display_line_f_ct_id() ------');
428    arp_util.debug('p_customer_trx_id  = ' ||
429                        p_customer_trx_id);
430 
431    RAISE;
432 
433 END;
434 
435 END ARP_CTL_PRIVATE_PKG;