[Home] [Help]
2847: l_msg_count NUMBER;
2848: l_msg_data VARCHAR2(80);
2849:
2850: begin
2851: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '100: entered procedure', 2);
2852: --hr_utility.trace_on(null, 'dlai');
2853: --hr_utility.trace('entered view_plan_temp_tables');
2854: --hr_utility.trace('p_budget_version_id= ' || TO_CHAR(p_budget_version_id));
2855: x_msg_count := 0;
3102:
3103: -- if the preference code is 'COST_AND_REV_SAME', then we only need this one version
3104: -- we blindly insert all rows for the budget version into the temp table
3105: if l_fp_preference_code = 'COST_AND_REV_SAME' then
3106: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '200: pref = COST_AND_REV_SAME', 1);
3107: --hr_utility.trace('COST_AND_REV_SAME');
3108: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'ANY';
3109: select version_name,
3110: version_number
3126:
3127: -- if the preference code is 'COST_ONLY', then we have the bvID of the COST version
3128: -- and we don't have to do anything else
3129: elsif l_fp_preference_code = 'COST_ONLY' then
3130: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '300: pref=COST_ONLY', 1);
3131: --hr_utility.trace('COST_ONLY');
3132: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'COST';
3133: select version_number,
3134: version_name
3149: x_msg_count => l_msg_count,
3150: x_msg_data => l_msg_data);
3151:
3152: elsif l_fp_preference_code = 'REVENUE_ONLY' then
3153: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '400: pref=REVENUE_ONLY', 1);
3154: --hr_utility.trace('REVENUE_ONLY');
3155: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'REVENUE';
3156: select version_number,
3157: version_name
3177: -- the other one will also have preference_code = 'COST_AND_REV_SEP', and we will
3178: -- have to inspect bv.version_type (which can be 'COST', 'REVENUE', etc)
3179: else
3180: -- find the appropriate current working version
3181: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '400: pref=COST_AND_REV_SEP', 1);
3182: --hr_utility.trace('COST_AND_REV_SEP');
3183: if l_working_or_baselined = 'W' then
3184: -- determine whether we have the COST or REVENUE version, and look for the other one
3185: if p_cost_or_revenue = 'C' then
3182: --hr_utility.trace('COST_AND_REV_SEP');
3183: if l_working_or_baselined = 'W' then
3184: -- determine whether we have the COST or REVENUE version, and look for the other one
3185: if p_cost_or_revenue = 'C' then
3186: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '500: pref=COST_AND_REV_SEP, WORKING, COST', 2);
3187: --hr_utility.trace('we have a working cost version');
3188: -- we have the COST version, so look for REVENUE version with 'COST_AND_REV_SEP'
3189: open l_compl_crsep_c_w_csr;
3190: fetch l_compl_crsep_c_w_csr into l_compl_crsep_c_w_rec;
3197: end if; -- l_compl_crsep_c_w_csr: no data found
3198: close l_compl_crsep_c_w_csr;
3199: if l_compl_budget_version_id = -99 then
3200: -- did not find a compl for the COST version; just process COST version
3201: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '600: pref=COST_AND_REV_SEP, WORKING, COST - did not find complement', 1);
3202: --hr_utility.trace('could NOT find complement for working cost version');
3203: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'COST';
3204: select version_number,
3205: version_name
3233: (p_period_profile_id1 => l_period_profile_id1,
3234: p_period_profile_id2 => l_period_profile_id2) = 'Y') or
3235: not (pa_fp_view_plans_pub.G_AMT_OR_PD = 'P') then
3236: --merge the COST and REVENUE versions
3237: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '700: pref=COST_AND_REV_SEP, WORKING, COST - found complement,and passed period profile check', 1);
3238: --hr_utility.trace('found complement for working cost version AND period profile match');
3239: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'BOTH';
3240: select version_number,
3241: version_name
3263: x_msg_count => l_msg_count,
3264: x_msg_data => l_msg_data);
3265: else
3266: -- the period profiles didn't match: only process one of the versions
3267: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '800: pref=COST_AND_REV_SEP, WORKING, COST - found complement,BUT did not pass period profile check', 1);
3268: --hr_utility.trace('found complement for working cost version BUT no per profile match');
3269: l_diff_pd_profile_flag := 'Y';
3270:
3271: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'COST';
3312: end if;
3313: end if; -- l_compl_budget_version_id is null
3314: else
3315: -- we have the REVENUE version, so look for COST version with 'COST_AND_REV_SEP'
3316: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '900: pref=COST_AND_REV_SEP, WORKING, REVENUE', 1);
3317: --hr_utility.trace('we have a working revenue version');
3318: open l_compl_crsep_r_w_csr;
3319: fetch l_compl_crsep_r_w_csr into l_compl_crsep_r_w_rec;
3320: if l_compl_crsep_r_w_csr%NOTFOUND then
3326: end if; --l_compl_crsep_r_w_csr: no data found
3327: close l_compl_crsep_r_w_csr;
3328: if l_compl_budget_version_id = -99 then
3329: -- did not find a compl for the REVENUE version; just process REVENUE version
3330: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1000: pref=COST_AND_REV_SEP, WORKING, REVENUE - did not find complement', 1);
3331: --hr_utility.trace('could not find complement for working revenue version');
3332: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'REVENUE';
3333: select version_number,
3334: version_name
3362: (p_period_profile_id1 => l_period_profile_id1,
3363: p_period_profile_id2 => l_period_profile_id2) = 'Y') or
3364: not (pa_fp_view_plans_pub.G_AMT_OR_PD = 'P') then
3365: --merge the COST and REVENUE versions
3366: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1100: pref=COST_AND_REV_SEP, WORKING, REVENUE - found complement, and passed period profiles test', 1);
3367: --hr_utility.trace('found compl for working revenue version AND period profile match');
3368: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'BOTH';
3369: select version_number,
3370: version_name
3392: x_msg_count => l_msg_count,
3393: x_msg_data => l_msg_data);
3394: else
3395: -- the period profiles didn't match: only process one of the versions
3396: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1200: pref=COST_AND_REV_SEP, WORKING, REVENUE - found complement, BUT did not pass period profiles test', 1);
3397: --hr_utility.trace('found compl for working revenue version BUT no per profile match');
3398: l_diff_pd_profile_flag := 'Y';
3399: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'REVENUE';
3400: select version_number,
3444: else
3445: -- determine whether we have the COST or REVENUE version, and look for the other one
3446: if p_cost_or_revenue = 'C' then
3447: -- we have the COST version, so look for REVENUE version with 'COST_AND_REV_SEP'
3448: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1300: pref=COST_AND_REV_SEP, BASELINED, COST', 1);
3449: --hr_utility.trace('we have a baselined cost version');
3450: open l_compl_crsep_c_b_csr;
3451: fetch l_compl_crsep_c_b_csr into l_compl_crsep_c_b_rec;
3452: if l_compl_crsep_c_b_csr%NOTFOUND then
3458: end if; -- l_compl_crsep_c_b_csr: no data found
3459: close l_compl_crsep_c_b_csr;
3460: if l_compl_budget_version_id = -99 then
3461: -- did not find a compl for the COST version; just process COST version
3462: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1400: pref=COST_AND_REV_SEP, BASELINED, COST - did not find complement', 1);
3463: --hr_utility.trace('could not find complement for baselined cost version');
3464: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'COST';
3465: select version_number,
3466: version_name
3494: (p_period_profile_id1 => l_period_profile_id1,
3495: p_period_profile_id2 => l_period_profile_id2) = 'Y') or
3496: not (pa_fp_view_plans_pub.G_AMT_OR_PD = 'P') then
3497: --merge the COST and REVENUE versions
3498: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1500: pref=COST_AND_REV_SEP, BASELINED, COST - found complement, and passed period profiles test', 1);
3499: --hr_utility.trace('found compl for baselined cost AND period profile match');
3500: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'BOTH';
3501: select version_number,
3502: version_name
3524: x_msg_count => l_msg_count,
3525: x_msg_data => l_msg_data);
3526: else
3527: -- period_profiles don't match; process only the COST version
3528: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1600: pref=COST_AND_REV_SEP, BASELINED, COST - found complement, BUT did not pass period profiles test', 1);
3529: --hr_utility.trace('found compl for baselined cost BUT no period profile match');
3530: l_diff_pd_profile_flag := 'Y';
3531: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'COST';
3532: select version_number,
3572: end if; -- l_compl_budget_version_id is null
3573:
3574: else
3575: -- we have the REVENUE version, so look for COST version with 'COST_AND_REV_SEP'
3576: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1700: pref=COST_AND_REV_SEP, BASELINED, REVENUE', 1);
3577: --hr_utility.trace('we have a baselined revenue version');
3578: open l_compl_crsep_r_b_csr;
3579: fetch l_compl_crsep_r_b_csr into l_compl_crsep_r_b_rec;
3580: if l_compl_crsep_r_b_csr%NOTFOUND then
3586: end if; -- l_compl_crsep_r_b_csr: no data found
3587: close l_compl_crsep_r_b_csr;
3588: if l_compl_budget_version_id = -99 then
3589: -- did not find a compl for the REVENUE version; just process REVENUE version
3590: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1800: pref=COST_AND_REV_SEP, BASELINED, REVENUE - did not find complement', 1);
3591: --hr_utility.trace('we have a baselined revenue version');
3592: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'REVENUE';
3593: select version_number,
3594: version_name
3622: (p_period_profile_id1 => l_period_profile_id1,
3623: p_period_profile_id2 => l_period_profile_id2) = 'Y') or
3624: not (pa_fp_view_plans_pub.G_AMT_OR_PD = 'P') then
3625: --merge the COST and REVENUE versions
3626: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '1900: pref=COST_AND_REV_SEP, BASELINED, REVENUE - found complement, and passed period profiles test', 1);
3627: --hr_utility.trace('found compl for baselined revenue version AND period profile match');
3628: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'BOTH';
3629: select version_number,
3630: version_name
3652: x_msg_count => l_msg_count,
3653: x_msg_data => l_msg_data);
3654: else
3655: -- period profiles not compatible; just process REVENUE version
3656: pa_debug.write('pa_fp_view_plans_pub.view_plan_temp_tables', '2000: pref=COST_AND_REV_SEP, BASELINED, REVENUE - found complement, BUT did not pass period profiles test', 1);
3657: --hr_utility.trace('found compl for baselined revenue version BUT no per profile match');
3658: l_diff_pd_profile_flag := 'Y';
3659: pa_fp_view_plans_pub.G_DISPLAY_FROM := 'REVENUE';
3660: select version_number,
3718: x_msg_count := 1;
3719: x_msg_data := SQLERRM;
3720: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_VIEW_PLANS_PUB',
3721: p_procedure_name => 'view_plan_temp_tables');
3722: pa_debug.reset_err_stack;
3723: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3724:
3725: end; -- procedure view_plan_temp_tables
3726: /* --------------------------------------------------------------------- */
3974: -- Bug 13907149
3975:
3976:
3977: begin
3978: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '100: entering procedure', 2);
3979: l_err_stage := 100;
3980: --hr_utility.trace('entered pa_fp_vp_pop_tables_separate');
3981: x_return_status := FND_API.G_RET_STS_SUCCESS;
3982: x_msg_count := 0;
4012: bv.fin_plan_type_id = po.fin_plan_type_id and
4013: po.project_id = p_project_id and
4014: po.fin_plan_option_level_code = 'PLAN_TYPE';
4015: l_err_stage := 300;
4016: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '200: periodprofileid= ' || l_period_profile_id, 1);
4017: -- insert all cost rows into the COST PL/SQL table
4018: open av_cost_csr;
4019: fetch av_cost_csr bulk collect into
4020: l_c_project_id,
4061: l_r_parent_element_name,
4062: l_r_unit_of_measure;
4063: close av_revenue_csr;
4064: l_err_stage := 500;
4065: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '300: bulk collected into pl/sql tables', 1);
4066:
4067: -- Bug Fix for Bug#13907149
4068:
4069: l_loop_count := nvl(l_c_project_id.last,-1);
6011: end if; -- display_flag: MARGIN PERCENT
6012: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
6013: end if; -- not found_complement
6014: end loop; -- COST PL/SQL loop
6015: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '400: iterated through cost pl/sql table', 1);
6016: l_err_stage := 600;
6017: -- after looping through the COST PL/SQL table, iterate through the REVENUE PL/SQL
6018: -- table, and copy over the untouched rows for PERIOD PL/SQL table
6019: for k in nvl(l_r_project_id.first,0)..nvl(l_r_project_id.last,-1) loop
6537: end if; -- display_flag: MARGIN PERCENT
6538: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
6539: end loop; -- REVENUE PL/SQL loop: the untouched rows
6540: l_err_stage := 700;
6541: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '500: iterated through rev pl/sql table', 1);
6542:
6543: /* TRANSFER DATA FROM PL/SQL TABLES TO GLOBAL TEMPORARY TABLES */
6544:
6545: -- POPULATE global temporary table PA_FIN_VP_AMTS_VIEW_TMP from the
6587: -1,
6588: l_c_unit_of_measure(x),
6589: l_c_has_child_element(x));
6590: l_err_stage := 800;
6591: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '600: transfer from cost pl/sql table to amts_tmp table', 1);
6592: -- rows in the REVENUE PL/SQL table
6593: forall y in nvl(l_r_project_id.first,0)..nvl(l_r_project_id.last,-1)
6594: insert into pa_fin_vp_amts_view_tmp
6595: (project_id,
6631: l_r_unit_of_measure(y),
6632: 'Y'); -- PERFORMANCE LIABILITY: FOR UNMARRIED REVENUE ROWS, WE SAY ALWAYS HAVE CHILD
6633: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD= 'A'
6634: l_err_stage := 900;
6635: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '700: transfer from rev pl/sql table to amts_tmp table', 1);
6636: --hr_utility.trace('total rows is ' || to_char(nvl(l_c_project_id.last,0) + nvl(l_r_project_id.last,0)));
6637: -- POPULATE global temporary table PA_FIN_VP_PDS_VIEW_TMP from the
6638: -- PERIODS PL/SQL table
6639: if pa_fp_view_plans_pub.G_AMT_OR_PD = 'P' then
6812:
6813: -- Bug Fix for bug#13907149 Ends
6814: end if; --pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
6815: l_err_stage:= 1000;
6816: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '700: transfer from pds pl/sql table to pds_tmp table', 1);
6817: commit;
6818: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '800: leaving procedure', 2);
6819: EXCEPTION
6820: when others then
6814: end if; --pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
6815: l_err_stage:= 1000;
6816: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '700: transfer from pds pl/sql table to pds_tmp table', 1);
6817: commit;
6818: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_separate', '800: leaving procedure', 2);
6819: EXCEPTION
6820: when others then
6821: rollback to VIEW_PLANS_POP_TABLES_SEP;
6822: --hr_utility.trace('error stage= ' || to_char(l_err_stage));
6824: x_msg_count := 1;
6825: x_msg_data := SQLERRM;
6826: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_VIEW_PLANS_PUB',
6827: p_procedure_name => 'pa_fp_vp_pop_tables_separate');
6828: pa_debug.reset_err_stack;
6829: return;
6830: end pa_fp_vp_pop_tables_separate;
6831: /* ------------------------------------------------------------------ */
6832:
7053:
7054: begin
7055: --hr_utility.trace_on(null, 'dlai');
7056: l_err_stage := 100;
7057: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '100: entering pa_fp_vp_pop_tables_together', 2);
7058: --hr_utility.trace('entered pa_fp_vp_pop_tables_together: 100');
7059: x_return_status := FND_API.G_RET_STS_SUCCESS;
7060: x_msg_count := 0;
7061: SAVEPOINT VIEW_PLANS_POP_TABLES_SAME;
7086: bv.fin_plan_type_id = po.fin_plan_type_id and
7087: po.project_id = p_project_id and
7088: po.fin_plan_option_level_code = 'PLAN_TYPE';
7089: l_err_stage := 200;
7090: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '200: retrieved periodprofileid= ' || l_period_profile_id, 1);
7091: --hr_utility.trace('retrieved period profile id: 200');
7092: -- populate the AMOUNTS PL/SQL table
7093:
7094: /* Modified below code for bug 7514054 */
7301:
7302: end if;
7303: /* Ends added for bug 7514054 */
7304: l_err_stage := 300;
7305: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '300: bulk collected into amts pl/sql table', 1);
7306: --hr_utility.trace('bulk collected into amts pl/sql table: 300');
7307: --hr_utility.trace('number of rows = ' || TO_CHAR(l_project_id.last));
7308:
7309: -- populate the PERIODS PL/SQL table
8001: l_pd_project_total(l_row_number) := pa_fp_view_plans_util.calc_margin_percent(l_pd_project_total(l_cost_row_number),l_pd_project_total(l_revenue_row_number)); -- bug 2699651
8002: end loop;
8003: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
8004: l_err_stage := 400;
8005: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '400: populated the pds pl/sql tables', 1);
8006: --hr_utility.trace('populated the pds pl/sql tables: 400');
8007:
8008: /* TRANSFER DATA FROM PL/SQL TABLES TO GLOBAL TEMPORARY TABLES */
8009: -- POPULATE global temporary table PA_FIN_VP_AMTS_VIEW_TMP
8049: l_res_assignment_id(i),
8050: l_unit_of_measure(i),
8051: l_has_child_element(i));
8052: l_err_stage := 500;
8053: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '500: populated the amts_tmp tables', 1);
8054: --hr_utility.trace('populated the amts_tmp table: 500');
8055:
8056: -- Bug 8868407:10394217 : Rollup margin and margin_percent to tasks and project levels.
8057: update pa_fin_vp_amts_view_tmp
8244:
8245: /* Ends logic to rollup the period aounts to the parent levels */
8246:
8247: l_err_stage := 600;
8248: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '600: populated the pds_tmp tables', 1);
8249: --hr_utility.trace('populated the pds_temp table: 600');
8250: commit;
8251: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
8252: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '700: leaving procedure', 2);
8248: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '600: populated the pds_tmp tables', 1);
8249: --hr_utility.trace('populated the pds_temp table: 600');
8250: commit;
8251: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
8252: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_together', '700: leaving procedure', 2);
8253:
8254: EXCEPTION
8255: when others then
8256: rollback to VIEW_PLANS_POP_TABLES_SAME;
8259: x_msg_count := 1;
8260: x_msg_data := SQLERRM;
8261: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_VIEW_PLANS_PUB',
8262: p_procedure_name => 'View_Plans_Pop_Tables_Tog');
8263: pa_debug.reset_err_stack;
8264: return;
8265: end pa_fp_vp_pop_tables_together;
8266: /* ------------------------------------------------------------- */
8267:
8527:
8528: begin
8529: --hr_utility.trace_on(null, 'dlai');
8530: l_err_stage := 100;
8531: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '100: entering procedure', 2);
8532: --hr_utility.trace('entered pa_fp_vp_pop_tables_single:100');
8533: x_return_status := FND_API.G_RET_STS_SUCCESS;
8534: x_msg_count := 0;
8535: SAVEPOINT VIEW_PLANS_POP_TABLES_SINGLE;
8559: bv.fin_plan_type_id = po.fin_plan_type_id and
8560: po.project_id = p_project_id and
8561: po.fin_plan_option_level_code = 'PLAN_TYPE';
8562: l_err_stage := 200;
8563: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '200: retrieved periodprofileid= ' || l_period_profile_id, 1);
8564: --hr_utility.trace('retrieved periodprofileid: 200');
8565: -- populate AMOUNTS PL/SQL TABLES
8566: if p_cost_or_rev = 'C' then
8567: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '300: this is a COST version - populating amts pl/sql tables', 1);
8563: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '200: retrieved periodprofileid= ' || l_period_profile_id, 1);
8564: --hr_utility.trace('retrieved periodprofileid: 200');
8565: -- populate AMOUNTS PL/SQL TABLES
8566: if p_cost_or_rev = 'C' then
8567: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '300: this is a COST version - populating amts pl/sql tables', 1);
8568: /* Modified below code for bug 7514054 */
8569:
8570: open av_cost_csr;
8571: fetch av_cost_csr bulk collect into
9388: end if; --display_from: MARGIN PERCENT
9389: end loop;
9390: end if; --pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
9391: l_err_stage := 400;
9392: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '400: COST version - FINISHED populating amts pl/sql tables', 1);
9393:
9394: -- POPULATE global temporary table PA_FIN_VP_AMTS_VIEW_TMP
9395: -- ONLY if pa_fp_view_plans_pub.G_AMT_OR_PD = 'A'
9396: if pa_fp_view_plans_pub.G_AMT_OR_PD = 'A' then
9435: l_unit_of_measure(i),
9436: l_has_child_element(i));
9437: end if; --pa_fp_view_plans_pub.G_AMT_OR_PD= 'A'
9438: l_err_stage := 500;
9439: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '800: amts temp table populated', 1);
9440:
9441: -- POPULATE global temporary table PA_FIN_VP_PDS_VIEW_TMP
9442: -- ONLY if pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
9443: if pa_fp_view_plans_pub.G_AMT_OR_PD = 'P' then
9615: end loop;
9616: /* Ends added for 7514054 */
9617: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
9618: l_err_stage := 600;
9619: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '900: pds temp table populated', 1);
9620:
9621:
9622: elsif p_cost_or_rev = 'R' then
9623: l_err_stage := 700;
9620:
9621:
9622: elsif p_cost_or_rev = 'R' then
9623: l_err_stage := 700;
9624: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '500: this is a REVENUE version - populating amts pl/sql tables', 1);
9625: --hr_utility.trace('this is a REVENUE version: 500');
9626: /* Modified below code for 7514054 */
9627:
9628: open av_rev_csr;
10326: end if; --display_from: MARGIN PERCENT
10327: end loop;
10328: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
10329: l_err_stage:= 900;
10330: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '600: REVENUE version - FINISHED populating amts pl/sql tables', 1);
10331: --hr_utility.trace('finished populating amts pl/sql tables: 600');
10332:
10333: -- POPULATE global temporary table PA_FIN_VP_AMTS_VIEW_TMP
10334: -- only if pa_fp_view_plans_pub.G_AMT_OR_PD = 'A'
10373: -1,
10374: l_unit_of_measure(i),
10375: l_has_child_element(i));
10376: l_err_stage:= 1000;
10377: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '800: amts temp table populated', 1);
10378: --hr_utility.trace('amts temp table populated: 800');
10379: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD= 'A'
10380:
10381: -- POPULATE global temporary table PA_FIN_VP_PDS_VIEW_TMP
10560:
10561: /* Ends added for 7514054 */
10562: end if; -- pa_fp_view_plans_pub.G_AMT_OR_PD = 'P'
10563: l_err_stage := 1100;
10564: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '900: pds temp table populated', 1);
10565:
10566:
10567: else
10568: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '700: INVALID VALUE FOR p_cost_or_rev', 4);
10564: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '900: pds temp table populated', 1);
10565:
10566:
10567: else
10568: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '700: INVALID VALUE FOR p_cost_or_rev', 4);
10569: --hr_utility.trace('invalid value for p_cost_or_rev');
10570: end if;
10571: commit;
10572: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '1000: exiting procedure', 2);
10568: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '700: INVALID VALUE FOR p_cost_or_rev', 4);
10569: --hr_utility.trace('invalid value for p_cost_or_rev');
10570: end if;
10571: commit;
10572: pa_debug.write('pa_fp_view_plans_pub.pa_fp_vp_pop_tables_single', '1000: exiting procedure', 2);
10573:
10574: EXCEPTION
10575: when others then
10576: rollback to VIEW_PLANS_POP_TABLES_SINGLE;
10579: x_msg_count := 1;
10580: x_msg_data := SQLERRM;
10581: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_FP_VIEW_PLANS_PUB',
10582: p_procedure_name => 'View_Plans_Pop_Tables_Single');
10583: pa_debug.reset_err_stack;
10584: return;
10585: end pa_fp_vp_pop_tables_single;
10586:
10587: