DBA Data[Home] [Help]

APPS.PA_PLAN_REVENUE dependencies on PA_PLAN_REVENUE

Line 1: PACKAGE BODY PA_PLAN_REVENUE AS

1: PACKAGE BODY PA_PLAN_REVENUE AS
2: -- $Header: PAXPLRTB.pls 120.7.12000000.3 2007/05/24 13:24:05 kmaddi ship $
3: l_no_cost EXCEPTION;
4: l_no_revenue EXCEPTION;
5: l_no_bill_rate EXCEPTION;

Line 21: g_module_name VARCHAR2(100) := 'pa.plsql.PA_PLAN_REVENUE';

17:
18: g_success CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
19: g_error CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
20: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
21: g_module_name VARCHAR2(100) := 'pa.plsql.PA_PLAN_REVENUE';
22: g_expenditure_type_tbl SYSTEM.PA_VARCHAR2_30_TBL_TYPE := SYSTEM.PA_VARCHAR2_30_TBL_TYPE();
23: g_uom_tbl SYSTEM.PA_VARCHAR2_30_TBL_TYPE := SYSTEM.PA_VARCHAR2_30_TBL_TYPE();
24: g_count_init NUMBER:=0;
25:

Line 91: pa_debug.write('PA_PLAN_REVENUE.Get_Res_Class_Hierarchy_Rate: ' || g_module_name,pa_debug.g_err_stage,3);

87: /*Checking all the mandatory Parameters */
88:
89: IF g1_debug_mode = 'Y' THEN
90: pa_debug.g_err_stage := 'p_res_class_rate_sch_id:'||p_res_class_rate_sch_id||'p_res_class_org_id :'||p_res_class_org_id||'p_org_id:'||p_org_id ;
91: pa_debug.write('PA_PLAN_REVENUE.Get_Res_Class_Hierarchy_Rate: ' || g_module_name,pa_debug.g_err_stage,3);
92: END IF;
93: IF g1_debug_mode = 'Y' THEN
94: pa_debug.g_err_stage := 'p_resource_class_code:'||p_resource_class_code||'p_item_date :'||p_item_date ;
95: pa_debug.write('PA_PLAN_REVENUE.Get_Res_Class_Hierarchy_Rate: ' || g_module_name,pa_debug.g_err_stage,3);

Line 95: pa_debug.write('PA_PLAN_REVENUE.Get_Res_Class_Hierarchy_Rate: ' || g_module_name,pa_debug.g_err_stage,3);

91: pa_debug.write('PA_PLAN_REVENUE.Get_Res_Class_Hierarchy_Rate: ' || g_module_name,pa_debug.g_err_stage,3);
92: END IF;
93: IF g1_debug_mode = 'Y' THEN
94: pa_debug.g_err_stage := 'p_resource_class_code:'||p_resource_class_code||'p_item_date :'||p_item_date ;
95: pa_debug.write('PA_PLAN_REVENUE.Get_Res_Class_Hierarchy_Rate: ' || g_module_name,pa_debug.g_err_stage,3);
96: END IF;
97:
98: IF p_res_class_rate_sch_id IS NULL OR p_item_date IS NULL
99: OR p_resource_class_code IS NULL THEN

Line 339: PA_DEBUG.init_err_stack( 'PA_PLAN_REVENUE.Get_planning_rates');

335:
336: -- Initializing return status with success so that if some unexpected error comes
337: -- , we change its status from succes to error so that we can take necessary step to rectify the problem
338: l_x_return_status := g_success;
339: PA_DEBUG.init_err_stack( 'PA_PLAN_REVENUE.Get_planning_rates');
340: IF g1_debug_mode = 'Y' THEN
341: pa_debug.g_err_stage:='Input parameters:-> p_project_id :'||p_project_id ||'p_task_id :'||p_task_id;
342: pa_debug.write('Get_planning_rates: ' || g_module_name,pa_debug.g_err_stage,3);
343: END IF;

Line 591: l_x_msg_data := 'pa_plan_revenue.Get_Plan_Actual_Rev_Rates :' || SUBSTR(SQLERRM,1,250);

587: exception occurs in the parent procedure definition */
588: IF l_raw_cost_rejection_code IS NOT NULL OR l_burden_cost_rejection_code IS NOT NULL THEN
589: l_x_msg_data := 'PA_COST1.Get_Plan_Actual_Cost_Rates:' || SUBSTR(SQLERRM,1,250);
590: ELSE
591: l_x_msg_data := 'pa_plan_revenue.Get_Plan_Actual_Rev_Rates :' || SUBSTR(SQLERRM,1,250);
592: END IF;
593: l_raw_cost_rejection_code := SUBSTR(SQLERRM,1,30);
594: l_burden_cost_rejection_code := SUBSTR(SQLERRM,1,30);
595: l_revenue_rejection_code := SUBSTR(SQLERRM,1,30);

Line 604: -- Call pa_plan_revenue.Get_plan_plan_rates (parameters);

600: RAISE l_Get_planning_Rates_api;
601: END;
602: ELSE
603:
604: -- Call pa_plan_revenue.Get_plan_plan_rates (parameters);
605:
606: IF g1_debug_mode = 'Y' THEN
607: pa_debug.g_err_stage:='Before Calling the Get_plan_plan_Rates:p_use_planning_rates_flag '||p_use_planning_rates_flag ;
608: pa_debug.write('Get_planning_rates: ' || g_module_name,pa_debug.g_err_stage,3);

Line 704: l_x_msg_data := 'pa_plan_revenue.Get_Plan_plan_Rev_Rates :' || SUBSTR(SQLERRM,1,250);

700: WHEN OTHERS THEN
701: IF l_raw_cost_rejection_code IS NOT NULL OR l_burden_cost_rejection_code IS NOT NULL THEN
702: l_x_msg_data := 'PA_COST1.Get_Plan_actual_Cost_Rates:' || SUBSTR(SQLERRM,1,250);
703: ELSE
704: l_x_msg_data := 'pa_plan_revenue.Get_Plan_plan_Rev_Rates :' || SUBSTR(SQLERRM,1,250);
705: END IF;
706: l_raw_cost_rejection_code := SUBSTR(SQLERRM,1,30);
707: l_burden_cost_rejection_code := SUBSTR(SQLERRM,1,30);
708: l_revenue_rejection_code := SUBSTR(SQLERRM,1,30);

Line 827: l_x_msg_data := 'pa_plan_revenue.Get_plan_res_class_rates:' || SUBSTR(SQLERRM,1,250);

823:
824:
825: EXCEPTION
826: WHEN OTHERS THEN
827: l_x_msg_data := 'pa_plan_revenue.Get_plan_res_class_rates:' || SUBSTR(SQLERRM,1,250);
828: l_raw_cost_rejection_code := SUBSTR(SQLERRM,1,30);
829: l_burden_cost_rejection_code := SUBSTR(SQLERRM,1,30);
830: l_revenue_rejection_code := SUBSTR(SQLERRM,1,30);
831: IF g1_debug_mode = 'Y' THEN

Line 1877: pa_debug.init_err_stack('PA_PLAN_REVENUE.Get_plan_res_class_rates');

1873: l_ovr_msg_data VARCHAR2(1000);
1874:
1875: BEGIN
1876:
1877: pa_debug.init_err_stack('PA_PLAN_REVENUE.Get_plan_res_class_rates');
1878:
1879: IF g1_debug_mode = 'Y' THEN
1880: pa_debug.g_err_stage:='Validating input parameters:->p_schedule_type'||p_schedule_type||'p_rate_based_flag'||p_rate_based_flag||'p_uom'||p_uom||'p_raw_cost'||p_raw_cost||'p_raw_revenue'||p_raw_revenue;
1881: pa_debug.write('Get_plan_res_class_rates: ' || g_module_name,pa_debug.g_err_stage,3);

Line 3413: END PA_PLAN_REVENUE;

3409:
3410: END Get_plan_plan_Rates;
3411: BEGIN
3412: Get_exp_type_uom;
3413: END PA_PLAN_REVENUE;
3414: