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.13.12010000.4 2008/10/17 05:26:31 abjacob ship $ */
3:
4: -------------------------------------------------------------------------------
5: -- Define global variables

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

4979:
4980: BEGIN
4981:
4982: IF p_debug_mode = 'Y' THEN
4983: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'ENTERING Get_Initial_Transfer_Price', 3);
4984: END IF;
4985:
4986: x_return_status := FND_API.G_RET_STS_SUCCESS;
4987:

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

5046:
5047: CLOSE Cur_Forecast_Items;
5048:
5049: IF p_debug_mode = 'Y' THEN
5050: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);
5051: 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));
5052: END IF;
5053:
5054:

Line 5051: 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));

5047: CLOSE Cur_Forecast_Items;
5048:
5049: IF p_debug_mode = 'Y' THEN
5050: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Cursor cur_forecast_items_fetched', 3);
5051: 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));
5052: END IF;
5053:
5054:
5055: l_cc_taskid_tab(1) := NULL;

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

5093: X_Error_Code => lx_cc_error_code
5094: );
5095:
5096: IF p_debug_mode = 'Y' THEN
5097: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5098: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5099: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5100: END IF;
5101:

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

5094: );
5095:
5096: IF p_debug_mode = 'Y' THEN
5097: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5098: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5099: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5100: END IF;
5101:
5102:

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

5095:
5096: IF p_debug_mode = 'Y' THEN
5097: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Procedure PA_CC_IDENTIFY_TXN_FI executed', 3);
5098: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Status :'||lx_cc_status_tab(1), 3);
5099: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'cc code:'||lx_cc_code_tab(1), 3);
5100: END IF;
5101:
5102:
5103: If lx_cc_code_tab(1) in ('I', 'B') AND lx_cc_status_tab(1) is NULL THEN

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

5195: /* ends here */
5196: EXCEPTION
5197: WHEN NO_DATA_FOUND THEN
5198: IF p_debug_mode = 'Y' THEN
5199: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'No data found in pa_project_role_types', 3);
5200: END IF;
5201: l_asg_fcst_job_id := NULL;
5202: l_asg_fcst_job_group_id := NULL;
5203: WHEN OTHERS THEN

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

5213: l_qty_tab.delete;
5214: l_qty_tab(1) := 1;
5215:
5216: IF p_debug_mode = 'Y' THEN
5217: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Just Calling PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5218: END IF;
5219:
5220: PA_RATE_PVT_PKG.CALC_RATE_AMOUNT(
5221: P_CALLING_MODE => l_calling_mode,

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

5314: X_MSG_DATA => lx_rt_msg_data
5315: );
5316:
5317: IF p_debug_mode = 'Y' THEN
5318: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5320: 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);
5321: 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);
5322: 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 5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);

5315: );
5316:
5317: IF p_debug_mode = 'Y' THEN
5318: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5320: 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);
5321: 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);
5322: 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);
5323: 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 5320: 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);

5316:
5317: IF p_debug_mode = 'Y' THEN
5318: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5320: 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);
5321: 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);
5322: 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);
5323: 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);
5324: END IF;

Line 5321: 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);

5317: IF p_debug_mode = 'Y' THEN
5318: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5320: 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);
5321: 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);
5322: 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);
5323: 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);
5324: END IF;
5325:

Line 5322: 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);

5318: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Done With the PA_RATE_PVT_PKG.CALC_RATE_AMOUNT', 3);
5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5320: 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);
5321: 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);
5322: 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);
5323: 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);
5324: END IF;
5325:
5326:

Line 5323: 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);

5319: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'x_return status for calc_rate_amount is:'||x_return_status, 3);
5320: 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);
5321: 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);
5322: 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);
5323: 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);
5324: END IF;
5325:
5326:
5327: ERROR_OCCURED := 'N';

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

5332:
5333: If lx_rt_rev_rejct_reason_tab.exists(1) THEN
5334: IF lx_rt_rev_rejct_reason_tab(1) IS NOT NULL THEN
5335: IF p_debug_mode = 'Y' THEN
5336: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Rev Reject:'||lx_rt_rev_rejct_reason_tab(1), 3);
5337: END IF;
5338: ERROR_OCCURED := 'Y';
5339: END IF;
5340: END IF;

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

5341:
5342: IF lx_rt_cst_rejct_reason_tab.exists(1) THEN
5343: IF lx_rt_cst_rejct_reason_tab(1) IS NOT NULL THEN
5344: IF p_debug_mode = 'Y' THEN
5345: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Raw Cost Reject:'||lx_rt_cst_rejct_reason_tab(1), 3);
5346: END IF;
5347: ERROR_OCCURED := 'Y';
5348: END IF;
5349: END IF;

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

5350:
5351: IF lx_rt_bd_rejct_reason_tab.exists(1) THEN
5352: IF lx_rt_bd_rejct_reason_tab(1) IS NOT NULL THEN
5353: IF p_debug_mode = 'Y' THEN
5354: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Burden Cost Reject:'||lx_rt_bd_rejct_reason_tab(1), 3);
5355: END IF;
5356: ERROR_OCCURED := 'Y';
5357: END IF;
5358: END IF;

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

5359:
5360: IF lx_rt_others_rejct_reason_tab.exists(1) THEN
5361: IF lx_rt_others_rejct_reason_tab(1) IS NOT NULL THEN
5362: IF p_debug_mode = 'Y' THEN
5363: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Other Reject:'||lx_rt_others_rejct_reason_tab(1), 3);
5364: END IF;
5365: ERROR_OCCURED := 'Y';
5366: END IF;
5367: END IF;

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

5367: END IF;
5368:
5369: IF ERROR_OCCURED = 'Y' THEN
5370: IF p_debug_mode = 'Y' THEN
5371: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Some Error Occurred, Returning null as Rate', 3);
5372: END IF;
5373: x_transfer_price_rate := NULL;
5374: x_transfer_pr_rate_curr := NULL;
5375: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

5457:
5458: lx_asg_precedes_task_tab(1) := l_asg_precedes_task; -- Added for bug 3255061
5459:
5460: IF p_debug_mode = 'Y' THEN
5461: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);
5462: END IF;
5463:
5464: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(
5465: p_module_name => 'FORECAST',

Line 5464: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(

5460: IF p_debug_mode = 'Y' THEN
5461: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE calling', 3);
5462: END IF;
5463:
5464: PA_CC_TRANSFER_PRICE.GET_TRANSFER_PRICE(
5465: p_module_name => 'FORECAST',
5466: p_prvdr_organization_id => lx_cc_prvdr_orgzid_tab,
5467: p_recvr_org_id => lx_cc_recvr_orgid_tab,
5468: p_recvr_organization_id => lx_cc_recvr_orgzid_tab,

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

5523: x_error_code => lx_tp_error_code,
5524: x_return_status => lx_tp_return_status );
5525:
5526: IF p_debug_mode = 'Y' THEN
5527: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);
5528: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);
5529: END IF;
5530:
5531: If lx_tp_return_status <> 0 THEN

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

5524: x_return_status => lx_tp_return_status );
5525:
5526: IF p_debug_mode = 'Y' THEN
5527: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'status is : '||lx_tp_return_status, 3);
5528: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'rate is :'||x_transfer_price_rate||' curr :'||x_transfer_pr_rate_curr, 3);
5529: END IF;
5530:
5531: If lx_tp_return_status <> 0 THEN
5532: x_transfer_price_rate := NULL;

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

5540: END IF;
5541: END IF;
5542: ELSE
5543: IF p_debug_mode = 'Y' THEN
5544: pa_debug.write('PA_CC_TRANSFER_PRICE.Get_Initial_Transfer_Price', 'Returning with Null as value', 3);
5545: END IF;
5546: x_transfer_price_rate := NULL;
5547: x_transfer_pr_rate_curr := NULL;
5548: END IF;

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

5550: x_return_status := FND_API.G_RET_STS_SUCCESS;
5551: EXCEPTION
5552: WHEN OTHERS THEN
5553: If p_debug_mode = 'Y' THEN
5554: pa_debug.write('PA_CC_TRANSFER_PRICE.GET_INITIAL_TRANSFER_PRICE', 'Unhandled Exception occured', 3);
5555: End if;
5556: /*Added for File.sql.39*/
5557: x_transfer_price_rate := NULL;
5558: x_transfer_pr_rate_curr := NULL;

Line 5562: END PA_CC_TRANSFER_PRICE;

5558: x_transfer_pr_rate_curr := NULL;
5559: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5560: END Get_Initial_Transfer_Price;
5561:
5562: END PA_CC_TRANSFER_PRICE;