DBA Data[Home] [Help]

APPS.PA_FP_CI_MERGE dependencies on PA_FP_CI_MERGE

Line 1: PACKAGE BODY PA_FP_CI_MERGE AS

1: PACKAGE BODY PA_FP_CI_MERGE AS
2: /* $Header: PAFPCIMB.pls 120.26.12020000.5 2013/06/11 12:22:49 bpottipa ship $ */
3: -- Bug Fix: 4569365. Removed MRC code.
4: -- g_mrc_exception EXCEPTION; /* FPB2 */
5:

Line 6: l_module_name VARCHAR2(100) := 'pa.plsql.pa_fp_ci_merge';

2: /* $Header: PAFPCIMB.pls 120.26.12020000.5 2013/06/11 12:22:49 bpottipa ship $ */
3: -- Bug Fix: 4569365. Removed MRC code.
4: -- g_mrc_exception EXCEPTION; /* FPB2 */
5:
6: l_module_name VARCHAR2(100) := 'pa.plsql.pa_fp_ci_merge';
7: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
8:
9: --This record type will contain items for budget version id, ci id and the code which indicates whether
10: --the type of impact that can be implemented into the target version. Bug 3550073

Line 375: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||

371: END IF;
372: EXCEPTION
373: WHEN OTHERS THEN
374: FND_MSG_PUB.add_exc_msg
375: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||
376: 'fp_ci_link_control_items'
377: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
378: IF p_pa_debug_mode = 'Y' THEN
379: PA_DEBUG.g_err_stage := 'Unexpected error in fp_ci_link_control_items';

Line 654: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||

650: END IF;
651: EXCEPTION
652: WHEN OTHERS THEN
653: FND_MSG_PUB.add_exc_msg
654: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||
655: 'fp_ci_update_est_amounts'
656: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
657: IF p_pa_debug_mode = 'Y' THEN
658: PA_DEBUG.g_err_stage := 'Unexpected error in FP_CI_UPDATE_EST_AMOUNTS';

Line 812: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||

808: END IF;
809: EXCEPTION
810: WHEN OTHERS THEN
811: FND_MSG_PUB.add_exc_msg
812: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||
813: 'fp_ci_update_impact'
814: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
815: IF p_pa_debug_mode = 'Y' THEN
816: PA_DEBUG.g_err_stage := 'Unexpected error in FP_CI_UPDATE_IMPACT';

Line 1841: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||

1837: EXCEPTION
1838: WHEN OTHERS THEN
1839: ROLLBACK TO before_fp_ci_copy;
1840: FND_MSG_PUB.add_exc_msg
1841: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||
1842: 'fp_ci_merge_ci_items'
1843: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
1844: IF p_pa_debug_mode = 'Y' THEN
1845: PA_DEBUG.g_err_stage := 'Unexpected error in FP_CI_MERGE_CI_ITEMS';

Line 1897: pa_debug.set_err_stack('PA_FP_CI_MERGE.copy_merged_ctrl_items');

1893:
1894: x_msg_count := 0;
1895: x_return_status := FND_API.G_RET_STS_SUCCESS;
1896: IF p_pa_debug_mode = 'Y' THEN
1897: pa_debug.set_err_stack('PA_FP_CI_MERGE.copy_merged_ctrl_items');
1898: END IF;
1899: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
1900: l_debug_mode := NVL(l_debug_mode, 'Y');
1901: IF p_pa_debug_mode = 'Y' THEN

Line 2185: ( p_pkg_name => 'PA_FP_CI_MERGE'

2181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2182: x_msg_count := 1;
2183: x_msg_data := SQLERRM;
2184: FND_MSG_PUB.add_exc_msg
2185: ( p_pkg_name => 'PA_FP_CI_MERGE'
2186: ,p_procedure_name => 'copy_merged_ctrl_items'
2187: ,p_error_text => sqlerrm);
2188: IF p_pa_debug_mode = 'Y' THEN
2189: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;

Line 2266: pa_debug.set_err_stack('PA_FP_CI_MERGE.FP_CI_MANUAL_MERGE');

2262: x_msg_count := 0;
2263: x_return_status := FND_API.G_RET_STS_SUCCESS;
2264: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2265: IF l_debug_mode = 'Y' THEN
2266: pa_debug.set_err_stack('PA_FP_CI_MERGE.FP_CI_MANUAL_MERGE');
2267: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
2268: END IF;
2269:
2270: -- Check for business rules violations

Line 2631: ( p_pkg_name => 'PA_FP_CI_MERGE'

2627: x_msg_count := 1;
2628: x_msg_data := SQLERRM;
2629:
2630: FND_MSG_PUB.add_exc_msg
2631: ( p_pkg_name => 'PA_FP_CI_MERGE'
2632: ,p_procedure_name => 'FP_CI_MANUAL_MERGE'
2633: ,p_error_text => x_msg_data);
2634:
2635: IF l_debug_mode = 'Y' THEN

Line 6325: and PA_FP_CI_MERGE.get_mapped_ra_id(PA_FP_CI_MERGE.get_task_id(l_targ_plan_level_code,pras.task_id), pras.resource_list_member_id)= L_targ_ra_id_tbl(kk)

6321: pa_resource_assignments pras
6322: where l_ra_dml_code_tbl(kk)='INSERT'
6323: and pras.resource_assignment_id = pbls.resource_assignment_id
6324: and pras.budget_version_id = l_src_ver_id_tbl(j)
6325: and PA_FP_CI_MERGE.get_mapped_ra_id(PA_FP_CI_MERGE.get_task_id(l_targ_plan_level_code,pras.task_id), pras.resource_list_member_id)= L_targ_ra_id_tbl(kk)
6326: --IPM Arch Enhancement Bug 4865563
6327: /*and pbls.cost_rejection_code IS NULL
6328: and pbls.revenue_rejection_code IS NULL
6329: and pbls.burden_rejection_code IS NULL

Line 6584: (SELECT pa_fp_ci_merge.get_mapped_ra_id(pa_fp_ci_merge.get_task_id(l_targ_plan_level_code,pras.task_id), rlmap.resource_list_member_id) resource_assignment_id,

6580: pbl.pc_cur_conv_rejection_code,
6581: pbl.pfc_cur_conv_rejection_code
6582: FROM
6583: --The entier SELECT is moved to the sub query in FROM clause as nextval would not work with group by
6584: (SELECT pa_fp_ci_merge.get_mapped_ra_id(pa_fp_ci_merge.get_task_id(l_targ_plan_level_code,pras.task_id), rlmap.resource_list_member_id) resource_assignment_id,
6585: sysdate last_update_date,
6586: fnd_global.user_id last_updated_by,
6587: sysdate creation_date,
6588: fnd_global.user_id created_by,

Line 6730: and pa_fp_ci_merge.get_mapped_ra_id(get_task_id(l_targ_plan_level_code,pras.task_id), rlmap.resource_list_member_id)=l_targ_ra_id_tbl(kk)

6726: where l_ra_dml_code_tbl(kk)='INSERT'
6727: and pras.resource_assignment_id = pbls.resource_assignment_id
6728: and pras.budget_version_id = l_src_ver_id_tbl(j)
6729: AND pras.resource_assignment_id=rlmap.txn_source_id
6730: and pa_fp_ci_merge.get_mapped_ra_id(get_task_id(l_targ_plan_level_code,pras.task_id), rlmap.resource_list_member_id)=l_targ_ra_id_tbl(kk)
6731: --IPM Arch Enhancement Bug 4865563
6732: /*and pbls.cost_rejection_code IS NULL
6733: and pbls.revenue_rejection_code IS NULL
6734: and pbls.burden_rejection_code IS NULL

Line 6738: GROUP BY pa_fp_ci_merge.get_mapped_ra_id(pa_fp_ci_merge.get_task_id(l_targ_plan_level_code,pras.task_id),rlmap.resource_list_member_id) ,

6734: and pbls.burden_rejection_code IS NULL
6735: and pbls.other_rejection_code IS NULL
6736: and pbls.pc_cur_conv_rejection_code IS NULL
6737: and pbls.pfc_cur_conv_rejection_code IS NULL*/
6738: GROUP BY pa_fp_ci_merge.get_mapped_ra_id(pa_fp_ci_merge.get_task_id(l_targ_plan_level_code,pras.task_id),rlmap.resource_list_member_id) ,
6739: DECODE(l_copy_pfc_for_txn_amt_flag,'Y', l_projfunc_currency_code,DECODE(l_same_multi_curr_flag, 'Y', pbls.txn_currency_code,l_project_currency_code)))pbl;
6740:
6741: IF P_PA_debug_mode = 'Y' THEN
6742: pa_debug.g_err_stage:= 'Done with bulk insert Budget lines with diff RLs and with targ TP as None';

Line 10187: pa_fp_ci_merge.FP_CI_LINK_CONTROL_ITEMS(

10183: END IF;
10184:
10185: IF l_impl_earlier='N' THEN
10186:
10187: pa_fp_ci_merge.FP_CI_LINK_CONTROL_ITEMS(
10188: p_project_id => l_project_id
10189: ,p_s_fp_version_id => l_src_ver_id_tbl(j)
10190: ,p_t_fp_version_id => p_budget_version_id
10191: ,p_inclusion_method => 'AUTOMATIC'

Line 10278: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT

10274:
10275: --dbms_output.put_line('I52');
10276: IF (l_targ_app_cost_flag = 'Y' OR l_targ_app_rev_flag = 'Y') AND l_current_working_flag = 'Y' THEN
10277: l_impact_type_code := 'FINPLAN_' || l_version_type;
10278: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT
10279: (p_ci_id => p_ci_id
10280: ,p_status_code => 'CI_IMPACT_IMPLEMENTED'
10281: ,p_implemented_by => FND_GLOBAL.USER_ID
10282: ,p_impact_type_code => l_impact_type_code

Line 10343: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'

10339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10340: x_msg_count := 1;
10341: x_msg_data := SQLERRM;
10342:
10343: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
10344: ,p_procedure_name => 'implement_ci_into_single_ver');
10345: IF P_PA_DEBUG_MODE = 'Y' THEN
10346: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
10347: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

Line 11694: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'

11690:
11691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11692: x_msg_count := 1;
11693: x_msg_data := SQLERRM;
11694: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
11695: ,p_procedure_name => 'validate_ci_merge_input_data');
11696:
11697: IF l_debug_mode = 'Y' THEN
11698: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 11716: * iv. Call is made to pa_fp_ci_merge.FP_CI_UPDATE_IMPACT.

11712: * ii. Call is made to pa_fp_ci_implement_pkg.create_ci_impact_fund_lines and pa_baseline_funding_pkg.change_management_baseline.
11713: * iii. Insert 2 records into pa_fp_merged_ctrl_items for newly created current working version and the
11714: * baselied version with all the attributes of the record stored in the nested tables except the
11715: * inclusion_method_code, which would be 'COPIED' for the current working version and 'AUTOMATIC' for the baselined version.
11716: * iv. Call is made to pa_fp_ci_merge.FP_CI_UPDATE_IMPACT.
11717: *--------------------------------------------------------------------------------------------------------*/
11718:
11719: PROCEDURE impl_ci_into_autobaseline_proj( p_ci_id IN Pa_control_items.ci_id%TYPE -- The Id of the chg doc that needs to be implemented
11720: ,p_ci_rev_version_id IN Pa_budget_versions.budget_version_id%TYPE DEFAULT NULL -- The rev budget version id corresponding to the p_ci_id passed. This will be derived internally if not passed

Line 12382: pa_debug.g_err_stage:= 'Calling pa_fp_ci_merge.FP_CI_UPDATE_IMPACT';

12378: END IF;
12379: END IF;
12380:
12381: IF l_debug_mode = 'Y' THEN
12382: pa_debug.g_err_stage:= 'Calling pa_fp_ci_merge.FP_CI_UPDATE_IMPACT';
12383: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
12384: END IF;
12385:
12386: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT

Line 12386: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT

12382: pa_debug.g_err_stage:= 'Calling pa_fp_ci_merge.FP_CI_UPDATE_IMPACT';
12383: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
12384: END IF;
12385:
12386: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT
12387: (p_ci_id => p_ci_id
12388: ,p_status_code => 'CI_IMPACT_IMPLEMENTED'
12389: ,p_implemented_by => FND_GLOBAL.USER_ID
12390: ,p_impact_type_code => 'FINPLAN_REVENUE'

Line 12406: pa_debug.g_err_stage:= 'Call to pa_fp_ci_merge.FP_CI_UPDATE_IMPACT done';

12402: END IF;
12403: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12404: END IF;
12405: IF l_debug_mode = 'Y' THEN
12406: pa_debug.g_err_stage:= 'Call to pa_fp_ci_merge.FP_CI_UPDATE_IMPACT done';
12407: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
12408: END IF;
12409: -- Bug 3877815: Review comment
12410:

Line 12488: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'

12484: WHEN OTHERS THEN
12485: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12486: x_msg_count := 1;
12487: x_msg_data := SQLERRM;
12488: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
12489: ,p_procedure_name => 'impl_ci_into_autobaseline_proj');
12490:
12491: IF l_debug_mode = 'Y' THEN
12492: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 13221: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'

13217:
13218: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13219: x_msg_count := 1;
13220: x_msg_data := SQLERRM;
13221: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
13222: ,p_procedure_name => 'implement_change_document');
13223:
13224: IF l_debug_mode = 'Y' THEN
13225: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 13611: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_MERGE',

13607: EXCEPTION
13608: WHEN OTHERS THEN
13609: ROLLBACK TO copy_supp_det;
13610: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13611: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_MERGE',
13612: p_procedure_name => 'copy_supplier_cost_data',
13613: p_error_text => SUBSTRB(SQLERRM,1,240));
13614:
13615: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 13698: l_api_name CONSTANT VARCHAR2(60) := 'PA_FP_CI_MERGE.copy_direct_cost_data';

13694: u_change_reason_code SYSTEM.PA_VARCHAR2_30_TBL_TYPE := SYSTEM.PA_VARCHAR2_30_TBL_TYPE();
13695: u_change_description SYSTEM.PA_VARCHAR2_2000_TBL_TYPE := SYSTEM.PA_VARCHAR2_2000_TBL_TYPE();
13696: --
13697: l_api_version number := 1;
13698: l_api_name CONSTANT VARCHAR2(60) := 'PA_FP_CI_MERGE.copy_direct_cost_data';
13699: l_return_status VARCHAR2(1) := PA_API.G_RET_STS_SUCCESS;
13700: l_msg_count number;
13701: l_msg_data varchar2(2000);
13702: l_dir_cost_flag VARCHAR2(1);

Line 14037: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_MERGE',

14033: EXCEPTION
14034: WHEN OTHERS THEN
14035: ROLLBACK TO copy_dir_cost_det;
14036: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
14037: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_FP_CI_MERGE',
14038: p_procedure_name => 'copy_direct_cost_data',
14039: p_error_text => SUBSTRB(SQLERRM,1,240));
14040: fnd_msg_pub.count_and_get(p_count => x_msg_count,
14041: p_data => x_msg_data);

Line 14044: --end of PACKAGE pa_fp_ci_merge

14040: fnd_msg_pub.count_and_get(p_count => x_msg_count,
14041: p_data => x_msg_data);
14042: RAISE;
14043: end copy_direct_cost_data;
14044: --end of PACKAGE pa_fp_ci_merge
14045: END PA_FP_CI_MERGE;

Line 14045: END PA_FP_CI_MERGE;

14041: p_data => x_msg_data);
14042: RAISE;
14043: end copy_direct_cost_data;
14044: --end of PACKAGE pa_fp_ci_merge
14045: END PA_FP_CI_MERGE;