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.14.12010000.2 2008/09/12 22:44:57 skkoppul 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.14.12010000.2 2008/09/12 22:44:57 skkoppul 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 2499: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||

2495: EXCEPTION
2496: WHEN OTHERS THEN
2497: ROLLBACK TO before_fp_ci_copy;
2498: FND_MSG_PUB.add_exc_msg
2499: ( p_pkg_name => 'PA_FP_CI_MERGE.' ||
2500: 'fp_ci_merge_ci_items'
2501: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
2502: IF p_pa_debug_mode = 'Y' THEN
2503: PA_DEBUG.g_err_stage := 'Unexpected error in FP_CI_MERGE_CI_ITEMS';

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

2551:
2552: x_msg_count := 0;
2553: x_return_status := FND_API.G_RET_STS_SUCCESS;
2554: IF p_pa_debug_mode = 'Y' THEN
2555: pa_debug.set_err_stack('PA_FP_CI_MERGE.copy_merged_ctrl_items');
2556: END IF;
2557: fnd_profile.get('PA_DEBUG_MODE',l_debug_mode);
2558: l_debug_mode := NVL(l_debug_mode, 'Y');
2559: IF p_pa_debug_mode = 'Y' THEN

Line 2829: ( p_pkg_name => 'PA_FP_CI_MERGE'

2825: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2826: x_msg_count := 1;
2827: x_msg_data := SQLERRM;
2828: FND_MSG_PUB.add_exc_msg
2829: ( p_pkg_name => 'PA_FP_CI_MERGE'
2830: ,p_procedure_name => 'copy_merged_ctrl_items'
2831: ,p_error_text => sqlerrm);
2832: IF p_pa_debug_mode = 'Y' THEN
2833: pa_debug.g_err_stage:= 'Unexpected Error'||SQLERRM;

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

2906: x_msg_count := 0;
2907: x_return_status := FND_API.G_RET_STS_SUCCESS;
2908: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2909: IF l_debug_mode = 'Y' THEN
2910: pa_debug.set_err_stack('PA_FP_CI_MERGE.FP_CI_MANUAL_MERGE');
2911: pa_debug.set_process('PLSQL','LOG',l_debug_mode);
2912: END IF;
2913:
2914: -- Check for business rules violations

Line 3275: ( p_pkg_name => 'PA_FP_CI_MERGE'

3271: x_msg_count := 1;
3272: x_msg_data := SQLERRM;
3273:
3274: FND_MSG_PUB.add_exc_msg
3275: ( p_pkg_name => 'PA_FP_CI_MERGE'
3276: ,p_procedure_name => 'FP_CI_MANUAL_MERGE'
3277: ,p_error_text => x_msg_data);
3278:
3279: IF l_debug_mode = 'Y' THEN

Line 6925: 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)

6921: pa_resource_assignments pras
6922: where l_ra_dml_code_tbl(kk)='INSERT'
6923: and pras.resource_assignment_id = pbls.resource_assignment_id
6924: and pras.budget_version_id = l_src_ver_id_tbl(j)
6925: 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)
6926: --IPM Arch Enhancement Bug 4865563
6927: /*and pbls.cost_rejection_code IS NULL
6928: and pbls.revenue_rejection_code IS NULL
6929: and pbls.burden_rejection_code IS NULL

Line 7184: (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,

7180: pbl.pc_cur_conv_rejection_code,
7181: pbl.pfc_cur_conv_rejection_code
7182: FROM
7183: --The entier SELECT is moved to the sub query in FROM clause as nextval would not work with group by
7184: (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,
7185: sysdate last_update_date,
7186: fnd_global.user_id last_updated_by,
7187: sysdate creation_date,
7188: fnd_global.user_id created_by,

Line 7330: 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)

7326: where l_ra_dml_code_tbl(kk)='INSERT'
7327: and pras.resource_assignment_id = pbls.resource_assignment_id
7328: and pras.budget_version_id = l_src_ver_id_tbl(j)
7329: AND pras.resource_assignment_id=rlmap.txn_source_id
7330: 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)
7331: --IPM Arch Enhancement Bug 4865563
7332: /*and pbls.cost_rejection_code IS NULL
7333: and pbls.revenue_rejection_code IS NULL
7334: and pbls.burden_rejection_code IS NULL

Line 7338: 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) ,

7334: and pbls.burden_rejection_code IS NULL
7335: and pbls.other_rejection_code IS NULL
7336: and pbls.pc_cur_conv_rejection_code IS NULL
7337: and pbls.pfc_cur_conv_rejection_code IS NULL*/
7338: 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) ,
7339: 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;
7340:
7341: IF P_PA_debug_mode = 'Y' THEN
7342: pa_debug.g_err_stage:= 'Done with bulk insert Budget lines with diff RLs and with targ TP as None';

Line 10781: pa_fp_ci_merge.FP_CI_LINK_CONTROL_ITEMS(

10777: END IF;
10778:
10779: IF l_impl_earlier='N' THEN
10780:
10781: pa_fp_ci_merge.FP_CI_LINK_CONTROL_ITEMS(
10782: p_project_id => l_project_id
10783: ,p_s_fp_version_id => l_src_ver_id_tbl(j)
10784: ,p_t_fp_version_id => p_budget_version_id
10785: ,p_inclusion_method => 'AUTOMATIC'

Line 10872: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT

10868:
10869: --dbms_output.put_line('I52');
10870: IF (l_targ_app_cost_flag = 'Y' OR l_targ_app_rev_flag = 'Y') AND l_current_working_flag = 'Y' THEN
10871: l_impact_type_code := 'FINPLAN_' || l_version_type;
10872: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT
10873: (p_ci_id => p_ci_id
10874: ,p_status_code => 'CI_IMPACT_IMPLEMENTED'
10875: ,p_implemented_by => FND_GLOBAL.USER_ID
10876: ,p_impact_type_code => l_impact_type_code

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

10933: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
10934: x_msg_count := 1;
10935: x_msg_data := SQLERRM;
10936:
10937: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
10938: ,p_procedure_name => 'implement_ci_into_single_ver');
10939: IF P_PA_DEBUG_MODE = 'Y' THEN
10940: pa_debug.g_err_stage:='Unexpected Error ' || SQLERRM;
10941: pa_debug.write(l_module_name,pa_debug.g_err_stage,l_debug_level5);

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

12214:
12215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12216: x_msg_count := 1;
12217: x_msg_data := SQLERRM;
12218: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
12219: ,p_procedure_name => 'validate_ci_merge_input_data');
12220:
12221: IF l_debug_mode = 'Y' THEN
12222: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

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

12236: * ii. Call is made to pa_fp_ci_implement_pkg.create_ci_impact_fund_lines and pa_baseline_funding_pkg.change_management_baseline.
12237: * iii. Insert 2 records into pa_fp_merged_ctrl_items for newly created current working version and the
12238: * baselied version with all the attributes of the record stored in the nested tables except the
12239: * inclusion_method_code, which would be 'COPIED' for the current working version and 'AUTOMATIC' for the baselined version.
12240: * iv. Call is made to pa_fp_ci_merge.FP_CI_UPDATE_IMPACT.
12241: *--------------------------------------------------------------------------------------------------------*/
12242:
12243: 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
12244: ,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 12906: pa_debug.g_err_stage:= 'Calling pa_fp_ci_merge.FP_CI_UPDATE_IMPACT';

12902: END IF;
12903: END IF;
12904:
12905: IF l_debug_mode = 'Y' THEN
12906: pa_debug.g_err_stage:= 'Calling pa_fp_ci_merge.FP_CI_UPDATE_IMPACT';
12907: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
12908: END IF;
12909:
12910: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT

Line 12910: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT

12906: pa_debug.g_err_stage:= 'Calling pa_fp_ci_merge.FP_CI_UPDATE_IMPACT';
12907: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
12908: END IF;
12909:
12910: pa_fp_ci_merge.FP_CI_UPDATE_IMPACT
12911: (p_ci_id => p_ci_id
12912: ,p_status_code => 'CI_IMPACT_IMPLEMENTED'
12913: ,p_implemented_by => FND_GLOBAL.USER_ID
12914: ,p_impact_type_code => 'FINPLAN_REVENUE'

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

12926: END IF;
12927: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
12928: END IF;
12929: IF l_debug_mode = 'Y' THEN
12930: pa_debug.g_err_stage:= 'Call to pa_fp_ci_merge.FP_CI_UPDATE_IMPACT done';
12931: pa_debug.write(l_module_name,pa_debug.g_err_stage,3);
12932: END IF;
12933: -- Bug 3877815: Review comment
12934:

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

13008: WHEN OTHERS THEN
13009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13010: x_msg_count := 1;
13011: x_msg_data := SQLERRM;
13012: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
13013: ,p_procedure_name => 'impl_ci_into_autobaseline_proj');
13014:
13015: IF l_debug_mode = 'Y' THEN
13016: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

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

13724:
13725: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13726: x_msg_count := 1;
13727: x_msg_data := SQLERRM;
13728: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_CI_MERGE'
13729: ,p_procedure_name => 'implement_change_document');
13730:
13731: IF l_debug_mode = 'Y' THEN
13732: pa_debug.g_err_stage:='Unexpected Error'||SQLERRM;

Line 13747: END PA_FP_CI_MERGE;

13743: RAISE;
13744:
13745: END implement_change_document;
13746:
13747: END PA_FP_CI_MERGE;
13748: --end of PACKAGE pa_fp_ci_merge

Line 13748: --end of PACKAGE pa_fp_ci_merge

13744:
13745: END implement_change_document;
13746:
13747: END PA_FP_CI_MERGE;
13748: --end of PACKAGE pa_fp_ci_merge