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.10 2011/03/25 12:27:15 racheruv 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 1468: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';

1464:
1465: -- dbms_output.put_line(' End error in multi cost '||x_cost_rejct_reason);
1466: -- dbms_output.put_line('end of procs '||l_x_return_status);
1467: IF g1_debug_mode = 'Y' THEN
1468: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';
1469: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1470: PA_DEBUG.Reset_Curr_Function;
1471: END IF;
1472:

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

1593:
1594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1595: x_error_msg := SUBSTR(SQLERRM,1,30);
1596: /* Checking error condition. Added for bug 2218386 */
1597: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1598: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1599: p_procedure_name => 'Get_Item_Amount');
1600: RAISE;
1601: END IF;

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

1594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1595: x_error_msg := SUBSTR(SQLERRM,1,30);
1596: /* Checking error condition. Added for bug 2218386 */
1597: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1598: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1599: p_procedure_name => 'Get_Item_Amount');
1600: RAISE;
1601: END IF;
1602: END Get_Item_Amount;

Line 1625: 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

1621: px_projfunc_bil_rate_type IN OUT NOCOPY VARCHAR2, -- added for MCB2 --File.Sql.39 bug 4440895
1622: px_projfunc_bil_rate_date IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
1623: px_projfunc_bil_exchange_rate IN OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
1624: x_error_code OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
1625: 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
1626: IS
1627:
1628: l_completion_date pa_projects_all.completion_date%TYPE;
1629: l_period_type pa_rep_period_dates_v.period_type%TYPE;

Line 1701: PA_RATE_PVT_PKG.get_rep_period_dates (

1697: /* Added code for bug 2691192, this proc. will replace the call of
1698: pa_rep_period_dates_v.Because of performance issue tis view has been split
1699: in this new call of proc. */
1700:
1701: PA_RATE_PVT_PKG.get_rep_period_dates (
1702: p_period_type => l_period_type,
1703: p_completion_date => l_completion_date,
1704: x_period_year => l_period_year,
1705: x_period_name => l_period_name,

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

1782: px_projfunc_bil_rate_date := lx_projfunc_bil_rate_date ;
1783: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1784:
1785: /* Checking error condition. Added for bug 2218386 */
1786: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1787: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1788: p_procedure_name => 'calc_event_based_revenue');
1789: RAISE;
1790: END IF;

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

1783: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1784:
1785: /* Checking error condition. Added for bug 2218386 */
1786: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1787: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1788: p_procedure_name => 'calc_event_based_revenue');
1789: RAISE;
1790: END IF;
1791:

Line 1810: p_projfunc_cost_tab IN PA_RATE_PVT_PKG.ProjAmt_TabTyp,

1806:
1807: PROCEDURE calc_cost_based_revenue(
1808: p_project_id IN NUMBER ,
1809: p_rev_amt IN NUMBER ,
1810: p_projfunc_cost_tab IN PA_RATE_PVT_PKG.ProjAmt_TabTyp,
1811: p_project_currency_code IN VARCHAR2, -- The following 6
1812: p_projfunc_currency_code IN VARCHAR2,
1813: p_projfunc_bil_rate_date_code IN VARCHAR2, -- columns have been
1814: px_projfunc_bil_rate_type IN OUT NOCOPY VARCHAR2, -- added for MCB2 --File.Sql.39 bug 4440895

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

1813: p_projfunc_bil_rate_date_code IN VARCHAR2, -- columns have been
1814: px_projfunc_bil_rate_type IN OUT NOCOPY VARCHAR2, -- added for MCB2 --File.Sql.39 bug 4440895
1815: px_projfunc_bil_rate_date IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
1816: px_projfunc_bil_exchange_rate IN OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
1817: x_projfunc_revenue_tab OUT NOCOPY PA_RATE_PVT_PKG.ProjAmt_TabTyp, --File.Sql.39 bug 4440895
1818: x_error_code OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1819: )
1820: IS
1821:

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

1918: px_projfunc_bil_rate_date := lx_projfunc_bil_rate_date ;
1919: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1920:
1921: /* Checking error condition. Added for bug 2218386 */
1922: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1923: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1924: p_procedure_name => 'calc_cost_based_revenue');
1925: RAISE;
1926: END IF;

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

1919: px_projfunc_bil_exchange_rate := lx_projfunc_bil_exchange_rate ;
1920:
1921: /* Checking error condition. Added for bug 2218386 */
1922: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
1923: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
1924: p_procedure_name => 'calc_cost_based_revenue');
1925: RAISE;
1926: END IF;
1927:

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

2000: x_rev_gen_method := null;
2001:
2002:
2003: /* Checking error condition. Added for bug 2218386 */
2004: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
2005: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
2006: p_procedure_name => 'get_revenue_generation_method');
2007: RAISE;
2008: END IF;

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

2001:
2002:
2003: /* Checking error condition. Added for bug 2218386 */
2004: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
2005: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
2006: p_procedure_name => 'get_revenue_generation_method');
2007: RAISE;
2008: END IF;
2009:

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

2209: BEGIN
2210:
2211: IF g1_debug_mode = 'Y' THEN
2212: PA_DEBUG.Set_Curr_Function( p_function => 'Get Initial Bill Rate');
2213: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2214: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2215: END IF;
2216:
2217: /* Validating that the required parameters should not be null */

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

2509: l_calculate_cost_flag := p_calculate_cost_flag;
2510: END IF;
2511:
2512: IF g1_debug_mode = 'Y' THEN
2513: PA_DEBUG.g_err_stage := 'RT51 : After Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2514: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2515: END IF;
2516: /* Calling the rate calculation APIs */
2517:

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

2893: x_rev_currency_code := l_projfunc_currency_code;
2894: x_markup_percentage := l_markup_percentage; /* Added for Asgmt overide */
2895:
2896: IF g1_debug_mode = 'Y' THEN
2897: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';
2898: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2899: PA_DEBUG.Reset_Curr_Function;
2900: END IF;
2901:

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

2929:
2930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2931: x_msg_data := SUBSTR(SQLERRM,1,30);
2932: /* Checking error condition. Added for bug 2218386 */
2933: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
2934: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG', /* Moved this here to fix bug 2434663 */
2935: p_procedure_name => 'get_initial_bill_rate');
2936: RAISE;
2937: END IF;

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

2930: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2931: x_msg_data := SUBSTR(SQLERRM,1,30);
2932: /* Checking error condition. Added for bug 2218386 */
2933: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
2934: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG', /* Moved this here to fix bug 2434663 */
2935: p_procedure_name => 'get_initial_bill_rate');
2936: RAISE;
2937: END IF;
2938:

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

3162: --dbms_output.put_line(' I am in CALC RATE AMOUNT ');
3163:
3164: IF g1_debug_mode = 'Y' THEN
3165: PA_DEBUG.Set_Curr_Function( p_function => 'Calc Rate Amount');
3166: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';
3167: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3168: END IF;
3169:
3170: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

3317: l_expenditure_orgz_id := p_expenditure_orgz_id_tab(l_J);
3318: l_forecast_item_id := p_forecast_item_id_tab(l_J); /* added for bug 2212852 */
3319:
3320: IF g1_debug_mode = 'Y' THEN
3321: PA_DEBUG.g_err_stage := 'RT41 : Entering PA_RATE_PVT_PKG.get_item_amount';
3322: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3323: PA_DEBUG.g_err_stage := 'prj type: '||p_project_type||' prj id:'||p_project_id;
3324: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3325: END IF;

Line 3328: PA_RATE_PVT_PKG.get_item_amount(

3324: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3325: END IF;
3326:
3327: -- dbms_output.put_line('before calling Get Item AMount the index is : '||l_J);
3328: PA_RATE_PVT_PKG.get_item_amount(
3329: p_calling_mode => p_calling_mode ,
3330: p_rate_calc_date => l_rate_calc_date ,
3331: p_item_id => p_item_id ,
3332: p_project_id => p_project_id ,

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

3422: x_msg_count => x_msg_count ,
3423: x_msg_data => x_msg_data );
3424:
3425: IF g1_debug_mode = 'Y' THEN
3426: PA_DEBUG.g_err_stage := 'RT42 : Leaving PA_RATE_PVT_PKG.get_item_amount';
3427: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3428: PA_DEBUG.g_err_stage := 'err msg '||substr(l_error_msg,1,300);
3429: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3430: PA_DEBUG.g_err_stage := 'ret sts '||l_return_status||' rrr '||l_rev_rejct_reason||' crr '||l_cost_rejct_reason||' brr '||l_burdened_rejct_reason||' orr '||l_others_rejct_reason;

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

3537:
3538: -- dbms_output.put_line(' I am in CALC RATE AMT ERROR END : ');
3539:
3540: IF g1_debug_mode = 'Y' THEN
3541: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';
3542: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3543: PA_DEBUG.Reset_Curr_Function;
3544: END IF;
3545:

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

3550: END IF;
3551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3552: x_error_msg := SUBSTR(SQLERRM,1,30);
3553: /* Checking error condition. Added for bug 2218386 */
3554: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3555: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3556: p_procedure_name => 'Calc_Rate_Amount');
3557: RAISE;
3558: END IF;

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

3551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3552: x_error_msg := SUBSTR(SQLERRM,1,30);
3553: /* Checking error condition. Added for bug 2218386 */
3554: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3555: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3556: p_procedure_name => 'Calc_Rate_Amount');
3557: RAISE;
3558: END IF;
3559:

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

3595: BEGIN
3596:
3597: IF g1_debug_mode = 'Y' THEN
3598: PA_DEBUG.Set_Curr_Function( p_function => 'get_rep_period_dates ');
3599: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';
3600: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3601: END IF;
3602:
3603: x_error_value := 'NO_ERROR';

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

3834: x_start_date := l_start_date;
3835: x_end_date := l_end_date;
3836:
3837: IF g1_debug_mode = 'Y' THEN
3838: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';
3839: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3840: PA_DEBUG.Reset_Curr_Function;
3841: END IF;
3842:

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

3863: x_period_name := null;
3864: x_start_date := null;
3865: x_end_date := null;
3866:
3867: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3868: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3869: p_procedure_name => 'get_rep_period_dates');
3870: RAISE;
3871: END IF;

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

3864: x_start_date := null;
3865: x_end_date := null;
3866:
3867: IF (NVL(PA_RATE_PVT_PKG.G_add_error_to_stack_flag,'Y') = 'Y') THEN
3868: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RATE_PVT_PKG',
3869: p_procedure_name => 'get_rep_period_dates');
3870: RAISE;
3871: END IF;
3872:

Line 3876: END PA_RATE_PVT_PKG;

3872:
3873: END get_rep_period_dates;
3874:
3875:
3876: END PA_RATE_PVT_PKG;
3877: