[Home] [Help]
3263: -- Start of variables declared for bug 4035856
3264: l_src_delta_amt_adj_task_id pa_tasks.task_id%TYPE;
3265: l_targ_delta_amt_adj_rlm_id pa_resource_list_members.resource_list_member_id%TYPE;
3266: l_src_delta_amt_adj_ra_id pa_resource_assignments.resource_assignment_id%TYPE;
3267: l_src_delta_amt_adj_start_date pa_budget_lines.start_date%TYPE;
3268: l_pc_revenue_delta pa_budget_lines.project_revenue%TYPE;
3269: l_pfc_revenue_delta pa_budget_lines.revenue%TYPE;
3270: l_pc_rev_merged pa_budget_lines.project_revenue%TYPE;
3271: l_pfc_rev_merged pa_budget_lines.revenue%TYPE;
5920:
5921: END IF;--IF l_src_time_phased_code = 'N' AND (l_targ_time_phased_code = 'P' OR l_targ_time_phased_code = 'G') THEN
5922:
5923: --Get the budget line sequence before inserting data into budget lines. After inserting the budget lines
5924: --the sequence is again compared to see the no. of budget lines that have got inserted. Since pa_budget_lines_s.currval
5925: --is used at a later part of code this SELECT should not be removed
5926: SELECT pa_budget_lines_s.nextval
5927: INTO l_id_before_bl_insertion
5928: FROM DUAL;
5922:
5923: --Get the budget line sequence before inserting data into budget lines. After inserting the budget lines
5924: --the sequence is again compared to see the no. of budget lines that have got inserted. Since pa_budget_lines_s.currval
5925: --is used at a later part of code this SELECT should not be removed
5926: SELECT pa_budget_lines_s.nextval
5927: INTO l_id_before_bl_insertion
5928: FROM DUAL;
5929:
5930: --dbms_output.put_line('I25');
6141: pbl.txn_raw_cost,
6142: pbl.txn_burdened_cost,
6143: pbl.txn_revenue,
6144: pbl.bucketing_period_code,
6145: pa_budget_lines_s.nextval,
6146: pbl.budget_version_id,
6147: pbl.txn_standard_cost_rate,
6148: DECODE(l_target_version_type,
6149: 'REVENUE',pbl.txn_cost_rate_override,
6547: pbl.txn_raw_cost,
6548: pbl.txn_burdened_cost,
6549: pbl.txn_revenue,
6550: pbl.bucketing_period_code,
6551: pa_budget_lines_s.nextval,
6552: pbl.budget_version_id,
6553: pbl.txn_standard_cost_rate,
6554: DECODE(l_target_version_type,
6555: 'REVENUE',pbl.txn_cost_rate_override,
6954: pbl.txn_raw_cost,
6955: pbl.txn_burdened_cost,
6956: pbl.txn_revenue,
6957: pbl.bucketing_period_code,
6958: pa_budget_lines_s.nextval,
6959: pbl.budget_version_id,
6960: pbl.txn_standard_cost_rate,
6961: DECODE(l_target_version_type,
6962: 'REVENUE',pbl.txn_cost_rate_override,
7360: pbl.txn_raw_cost,
7361: pbl.txn_burdened_cost,
7362: pbl.txn_revenue,
7363: pbl.bucketing_period_code,
7364: pa_budget_lines_s.nextval,
7365: pbl.budget_version_id,
7366: pbl.txn_standard_cost_rate,
7367: DECODE(l_target_version_type,
7368: 'REVENUE',pbl.txn_cost_rate_override,
9050: l_bl_TXN_RAW_COST_tbl(kk),
9051: l_bl_TXN_BURDENED_COST_tbl(kk),
9052: l_bl_TXN_REVENUE_tbl(kk),
9053: l_bl_BUCKETING_PERIOD_CODE_tbl(kk),
9054: pa_budget_lines_s.nextval,
9055: p_budget_version_id,
9056: l_bl_TXN_STD_COST_RATE_tbl(kk),
9057: DECODE(l_target_version_type,
9058: 'REVENUE',l_bl_TXN_COST_RATE_OVERIDE_tbl(kk),
9477:
9478: ----Prepare the pl/sql tbls to call the API in planning transaction utils that calls PJI API
9479: ----plan_update
9480:
9481: SELECT pa_budget_lines_s.currval
9482: INTO l_dummy
9483: FROM dual;
9484:
9485: IF l_dummy=l_id_before_bl_insertion THEN
9487: l_id_after_bl_insertion := l_id_before_bl_insertion;
9488:
9489: ELSE
9490:
9491: SELECT pa_budget_lines_s.nextval
9492: INTO l_id_after_bl_insertion
9493: FROM dual;
9494:
9495: END IF;
9978: l_impl_pc_rev_amt := l_targ_pc_rev_after_merge - l_targ_pc_rev_before_merge + l_pc_revenue_delta;
9979: l_impl_pfc_rev_amt := l_targ_pfc_rev_after_merge - l_targ_pfc_rev_before_merge + l_pfc_revenue_delta;
9980:
9981: ELSE
9982: --Derive l_pc/pfc_revenue_delta. In this case we have to go to pa_budget_lines since the amounts
9983: --would not have got rolled up
9984: SELECT sum(pbl.project_revenue) - l_targ_pc_rev_before_merge
9985: ,sum(pbl.revenue) - l_targ_pfc_rev_before_merge
9986: INTO l_impl_pc_rev_amt