13: | |
14: | SCOPE - PRIVATE |
15: | |
16: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
17: | arp_util.debug |
18: | |
19: | ARGUMENTS : IN: |
20: | p_cust_trx_line_gl_dist_id |
21: | p_new_dist_rec |
52: l_amount_percent_changed_flag boolean;
53:
54: BEGIN
55:
56: arp_util.debug('arp_process_dist.set_flags()+');
57:
58: arp_ctlgd_pkg.fetch_p( l_old_dist_rec,
59: p_cust_trx_line_gl_dist_id);
60:
92: p_posted_flag := l_posted_flag;
93: p_ccid_changed_flag := l_ccid_changed_flag;
94: p_amount_percent_changed_flag := l_amount_percent_changed_flag;
95:
96: arp_util.debug('p_posted_flag = ' ||
97: arp_trx_util.boolean_to_varchar2(l_posted_flag));
98:
99: arp_util.debug('p_ccid_changed_flag = ' ||
100: arp_trx_util.boolean_to_varchar2( l_ccid_changed_flag));
95:
96: arp_util.debug('p_posted_flag = ' ||
97: arp_trx_util.boolean_to_varchar2(l_posted_flag));
98:
99: arp_util.debug('p_ccid_changed_flag = ' ||
100: arp_trx_util.boolean_to_varchar2( l_ccid_changed_flag));
101:
102: arp_util.debug('p_amount_percent_changed_flag = ' ||
103: arp_trx_util.boolean_to_varchar2(
98:
99: arp_util.debug('p_ccid_changed_flag = ' ||
100: arp_trx_util.boolean_to_varchar2( l_ccid_changed_flag));
101:
102: arp_util.debug('p_amount_percent_changed_flag = ' ||
103: arp_trx_util.boolean_to_varchar2(
104: l_amount_percent_changed_flag));
105:
106: arp_util.debug('arp_process_dist.set_flags()-');
102: arp_util.debug('p_amount_percent_changed_flag = ' ||
103: arp_trx_util.boolean_to_varchar2(
104: l_amount_percent_changed_flag));
105:
106: arp_util.debug('arp_process_dist.set_flags()-');
107:
108: EXCEPTION
109: WHEN OTHERS THEN
110:
111: /*---------------------------------------------+
112: | Display parameters and raise the exception |
113: +---------------------------------------------*/
114:
115: arp_util.debug('EXCEPTION: arp_process_dist.set_flags()');
116:
117: arp_util.debug('');
118: arp_util.debug('---------- parameters for set_flags() ---------');
119:
113: +---------------------------------------------*/
114:
115: arp_util.debug('EXCEPTION: arp_process_dist.set_flags()');
116:
117: arp_util.debug('');
118: arp_util.debug('---------- parameters for set_flags() ---------');
119:
120: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
121: p_cust_trx_line_gl_dist_id);
114:
115: arp_util.debug('EXCEPTION: arp_process_dist.set_flags()');
116:
117: arp_util.debug('');
118: arp_util.debug('---------- parameters for set_flags() ---------');
119:
120: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
121: p_cust_trx_line_gl_dist_id);
122:
116:
117: arp_util.debug('');
118: arp_util.debug('---------- parameters for set_flags() ---------');
119:
120: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
121: p_cust_trx_line_gl_dist_id);
122:
123: arp_util.debug('');
124:
119:
120: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
121: p_cust_trx_line_gl_dist_id);
122:
123: arp_util.debug('');
124:
125: arp_util.debug('---------- new distribution record ----------');
126: arp_ctlgd_pkg.display_dist_rec( p_new_dist_rec );
127: arp_util.debug('');
121: p_cust_trx_line_gl_dist_id);
122:
123: arp_util.debug('');
124:
125: arp_util.debug('---------- new distribution record ----------');
126: arp_ctlgd_pkg.display_dist_rec( p_new_dist_rec );
127: arp_util.debug('');
128:
129: RAISE;
123: arp_util.debug('');
124:
125: arp_util.debug('---------- new distribution record ----------');
126: arp_ctlgd_pkg.display_dist_rec( p_new_dist_rec );
127: arp_util.debug('');
128:
129: RAISE;
130:
131: END;
138: | |
139: | SCOPE - PRIVATE |
140: | |
141: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
142: | arp_util.debug |
143: | |
144: | ARGUMENTS : IN: |
145: | p_gl_date |
146: | p_trx_date |
176:
177: BEGIN
178:
179: IF PG_DEBUG in ('Y', 'C') THEN
180: arp_util.debug('arp_process_dist.validate_and_default_gl_date()+');
181: END IF;
182:
183: /* bug-7147479 Use GL Date as passed.Commented out the below lines of code
184: which assigns null when invoicing rule id is not null*/
196: l_trx_date := p_trx_date;
197:
198: END IF;*/
199:
200: l_result := arp_util.validate_and_default_gl_date(
201: l_gl_date,
202: l_trx_date,
203: null,
204: null,
214: l_defaulting_rule_used,
215: l_error_message );
216:
217: IF PG_DEBUG in ('Y', 'C') THEN
218: arp_util.debug( 'p_default_gl_date: ' ||
219: TO_CHAR(p_default_gl_date, 'DD-MON-YYYY') );
220: arp_util.debug( 'l_defaulting_rule_used: ' ||
221: l_defaulting_rule_used );
222: arp_util.debug( 'l_error_message: ' || l_error_message );
216:
217: IF PG_DEBUG in ('Y', 'C') THEN
218: arp_util.debug( 'p_default_gl_date: ' ||
219: TO_CHAR(p_default_gl_date, 'DD-MON-YYYY') );
220: arp_util.debug( 'l_defaulting_rule_used: ' ||
221: l_defaulting_rule_used );
222: arp_util.debug( 'l_error_message: ' || l_error_message );
223: END IF;
224:
218: arp_util.debug( 'p_default_gl_date: ' ||
219: TO_CHAR(p_default_gl_date, 'DD-MON-YYYY') );
220: arp_util.debug( 'l_defaulting_rule_used: ' ||
221: l_defaulting_rule_used );
222: arp_util.debug( 'l_error_message: ' || l_error_message );
223: END IF;
224:
225: IF ( not l_result )
226: THEN
235:
236: END IF;
237:
238: IF PG_DEBUG in ('Y', 'C') THEN
239: arp_util.debug('arp_process_dist.validate_and_default_gl_date()-');
240: END IF;
241:
242: EXCEPTION
243: WHEN OTHERS THEN
246: | Display parameters and raise the exception |
247: +---------------------------------------------*/
248:
249: IF PG_DEBUG in ('Y', 'C') THEN
250: arp_util.debug(
251: 'EXCEPTION: arp_process_dist.validate_and_default_gl_date()');
252: arp_util.debug( '');
253: arp_util.debug(
254: '---------- parameters for validate_and_default_gl_date() ---------');
248:
249: IF PG_DEBUG in ('Y', 'C') THEN
250: arp_util.debug(
251: 'EXCEPTION: arp_process_dist.validate_and_default_gl_date()');
252: arp_util.debug( '');
253: arp_util.debug(
254: '---------- parameters for validate_and_default_gl_date() ---------');
255: arp_util.debug( 'p_gl_date = ' || p_gl_date );
256: arp_util.debug( 'p_trx_date = ' || p_trx_date );
249: IF PG_DEBUG in ('Y', 'C') THEN
250: arp_util.debug(
251: 'EXCEPTION: arp_process_dist.validate_and_default_gl_date()');
252: arp_util.debug( '');
253: arp_util.debug(
254: '---------- parameters for validate_and_default_gl_date() ---------');
255: arp_util.debug( 'p_gl_date = ' || p_gl_date );
256: arp_util.debug( 'p_trx_date = ' || p_trx_date );
257: arp_util.debug( 'p_invoicing_rule_id = ' || p_invoicing_rule_id );
251: 'EXCEPTION: arp_process_dist.validate_and_default_gl_date()');
252: arp_util.debug( '');
253: arp_util.debug(
254: '---------- parameters for validate_and_default_gl_date() ---------');
255: arp_util.debug( 'p_gl_date = ' || p_gl_date );
256: arp_util.debug( 'p_trx_date = ' || p_trx_date );
257: arp_util.debug( 'p_invoicing_rule_id = ' || p_invoicing_rule_id );
258: END IF;
259:
252: arp_util.debug( '');
253: arp_util.debug(
254: '---------- parameters for validate_and_default_gl_date() ---------');
255: arp_util.debug( 'p_gl_date = ' || p_gl_date );
256: arp_util.debug( 'p_trx_date = ' || p_trx_date );
257: arp_util.debug( 'p_invoicing_rule_id = ' || p_invoicing_rule_id );
258: END IF;
259:
260: RAISE;
253: arp_util.debug(
254: '---------- parameters for validate_and_default_gl_date() ---------');
255: arp_util.debug( 'p_gl_date = ' || p_gl_date );
256: arp_util.debug( 'p_trx_date = ' || p_trx_date );
257: arp_util.debug( 'p_invoicing_rule_id = ' || p_invoicing_rule_id );
258: END IF;
259:
260: RAISE;
261:
272: | |
273: | SCOPE - PRIVATE |
274: | |
275: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
276: | arp_util.debug |
277: | |
278: | ARGUMENTS : IN: |
279: | p_old_dist_rec |
280: | p_new_dist_rec |
328: l_default_gl_date date;
329:
330: BEGIN
331:
332: arp_util.debug('arp_process_dist.backout_ccid()+');
333:
334: l_old_dist_rec := p_old_dist_rec;
335: l_new_dist_rec := p_new_dist_rec;
336:
384: l_new_dist_rec.percent <> pg_number_dummy
385: )
386: )
387: THEN
388: arp_util.debug('Before setting Acctd amount');
389: l_new_dist_rec.acctd_amount := arpcurr.functional_amount(
390: l_new_dist_rec.amount,
391: p_currency_code,
392: p_exchange_rate,
459: p_currency_code,
460: p_precision,
461: p_mau);
462:
463: arp_util.debug('arp_process_dist.backout_ccid()-');
464:
465: EXCEPTION
466: WHEN OTHERS THEN
467:
468: /*---------------------------------------------+
469: | Display parameters and raise the exception |
470: +---------------------------------------------*/
471:
472: arp_util.debug('EXCEPTION: arp_process_dist.backout_ccid()');
473: arp_util.debug('');
474: arp_util.debug('---------- parameters for backout_ccid() ---------');
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
469: | Display parameters and raise the exception |
470: +---------------------------------------------*/
471:
472: arp_util.debug('EXCEPTION: arp_process_dist.backout_ccid()');
473: arp_util.debug('');
474: arp_util.debug('---------- parameters for backout_ccid() ---------');
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
470: +---------------------------------------------*/
471:
472: arp_util.debug('EXCEPTION: arp_process_dist.backout_ccid()');
473: arp_util.debug('');
474: arp_util.debug('---------- parameters for backout_ccid() ---------');
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
472: arp_util.debug('EXCEPTION: arp_process_dist.backout_ccid()');
473: arp_util.debug('');
474: arp_util.debug('---------- parameters for backout_ccid() ---------');
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
473: arp_util.debug('');
474: arp_util.debug('---------- parameters for backout_ccid() ---------');
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
474: arp_util.debug('---------- parameters for backout_ccid() ---------');
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
482: arp_util.debug('p_mau = ' || p_mau );
475:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
482: arp_util.debug('p_mau = ' || p_mau );
483:
476: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
482: arp_util.debug('p_mau = ' || p_mau );
483:
484: arp_util.debug('');
477: arp_util.debug('p_trx_date = ' || p_trx_date);
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
482: arp_util.debug('p_mau = ' || p_mau );
483:
484: arp_util.debug('');
485:
478: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
479: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
482: arp_util.debug('p_mau = ' || p_mau );
483:
484: arp_util.debug('');
485:
486: RAISE;
480: arp_util.debug('p_currency_code = ' || p_currency_code);
481: arp_util.debug('p_precision = ' || p_precision );
482: arp_util.debug('p_mau = ' || p_mau );
483:
484: arp_util.debug('');
485:
486: RAISE;
487:
488: END;
498: | |
499: | SCOPE - PRIVATE |
500: | |
501: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
502: | arp_util.debug |
503: | |
504: | ARGUMENTS : IN: |
505: | p_old_dist_rec |
506: | p_new_dist_rec |
553: l_default_gl_date date;
554:
555: BEGIN
556:
557: arp_util.debug('arp_process_dist.backout_amount()+');
558:
559: l_old_dist_rec := p_old_dist_rec;
560: l_new_dist_rec := p_new_dist_rec;
561:
613: p_precision,
614: p_mau);
615:
616:
617: arp_util.debug('arp_process_dist.backout_amount()-');
618:
619: EXCEPTION
620: WHEN OTHERS THEN
621:
622: /*---------------------------------------------+
623: | Display parameters and raise the exception |
624: +---------------------------------------------*/
625:
626: arp_util.debug('EXCEPTION: arp_process_dist.backout_amount()');
627: arp_util.debug('');
628: arp_util.debug('---------- parameters for backout_amount() ---------');
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
623: | Display parameters and raise the exception |
624: +---------------------------------------------*/
625:
626: arp_util.debug('EXCEPTION: arp_process_dist.backout_amount()');
627: arp_util.debug('');
628: arp_util.debug('---------- parameters for backout_amount() ---------');
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
624: +---------------------------------------------*/
625:
626: arp_util.debug('EXCEPTION: arp_process_dist.backout_amount()');
627: arp_util.debug('');
628: arp_util.debug('---------- parameters for backout_amount() ---------');
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
626: arp_util.debug('EXCEPTION: arp_process_dist.backout_amount()');
627: arp_util.debug('');
628: arp_util.debug('---------- parameters for backout_amount() ---------');
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
627: arp_util.debug('');
628: arp_util.debug('---------- parameters for backout_amount() ---------');
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
628: arp_util.debug('---------- parameters for backout_amount() ---------');
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
636: arp_util.debug('p_mau = ' || p_mau );
629:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
636: arp_util.debug('p_mau = ' || p_mau );
637:
630: arp_util.debug('p_header_gl_date = ' || p_header_gl_date);
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
636: arp_util.debug('p_mau = ' || p_mau );
637:
638: arp_util.debug('');
631: arp_util.debug('p_trx_date = ' || p_trx_date);
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
636: arp_util.debug('p_mau = ' || p_mau );
637:
638: arp_util.debug('');
639:
632: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
633: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
636: arp_util.debug('p_mau = ' || p_mau );
637:
638: arp_util.debug('');
639:
640: RAISE;
634: arp_util.debug('p_currency_code = ' || p_currency_code);
635: arp_util.debug('p_precision = ' || p_precision );
636: arp_util.debug('p_mau = ' || p_mau );
637:
638: arp_util.debug('');
639:
640: RAISE;
641:
642: END;
655: | |
656: | SCOPE - PRIVATE |
657: | |
658: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
659: | arp_util.debug |
660: | |
661: | ARGUMENTS : IN: |
662: | p_dist_rec |
663: | OUT: |
678:
679: BEGIN
680:
681: IF PG_DEBUG in ('Y', 'C') THEN
682: arp_util.debug('arp_process_dist.val_tax_from_revenue()+');
683: END IF;
684:
685: /* 4594101 - Removing validate_tax_enforcement
686: this is handled by etax during calculation */
685: /* 4594101 - Removing validate_tax_enforcement
686: this is handled by etax during calculation */
687:
688: IF PG_DEBUG in ('Y', 'C') THEN
689: arp_util.debug('arp_process_dist.val_tax_from_revenue()-');
690: END IF;
691:
692: EXCEPTION
693: WHEN OTHERS THEN
696: | Display parameters and raise the exception |
697: +---------------------------------------------*/
698:
699: IF PG_DEBUG in ('Y', 'C') THEN
700: arp_util.debug(
701: 'EXCEPTION: arp_process_dist.val_tax_from_revenue()');
702: arp_util.debug('---------- val_tax_from_revenue() ---------');
703: END IF;
704: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
698:
699: IF PG_DEBUG in ('Y', 'C') THEN
700: arp_util.debug(
701: 'EXCEPTION: arp_process_dist.val_tax_from_revenue()');
702: arp_util.debug('---------- val_tax_from_revenue() ---------');
703: END IF;
704: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
705:
706: RAISE;
717: | |
718: | SCOPE - PRIVATE |
719: | |
720: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
721: | arp_util.debug |
722: | |
723: | ARGUMENTS : IN: |
724: | p_dist_rec |
725: | OUT: |
739:
740:
741: BEGIN
742:
743: arp_util.debug('arp_process_dist.val_insert_dist()+');
744:
745:
746: arp_util.debug('arp_process_dist.val_val_insert_dist()-');
747:
742:
743: arp_util.debug('arp_process_dist.val_insert_dist()+');
744:
745:
746: arp_util.debug('arp_process_dist.val_val_insert_dist()-');
747:
748: EXCEPTION
749: WHEN OTHERS THEN
750:
751: /*---------------------------------------------+
752: | Display parameters and raise the exception |
753: +---------------------------------------------*/
754:
755: arp_util.debug(
756: 'EXCEPTION: arp_process_dist.val_insert_dist()');
757:
758: arp_util.debug('---------- val_insert_dist() ---------');
759: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
754:
755: arp_util.debug(
756: 'EXCEPTION: arp_process_dist.val_insert_dist()');
757:
758: arp_util.debug('---------- val_insert_dist() ---------');
759: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
760:
761: RAISE;
762:
771: | |
772: | SCOPE - PRIVATE |
773: | |
774: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
775: | arp_util.debug |
776: | |
777: | ARGUMENTS : IN: |
778: | p_dist_rec |
779: | OUT: |
793:
794:
795: BEGIN
796:
797: arp_util.debug('arp_process_dist.val_update_dist()+');
798:
799:
800: arp_util.debug('arp_process_dist.val_val_update_dist()-');
801:
796:
797: arp_util.debug('arp_process_dist.val_update_dist()+');
798:
799:
800: arp_util.debug('arp_process_dist.val_val_update_dist()-');
801:
802: EXCEPTION
803: WHEN OTHERS THEN
804:
805: /*---------------------------------------------+
806: | Display parameters and raise the exception |
807: +---------------------------------------------*/
808:
809: arp_util.debug(
810: 'EXCEPTION: arp_process_dist.val_update_dist()');
811:
812:
813: arp_util.debug('---------- val_update_dist() ---------');
809: arp_util.debug(
810: 'EXCEPTION: arp_process_dist.val_update_dist()');
811:
812:
813: arp_util.debug('---------- val_update_dist() ---------');
814: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
815:
816: RAISE;
817:
826: | |
827: | SCOPE - PRIVATE |
828: | |
829: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
830: | arp_util.debug |
831: | |
832: | ARGUMENTS : IN: |
833: | p_dist_rec |
834: | OUT: |
847:
848:
849: BEGIN
850:
851: arp_util.debug('arp_process_dist.val_delete_dist()+');
852:
853:
854: arp_util.debug('arp_process_dist.val_delete_dist()-');
855:
850:
851: arp_util.debug('arp_process_dist.val_delete_dist()+');
852:
853:
854: arp_util.debug('arp_process_dist.val_delete_dist()-');
855:
856: EXCEPTION
857: WHEN OTHERS THEN
858:
859: /*---------------------------------------------+
860: | Display parameters and raise the exception |
861: +---------------------------------------------*/
862:
863: arp_util.debug('EXCEPTION: arp_process_dist.val_delete_dist()');
864:
865:
866: arp_util.debug('---------- val_update_dist() ---------');
867: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
862:
863: arp_util.debug('EXCEPTION: arp_process_dist.val_delete_dist()');
864:
865:
866: arp_util.debug('---------- val_update_dist() ---------');
867: arp_ctlgd_pkg.display_dist_rec(p_dist_rec);
868:
869: RAISE;
870:
880: | |
881: | SCOPE - PUBLIC |
882: | |
883: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
884: | arp_util.debug |
885: | |
886: | ARGUMENTS : IN: |
887: | p_form_name |
888: | p_form_version |
927: --bug#2750340
928: l_ev_rec arp_xla_events.xla_events_type;
929: BEGIN
930:
931: arp_util.debug('arp_process_dist.insert_dist()+');
932:
933: /*----------------------------------------------+
934: | Check the form version to determine if it |
935: | is compatible with the entity handler. |
979: l_ev_rec.xla_call := 'B';
980: l_ev_rec.xla_fetch_size := 999;
981: arp_xla_events.create_events(p_xla_ev_rec => l_ev_rec );
982:
983: arp_util.debug('arp_process_dist.insert_dist()-');
984:
985: EXCEPTION
986: WHEN OTHERS THEN
987:
984:
985: EXCEPTION
986: WHEN OTHERS THEN
987:
988: arp_util.debug('EXCEPTION: arp_process_dist.insert_dist()');
989:
990: /*---------------------------------------------+
991: | Display parameters and raise the exception |
992: +---------------------------------------------*/
990: /*---------------------------------------------+
991: | Display parameters and raise the exception |
992: +---------------------------------------------*/
993:
994: arp_util.debug('EXCEPTION: arp_process_dist.set_flags()');
995:
996: arp_util.debug('');
997: arp_util.debug('---------- insert_dist() ---------');
998:
992: +---------------------------------------------*/
993:
994: arp_util.debug('EXCEPTION: arp_process_dist.set_flags()');
995:
996: arp_util.debug('');
997: arp_util.debug('---------- insert_dist() ---------');
998:
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
993:
994: arp_util.debug('EXCEPTION: arp_process_dist.set_flags()');
995:
996: arp_util.debug('');
997: arp_util.debug('---------- insert_dist() ---------');
998:
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
995:
996: arp_util.debug('');
997: arp_util.debug('---------- insert_dist() ---------');
998:
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
996: arp_util.debug('');
997: arp_util.debug('---------- insert_dist() ---------');
998:
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
1004: arp_util.debug('p_mau = ' || p_mau );
997: arp_util.debug('---------- insert_dist() ---------');
998:
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
1004: arp_util.debug('p_mau = ' || p_mau );
1005:
998:
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
1004: arp_util.debug('p_mau = ' || p_mau );
1005:
1006: arp_util.debug('');
999: arp_util.debug('p_form_name = ' || p_form_name);
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
1004: arp_util.debug('p_mau = ' || p_mau );
1005:
1006: arp_util.debug('');
1007: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1000: arp_util.debug('p_form_version = ' || p_form_version);
1001: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
1004: arp_util.debug('p_mau = ' || p_mau );
1005:
1006: arp_util.debug('');
1007: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1008: arp_util.debug('');
1002: arp_util.debug('p_currency_code = ' || p_currency_code);
1003: arp_util.debug('p_precision = ' || p_precision );
1004: arp_util.debug('p_mau = ' || p_mau );
1005:
1006: arp_util.debug('');
1007: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1008: arp_util.debug('');
1009:
1010: RAISE;
1004: arp_util.debug('p_mau = ' || p_mau );
1005:
1006: arp_util.debug('');
1007: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1008: arp_util.debug('');
1009:
1010: RAISE;
1011:
1012: END;
1020: | |
1021: | SCOPE - PUBLIC |
1022: | |
1023: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1024: | arp_util.debug |
1025: | |
1026: | ARGUMENTS : IN: |
1027: | p_form_name |
1028: | p_form_version |
1102: l_ev_rec arp_xla_events.xla_events_type;
1103:
1104: BEGIN
1105:
1106: arp_util.debug('arp_process_dist.update_dist()+');
1107:
1108: /*----------------------------------------------+
1109: | Check the form version to determine if it |
1110: | is compatible with the entity handler. |
1141: l_amount_percent_changed_flag = TRUE
1142: )
1143: )
1144: THEN l_backout_flag := TRUE;
1145: arp_util.debug('revised backout flag: TRUE');
1146: ELSE l_backout_flag := p_backout_flag;
1147:
1148: arp_util.debug('revised backout flag: ' ||
1149: arp_trx_util.boolean_to_varchar2(l_backout_flag ));
1144: THEN l_backout_flag := TRUE;
1145: arp_util.debug('revised backout flag: TRUE');
1146: ELSE l_backout_flag := p_backout_flag;
1147:
1148: arp_util.debug('revised backout flag: ' ||
1149: arp_trx_util.boolean_to_varchar2(l_backout_flag ));
1150:
1151: END IF;
1152:
1186: /*------------------------------------------------+
1187: | Call the table handler to do a simple update |
1188: +------------------------------------------------*/
1189:
1190: arp_util.debug('simple update - case 1');
1191: arp_ctlgd_pkg.update_p( p_dist_rec,
1192: p_cust_trx_line_gl_dist_id,
1193: p_exchange_rate,
1194: p_currency_code,
1355: | Do a simple update with no backout. |
1356: | Nothing of consequence has changed. |
1357: +--------------------------------------*/
1358:
1359: arp_util.debug('simple update - case 2');
1360:
1361: arp_ctlgd_pkg.update_p(p_dist_rec,
1362: p_cust_trx_line_gl_dist_id,
1363: p_exchange_rate,
1394: l_ev_rec.xla_call := 'B';
1395: l_ev_rec.xla_fetch_size := 999;
1396: arp_xla_events.create_events(p_xla_ev_rec => l_ev_rec );
1397:
1398: arp_util.debug('arp_process_dist.update_dist()-');
1399:
1400: EXCEPTION
1401: WHEN OTHERS THEN
1402:
1403: /*---------------------------------------------+
1404: | Display parameters and raise the exception |
1405: +---------------------------------------------*/
1406:
1407: arp_util.debug('EXCEPTION: arp_process_dist.update_dist()');
1408: arp_util.debug('---------- parameters for update_dist() ---------');
1409: arp_util.debug('p_form_name = ' || p_form_name);
1410: arp_util.debug('p_form_version = ' || p_form_version);
1411:
1404: | Display parameters and raise the exception |
1405: +---------------------------------------------*/
1406:
1407: arp_util.debug('EXCEPTION: arp_process_dist.update_dist()');
1408: arp_util.debug('---------- parameters for update_dist() ---------');
1409: arp_util.debug('p_form_name = ' || p_form_name);
1410: arp_util.debug('p_form_version = ' || p_form_version);
1411:
1412:
1405: +---------------------------------------------*/
1406:
1407: arp_util.debug('EXCEPTION: arp_process_dist.update_dist()');
1408: arp_util.debug('---------- parameters for update_dist() ---------');
1409: arp_util.debug('p_form_name = ' || p_form_name);
1410: arp_util.debug('p_form_version = ' || p_form_version);
1411:
1412:
1413: arp_util.debug('p_backout_flag = ' ||
1406:
1407: arp_util.debug('EXCEPTION: arp_process_dist.update_dist()');
1408: arp_util.debug('---------- parameters for update_dist() ---------');
1409: arp_util.debug('p_form_name = ' || p_form_name);
1410: arp_util.debug('p_form_version = ' || p_form_version);
1411:
1412:
1413: arp_util.debug('p_backout_flag = ' ||
1414: arp_trx_util.boolean_to_varchar2(p_backout_flag));
1409: arp_util.debug('p_form_name = ' || p_form_name);
1410: arp_util.debug('p_form_version = ' || p_form_version);
1411:
1412:
1413: arp_util.debug('p_backout_flag = ' ||
1414: arp_trx_util.boolean_to_varchar2(p_backout_flag));
1415:
1416: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
1417: p_cust_trx_line_gl_dist_id);
1412:
1413: arp_util.debug('p_backout_flag = ' ||
1414: arp_trx_util.boolean_to_varchar2(p_backout_flag));
1415:
1416: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
1417: p_cust_trx_line_gl_dist_id);
1418:
1419: arp_util.debug('p_customer_trx_id = ' ||
1420: p_customer_trx_id);
1415:
1416: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
1417: p_cust_trx_line_gl_dist_id);
1418:
1419: arp_util.debug('p_customer_trx_id = ' ||
1420: p_customer_trx_id);
1421:
1422: arp_util.debug('p_header_gl_date = ' || p_header_gl_date );
1423: arp_util.debug('p_trx_date = ' || p_trx_date);
1418:
1419: arp_util.debug('p_customer_trx_id = ' ||
1420: p_customer_trx_id);
1421:
1422: arp_util.debug('p_header_gl_date = ' || p_header_gl_date );
1423: arp_util.debug('p_trx_date = ' || p_trx_date);
1424: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1419: arp_util.debug('p_customer_trx_id = ' ||
1420: p_customer_trx_id);
1421:
1422: arp_util.debug('p_header_gl_date = ' || p_header_gl_date );
1423: arp_util.debug('p_trx_date = ' || p_trx_date);
1424: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1427: arp_util.debug('p_currency_code = ' || p_currency_code);
1420: p_customer_trx_id);
1421:
1422: arp_util.debug('p_header_gl_date = ' || p_header_gl_date );
1423: arp_util.debug('p_trx_date = ' || p_trx_date);
1424: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1427: arp_util.debug('p_currency_code = ' || p_currency_code);
1428: arp_util.debug('p_precision = ' || p_precision );
1422: arp_util.debug('p_header_gl_date = ' || p_header_gl_date );
1423: arp_util.debug('p_trx_date = ' || p_trx_date);
1424: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1427: arp_util.debug('p_currency_code = ' || p_currency_code);
1428: arp_util.debug('p_precision = ' || p_precision );
1429: arp_util.debug('p_mau = ' || p_mau );
1430:
1423: arp_util.debug('p_trx_date = ' || p_trx_date);
1424: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1427: arp_util.debug('p_currency_code = ' || p_currency_code);
1428: arp_util.debug('p_precision = ' || p_precision );
1429: arp_util.debug('p_mau = ' || p_mau );
1430:
1431: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1424: arp_util.debug('p_invoicing_rule_id = ' || p_invoicing_rule_id);
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1427: arp_util.debug('p_currency_code = ' || p_currency_code);
1428: arp_util.debug('p_precision = ' || p_precision );
1429: arp_util.debug('p_mau = ' || p_mau );
1430:
1431: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1432:
1425:
1426: arp_util.debug('p_exchange_rate = ' || p_exchange_rate);
1427: arp_util.debug('p_currency_code = ' || p_currency_code);
1428: arp_util.debug('p_precision = ' || p_precision );
1429: arp_util.debug('p_mau = ' || p_mau );
1430:
1431: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1432:
1433: RAISE;
1443: | |
1444: | SCOPE - PUBLIC |
1445: | |
1446: | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
1447: | arp_util.debug |
1448: | |
1449: | ARGUMENTS : IN: |
1450: | p_form_name |
1451: | p_form_version |
1478:
1479:
1480: BEGIN
1481:
1482: arp_util.debug('arp_process_dist.delete_dist()+');
1483:
1484: /*----------------------------------------------+
1485: | Check the form version to determine if it |
1486: | is compatible with the entity handler. |
1510: | Validate tax from revenue account. |
1511: +----------------------------------------------------*/
1512: val_tax_from_revenue( p_dist_rec );
1513:
1514: arp_util.debug('arp_process_dist.delete_dist()-');
1515:
1516: EXCEPTION
1517: WHEN OTHERS THEN
1518:
1519: /*---------------------------------------------+
1520: | Display parameters and raise the exception |
1521: +---------------------------------------------*/
1522:
1523: arp_util.debug('EXCEPTION: arp_process_dist.delete_dist()');
1524:
1525: arp_util.debug('---------- delete_dist() ---------');
1526:
1527: arp_util.debug('p_form_name = ' || p_form_name);
1521: +---------------------------------------------*/
1522:
1523: arp_util.debug('EXCEPTION: arp_process_dist.delete_dist()');
1524:
1525: arp_util.debug('---------- delete_dist() ---------');
1526:
1527: arp_util.debug('p_form_name = ' || p_form_name);
1528: arp_util.debug('p_form_version = ' || p_form_version);
1529:
1523: arp_util.debug('EXCEPTION: arp_process_dist.delete_dist()');
1524:
1525: arp_util.debug('---------- delete_dist() ---------');
1526:
1527: arp_util.debug('p_form_name = ' || p_form_name);
1528: arp_util.debug('p_form_version = ' || p_form_version);
1529:
1530: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
1531: p_cust_trx_line_gl_dist_id);
1524:
1525: arp_util.debug('---------- delete_dist() ---------');
1526:
1527: arp_util.debug('p_form_name = ' || p_form_name);
1528: arp_util.debug('p_form_version = ' || p_form_version);
1529:
1530: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
1531: p_cust_trx_line_gl_dist_id);
1532:
1526:
1527: arp_util.debug('p_form_name = ' || p_form_name);
1528: arp_util.debug('p_form_version = ' || p_form_version);
1529:
1530: arp_util.debug('p_cust_trx_line_gl_dist_id = ' ||
1531: p_cust_trx_line_gl_dist_id);
1532:
1533: arp_ctlgd_pkg.display_dist_rec( p_dist_rec );
1534: