DBA Data[Home] [Help]

APPS.PA_RATE_PVT_PKG dependencies on PA_RATE_PVT_PKG

Line 1: PACKAGE BODY PA_RATE_PVT_PKG as

1: PACKAGE BODY PA_RATE_PVT_PKG as
2: /* $Header: PAXRTPVB.pls 120.4.12010000.3 2008/10/08 23:31:38 skkoppul ship $ */
3: -- This procedure contains consolidated procedure and function to calculate the raw cost,
4: -- burdened cost and raw revenue on the basis of passed parameters
5: -- Input parameters

Line 274: PA_DEBUG.g_err_stage := 'RT10 : Before Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';

270:
271: BEGIN
272: IF g1_debug_mode = 'Y' THEN
273: PA_DEBUG.Set_Curr_Function( p_function => 'Get_Item_Amount');
274: PA_DEBUG.g_err_stage := 'RT10 : Before Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
275: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
276: END IF;
277:
278: /* Validating that the required parameters should not be null */

Line 759: PA_DEBUG.g_err_stage := 'RT11 : After Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';

755:
756: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));
757:
758:
759: PA_DEBUG.g_err_stage := 'RT11 : After Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
760: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
761:
762: -- dbms_output.put_line('l_labor_schedule_fixed_date '||to_char(l_labor_schedule_fixed_date,'dd-mon-yyyy'));
763:

Line 1399: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';

1395:
1396: -- dbms_output.put_line(' End error in multi cost '||x_cost_rejct_reason);
1397: -- dbms_output.put_line('end of procs '||l_x_return_status);
1398: IF g1_debug_mode = 'Y' THEN
1399: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';
1400: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1401: PA_DEBUG.Reset_Curr_Function;
1402: END IF;
1403:

Line 1528: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

1524:
1525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1526: x_error_msg := SUBSTR(SQLERRM,1,30);
1527: /* Checking error condition. Added for bug 2218386 */
1528: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1529: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1530: p_procedure_name => 'Get_Item_Amount');
1531: RAISE;
1532: END IF;

Line 1529: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',

1525: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1526: x_error_msg := SUBSTR(SQLERRM,1,30);
1527: /* Checking error condition. Added for bug 2218386 */
1528: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1529: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1530: p_procedure_name => 'Get_Item_Amount');
1531: RAISE;
1532: END IF;
1533: END Get_Item_Amount;

Line 1556: x_projfunc_revenue_tab OUT NOCOPY PA_RATE_PVT_PKG.ProjAmt_TabTyp /* This tabwill store aount in project functional currency */) --File.Sql.39 bug 4440895

1552: px_projfunc_bil_rate_type IN OUT NOCOPY VARCHAR2, -- added for MCB2 --File.Sql.39 bug 4440895
1553: px_projfunc_bil_rate_date IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
1554: px_projfunc_bil_exchange_rate IN OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
1555: x_error_code OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1556: x_projfunc_revenue_tab OUT NOCOPY PA_RATE_PVT_PKG.ProjAmt_TabTyp /* This tabwill store aount in project functional currency */) --File.Sql.39 bug 4440895
1557: IS
1558:
1559: l_completion_date pa_projects_all.completion_date%TYPE;
1560: l_period_type pa_rep_period_dates_v.period_type%TYPE;

Line 1632: PA_RATE_PVT_PKG.get_rep_period_dates (

1628: /* Added code for bug 2691192, this proc. will replace the call of
1629: pa_rep_period_dates_v.Because of performance issue tis view has been split
1630: in this new call of proc. */
1631:
1632: PA_RATE_PVT_PKG.get_rep_period_dates (
1633: p_period_type => l_period_type,
1634: p_completion_date => l_completion_date,
1635: x_period_year => l_period_year,
1636: x_period_name => l_period_name,

Line 1717: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

1713: px_projfunc_bil_rate_date := lx_projfunc_bil_rate_date ;
1714: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1715:
1716: /* Checking error condition. Added for bug 2218386 */
1717: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1718: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1719: p_procedure_name => 'calc_event_based_revenue');
1720: RAISE;
1721: END IF;

Line 1718: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',

1714: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1715:
1716: /* Checking error condition. Added for bug 2218386 */
1717: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1718: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1719: p_procedure_name => 'calc_event_based_revenue');
1720: RAISE;
1721: END IF;
1722:

Line 1741: p_projfunc_cost_tab IN PA_RATE_PVT_PKG.ProjAmt_TabTyp,

1737:
1738: PROCEDURE calc_cost_based_revenue(
1739: p_project_id IN NUMBER ,
1740: p_rev_amt IN NUMBER ,
1741: p_projfunc_cost_tab IN PA_RATE_PVT_PKG.ProjAmt_TabTyp,
1742: p_project_currency_code IN VARCHAR2, -- The following 6
1743: p_projfunc_currency_code IN VARCHAR2,
1744: p_projfunc_bil_rate_date_code IN VARCHAR2, -- columns have been
1745: px_projfunc_bil_rate_type IN OUT NOCOPY VARCHAR2, -- added for MCB2 --File.Sql.39 bug 4440895

Line 1748: x_projfunc_revenue_tab OUT NOCOPY PA_RATE_PVT_PKG.ProjAmt_TabTyp, --File.Sql.39 bug 4440895

1744: p_projfunc_bil_rate_date_code IN VARCHAR2, -- columns have been
1745: px_projfunc_bil_rate_type IN OUT NOCOPY VARCHAR2, -- added for MCB2 --File.Sql.39 bug 4440895
1746: px_projfunc_bil_rate_date IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
1747: px_projfunc_bil_exchange_rate IN OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
1748: x_projfunc_revenue_tab OUT NOCOPY PA_RATE_PVT_PKG.ProjAmt_TabTyp, --File.Sql.39 bug 4440895
1749: x_error_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1750: )
1751: IS
1752:

Line 1853: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

1849: px_projfunc_bil_rate_date := lx_projfunc_bil_rate_date ;
1850: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1851:
1852: /* Checking error condition. Added for bug 2218386 */
1853: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1854: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1855: p_procedure_name => 'calc_cost_based_revenue');
1856: RAISE;
1857: END IF;

Line 1854: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',

1850: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1851:
1852: /* Checking error condition. Added for bug 2218386 */
1853: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1854: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1855: p_procedure_name => 'calc_cost_based_revenue');
1856: RAISE;
1857: END IF;
1858:

Line 1935: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

1931: x_rev_gen_method := null;
1932:
1933:
1934: /* Checking error condition. Added for bug 2218386 */
1935: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1936: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1937: p_procedure_name => 'get_revenue_generation_method');
1938: RAISE;
1939: END IF;

Line 1936: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',

1932:
1933:
1934: /* Checking error condition. Added for bug 2218386 */
1935: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1936: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1937: p_procedure_name => 'get_revenue_generation_method');
1938: RAISE;
1939: END IF;
1940:

Line 2144: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';

2140: BEGIN
2141:
2142: IF g1_debug_mode = 'Y' THEN
2143: PA_DEBUG.Set_Curr_Function( p_function => 'Get Initial Bill Rate');
2144: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2145: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2146: END IF;
2147:
2148: /* Validating that the required parameters should not be null */

Line 2444: PA_DEBUG.g_err_stage := 'RT51 : After Validation PA_RATE_PVT_PKG.get_initial_bill_rate';

2440: l_calculate_cost_flag := p_calculate_cost_flag;
2441: END IF;
2442:
2443: IF g1_debug_mode = 'Y' THEN
2444: PA_DEBUG.g_err_stage := 'RT51 : After Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2445: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2446: END IF;
2447: /* Calling the rate calculation APIs */
2448:

Line 2767: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';

2763: x_rev_currency_code := l_projfunc_currency_code;
2764: x_markup_percentage := l_markup_percentage; /* Added for Asgmt overide */
2765:
2766: IF g1_debug_mode = 'Y' THEN
2767: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';
2768: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2769: PA_DEBUG.Reset_Curr_Function;
2770: END IF;
2771:

Line 2803: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

2799:
2800: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2801: x_msg_data := SUBSTR(SQLERRM,1,30);
2802: /* Checking error condition. Added for bug 2218386 */
2803: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
2804: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG', /* Moved this here to fix bug 2434663 */
2805: p_procedure_name => 'get_initial_bill_rate');
2806: RAISE;
2807: END IF;

Line 2804: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG', /* Moved this here to fix bug 2434663 */

2800: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2801: x_msg_data := SUBSTR(SQLERRM,1,30);
2802: /* Checking error condition. Added for bug 2218386 */
2803: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
2804: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG', /* Moved this here to fix bug 2434663 */
2805: p_procedure_name => 'get_initial_bill_rate');
2806: RAISE;
2807: END IF;
2808:

Line 3036: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';

3032: --dbms_output.put_line(' I am in CALC RATE AMOUNT ');
3033:
3034: IF g1_debug_mode = 'Y' THEN
3035: PA_DEBUG.Set_Curr_Function( p_function => 'Calc Rate Amount');
3036: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';
3037: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3038: END IF;
3039:
3040: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3191: PA_DEBUG.g_err_stage := 'RT41 : Entering PA_RATE_PVT_PKG.get_item_amount';

3187: l_expenditure_orgz_id := p_expenditure_orgz_id_tab(l_J);
3188: l_forecast_item_id := p_forecast_item_id_tab(l_J); /* added for bug 2212852 */
3189:
3190: IF g1_debug_mode = 'Y' THEN
3191: PA_DEBUG.g_err_stage := 'RT41 : Entering PA_RATE_PVT_PKG.get_item_amount';
3192: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3193: END IF;
3194:
3195: -- dbms_output.put_line('before calling Get Item AMount the index is : '||l_J);

Line 3196: PA_RATE_PVT_PKG.get_item_amount(

3192: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3193: END IF;
3194:
3195: -- dbms_output.put_line('before calling Get Item AMount the index is : '||l_J);
3196: PA_RATE_PVT_PKG.get_item_amount(
3197: p_calling_mode => p_calling_mode ,
3198: p_rate_calc_date => l_rate_calc_date ,
3199: p_item_id => p_item_id ,
3200: p_project_id => p_project_id ,

Line 3294: PA_DEBUG.g_err_stage := 'RT42 : Leaving PA_RATE_PVT_PKG.get_item_amount';

3290: x_msg_count => x_msg_count ,
3291: x_msg_data => x_msg_data );
3292:
3293: IF g1_debug_mode = 'Y' THEN
3294: PA_DEBUG.g_err_stage := 'RT42 : Leaving PA_RATE_PVT_PKG.get_item_amount';
3295: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3296: END IF;
3297:
3298: -- dbms_output.put_line(' I am in CALC RATE AMOUNT end of get_item_amount : '||l_J);

Line 3403: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';

3399:
3400: -- dbms_output.put_line(' I am in CALC RATE AMT ERROR END : ');
3401:
3402: IF g1_debug_mode = 'Y' THEN
3403: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';
3404: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3405: PA_DEBUG.Reset_Curr_Function;
3406: END IF;
3407:

Line 3416: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

3412: END IF;
3413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3414: x_error_msg := SUBSTR(SQLERRM,1,30);
3415: /* Checking error condition. Added for bug 2218386 */
3416: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3417: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3418: p_procedure_name => 'Calc_Rate_Amount');
3419: RAISE;
3420: END IF;

Line 3417: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',

3413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3414: x_error_msg := SUBSTR(SQLERRM,1,30);
3415: /* Checking error condition. Added for bug 2218386 */
3416: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3417: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3418: p_procedure_name => 'Calc_Rate_Amount');
3419: RAISE;
3420: END IF;
3421:

Line 3461: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';

3457: BEGIN
3458:
3459: IF g1_debug_mode = 'Y' THEN
3460: PA_DEBUG.Set_Curr_Function( p_function => 'get_rep_period_dates ');
3461: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';
3462: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3463: END IF;
3464:
3465: x_error_value := 'NO_ERROR';

Line 3700: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';

3696: x_start_date := l_start_date;
3697: x_end_date := l_end_date;
3698:
3699: IF g1_debug_mode = 'Y' THEN
3700: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';
3701: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3702: PA_DEBUG.Reset_Curr_Function;
3703: END IF;
3704:

Line 3729: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN

3725: x_period_name := null;
3726: x_start_date := null;
3727: x_end_date := null;
3728:
3729: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3730: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3731: p_procedure_name => 'get_rep_period_dates');
3732: RAISE;
3733: END IF;

Line 3730: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',

3726: x_start_date := null;
3727: x_end_date := null;
3728:
3729: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3730: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3731: p_procedure_name => 'get_rep_period_dates');
3732: RAISE;
3733: END IF;
3734:

Line 3738: END PA_RATE_PVT_PKG;

3734:
3735: END get_rep_period_dates;
3736:
3737:
3738: END PA_RATE_PVT_PKG;
3739: