DBA Data[Home] [Help]

APPS.PA_CC_TRANSFER_PRICE dependencies on PA_CC_TRANSFER_PRICE

Line 1: PACKAGE BODY PA_CC_TRANSFER_PRICE AS

1: PACKAGE BODY PA_CC_TRANSFER_PRICE AS
2: /* $Header: PAXCCTPB.pls 120.18 2010/10/06 21:53:33 apaul ship $ */
3:
4: -------------------------------------------------------------------------------
5: -- Define global variables

Line 5079: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'ENTERING Get_Initial_Transfer_Price', 3);

5075:
5076: BEGIN
5077:
5078: IF p_debug_mode = 'Y' THEN
5079: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'ENTERING Get_Initial_Transfer_Price', 3);
5080: END IF;
5081:
5082: x_return_status := FND_API.G_RET_STS_SUCCESS;
5083:

Line 5146: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);

5142:
5143: CLOSE Cur_Forecast_Items;
5144:
5145: IF p_debug_mode = 'Y' THEN
5146: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);
5147: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'f id:'||l_fi_id_tab(1)||' org id'||l_fi_exp_orgid_tab(1));
5148: END IF;
5149:
5150:

Line 5147: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'f id:'||l_fi_id_tab(1)||' org id'||l_fi_exp_orgid_tab(1));

5143: CLOSE Cur_Forecast_Items;
5144:
5145: IF p_debug_mode = 'Y' THEN
5146: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);
5147: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'f id:'||l_fi_id_tab(1)||' org id'||l_fi_exp_orgid_tab(1));
5148: END IF;
5149:
5150:
5151: l_cc_taskid_tab(1) := NULL;

Line 5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);

5189: X_Error_Code => lx_cc_error_code
5190: );
5191:
5192: IF p_debug_mode = 'Y' THEN
5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5196: END IF;
5197:

Line 5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);

5190: );
5191:
5192: IF p_debug_mode = 'Y' THEN
5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5196: END IF;
5197:
5198:

Line 5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);

5191:
5192: IF p_debug_mode = 'Y' THEN
5193: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5194: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5195: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5196: END IF;
5197:
5198:
5199: If lx_cc_code_tab(1) in ('I', 'B') AND lx_cc_status_tab(1) is NULL THEN

Line 5295: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'No data found in pa_project_role_types', 3);

5291: /* ends here */
5292: EXCEPTION
5293: WHEN NO_DATA_FOUND THEN
5294: IF p_debug_mode = 'Y' THEN
5295: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'No data found in pa_project_role_types', 3);
5296: END IF;
5297: l_asg_fcst_job_id := NULL;
5298: l_asg_fcst_job_group_id := NULL;
5299: WHEN OTHERS THEN

Line 5313: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Just Calling PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);

5309: l_qty_tab.delete;
5310: l_qty_tab(1) := 1;
5311:
5312: IF p_debug_mode = 'Y' THEN
5313: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Just Calling PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5314: END IF;
5315:
5316: PA_RATE_PVT_PKG.CALC_RATE_AMOUNT(
5317: P_CALLING_MODE => l_calling_mode,

Line 5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);

5410: X_MSG_DATA => lx_rt_msg_data
5411: );
5412:
5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);

Line 5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);

5411: );
5412:
5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);

Line 5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);

5412:
5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;

Line 5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);

5413: IF p_debug_mode = 'Y' THEN
5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;
5421:

Line 5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);

5414: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;
5421:
5422:

Line 5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);

5415: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5416: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_rev_rejct_reason_tab COUNT:'||lx_rt_rev_rejct_reason_tab.count, 3);
5417: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_cst_rejct_reason_tab.count :'||lx_rt_cst_rejct_reason_tab.count, 3);
5418: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_bd_rejct_reason_tab.count:'||lx_rt_bd_rejct_reason_tab.count, 3);
5419: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'lx_rt_others_rejct_reason_tab.count:'||lx_rt_others_rejct_reason_tab.count, 3);
5420: END IF;
5421:
5422:
5423: ERROR_OCCURED := 'N';

Line 5432: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Rev Reject:'||lx_rt_rev_rejct_reason_tab(1), 3);

5428:
5429: If lx_rt_rev_rejct_reason_tab.exists(1) THEN
5430: IF lx_rt_rev_rejct_reason_tab(1) IS NOT NULL THEN
5431: IF p_debug_mode = 'Y' THEN
5432: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Rev Reject:'||lx_rt_rev_rejct_reason_tab(1), 3);
5433: END IF;
5434: ERROR_OCCURED := 'Y';
5435: END IF;
5436: END IF;

Line 5441: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Raw Cost Reject:'||lx_rt_cst_rejct_reason_tab(1), 3);

5437:
5438: IF lx_rt_cst_rejct_reason_tab.exists(1) THEN
5439: IF lx_rt_cst_rejct_reason_tab(1) IS NOT NULL THEN
5440: IF p_debug_mode = 'Y' THEN
5441: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Raw Cost Reject:'||lx_rt_cst_rejct_reason_tab(1), 3);
5442: END IF;
5443: ERROR_OCCURED := 'Y';
5444: END IF;
5445: END IF;

Line 5450: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Burden Cost Reject:'||lx_rt_bd_rejct_reason_tab(1), 3);

5446:
5447: IF lx_rt_bd_rejct_reason_tab.exists(1) THEN
5448: IF lx_rt_bd_rejct_reason_tab(1) IS NOT NULL THEN
5449: IF p_debug_mode = 'Y' THEN
5450: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Burden Cost Reject:'||lx_rt_bd_rejct_reason_tab(1), 3);
5451: END IF;
5452: ERROR_OCCURED := 'Y';
5453: END IF;
5454: END IF;

Line 5459: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Other Reject:'||lx_rt_others_rejct_reason_tab(1), 3);

5455:
5456: IF lx_rt_others_rejct_reason_tab.exists(1) THEN
5457: IF lx_rt_others_rejct_reason_tab(1) IS NOT NULL THEN
5458: IF p_debug_mode = 'Y' THEN
5459: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Other Reject:'||lx_rt_others_rejct_reason_tab(1), 3);
5460: END IF;
5461: ERROR_OCCURED := 'Y';
5462: END IF;
5463: END IF;

Line 5467: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Some Error Occurred, Returning null as Rate', 3);

5463: END IF;
5464:
5465: IF ERROR_OCCURED = 'Y' THEN
5466: IF p_debug_mode = 'Y' THEN
5467: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Some Error Occurred, Returning null as Rate', 3);
5468: END IF;
5469: x_transfer_price_rate := NULL;
5470: x_transfer_pr_rate_curr := NULL;
5471: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5557: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);

5553:
5554: lx_asg_precedes_task_tab(1) := l_asg_precedes_task; -- Added for bug 3255061
5555:
5556: IF p_debug_mode = 'Y' THEN
5557: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);
5558: END IF;
5559:
5560: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(
5561: p_module_name => 'FORECAST',

Line 5560: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(

5556: IF p_debug_mode = 'Y' THEN
5557: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);
5558: END IF;
5559:
5560: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(
5561: p_module_name => 'FORECAST',
5562: p_prvdr_organization_id => lx_cc_prvdr_orgzid_tab,
5563: p_recvr_org_id => lx_cc_recvr_orgid_tab,
5564: p_recvr_organization_id => lx_cc_recvr_orgzid_tab,

Line 5623: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);

5619: x_error_code => lx_tp_error_code,
5620: x_return_status => lx_tp_return_status );
5621:
5622: IF p_debug_mode = 'Y' THEN
5623: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);
5624: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);
5625: END IF;
5626:
5627: If lx_tp_return_status <> 0 THEN

Line 5624: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);

5620: x_return_status => lx_tp_return_status );
5621:
5622: IF p_debug_mode = 'Y' THEN
5623: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);
5624: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);
5625: END IF;
5626:
5627: If lx_tp_return_status <> 0 THEN
5628: x_transfer_price_rate := NULL;

Line 5640: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Returning with Null as value', 3);

5636: END IF;
5637: END IF;
5638: ELSE
5639: IF p_debug_mode = 'Y' THEN
5640: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Returning with Null as value', 3);
5641: END IF;
5642: x_transfer_price_rate := NULL;
5643: x_transfer_pr_rate_curr := NULL;
5644: END IF;

Line 5650: pa_debug.write('PA_CC_TRANSFER_PRICE.GET_INITIAL_TRANSFER_PRICE', 'Unhandled Exception occured', 3);

5646: x_return_status := FND_API.G_RET_STS_SUCCESS;
5647: EXCEPTION
5648: WHEN OTHERS THEN
5649: If p_debug_mode = 'Y' THEN
5650: pa_debug.write('PA_CC_TRANSFER_PRICE.GET_INITIAL_TRANSFER_PRICE', 'Unhandled Exception occured', 3);
5651: End if;
5652: /*Added for File.sql.39*/
5653: x_transfer_price_rate := NULL;
5654: x_transfer_pr_rate_curr := NULL;

Line 5658: END PA_CC_TRANSFER_PRICE;

5654: x_transfer_pr_rate_curr := NULL;
5655: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5656: END Get_Initial_Transfer_Price;
5657:
5658: END PA_CC_TRANSFER_PRICE;