42: l_rule_set_id number;
43:
44: begin
45:
46: arp_util.debug('ARP_APP_CALC_PKG: GET_RULE_SET_ID()+');
47: select nvl(rule_set_id,nvl(arp_standard.sysparm.rule_set_id,-1))
48: into l_rule_set_id
49: from ra_cust_trx_types
50: where cust_trx_type_id = p_trx_type_id ;
53: fnd_message.set_name('AR','AR_NO_RULE_DEFINED');
54: app_exception.raise_exception;
55: end if;
56:
57: arp_util.debug('ARP_APP_CALC_PKG: GET_RULE_SET_ID()- Rule Set Id = '||to_char(l_rule_set_id));
58:
59: return(l_rule_set_id);
60:
61: EXCEPTION
59: return(l_rule_set_id);
60:
61: EXCEPTION
62: WHEN OTHERS THEN
63: arp_util.debug('EXCEPTION: ARP_APP_CALC_PKG.GET_RULE_SET_ID() - OTHERS'||SQLERRM);
64: RAISE;
65: end;
66:
67: /*===========================================================================+
102: for rules_in_cache in 1..j loop
103: if p_rule_set_id = rule_set_id_tab(rules_in_cache) then
104: g_rule_start := rule_start_tab(rules_in_cache);
105: g_rule_end := rule_end_tab(rules_in_cache);
106: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rules cached = '|| to_char(j));
107: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Current rule-set-id = '|| to_char(p_rule_set_id));
108: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Cached at index = '|| to_char(rules_in_cache));
109: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule Start = '|| to_char(g_rule_start));
110: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule End = '|| to_char(g_rule_end));
103: if p_rule_set_id = rule_set_id_tab(rules_in_cache) then
104: g_rule_start := rule_start_tab(rules_in_cache);
105: g_rule_end := rule_end_tab(rules_in_cache);
106: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rules cached = '|| to_char(j));
107: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Current rule-set-id = '|| to_char(p_rule_set_id));
108: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Cached at index = '|| to_char(rules_in_cache));
109: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule Start = '|| to_char(g_rule_start));
110: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule End = '|| to_char(g_rule_end));
111: end if;
104: g_rule_start := rule_start_tab(rules_in_cache);
105: g_rule_end := rule_end_tab(rules_in_cache);
106: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rules cached = '|| to_char(j));
107: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Current rule-set-id = '|| to_char(p_rule_set_id));
108: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Cached at index = '|| to_char(rules_in_cache));
109: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule Start = '|| to_char(g_rule_start));
110: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule End = '|| to_char(g_rule_end));
111: end if;
112: end loop;
105: g_rule_end := rule_end_tab(rules_in_cache);
106: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rules cached = '|| to_char(j));
107: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Current rule-set-id = '|| to_char(p_rule_set_id));
108: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Cached at index = '|| to_char(rules_in_cache));
109: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule Start = '|| to_char(g_rule_start));
110: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule End = '|| to_char(g_rule_end));
111: end if;
112: end loop;
113:
106: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rules cached = '|| to_char(j));
107: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Current rule-set-id = '|| to_char(p_rule_set_id));
108: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Cached at index = '|| to_char(rules_in_cache));
109: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule Start = '|| to_char(g_rule_start));
110: arp_util.debug('ARP_APP_CALC_PKG.set_rule_set - Rule End = '|| to_char(g_rule_end));
111: end if;
112: end loop;
113:
114: if ((g_rule_start = 0) and ( g_rule_end = 0 )) then
139: end if;
140: g_rule_end := nvl(g_rule_start - 1
141: + CEIL( ( length (l_rule_source_lng) / l_rule_chunk ) ),1);
142:
143: arp_util.debug('ARP_APP_CALC_PKG: Rule Start = ' || to_char(g_rule_start));
144: arp_util.debug('ARP_APP_CALC_PKG: Rule End = ' || to_char(g_rule_end)) ;
145: arp_util.debug('ARP_APP_CALC_PKG: Rule length = ' || to_char(length(l_rule_source_lng))) ;
146: arp_util.debug('ARP_APP_CALC_PKG: l_in_rule_start = ' || to_char(l_in_rule_start));
147: arp_util.debug('ARP_APP_CALC_PKG: l_rule_chunk = ' || to_char(l_rule_chunk));
140: g_rule_end := nvl(g_rule_start - 1
141: + CEIL( ( length (l_rule_source_lng) / l_rule_chunk ) ),1);
142:
143: arp_util.debug('ARP_APP_CALC_PKG: Rule Start = ' || to_char(g_rule_start));
144: arp_util.debug('ARP_APP_CALC_PKG: Rule End = ' || to_char(g_rule_end)) ;
145: arp_util.debug('ARP_APP_CALC_PKG: Rule length = ' || to_char(length(l_rule_source_lng))) ;
146: arp_util.debug('ARP_APP_CALC_PKG: l_in_rule_start = ' || to_char(l_in_rule_start));
147: arp_util.debug('ARP_APP_CALC_PKG: l_rule_chunk = ' || to_char(l_rule_chunk));
148: arp_util.debug('ARP_APP_CALC_PKG: rule_set_id = ' || to_char(p_rule_set_id));
141: + CEIL( ( length (l_rule_source_lng) / l_rule_chunk ) ),1);
142:
143: arp_util.debug('ARP_APP_CALC_PKG: Rule Start = ' || to_char(g_rule_start));
144: arp_util.debug('ARP_APP_CALC_PKG: Rule End = ' || to_char(g_rule_end)) ;
145: arp_util.debug('ARP_APP_CALC_PKG: Rule length = ' || to_char(length(l_rule_source_lng))) ;
146: arp_util.debug('ARP_APP_CALC_PKG: l_in_rule_start = ' || to_char(l_in_rule_start));
147: arp_util.debug('ARP_APP_CALC_PKG: l_rule_chunk = ' || to_char(l_rule_chunk));
148: arp_util.debug('ARP_APP_CALC_PKG: rule_set_id = ' || to_char(p_rule_set_id));
149:
142:
143: arp_util.debug('ARP_APP_CALC_PKG: Rule Start = ' || to_char(g_rule_start));
144: arp_util.debug('ARP_APP_CALC_PKG: Rule End = ' || to_char(g_rule_end)) ;
145: arp_util.debug('ARP_APP_CALC_PKG: Rule length = ' || to_char(length(l_rule_source_lng))) ;
146: arp_util.debug('ARP_APP_CALC_PKG: l_in_rule_start = ' || to_char(l_in_rule_start));
147: arp_util.debug('ARP_APP_CALC_PKG: l_rule_chunk = ' || to_char(l_rule_chunk));
148: arp_util.debug('ARP_APP_CALC_PKG: rule_set_id = ' || to_char(p_rule_set_id));
149:
150: for i in g_rule_start..g_rule_end loop
143: arp_util.debug('ARP_APP_CALC_PKG: Rule Start = ' || to_char(g_rule_start));
144: arp_util.debug('ARP_APP_CALC_PKG: Rule End = ' || to_char(g_rule_end)) ;
145: arp_util.debug('ARP_APP_CALC_PKG: Rule length = ' || to_char(length(l_rule_source_lng))) ;
146: arp_util.debug('ARP_APP_CALC_PKG: l_in_rule_start = ' || to_char(l_in_rule_start));
147: arp_util.debug('ARP_APP_CALC_PKG: l_rule_chunk = ' || to_char(l_rule_chunk));
148: arp_util.debug('ARP_APP_CALC_PKG: rule_set_id = ' || to_char(p_rule_set_id));
149:
150: for i in g_rule_start..g_rule_end loop
151: g_rule_source(i) := substr(l_rule_source_lng,l_in_rule_start,l_rule_chunk);
144: arp_util.debug('ARP_APP_CALC_PKG: Rule End = ' || to_char(g_rule_end)) ;
145: arp_util.debug('ARP_APP_CALC_PKG: Rule length = ' || to_char(length(l_rule_source_lng))) ;
146: arp_util.debug('ARP_APP_CALC_PKG: l_in_rule_start = ' || to_char(l_in_rule_start));
147: arp_util.debug('ARP_APP_CALC_PKG: l_rule_chunk = ' || to_char(l_rule_chunk));
148: arp_util.debug('ARP_APP_CALC_PKG: rule_set_id = ' || to_char(p_rule_set_id));
149:
150: for i in g_rule_start..g_rule_end loop
151: g_rule_source(i) := substr(l_rule_source_lng,l_in_rule_start,l_rule_chunk);
152: l_in_rule_start := l_in_rule_start + l_rule_chunk ;
165: for i in g_rule_start..g_rule_end loop
166: l_test_source := g_rule_source(i) ;
167:
168: -- bug 2389772 : turn off display of source code
169: -- arp_util.debug(l_test_source);
170: end loop;
171:
172: end if;
173: EXCEPTION
171:
172: end if;
173: EXCEPTION
174: WHEN OTHERS THEN
175: arp_util.debug('EXCEPTION: ARP_APP_CALC_PKG.SET_RULE_SET()'||SQLERRM);
176: RAISE;
177: end;
178:
179:
292:
293: EXCEPTION
294: WHEN OTHERS THEN
295: IF PG_DEBUG in ('Y', 'C') THEN
296: arp_util.debug('EXCEPTION: ARP_APP_CALC_PKG.extract_taxes'||SQLERRM);
297: END IF;
298: RAISE;
299:
300: end extract_taxes;
463: dbms_sql.parse(cursor_name , g_rule_source , g_rule_start , g_rule_end ,
464: FALSE , dbms_sql.v7);
465:
466: IF PG_DEBUG in ('Y', 'C') THEN
467: arp_util.debug('calc_applied_and_remaining: ' || '(After Parse): dbms_sql bind variables: ');
468: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
464: FALSE , dbms_sql.v7);
465:
466: IF PG_DEBUG in ('Y', 'C') THEN
467: arp_util.debug('calc_applied_and_remaining: ' || '(After Parse): dbms_sql bind variables: ');
468: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
465:
466: IF PG_DEBUG in ('Y', 'C') THEN
467: arp_util.debug('calc_applied_and_remaining: ' || '(After Parse): dbms_sql bind variables: ');
468: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
466: IF PG_DEBUG in ('Y', 'C') THEN
467: arp_util.debug('calc_applied_and_remaining: ' || '(After Parse): dbms_sql bind variables: ');
468: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
467: arp_util.debug('calc_applied_and_remaining: ' || '(After Parse): dbms_sql bind variables: ');
468: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
468: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
469: arp_util.debug('calc_applied_and_remaining: ' || ':amt : '||to_char(amt));
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
470: arp_util.debug('calc_applied_and_remaining: ' || ':line_remaining : '||to_char(t_line_remaining));
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
471: arp_util.debug('calc_applied_and_remaining: ' || ':freight_remaining : '||to_char(t_freight_remaining));
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
472: arp_util.debug('calc_applied_and_remaining: ' || ':charges_remaining : '||to_char(t_charges_remaining));
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
480: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
473: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(t_line_applied));
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
480: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
481: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
474: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(t_freight_applied));
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
480: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
481: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
482: END IF;
475: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(t_charges_applied));
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
480: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
481: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
482: END IF;
483:
476: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
480: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
481: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
482: END IF;
483:
484: -- +ve values are passed here. It will not affect the applied amounts
477: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
478: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
479: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
480: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
481: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
482: END IF;
483:
484: -- +ve values are passed here. It will not affect the applied amounts
485: -- They will be converted back at the end of this procedure.
500: dbms_sql.bind_variable(cursor_name , ':o_charges_tax_treatment' ,o_charges_tax_treatment,30);
501:
502: rows_processed := dbms_sql.execute(cursor_name);
503: IF PG_DEBUG in ('Y', 'C') THEN
504: arp_util.debug('calc_applied_and_remaining: ' || 'After dbms_sql.execute: rows_processed = : '||to_char(rows_processed));
505: END IF;
506:
507: dbms_sql.variable_value(cursor_name , ':line_applied',r_line_applied );
508: dbms_sql.variable_value(cursor_name , ':freight_applied',r_freight_applied );
514: dbms_sql.variable_value(cursor_name , ':o_freight_tax_treatment' ,o_freight_tax_treatment);
515: dbms_sql.variable_value(cursor_name , ':o_charges_tax_treatment' ,o_charges_tax_treatment);
516:
517: IF PG_DEBUG in ('Y', 'C') THEN
518: arp_util.debug('calc_applied_and_remaining: ' || '(After Execute): dbms_sql variable values: ');
519: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
515: dbms_sql.variable_value(cursor_name , ':o_charges_tax_treatment' ,o_charges_tax_treatment);
516:
517: IF PG_DEBUG in ('Y', 'C') THEN
518: arp_util.debug('calc_applied_and_remaining: ' || '(After Execute): dbms_sql variable values: ');
519: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
516:
517: IF PG_DEBUG in ('Y', 'C') THEN
518: arp_util.debug('calc_applied_and_remaining: ' || '(After Execute): dbms_sql variable values: ');
519: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
517: IF PG_DEBUG in ('Y', 'C') THEN
518: arp_util.debug('calc_applied_and_remaining: ' || '(After Execute): dbms_sql variable values: ');
519: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
518: arp_util.debug('calc_applied_and_remaining: ' || '(After Execute): dbms_sql variable values: ');
519: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
519: arp_util.debug('calc_applied_and_remaining: ' || ':currency : '||currency);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
527: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
520: arp_util.debug('calc_applied_and_remaining: ' || ':line_applied : '||to_char(r_line_applied));
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
527: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
528: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
521: arp_util.debug('calc_applied_and_remaining: ' || ':freight_applied : '||to_char(r_freight_applied));
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
527: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
528: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
529: END IF;
522: arp_util.debug('calc_applied_and_remaining: ' || ':charges_applied : '||to_char(r_charges_applied));
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
527: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
528: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
529: END IF;
530:
523: arp_util.debug('calc_applied_and_remaining: ' || ':line_tax_treatment : '||l_line_tax_treatment);
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
527: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
528: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
529: END IF;
530:
531: --
524: arp_util.debug('calc_applied_and_remaining: ' || ':freight_tax_treatment : '||l_freight_tax_treatment);
525: arp_util.debug('calc_applied_and_remaining: ' || ':charges_tax_treatment : '||l_charges_tax_treatment);
526: arp_util.debug('calc_applied_and_remaining: ' || ':o_line_tax_treatment : '||o_line_tax_treatment);
527: arp_util.debug('calc_applied_and_remaining: ' || ':o_freight_tax_treatment : '||o_freight_tax_treatment);
528: arp_util.debug('calc_applied_and_remaining: ' || ':o_charges_tax_treatment : '||o_charges_tax_treatment);
529: END IF;
530:
531: --
532: --Sometimes one could overapply on an invoice that has remaining amounts equal to zero.
630:
631: EXCEPTION
632: WHEN OTHERS THEN
633: IF PG_DEBUG in ('Y', 'C') THEN
634: arp_util.debug('EXCEPTION: ARP_APP_CALC_PKG.calc_applied_and_remaining()'||SQLERRM);
635: END IF;
636: RAISE;
637:
638:
923: *
924: * Temporarily zero out NOCOPY components with sign opposite to that of 'amt',
925: * so that 'amt' may be applied to the same-sign amounts first.
926: */
927: arp_util.debug('Treating invoice components that have mixed signs.');
928: arp_util.debug('p_amt = ' || to_char(p_amt));
929:
930: p_line_remaining := l_ms_use_line * p_line_remaining;
931: p_line_tax_remaining := l_ms_use_line_tax * p_line_tax_remaining;
924: * Temporarily zero out NOCOPY components with sign opposite to that of 'amt',
925: * so that 'amt' may be applied to the same-sign amounts first.
926: */
927: arp_util.debug('Treating invoice components that have mixed signs.');
928: arp_util.debug('p_amt = ' || to_char(p_amt));
929:
930: p_line_remaining := l_ms_use_line * p_line_remaining;
931: p_line_tax_remaining := l_ms_use_line_tax * p_line_tax_remaining;
932: p_freight_remaining := l_ms_use_freight * p_freight_remaining;
944: ELSE
945: l_ms_applied_amt := l_ms_gross_remaining;
946: END IF;
947:
948: arp_util.debug('1. call calc_applied_and_remaining with params : ');
949: arp_util.debug(' l_ms_applied_amt = ' || to_char(l_ms_applied_amt));
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
945: l_ms_applied_amt := l_ms_gross_remaining;
946: END IF;
947:
948: arp_util.debug('1. call calc_applied_and_remaining with params : ');
949: arp_util.debug(' l_ms_applied_amt = ' || to_char(l_ms_applied_amt));
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
946: END IF;
947:
948: arp_util.debug('1. call calc_applied_and_remaining with params : ');
949: arp_util.debug(' l_ms_applied_amt = ' || to_char(l_ms_applied_amt));
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
947:
948: arp_util.debug('1. call calc_applied_and_remaining with params : ');
949: arp_util.debug(' l_ms_applied_amt = ' || to_char(l_ms_applied_amt));
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
955: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
948: arp_util.debug('1. call calc_applied_and_remaining with params : ');
949: arp_util.debug(' l_ms_applied_amt = ' || to_char(l_ms_applied_amt));
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
955: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
956: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
949: arp_util.debug(' l_ms_applied_amt = ' || to_char(l_ms_applied_amt));
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
955: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
956: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
957:
950: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
955: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
956: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
957:
958: calc_applied_and_remaining ( l_ms_applied_amt
951: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
955: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
956: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
957:
958: calc_applied_and_remaining ( l_ms_applied_amt
959: ,p_rule_set_id
952: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
953: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
954: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
955: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
956: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
957:
958: calc_applied_and_remaining ( l_ms_applied_amt
959: ,p_rule_set_id
960: ,p_currency
1016: /*
1017: * Still some amt left. Apply as usual.
1018: */
1019:
1020: arp_util.debug('Treating invoice components that have the same sign.');
1021:
1022: arp_util.debug('2. call calc_applied_and_remaining with params : ');
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1018: */
1019:
1020: arp_util.debug('Treating invoice components that have the same sign.');
1021:
1022: arp_util.debug('2. call calc_applied_and_remaining with params : ');
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1019:
1020: arp_util.debug('Treating invoice components that have the same sign.');
1021:
1022: arp_util.debug('2. call calc_applied_and_remaining with params : ');
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1020: arp_util.debug('Treating invoice components that have the same sign.');
1021:
1022: arp_util.debug('2. call calc_applied_and_remaining with params : ');
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1021:
1022: arp_util.debug('2. call calc_applied_and_remaining with params : ');
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1029: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
1022: arp_util.debug('2. call calc_applied_and_remaining with params : ');
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1029: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
1030: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
1023: arp_util.debug(' l_amt_remaining = ' || to_char(l_amt_remaining));
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1029: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
1030: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
1031:
1024: arp_util.debug(' p_rule_set_id = ' || to_char(p_rule_set_id));
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1029: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
1030: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
1031:
1032: calc_applied_and_remaining ( l_amt_remaining
1025: arp_util.debug(' p_line_remaining = ' || to_char(p_line_remaining));
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1029: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
1030: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
1031:
1032: calc_applied_and_remaining ( l_amt_remaining
1033: ,p_rule_set_id
1026: arp_util.debug(' p_line_tax_remaining = ' || to_char(p_line_tax_remaining));
1027: arp_util.debug(' p_freight_remaining = ' || to_char(p_freight_remaining));
1028: arp_util.debug(' l_freight_tax_remaining = ' || to_char(l_freight_tax_remaining));
1029: arp_util.debug(' p_charges_remaining = ' || to_char(p_charges_remaining));
1030: arp_util.debug(' l_charges_tax_remaining = ' || to_char(l_charges_tax_remaining));
1031:
1032: calc_applied_and_remaining ( l_amt_remaining
1033: ,p_rule_set_id
1034: ,p_currency
1065: arp_standard.debug('calc_applied_and_remaining() Wrapper -');
1066:
1067: EXCEPTION
1068: WHEN OTHERS THEN
1069: arp_util.debug('EXCEPTION: ARP_APP_CALC_PKG.calc_applied_and_remaining: Wrapper: '||SQLERRM);
1070: RAISE;
1071:
1072: END;
1073:
1716:
1717: EXCEPTION
1718: WHEN OTHERS THEN
1719: IF PG_DEBUG in ('Y', 'C') THEN
1720: arp_util.debug('EXCEPTION: ARP_APP_CALC_PKG.compile_rule'||SQLERRM);
1721: END IF;
1722: RAISE;
1723:
1724: end COMPILE_RULE;