APPS.PA_BILLING_CORE dependencies on PA_BILLING_CORE

Line 1: package body pa_billing_core as

1: package body pa_billing_core as
2: -- $Header: PAXINBCB.pls 120.5.12010000.3 2008/09/29 04:11:19 nkapling ship $
3:
4: -- This is the main billing procedure to verify baseline funding.
5: --

Line 186: x_err_stack := 'pa_billing_core->check_funding_for_baseline';

182: begin
183:
184: x_err_code := 0;
185: old_stack := x_err_stack;
186: x_err_stack := 'pa_billing_core->check_funding_for_baseline';
187:
188: -- check project funding level flag properly
189: check_funding_level(x_project_id,
190: x_funding_level,

Line 272: ( p_pkg_name => 'PA_BILLING_CORE'

268:
269: x_err_code := SQLCODE;
270: -- 10-SEP-97, jwhite: multiple messaging
271: FND_MSG_PUB.Add_Exc_Msg
272: ( p_pkg_name => 'PA_BILLING_CORE'
273: , p_procedure_name => 'VERIFY_BASELINE_FUNDING'
274: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
275: );
276:

Line 444: ( p_pkg_name => 'PA_BILLING_CORE'

440: elsif sqlcode < 0 then
441: x_err_code := SQLCODE;
442: -- 10-SEP-97, jwhite: multiple messaging
443: FND_MSG_PUB.Add_Exc_Msg
444: ( p_pkg_name => 'PA_BILLING_CORE'
445: , p_procedure_name => 'VERIFY_BASELINE_FUNDING'
446: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
447: );
448:

Line 550: ( p_pkg_name => 'PA_BILLING_CORE'

546: when others then
547: x_err_code := SQLCODE;
548: -- 10-SEP-97, jwhite: multiple messaging
549: FND_MSG_PUB.Add_Exc_Msg
550: ( p_pkg_name => 'PA_BILLING_CORE'
551: , p_procedure_name => 'VERIFY_BASELINE_FUNDING'
552: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
553: );
554: return;

Line 579: x_err_stack := 'pa_billing_core->update_funding';

575: begin
576:
577: x_err_code := 0;
578: old_stack := x_err_stack;
579: x_err_stack := 'pa_billing_core->update_funding';
580:
581: x_created_by := FND_GLOBAL.USER_ID;
582: x_last_update_login := FND_GLOBAL.LOGIN_ID;
583:

Line 894: x_err_stack := 'pa_billing_core->check_funding_level';

890: begin
891:
892: x_err_code := 0;
893: old_stack := x_err_stack;
894: x_err_stack := 'pa_billing_core->check_funding_level';
895:
896: -- set project level funding flag
897: x_err_stage := 'Check project level funding flag <'
898: || to_char(x_project_id) || '>';

Line 993: ( p_pkg_name => 'PA_BILLING_CORE'

989: x_err_code := sqlcode;
990: x_funding_level := l_funding_level;
991: -- 10-SEP-97, jwhite: multiple messaging
992: FND_MSG_PUB.Add_Exc_Msg
993: ( p_pkg_name => 'PA_BILLING_CORE'
994: , p_procedure_name => 'CHECK_FUNDING_LEVEL'
995: , p_error_text => 'ORA-'||LPAD(substr(SQLCODE,2),5,'0')
996: );
997: return;

Line 1033: x_err_stack := 'pa_billing_core->copy_agreement';

1029: begin
1030:
1031: x_err_code := 0;
1032: old_stack := x_err_stack;
1033: x_err_stack := 'pa_billing_core->copy_agreement';
1034:
1035: x_err_stage := 'check proj/task level funding ';
1036:
1037:

Line 1210: x_err_stage := 'Call pa_billing_core.copy_funding.';

1206: and nvl(c2.customer_bill_split,0) =
1207: Decode(c2.Default_Top_Task_Cust_Flag, 'Y', 0, 100)
1208: and c2.customer_id = A.customer_id);
1209:
1210: x_err_stage := 'Call pa_billing_core.copy_funding.';
1211:
1212: /* Code fix for bug 2913524 Starts Here */
1213: IF (l_funding_level = 'P' AND x_amount IS NOT NULL AND l_funding_count <> 1 ) THEN
1214: NULL;

Line 1217: pa_billing_core.copy_funding(

1213: IF (l_funding_level = 'P' AND x_amount IS NOT NULL AND l_funding_count <> 1 ) THEN
1214: NULL;
1215: ELSE
1216: /* Code fix for bug 2913524 Ends Here */
1217: pa_billing_core.copy_funding(
1218: x_orig_project_id,
1219: x_new_project_id,
1220: x_agreement_id,
1221: x_delta,

Line 1374: x_err_stack := 'pa_billing_core->copy_funding';

1370: /* MCB2 code ends */
1371: begin
1372:
1373: old_stack := x_err_stack;
1374: x_err_stack := 'pa_billing_core->copy_funding';
1375:
1376: x_err_code := 0;
1377: x_err_stage := 'Get agreement currency ';
1378:

Line 2100: end pa_billing_core ;

2096: Return l_Exist_Flag;
2097:
2098: END Update_Top_Task_Invoice_Method;
2099:
2100: end pa_billing_core ;