The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_ASSIGNMENT_PROGRESS(
p_api_version IN NUMBER := 1.0 ,
p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE ,
p_commit IN VARCHAR2 := FND_API.G_FALSE ,
p_validate_only IN VARCHAR2 := FND_API.G_TRUE ,
p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL ,
p_calling_module IN VARCHAR2 := 'SELF_SERVICE' ,
p_action IN VARCHAR2 := 'SAVE' ,
p_bulk_load_flag IN VARCHAR2 := 'N' ,
p_progress_mode IN VARCHAR2 := 'FUTURE' ,
p_percent_complete_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_project_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_object_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_object_version_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_task_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_as_of_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
p_progress_comment IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ,
p_brief_overview IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ,
p_actual_start_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
p_actual_finish_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
p_estimated_start_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
p_estimated_finish_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
p_record_version_number IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_pm_product_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ,
p_rate_based_flag IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ,
p_resource_class_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ,
p_txn_currency_code IN VARCHAR2 := PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR ,
p_rbs_element_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
--p_resource_list_member_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , --bug# 3764224
p_resource_assignment_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_actual_cost IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , -- Bug3621404 This parameter represents raw cost
p_actual_effort IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_planned_cost IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , -- Bug3621404 This parameter represents raw cost
p_planned_effort IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_structure_type IN VARCHAR2 := 'WORKPLAN' ,
p_structure_version_id IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_actual_cost_this_period IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , -- Bug3621404 This parameter represents raw cost
p_actual_effort_this_period IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM ,
p_etc_cost_this_period IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , -- Though the name of this column is this period but it is cumulative -- Bug3621404 This parameter represents raw cost
p_etc_effort_this_period IN NUMBER := PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM , -- Though the name of this column is this period but it is cumulative
p_scheduled_start_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
p_scheduled_finish_date IN DATE := PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE ,
x_return_status OUT NOCOPY VARCHAR2 , --File.Sql.39 bug 4440895
x_msg_count OUT NOCOPY NUMBER , --File.Sql.39 bug 4440895
x_msg_data OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
IS
l_api_name CONSTANT VARCHAR(30) := 'UPDATE_ASSIGNMENT_PROGRESS' ;
SELECT decode(status.project_system_status_code, 'STRUCTURE_PUBLISHED', 'Y', 'N')
FROM pa_proj_elem_ver_structure str, pa_project_statuses status
where str.element_version_id = c_structure_version_id
AND str.project_id = c_project_id
AND str.status_code = status.project_status_code;
SELECT decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_tc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_tc,0), nvl(ppr.oth_act_rawcost_to_date_tc,0)) tc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_pc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_pc,0), nvl(ppr.oth_act_rawcost_to_date_pc,0)) pc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_fc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_fc,0), nvl(ppr.oth_act_rawcost_to_date_fc,0)) fc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_tc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_tc,0), nvl(ppr.oth_act_cost_to_date_tc,0)) tc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_pc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_pc,0), nvl(ppr.oth_act_cost_to_date_pc,0)) pc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_fc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_fc,0), nvl(ppr.oth_act_cost_to_date_fc,0)) fc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.PPL_ACT_EFFORT_TO_DATE,0), 'EQUIPMENT', nvl(ppr.EQPMT_ACT_EFFORT_TO_DATE,0), nvl(ppr.OTH_QUANTITY_TO_DATE,0)) act_effort -- 3696572 OTH_QUANTITY_TO_DATE shd also be considered here
FROM pa_progress_rollup ppr
WHERE ppr.project_id = c_project_id
AND ppr.object_id = c_object_id
AND ppr.structure_type = c_structure_type
AND ppr.structure_version_id is null --bug# 3821106 Satish
AND ppr.object_type = 'PA_ASSIGNMENTS'
AND ppr.proj_element_id = p_task_id --bug 3861360
AND ppr.current_flag <> 'W' -- Bug 3879461
--bug# 3821106 Satish
/*AND ppr.as_of_date = ( SELECT max(as_of_date)
from pa_progress_rollup ppr2
WHERE ppr2.as_of_date < c_as_of_date
AND ppr2.project_id = c_project_id
AND ppr2.object_id = c_object_id
AND ppr2.object_type = 'PA_ASSIGNMENTS'
AND ppr2.structure_type = c_structure_type
);*/
AND ppr.as_of_date = ( SELECT max(as_of_date)
from pa_progress_rollup ppr2
WHERE ppr2.as_of_date < c_as_of_date ---4290592
AND ppr2.project_id = c_project_id
AND ppr2.object_id = c_object_id
AND ppr2.object_type = 'PA_ASSIGNMENTS'
AND ppr2.structure_type = c_structure_type
AND ppr2.structure_version_id is null
AND ppr2.proj_element_id = p_task_id --bug 3861360
AND ppr2.current_flag <> 'W' -- Bug 3879461
-- Bug 3879461 : Not exists is not required now
-- AND NOT EXISTS (
-- SELECT 'X' FROM pa_percent_completes ppc
-- WHERE ppc.date_computed = ppr2.as_of_date
-- AND ppc.project_id = c_project_id
-- AND ppc.object_id = c_object_id
-- AND ppc.object_type = 'PA_ASSIGNMENTS'
-- AND ppc.structure_type = c_structure_type
-- AND ppc.published_flag = 'N'
-- AND ppc.task_id = p_task_id --3861360
-- )
);
SELECT decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_tc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_tc,0), nvl(ppr.oth_act_rawcost_to_date_tc,0)) tc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_pc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_pc,0), nvl(ppr.oth_act_rawcost_to_date_pc,0)) pc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_fc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_fc,0), nvl(ppr.oth_act_rawcost_to_date_fc,0)) fc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_tc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_tc,0), nvl(ppr.oth_act_cost_to_date_tc,0)) tc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_pc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_pc,0), nvl(ppr.oth_act_cost_to_date_pc,0)) pc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_fc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_fc,0), nvl(ppr.oth_act_cost_to_date_fc,0)) fc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.PPL_ACT_EFFORT_TO_DATE,0), 'EQUIPMENT', nvl(ppr.EQPMT_ACT_EFFORT_TO_DATE,0), nvl(ppr.OTH_QUANTITY_TO_DATE,0)) act_effort -- 3696572 OTH_QUANTITY_TO_DATE shd also be considered here
FROM pa_progress_rollup ppr
WHERE ppr.project_id = c_project_id
AND ppr.object_id = c_object_id
AND ppr.structure_type = c_structure_type
AND ppr.structure_version_id is null --bug# 3821106 Satish
AND ppr.object_type = 'PA_ASSIGNMENTS'
AND ppr.proj_element_id = p_task_id --bug 3861360
AND ppr.current_flag <> 'W' -- Bug 3879461
--bug# 3821106 Satish
AND ppr.as_of_date = ( SELECT max(as_of_date)
from pa_progress_rollup ppr2
WHERE ppr2.as_of_date <= c_as_of_date ---4290592
AND ppr2.project_id = c_project_id
AND ppr2.object_id = c_object_id
AND ppr2.object_type = 'PA_ASSIGNMENTS'
AND ppr2.structure_type = c_structure_type
AND ppr2.structure_version_id is null
AND ppr2.proj_element_id = p_task_id --bug 3861360
AND ppr2.current_flag <> 'W' -- Bug 3879461
);
SELECT decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_tc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_tc,0), nvl(ppr.oth_act_rawcost_to_date_tc,0)) tc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_pc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_pc,0), nvl(ppr.oth_act_rawcost_to_date_pc,0)) pc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_rawcost_to_date_fc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_rawcost_to_date_fc,0), nvl(ppr.oth_act_rawcost_to_date_fc,0)) fc_raw_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_tc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_tc,0), nvl(ppr.oth_act_cost_to_date_tc,0)) tc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_pc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_pc,0), nvl(ppr.oth_act_cost_to_date_pc,0)) pc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.ppl_act_cost_to_date_fc,0), 'EQUIPMENT', nvl(ppr.eqpmt_act_cost_to_date_fc,0), nvl(ppr.oth_act_cost_to_date_fc,0)) fc_bur_cost,
decode(c_resource_class_code, 'PEOPLE', nvl(ppr.PPL_ACT_EFFORT_TO_DATE,0), 'EQUIPMENT', nvl(ppr.EQPMT_ACT_EFFORT_TO_DATE,0), nvl(ppr.OTH_QUANTITY_TO_DATE,0)) act_effort
FROM pa_progress_rollup ppr
WHERE ppr.project_id = c_project_id
AND ppr.object_id = c_object_id
AND ppr.structure_type = c_structure_type
AND ppr.structure_version_id is null --bug# 3821106 Satish
AND ppr.object_type = 'PA_ASSIGNMENTS'
AND ppr.proj_element_id = p_task_id --bug 3861360
AND ppr.current_flag <> 'W' -- Bug 3879461
AND ppr.as_of_date = c_as_of_date;
SELECT
planned_quantity,
planned_bur_cost_txn_cur,
planned_bur_cost_projfunc,
planned_bur_cost_proj_cur,
planned_raw_cost_txn_cur,
planned_raw_cost_proj_cur,
planned_raw_cost_projfunc,
budget_version_id ---4372462
FROM
pa_task_asgmts_v
WHERE
RESOURCE_LIST_MEMBER_ID = l_resource_list_member_id
AND
RESOURCE_ASSIGNMENT_ID = l_resource_assignment_id
AND
PROJECT_ID = l_project_id;
SELECT 'x' FROM dual
WHERE EXISTS
(
SELECT 'y' FROM PA_PROGRESS_ROLLUP
WHERE OBJECT_ID = l_object_id
AND PROJECT_ID = l_project_id
AND OBJECT_TYPE = 'PA_ASSIGNMENTS'
AND STRUCTURE_TYPE = 'WORKPLAN'
and proj_element_id = l_task_id --3818384
AND current_flag <> 'W' -- Bug 3879461
AND
(
( l_published_structure = 'Y' AND STRUCTURE_VERSION_ID IS NULL)
OR
( l_published_structure = 'N' AND STRUCTURE_VERSION_ID = l_structure_version_id)
)
);
SELECT ta_display_flag
FROM pa_task_assignments_v
WHERE RESOURCE_LIST_MEMBER_ID = l_resource_list_member_id AND
RESOURCE_ASSIGNMENT_ID = l_resource_assignment_id AND
TASK_ID = l_task_id AND
PROJECT_ID = l_project_id AND
STRUCTURE_VERSION_ID = l_structure_version_id;
SELECT decode(ppr.base_progress_status_code,'Y','Y','N') date_override_flag
, ppr.estimated_start_date
, ppr.estimated_finish_date
, ppr.actual_start_date
, ppr.actual_finish_date
, ppe.status_code
FROM pa_progress_rollup ppr
, pa_proj_elements ppe
WHERE ppr.project_id = c_project_id
AND ppr.object_id = c_object_id
AND ppr.object_type = c_object_type
AND ppr.structure_type = 'WORKPLAN'
AND ppr.structure_version_id is null
AND trunc(ppr.as_of_date) <= trunc(c_as_of_date)
AND ppr.current_flag IN ('Y', 'N')
AND ppr.proj_element_id = ppe.proj_element_id
ORDER by as_of_date desc;
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'ENTERED', x_Log_Level=> 3);
pa_debug.init_err_stack ('PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS');
savepoint UPDATE_ASSIGNMENT_PROGRESS;
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_task_id: '||p_task_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_object_version_id: '||p_object_version_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_project_id: '||p_project_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_object_id: '||p_object_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_as_of_date: '||p_as_of_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_percent_complete_id: '||p_percent_complete_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_actual_start_date: '||p_actual_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_actual_finish_date: '||p_actual_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_estimated_start_date: '||p_estimated_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_estimated_finish_date: '||p_estimated_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_record_version_number: '||p_record_version_number, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_actual_cost_this_period: '||p_actual_cost_this_period, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_actual_effort_this_period: '||p_actual_effort_this_period, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_etc_cost_this_period: '||p_etc_cost_this_period, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_etc_effort_this_period: '||p_etc_effort_this_period, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_structure_type: '||p_structure_type, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_structure_version_id: '||p_structure_version_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_resource_class_code: '||p_resource_class_code, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_rate_based_flag: '||p_rate_based_flag, x_Log_Level=> 3);
SELECT project_currency_code, projfunc_currency_code INTO l_prj_currency_code, l_prjfunc_currency_code FROM pa_projects_all WHERE project_id = p_project_id;
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_ta_display_flag '||l_ta_display_flag, x_Log_Level=> 3);
/*--3779387, 3958686 this error should not be raised for hidden assignment as in this case it is being called from update_task_progress
IF l_actual_effort_this_period < 0 AND l_ta_display_flag = 'Y'
THEN
PA_UTILS.ADD_MESSAGE( p_app_short_name => 'PA'
,p_msg_name => 'PA_TP_NO_NEG_ACT');
SELECT structure_sharing_code
INTO l_structure_sharing_code
FROM pa_projects_all
WHERE project_id = p_project_id;
delete from pa_percent_completes
where project_id= p_project_id
and object_id = p_object_id
and published_flag = 'N'
and task_id = p_task_id
and structure_type = p_structure_type
;
delete from pa_progress_rollup
where project_id= p_project_id
and object_id = p_object_id
and current_flag = 'W'
and proj_element_id = p_task_id
and structure_type = p_structure_type
and structure_version_id is null
;
delete from pa_percent_completes
where project_id= p_project_id
and object_id = p_object_id
and published_flag = 'N'
and date_computed <= p_as_of_date --bug 4247839, modified so that two records are not created for same as of date
and task_id = p_task_id
and structure_type = p_structure_type
;
delete from pa_progress_rollup
where project_id= p_project_id
and object_id = p_object_id
and current_flag = 'W'
and as_of_date < p_as_of_date
and proj_element_id = p_task_id
and structure_type = p_structure_type
and structure_version_id is null
;
SELECT rate_based_flag, resource_class_code, txn_currency_code,
rbs_element_id, resource_list_member_id, assignment_start_date, assignment_end_date -- Bug 3956299 : Added assignment_end_date
INTO l_rate_based_flag, l_resource_class_code, l_txn_currency_code,
l_rbs_element_id, l_resource_list_member_id, l_scheduled_start_date, l_scheduled_finish_date -- Bug 3956299 : Added l_scheduled_finish_date
FROM pa_task_assignments_v
WHERE --resource_assignment_id = l_assignment_id Bug 3799841
resource_list_member_id = l_resource_list_member_id -- Bug 3799841
AND structure_version_id = p_structure_version_id
AND task_version_id = l_object_version_id;
SELECT rate_based_flag,
resource_class_code,
PA_TASK_ASSIGNMENT_UTILS.get_planned_currency_info(pra.resource_assignment_id, pra.project_id, 'txn_currency_code') as txn_currency_code,
rbs_element_id,
resource_list_member_id,
schedule_start_date,
schedule_end_date,
pra.resource_assignment_id -- Bug 4186007 : Derive res_assignment_id from AMG, it can be null
INTO l_rate_based_flag, l_resource_class_code, l_txn_currency_code,
l_rbs_element_id, l_resource_list_member_id, l_scheduled_start_date,
l_scheduled_finish_date,
l_assignment_id -- Bug 4186007 : Derive res_assignment_id from AMG, it can be null
FROM pa_resource_assignments pra,
PA_PROJ_ELEMENT_VERSIONS PPEV
where resource_list_member_id = l_resource_list_member_id
AND PPEV.PROJECT_ID = p_project_id
AND PPEV.PARENT_STRUCTURE_VERSION_ID = p_structure_version_id
AND pra.TASK_ID = PPEV.PROJ_ELEMENT_ID
AND pra.wbs_element_version_id = ppev.element_version_id
--Added following conditions bug4110593, rtarway
AND pra.task_id = p_task_id
AND pra.wbs_element_version_id = p_object_version_id;
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Client Extension Logic Starts', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_db_date_override_flag='||l_db_date_override_flag, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_db_estimated_start_date='||l_db_estimated_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_db_estimated_finish_date='||l_db_estimated_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_db_actual_start_date='||l_db_actual_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_db_actual_finish_date='||l_db_actual_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_task_status_code='||l_task_status_code, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Calling PA_PROGRESS_CLIENT_EXTN.GET_TASK_RES_OVERRIDE_INFO with following params', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_project_id='||p_project_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_structure_version_id='||p_structure_version_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_object_type='||l_object_type, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_object_version_id='||l_object_version_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_resource_list_member_id='||l_resource_list_member_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'p_task_id='||p_task_id, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_estimated_start_date='||l_estimated_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_estimated_finish_date='||l_estimated_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_actual_start_date='||l_actual_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_actual_finish_date='||l_actual_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'After Call PA_PROGRESS_CLIENT_EXTN.GET_TASK_RES_OVERRIDE_INFO x_return_status='||x_return_status, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_clex_estimated_start_date='||l_clex_estimated_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_clex_estimated_finish_date='||l_clex_estimated_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_clex_actual_start_date='||l_clex_actual_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_clex_actual_finish_date='||l_clex_actual_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_date_override_flag='||l_date_override_flag, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_estimated_start_date='||l_estimated_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_estimated_finish_date='||l_estimated_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_actual_start_date='||l_actual_start_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_actual_finish_date='||l_actual_finish_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_last_progress_date: '||l_last_progress_date, x_Log_Level=> 3);
-- as we dont want to update future working records.
IF g1_debug_mode = 'Y' THEN
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_working_aod: '||l_working_aod, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_progress_exists_on_aod: '||l_progress_exists_on_aod, x_Log_Level=> 3);
l_db_action := 'UPDATE';
l_db_action := 'UPDATE';
l_db_action := 'UPDATE';
l_db_action := 'UPDATE';
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_db_action: '||l_db_action, x_Log_Level=> 3);
UPDATE pa_percent_completes
SET current_flag = 'N'
WHERE project_id = p_project_id
--AND object_id = l_assignment_id --bug# 3764224 Changes for RLM
AND object_id = l_resource_list_member_id
AND task_id = l_task_id --maansari7/21 bug# 3764224 Changes for RLM
AND current_flag = 'Y'
AND object_type = l_object_type;
UPDATE pa_progress_rollup
SET current_flag = 'N'
WHERE project_id = p_project_id
--AND object_id = l_assignment_id --bug# 3764224 Changes for RLM
AND object_id = l_resource_list_member_id
AND proj_element_id = l_task_id --maansari7/21 bug# 3764224 Changes for RLM
AND current_flag = 'Y'
AND object_type = l_object_type
AND structure_version_id is null -- Bug 3846353 : *** AMKSINGH 08/24/04 09:53 am *** Issue F - 2
;
-- Delete the published progress record on the same as of date
DELETE FROM pa_progress_rollup
where project_id = p_project_id
and object_id = l_resource_list_member_id
and proj_element_id = l_task_id
and object_type = l_object_type
and structure_version_id is null
and structure_type = 'WORKPLAN'
and current_flag = 'Y'
and trunc(as_of_date) = trunc(p_as_of_date)
and exists(select 1
from pa_progress_rollup
where project_id = p_project_id
and object_id = l_resource_list_member_id
and proj_element_id = l_task_id
and object_type = l_object_type
and structure_version_id is null
and structure_type = 'WORKPLAN'
and current_flag = 'W'
and trunc(as_of_date) = trunc(p_as_of_date)
);
-- Update the working progress record on the same as of date as published progress
-- so that while updating rollup record its values can be considered
-- Basically this is done so get_prog_rollup_id can return this row for update mode
Update pa_progress_rollup
set current_flag = 'Y'
where project_id = p_project_id
and object_id = l_resource_list_member_id
and proj_element_id = l_task_id
and object_type = l_object_type
and structure_version_id is null
and structure_type = 'WORKPLAN'
and current_flag = 'W'
and trunc(as_of_date) = trunc(p_as_of_date);
Delete from pa_progress_rollup
where project_id = p_project_id
and object_id = l_resource_list_member_id
and proj_element_id = l_task_id
and object_type = l_object_type
and structure_version_id is null
and structure_type = 'WORKPLAN'
and current_flag = 'W'
and trunc(as_of_date) <= trunc(p_as_of_date);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Calling Get_Res_txn_Cost_Rate', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => ' Before conversion l_res_raw_rate'||l_res_raw_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Before conversion l_res_burden_rate'||l_res_burden_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Before conversion l_res_cur_code'||l_res_cur_code, x_Log_Level=> 3);
p_procedure_name => 'UPDATE_ASSIGNMENT_PROGRESS',
p_error_text => SUBSTRB('PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier1:'||SQLERRM,1,240));
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => ' After conversion l_res_raw_rate'||l_res_raw_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'After conversion l_res_burden_rate'||l_res_burden_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Before conversion l_plan_res_raw_rate'||l_plan_res_raw_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Before conversion l_plan_res_burden_rate'||l_plan_res_burden_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_plan_res_cur_code'||l_plan_res_cur_code, x_Log_Level=> 3);
p_procedure_name => 'UPDATE_ASSIGNMENT_PROGRESS',
p_error_text => SUBSTRB('PA_PROGRESS_UTILS.Get_Res_Rate_Burden_Multiplier2:'||SQLERRM,1,240));
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => ' After conversion l_plan_res_raw_rate'||l_plan_res_raw_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'After conversion l_plan_res_burden_rate'||l_plan_res_burden_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'calling effort to cost for actual', x_Log_Level=> 3);
UPDATE pa_proj_elements
SET progress_outdated_flag = 'Y'
WHERE project_id=p_project_id
and object_type= 'PA_TASKS'
and proj_element_id = p_task_id
and progress_outdated_flag = 'N'
;
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'calling effort to cost for etc', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_txn_raw_cost'||l_etc_txn_raw_cost, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_txn_bur_cost'||l_etc_txn_bur_cost, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_act_project_raw_cost'||l_act_project_raw_cost, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_act_projfunc_raw_cost'||l_act_projfunc_raw_cost, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_project_raw_cost'||l_etc_project_raw_cost, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_projfunc_raw_cost'||l_etc_projfunc_raw_cost, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_project_rate_type'||l_project_rate_type, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_project_rate_date'||l_project_rate_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_project_exch_rate'||l_project_exch_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_projfunc_cost_rate_type'||l_projfunc_cost_rate_type, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_projfunc_cost_rate_date'||l_projfunc_cost_rate_date, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_projfunc_cost_exch_rate'||l_projfunc_cost_exch_rate, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_act_effort_last_subm'||l_act_effort_last_subm, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_act_raw_cost_last_subm_tc'||l_act_raw_cost_last_subm_tc, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'calling api to push actuals ', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_effort_last ='||l_etc_effort_last, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_txn_raw_cost_last ='||l_etc_txn_raw_cost_last, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_txn_bur_cost_last ='||l_etc_txn_bur_cost_last, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Checking the cursor l_progress_exists='||l_progress_exists, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Progress does not exist', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'Progress exists', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_txn_raw_cost_this_period '||l_etc_txn_raw_cost_this_period, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_txn_bur_cost_this_period '||l_etc_txn_bur_cost_this_period, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_etc_effort_incr '||l_etc_effort_incr, x_Log_Level=> 3);
PA_PERCENT_COMPLETES_PKG.INSERT_ROW(
p_TASK_ID => l_task_id
,p_DATE_COMPUTED => p_as_of_date
,p_LAST_UPDATE_DATE => SYSDATE
,p_LAST_UPDATED_BY => l_user_id
,p_CREATION_DATE => SYSDATE
,p_CREATED_BY => l_user_id
,p_LAST_UPDATE_LOGIN => l_login_id
,p_COMPLETED_PERCENTAGE => l_percent_complete
,p_DESCRIPTION => l_brief_overview
,p_PROJECT_ID => p_project_id
,p_PM_PRODUCT_CODE => l_pm_product_code
,p_CURRENT_FLAG => l_current_flag
,p_OBJECT_TYPE => l_object_type
--,p_OBJECT_ID => l_assignment_id --bug# 3764224 Changes for RLM
,p_OBJECT_ID => l_resource_list_member_id
,p_OBJECT_VERSION_ID => l_object_version_id
,p_PROGRESS_STATUS_CODE => l_progress_status_code
,p_ACTUAL_START_DATE => l_actual_start_date
,p_ACTUAL_FINISH_DATE => l_actual_finish_date
,p_ESTIMATED_START_DATE => l_estimated_start_date
,p_ESTIMATED_FINISH_DATE => l_estimated_finish_date
,p_PUBLISHED_FLAG => l_published_flag
,p_PUBLISHED_BY_PARTY_ID => l_published_by_party_id
,p_PROGRESS_COMMENT => l_progress_comment
,p_HISTORY_FLAG => 'N'
,p_status_code => l_task_status
,x_PERCENT_COMPLETE_ID => l_percent_complete_id
,p_ATTRIBUTE_CATEGORY => null
,p_ATTRIBUTE1 => null
,p_ATTRIBUTE2 => null
,p_ATTRIBUTE3 => null
,p_ATTRIBUTE4 => null
,p_ATTRIBUTE5 => null
,p_ATTRIBUTE6 => null
,p_ATTRIBUTE7 => null
,p_ATTRIBUTE8 => null
,p_ATTRIBUTE9 => null
,p_ATTRIBUTE10 => null
,p_ATTRIBUTE11 => null
,p_ATTRIBUTE12 => null
,p_ATTRIBUTE13 => null
,p_ATTRIBUTE14 => null
,p_ATTRIBUTE15 => null
,p_structure_type => p_structure_type
);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'INSERTED IN PPC', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_PROGRESS_ROLLUP_ID '||l_PROGRESS_ROLLUP_ID, x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'INSERTING IN PPR', x_Log_Level=> 3);
PA_PROGRESS_ROLLUP_PKG.INSERT_ROW(
X_PROGRESS_ROLLUP_ID => l_PROGRESS_ROLLUP_ID
,X_PROJECT_ID => p_project_id
--,X_OBJECT_ID => l_assignment_id --bug# 3764224 Changes for RLM
,X_OBJECT_ID => l_resource_list_member_id
,X_OBJECT_TYPE => l_object_type
,X_AS_OF_DATE => p_as_of_date
,X_OBJECT_VERSION_ID => l_object_version_id
,X_LAST_UPDATE_DATE => SYSDATE
,X_LAST_UPDATED_BY => l_user_id
,X_CREATION_DATE => SYSDATE
,X_CREATED_BY => l_user_id
,X_PROGRESS_STATUS_CODE => l_rollup_progress_status
,X_LAST_UPDATE_LOGIN => l_login_id
,X_INCREMENTAL_WORK_QTY => l_INCREMENTAL_WORK_QTY
,X_CUMULATIVE_WORK_QTY => l_CUMULATIVE_WORK_QTY
,X_BASE_PERCENT_COMPLETE => l_BASE_PERCENT_COMPLETE
,X_EFF_ROLLUP_PERCENT_COMP => l_EFF_ROLLUP_PERCENT_COMP
,X_COMPLETED_PERCENTAGE => l_rollup_completed_percentage
,X_ESTIMATED_START_DATE => l_estimated_start_date
,X_ESTIMATED_FINISH_DATE => l_estimated_finish_date
,X_ACTUAL_START_DATE => l_actual_start_date
,X_ACTUAL_FINISH_DATE => l_actual_finish_date
,X_EST_REMAINING_EFFORT => l_ppl_etc_effort
,X_BASE_PERCENT_COMP_DERIV_CODE => l_BASE_PERCENT_COMP_DERIV_CODE
,X_BASE_PROGRESS_STATUS_CODE => l_date_override_flag -- 4533112 l_BASE_PROGRESS_STATUS_CODE
,X_EFF_ROLLUP_PROG_STAT_CODE => l_EFF_ROLLUP_PROG_STAT_CODE
,x_percent_complete_id => l_percent_complete_id
,X_STRUCTURE_TYPE => p_structure_type
,X_PROJ_ELEMENT_ID => p_task_id
,X_STRUCTURE_VERSION_ID => l_structure_version_id
,X_PPL_ACT_EFFORT_TO_DATE => l_ppl_act_effort_to_date
,X_EQPMT_ACT_EFFORT_TO_DATE => l_eqpmt_act_effort_to_date
,X_EQPMT_ETC_EFFORT => l_eqpmt_etc_effort
,X_OTH_ACT_COST_TO_DATE_TC => l_oth_act_bur_cost_to_date_tc
,X_OTH_ACT_COST_TO_DATE_FC => l_oth_act_bur_cost_to_date_fc
,X_OTH_ACT_COST_TO_DATE_PC => l_oth_act_bur_cost_to_date_pc
,X_OTH_ETC_COST_TC => l_oth_etc_bur_cost_tc
,X_OTH_ETC_COST_FC => l_oth_etc_bur_cost_fc
,X_OTH_ETC_COST_PC => l_oth_etc_bur_cost_pc
,X_PPL_ACT_COST_TO_DATE_TC => l_ppl_act_bur_cost_to_date_tc
,X_PPL_ACT_COST_TO_DATE_FC => l_ppl_act_bur_cost_to_date_fc
,X_PPL_ACT_COST_TO_DATE_PC => l_ppl_act_bur_cost_to_date_pc
,X_PPL_ETC_COST_TC => l_ppl_etc_bur_cost_tc
,X_PPL_ETC_COST_FC => l_ppl_etc_bur_cost_fc
,X_PPL_ETC_COST_PC => l_ppl_etc_bur_cost_pc
,X_EQPMT_ACT_COST_TO_DATE_TC => l_eqp_act_bur_cost_to_date_tc
,X_EQPMT_ACT_COST_TO_DATE_FC => l_eqp_act_bur_cost_to_date_fc
,X_EQPMT_ACT_COST_TO_DATE_PC => l_eqp_act_bur_cost_to_date_pc
,X_EQPMT_ETC_COST_TC => l_eqpmt_etc_bur_cost_tc
,X_EQPMT_ETC_COST_FC => l_eqpmt_etc_bur_cost_fc
,X_EQPMT_ETC_COST_PC => l_eqpmt_etc_bur_cost_pc
,X_EARNED_VALUE => null
,X_TASK_WT_BASIS_CODE => null
,X_SUBPRJ_PPL_ACT_EFFORT => null
,X_SUBPRJ_EQPMT_ACT_EFFORT => null
,X_SUBPRJ_PPL_ETC_EFFORT => null
,X_SUBPRJ_EQPMT_ETC_EFFORT => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_TC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_FC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_PC => null
,X_SUBPRJ_PPL_ACT_COST_TC => null
,X_SUBPRJ_PPL_ACT_COST_FC => null
,X_SUBPRJ_PPL_ACT_COST_PC => null
,X_SUBPRJ_EQPMT_ACT_COST_TC => null
,X_SUBPRJ_EQPMT_ACT_COST_FC => null
,X_SUBPRJ_EQPMT_ACT_COST_PC => null
,X_SUBPRJ_OTH_ETC_COST_TC => null
,X_SUBPRJ_OTH_ETC_COST_FC => null
,X_SUBPRJ_OTH_ETC_COST_PC => null
,X_SUBPRJ_PPL_ETC_COST_TC => null
,X_SUBPRJ_PPL_ETC_COST_FC => null
,X_SUBPRJ_PPL_ETC_COST_PC => null
,X_SUBPRJ_EQPMT_ETC_COST_TC => null
,X_SUBPRJ_EQPMT_ETC_COST_FC => null
,X_SUBPRJ_EQPMT_ETC_COST_PC => null
,X_SUBPRJ_EARNED_VALUE => null
,X_CURRENT_FLAG => l_rollup_current_flag -- Bug 3879461 l_current_flag
,X_PROJFUNC_COST_RATE_TYPE => l_projfunc_cost_rate_type
,X_PROJFUNC_COST_EXCHANGE_RATE => l_projfunc_cost_exch_rate
,X_PROJFUNC_COST_RATE_DATE => l_projfunc_cost_rate_date
,X_PROJ_COST_RATE_TYPE => l_project_rate_type
,X_PROJ_COST_EXCHANGE_RATE => l_project_exch_rate
,X_PROJ_COST_RATE_DATE => l_project_rate_date
,X_TXN_CURRENCY_CODE => l_txn_currency_code -- Fix for Bug # 3988457.
-- p_txn_currency_code --maansari4/30
,X_PROG_PA_PERIOD_NAME => l_prog_pa_period_name
,X_PROG_GL_PERIOD_NAME => l_prog_gl_period_name
--bug 3608801
,X_OTH_QUANTITY_TO_DATE => l_oth_quantity_to_date -- bug no.3608801
,X_OTH_ETC_QUANTITY => l_oth_etc_quantity
--bug 3608801
,X_OTH_ACT_RAWCOST_TO_DATE_TC => l_oth_act_raw_cost_to_date_tc
,X_OTH_ACT_RAWCOST_TO_DATE_FC => l_oth_act_raw_cost_to_date_fc
,X_OTH_ACT_RAWCOST_TO_DATE_PC => l_oth_act_raw_cost_to_date_pc
,X_OTH_ETC_RAWCOST_TC => l_oth_etc_raw_cost_tc
,X_OTH_ETC_RAWCOST_FC => l_oth_etc_raw_cost_fc
,X_OTH_ETC_RAWCOST_PC => l_oth_etc_raw_cost_pc
,X_PPL_ACT_RAWCOST_TO_DATE_TC => l_ppl_act_raw_cost_to_date_tc
,X_PPL_ACT_RAWCOST_TO_DATE_FC => l_ppl_act_raw_cost_to_date_fc
,X_PPL_ACT_RAWCOST_TO_DATE_PC => l_ppl_act_raw_cost_to_date_pc
,X_PPL_ETC_RAWCOST_TC => l_ppl_etc_raw_cost_tc
,X_PPL_ETC_RAWCOST_FC => l_ppl_etc_raw_cost_fc
,X_PPL_ETC_RAWCOST_PC => l_ppl_etc_raw_cost_pc
,X_EQPMT_ACT_RAWCOST_TO_DATE_TC => l_eqp_act_raw_cost_to_date_tc
,X_EQPMT_ACT_RAWCOST_TO_DATE_FC => l_eqp_act_raw_cost_to_date_fc
,X_EQPMT_ACT_RAWCOST_TO_DATE_PC => l_eqp_act_raw_cost_to_date_pc
,X_EQPMT_ETC_RAWCOST_TC => l_eqpmt_etc_raw_cost_tc
,X_EQPMT_ETC_RAWCOST_FC => l_eqpmt_etc_raw_cost_fc
,X_EQPMT_ETC_RAWCOST_PC => l_eqpmt_etc_raw_cost_pc
,X_SP_OTH_ACT_RAWCOST_TODATE_TC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_FC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_PC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_TC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_FC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_PC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_TC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_FC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_PC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_TC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_FC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'INSERTED IN PPR', x_Log_Level=> 3);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'UPDATING PPR', x_Log_Level=> 3);
PA_PROGRESS_ROLLUP_PKG.UPDATE_ROW(
X_PROGRESS_ROLLUP_ID => l_PROGRESS_ROLLUP_ID
,X_PROJECT_ID => p_project_id
--,X_OBJECT_ID => l_assignment_id --bug# 3764224 Changes for RLM
,X_OBJECT_ID => l_resource_list_member_id
,X_OBJECT_TYPE => l_object_type
,X_AS_OF_DATE => p_as_of_date
,X_OBJECT_VERSION_ID => l_object_version_id
,X_LAST_UPDATE_DATE => SYSDATE
,X_LAST_UPDATED_BY => l_user_id
,X_PROGRESS_STATUS_CODE => l_rollup_progress_status
,X_LAST_UPDATE_LOGIN => l_login_id
,X_INCREMENTAL_WORK_QTY => l_INCREMENTAL_WORK_QTY
,X_CUMULATIVE_WORK_QTY => l_CUMULATIVE_WORK_QTY
,X_BASE_PERCENT_COMPLETE => l_BASE_PERCENT_COMPLETE
,X_EFF_ROLLUP_PERCENT_COMP => l_EFF_ROLLUP_PERCENT_COMP
,X_COMPLETED_PERCENTAGE => l_rollup_completed_percentage
,X_ESTIMATED_START_DATE => l_estimated_start_date
,X_ESTIMATED_FINISH_DATE => l_estimated_finish_date
,X_ACTUAL_START_DATE => l_actual_start_date
,X_ACTUAL_FINISH_DATE => l_actual_finish_date
,X_EST_REMAINING_EFFORT => l_ppl_etc_effort -- need to populate the buckets
,X_BASE_PERCENT_COMP_DERIV_CODE => l_BASE_PERCENT_COMP_DERIV_CODE
,X_BASE_PROGRESS_STATUS_CODE => l_date_override_flag -- 4533112 l_BASE_PROGRESS_STATUS_CODE
,X_EFF_ROLLUP_PROG_STAT_CODE => l_EFF_ROLLUP_PROG_STAT_CODE
,X_RECORD_VERSION_NUMBER => l_rollup_rec_ver_number
,x_percent_complete_id => l_percent_complete_id
,X_STRUCTURE_TYPE => p_structure_type
,X_PROJ_ELEMENT_ID => p_task_id
,X_STRUCTURE_VERSION_ID => l_structure_version_id
,X_PPL_ACT_EFFORT_TO_DATE => l_ppl_act_effort_to_date
,X_EQPMT_ACT_EFFORT_TO_DATE => l_eqpmt_act_effort_to_date
,X_EQPMT_ETC_EFFORT => l_eqpmt_etc_effort
,X_OTH_ACT_COST_TO_DATE_TC => l_oth_act_bur_cost_to_date_tc
,X_OTH_ACT_COST_TO_DATE_FC => l_oth_act_bur_cost_to_date_fc
,X_OTH_ACT_COST_TO_DATE_PC => l_oth_act_bur_cost_to_date_pc
,X_OTH_ETC_COST_TC => l_oth_etc_bur_cost_tc
,X_OTH_ETC_COST_FC => l_oth_etc_bur_cost_fc
,X_OTH_ETC_COST_PC => l_oth_etc_bur_cost_pc
,X_PPL_ACT_COST_TO_DATE_TC => l_ppl_act_bur_cost_to_date_tc
,X_PPL_ACT_COST_TO_DATE_FC => l_ppl_act_bur_cost_to_date_fc
,X_PPL_ACT_COST_TO_DATE_PC => l_ppl_act_bur_cost_to_date_pc
,X_PPL_ETC_COST_TC => l_ppl_etc_bur_cost_tc
,X_PPL_ETC_COST_FC => l_ppl_etc_bur_cost_fc
,X_PPL_ETC_COST_PC => l_ppl_etc_bur_cost_pc
,X_EQPMT_ACT_COST_TO_DATE_TC => l_eqp_act_bur_cost_to_date_tc
,X_EQPMT_ACT_COST_TO_DATE_FC => l_eqp_act_bur_cost_to_date_fc
,X_EQPMT_ACT_COST_TO_DATE_PC => l_eqp_act_bur_cost_to_date_pc
,X_EQPMT_ETC_COST_TC => l_eqpmt_etc_bur_cost_tc
,X_EQPMT_ETC_COST_FC => l_eqpmt_etc_bur_cost_fc
,X_EQPMT_ETC_COST_PC => l_eqpmt_etc_bur_cost_pc
,X_EARNED_VALUE => null
,X_TASK_WT_BASIS_CODE => null
,X_SUBPRJ_PPL_ACT_EFFORT => null
,X_SUBPRJ_EQPMT_ACT_EFFORT => null
,X_SUBPRJ_PPL_ETC_EFFORT => null
,X_SUBPRJ_EQPMT_ETC_EFFORT => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_TC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_FC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_PC => null
,X_SUBPRJ_PPL_ACT_COST_TC => null
,X_SUBPRJ_PPL_ACT_COST_FC => null
,X_SUBPRJ_PPL_ACT_COST_PC => null
,X_SUBPRJ_EQPMT_ACT_COST_TC => null
,X_SUBPRJ_EQPMT_ACT_COST_FC => null
,X_SUBPRJ_EQPMT_ACT_COST_PC => null
,X_SUBPRJ_OTH_ETC_COST_TC => null
,X_SUBPRJ_OTH_ETC_COST_FC => null
,X_SUBPRJ_OTH_ETC_COST_PC => null
,X_SUBPRJ_PPL_ETC_COST_TC => null
,X_SUBPRJ_PPL_ETC_COST_FC => null
,X_SUBPRJ_PPL_ETC_COST_PC => null
,X_SUBPRJ_EQPMT_ETC_COST_TC => null
,X_SUBPRJ_EQPMT_ETC_COST_FC => null
,X_SUBPRJ_EQPMT_ETC_COST_PC => null
,X_SUBPRJ_EARNED_VALUE => null
,X_CURRENT_FLAG => l_rollup_current_flag -- Bug 3879461 l_current_flag
,X_PROJFUNC_COST_RATE_TYPE => l_projfunc_cost_rate_type
,X_PROJFUNC_COST_EXCHANGE_RATE => l_projfunc_cost_exch_rate
,X_PROJFUNC_COST_RATE_DATE => l_projfunc_cost_rate_date
,X_PROJ_COST_RATE_TYPE => l_project_rate_type
,X_PROJ_COST_EXCHANGE_RATE => l_project_exch_rate
,X_PROJ_COST_RATE_DATE => l_project_rate_date
,X_TXN_CURRENCY_CODE => l_txn_currency_code -- Fix for Bug # 3988457.
-- p_txn_currency_code --maansari4/30
,X_PROG_PA_PERIOD_NAME => l_prog_pa_period_name
,X_PROG_GL_PERIOD_NAME => l_prog_gl_period_name
--bug 3608801
,X_OTH_QUANTITY_TO_DATE => l_oth_quantity_to_date -- bug no.3608801
,X_OTH_ETC_QUANTITY => l_oth_etc_quantity
--bug 3608801
,X_OTH_ACT_RAWCOST_TO_DATE_TC => l_oth_act_raw_cost_to_date_tc
,X_OTH_ACT_RAWCOST_TO_DATE_FC => l_oth_act_raw_cost_to_date_fc
,X_OTH_ACT_RAWCOST_TO_DATE_PC => l_oth_act_raw_cost_to_date_pc
,X_OTH_ETC_RAWCOST_TC => l_oth_etc_raw_cost_tc
,X_OTH_ETC_RAWCOST_FC => l_oth_etc_raw_cost_fc
,X_OTH_ETC_RAWCOST_PC => l_oth_etc_raw_cost_pc
,X_PPL_ACT_RAWCOST_TO_DATE_TC => l_ppl_act_raw_cost_to_date_tc
,X_PPL_ACT_RAWCOST_TO_DATE_FC => l_ppl_act_raw_cost_to_date_fc
,X_PPL_ACT_RAWCOST_TO_DATE_PC => l_ppl_act_raw_cost_to_date_pc
,X_PPL_ETC_RAWCOST_TC => l_ppl_etc_raw_cost_tc
,X_PPL_ETC_RAWCOST_FC => l_ppl_etc_raw_cost_fc
,X_PPL_ETC_RAWCOST_PC => l_ppl_etc_raw_cost_pc
,X_EQPMT_ACT_RAWCOST_TO_DATE_TC => l_eqp_act_raw_cost_to_date_tc
,X_EQPMT_ACT_RAWCOST_TO_DATE_FC => l_eqp_act_raw_cost_to_date_fc
,X_EQPMT_ACT_RAWCOST_TO_DATE_PC => l_eqp_act_raw_cost_to_date_pc
,X_EQPMT_ETC_RAWCOST_TC => l_eqpmt_etc_raw_cost_tc
,X_EQPMT_ETC_RAWCOST_FC => l_eqpmt_etc_raw_cost_fc
,X_EQPMT_ETC_RAWCOST_PC => l_eqpmt_etc_raw_cost_pc
,X_SP_OTH_ACT_RAWCOST_TODATE_TC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_FC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_PC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_TC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_FC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_PC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_TC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_FC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_PC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_TC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_FC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
);
ELSIF l_db_action = 'UPDATE'
THEN
IF l_working_aod IS NOT NULL
THEN
l_aod := l_working_aod;
SELECT record_version_number into l_record_version_number
FROM pa_percent_completes
where percent_complete_id = l_percent_complete_id;
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_percent_complete_id: '||l_percent_complete_id, x_Log_Level=> 3);
PA_PERCENT_COMPLETES_PKG.UPDATE_ROW(
p_TASK_ID => l_task_id
,p_DATE_COMPUTED => p_as_of_date
,p_LAST_UPDATE_DATE => SYSDATE
,p_LAST_UPDATED_BY => l_user_id
,p_LAST_UPDATE_LOGIN => l_login_id
,p_COMPLETED_PERCENTAGE => l_percent_complete
,p_DESCRIPTION => l_brief_overview
,p_PM_PRODUCT_CODE => l_pm_product_code
,p_CURRENT_FLAG => l_current_flag
,p_PERCENT_COMPLETE_ID => l_percent_complete_id
,p_project_id => p_project_id
,p_OBJECT_TYPE => l_object_type
--,p_OBJECT_ID => l_assignment_id --bug# 3764224 Changes for RLM
,p_OBJECT_ID => l_resource_list_member_id
,p_OBJECT_VERSION_ID => l_object_version_id
,p_PROGRESS_STATUS_CODE => l_progress_status_code
,p_ACTUAL_START_DATE => l_actual_start_date
,p_ACTUAL_FINISH_DATE => l_actual_finish_date
,p_ESTIMATED_START_DATE => l_estimated_start_date
,p_ESTIMATED_FINISH_DATE => l_estimated_finish_date
,p_PUBLISHED_FLAG => l_published_flag
,p_PUBLISHED_BY_PARTY_ID => l_published_by_party_id
,p_PROGRESS_COMMENT => l_progress_comment
,p_HISTORY_FLAG => 'N'
,p_status_code => l_task_status
,p_RECORD_VERSION_NUMBER => l_record_version_number
,p_ATTRIBUTE_CATEGORY => null
,p_ATTRIBUTE1 => null
,p_ATTRIBUTE2 => null
,p_ATTRIBUTE3 => null
,p_ATTRIBUTE4 => null
,p_ATTRIBUTE5 => null
,p_ATTRIBUTE6 => null
,p_ATTRIBUTE7 => null
,p_ATTRIBUTE8 => null
,p_ATTRIBUTE9 => null
,p_ATTRIBUTE10 => null
,p_ATTRIBUTE11 => null
,p_ATTRIBUTE12 => null
,p_ATTRIBUTE13 => null
,p_ATTRIBUTE14 => null
,p_ATTRIBUTE15 => null
,p_structure_type => p_structure_type
);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'l_PROGRESS_ROLLUP_ID: '||l_PROGRESS_ROLLUP_ID, x_Log_Level=> 3);
PA_PROGRESS_ROLLUP_PKG.UPDATE_ROW(
X_PROGRESS_ROLLUP_ID => l_PROGRESS_ROLLUP_ID
,X_PROJECT_ID => p_project_id
--,X_OBJECT_ID => l_assignment_id --bug# 3764224 Changes for RLM
,X_OBJECT_ID => l_resource_list_member_id
,X_OBJECT_TYPE => l_object_type
,X_AS_OF_DATE => p_as_of_date
,X_OBJECT_VERSION_ID => l_object_version_id
,X_LAST_UPDATE_DATE => SYSDATE
,X_LAST_UPDATED_BY => l_user_id
,X_PROGRESS_STATUS_CODE => l_rollup_progress_status
,X_LAST_UPDATE_LOGIN => l_login_id
,X_INCREMENTAL_WORK_QTY => l_INCREMENTAL_WORK_QTY
,X_CUMULATIVE_WORK_QTY => l_CUMULATIVE_WORK_QTY
,X_BASE_PERCENT_COMPLETE => l_BASE_PERCENT_COMPLETE
,X_EFF_ROLLUP_PERCENT_COMP => l_EFF_ROLLUP_PERCENT_COMP
,X_COMPLETED_PERCENTAGE => l_rollup_completed_percentage
,X_ESTIMATED_START_DATE => l_estimated_start_date
,X_ESTIMATED_FINISH_DATE => l_estimated_finish_date
,X_ACTUAL_START_DATE => l_actual_start_date
,X_ACTUAL_FINISH_DATE => l_actual_finish_date
,X_EST_REMAINING_EFFORT => l_ppl_etc_effort -- need to populate the buckets
,X_BASE_PERCENT_COMP_DERIV_CODE => l_BASE_PERCENT_COMP_DERIV_CODE
,X_BASE_PROGRESS_STATUS_CODE => l_date_override_flag -- 4533112 l_BASE_PROGRESS_STATUS_CODE
,X_EFF_ROLLUP_PROG_STAT_CODE => l_EFF_ROLLUP_PROG_STAT_CODE
,X_RECORD_VERSION_NUMBER => l_rollup_rec_ver_number
,x_percent_complete_id => l_percent_complete_id
,X_STRUCTURE_TYPE => p_structure_type
,X_PROJ_ELEMENT_ID => p_task_id
,X_STRUCTURE_VERSION_ID => l_structure_version_id
,X_PPL_ACT_EFFORT_TO_DATE => l_ppl_act_effort_to_date
,X_EQPMT_ACT_EFFORT_TO_DATE => l_eqpmt_act_effort_to_date
,X_EQPMT_ETC_EFFORT => l_eqpmt_etc_effort
,X_OTH_ACT_COST_TO_DATE_TC => l_oth_act_bur_cost_to_date_tc
,X_OTH_ACT_COST_TO_DATE_FC => l_oth_act_bur_cost_to_date_fc
,X_OTH_ACT_COST_TO_DATE_PC => l_oth_act_bur_cost_to_date_pc
,X_OTH_ETC_COST_TC => l_oth_etc_bur_cost_tc
,X_OTH_ETC_COST_FC => l_oth_etc_bur_cost_fc
,X_OTH_ETC_COST_PC => l_oth_etc_bur_cost_pc
,X_PPL_ACT_COST_TO_DATE_TC => l_ppl_act_bur_cost_to_date_tc
,X_PPL_ACT_COST_TO_DATE_FC => l_ppl_act_bur_cost_to_date_fc
,X_PPL_ACT_COST_TO_DATE_PC => l_ppl_act_bur_cost_to_date_pc
,X_PPL_ETC_COST_TC => l_ppl_etc_bur_cost_tc
,X_PPL_ETC_COST_FC => l_ppl_etc_bur_cost_fc
,X_PPL_ETC_COST_PC => l_ppl_etc_bur_cost_pc
,X_EQPMT_ACT_COST_TO_DATE_TC => l_eqp_act_bur_cost_to_date_tc
,X_EQPMT_ACT_COST_TO_DATE_FC => l_eqp_act_bur_cost_to_date_fc
,X_EQPMT_ACT_COST_TO_DATE_PC => l_eqp_act_bur_cost_to_date_pc
,X_EQPMT_ETC_COST_TC => l_eqpmt_etc_bur_cost_tc
,X_EQPMT_ETC_COST_FC => l_eqpmt_etc_bur_cost_fc
,X_EQPMT_ETC_COST_PC => l_eqpmt_etc_bur_cost_pc
,X_EARNED_VALUE => null
,X_TASK_WT_BASIS_CODE => null
,X_SUBPRJ_PPL_ACT_EFFORT => null
,X_SUBPRJ_EQPMT_ACT_EFFORT => null
,X_SUBPRJ_PPL_ETC_EFFORT => null
,X_SUBPRJ_EQPMT_ETC_EFFORT => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_TC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_FC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_PC => null
,X_SUBPRJ_PPL_ACT_COST_TC => null
,X_SUBPRJ_PPL_ACT_COST_FC => null
,X_SUBPRJ_PPL_ACT_COST_PC => null
,X_SUBPRJ_EQPMT_ACT_COST_TC => null
,X_SUBPRJ_EQPMT_ACT_COST_FC => null
,X_SUBPRJ_EQPMT_ACT_COST_PC => null
,X_SUBPRJ_OTH_ETC_COST_TC => null
,X_SUBPRJ_OTH_ETC_COST_FC => null
,X_SUBPRJ_OTH_ETC_COST_PC => null
,X_SUBPRJ_PPL_ETC_COST_TC => null
,X_SUBPRJ_PPL_ETC_COST_FC => null
,X_SUBPRJ_PPL_ETC_COST_PC => null
,X_SUBPRJ_EQPMT_ETC_COST_TC => null
,X_SUBPRJ_EQPMT_ETC_COST_FC => null
,X_SUBPRJ_EQPMT_ETC_COST_PC => null
,X_SUBPRJ_EARNED_VALUE => null
,X_CURRENT_FLAG => l_rollup_current_flag -- Bug 3879461 l_current_flag
,X_PROJFUNC_COST_RATE_TYPE => l_projfunc_cost_rate_type
,X_PROJFUNC_COST_EXCHANGE_RATE => l_projfunc_cost_exch_rate
,X_PROJFUNC_COST_RATE_DATE => l_projfunc_cost_rate_date
,X_PROJ_COST_RATE_TYPE => l_project_rate_type
,X_PROJ_COST_EXCHANGE_RATE => l_project_exch_rate
,X_PROJ_COST_RATE_DATE => l_project_rate_date
,X_TXN_CURRENCY_CODE => l_txn_currency_code -- Fix for Bug # 3988457.
-- p_txn_currency_code --maansari4/30
,X_PROG_PA_PERIOD_NAME => l_prog_pa_period_name
,X_PROG_GL_PERIOD_NAME => l_prog_gl_period_name
--bug 3608801
,X_OTH_QUANTITY_TO_DATE => l_oth_quantity_to_date -- bug no.3608801
,X_OTH_ETC_QUANTITY => l_oth_etc_quantity
--bug 3608801
,X_OTH_ACT_RAWCOST_TO_DATE_TC => l_oth_act_raw_cost_to_date_tc
,X_OTH_ACT_RAWCOST_TO_DATE_FC => l_oth_act_raw_cost_to_date_fc
,X_OTH_ACT_RAWCOST_TO_DATE_PC => l_oth_act_raw_cost_to_date_pc
,X_OTH_ETC_RAWCOST_TC => l_oth_etc_raw_cost_tc
,X_OTH_ETC_RAWCOST_FC => l_oth_etc_raw_cost_fc
,X_OTH_ETC_RAWCOST_PC => l_oth_etc_raw_cost_pc
,X_PPL_ACT_RAWCOST_TO_DATE_TC => l_ppl_act_raw_cost_to_date_tc
,X_PPL_ACT_RAWCOST_TO_DATE_FC => l_ppl_act_raw_cost_to_date_fc
,X_PPL_ACT_RAWCOST_TO_DATE_PC => l_ppl_act_raw_cost_to_date_pc
,X_PPL_ETC_RAWCOST_TC => l_ppl_etc_raw_cost_tc
,X_PPL_ETC_RAWCOST_FC => l_ppl_etc_raw_cost_fc
,X_PPL_ETC_RAWCOST_PC => l_ppl_etc_raw_cost_pc
,X_EQPMT_ACT_RAWCOST_TO_DATE_TC => l_eqp_act_raw_cost_to_date_tc
,X_EQPMT_ACT_RAWCOST_TO_DATE_FC => l_eqp_act_raw_cost_to_date_fc
,X_EQPMT_ACT_RAWCOST_TO_DATE_PC => l_eqp_act_raw_cost_to_date_pc
,X_EQPMT_ETC_RAWCOST_TC => l_eqpmt_etc_raw_cost_tc
,X_EQPMT_ETC_RAWCOST_FC => l_eqpmt_etc_raw_cost_fc
,X_EQPMT_ETC_RAWCOST_PC => l_eqpmt_etc_raw_cost_pc
,X_SP_OTH_ACT_RAWCOST_TODATE_TC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_FC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_PC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_TC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_FC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_PC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_TC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_FC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_PC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_TC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_FC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
);
PA_PROGRESS_ROLLUP_PKG.INSERT_ROW(
X_PROGRESS_ROLLUP_ID => l_PROGRESS_ROLLUP_ID
,X_PROJECT_ID => p_project_id
--,X_OBJECT_ID => l_assignment_id --bug# 3764224 Changes for RLM
,X_OBJECT_ID => l_resource_list_member_id
,X_OBJECT_TYPE => l_object_type
,X_AS_OF_DATE => p_as_of_date
,X_OBJECT_VERSION_ID => l_object_version_id
,X_LAST_UPDATE_DATE => SYSDATE
,X_LAST_UPDATED_BY => l_user_id
,X_CREATION_DATE => SYSDATE
,X_CREATED_BY => l_user_id
,X_PROGRESS_STATUS_CODE => l_rollup_progress_status
,X_LAST_UPDATE_LOGIN => l_login_id
,X_INCREMENTAL_WORK_QTY => l_INCREMENTAL_WORK_QTY
,X_CUMULATIVE_WORK_QTY => l_CUMULATIVE_WORK_QTY
,X_BASE_PERCENT_COMPLETE => l_BASE_PERCENT_COMPLETE
,X_EFF_ROLLUP_PERCENT_COMP => l_EFF_ROLLUP_PERCENT_COMP
,X_COMPLETED_PERCENTAGE => l_rollup_completed_percentage
,X_ESTIMATED_START_DATE => l_estimated_start_date
,X_ESTIMATED_FINISH_DATE => l_estimated_finish_date
,X_ACTUAL_START_DATE => l_actual_start_date
,X_ACTUAL_FINISH_DATE => l_actual_finish_date
,X_EST_REMAINING_EFFORT => l_ppl_etc_effort
,X_BASE_PERCENT_COMP_DERIV_CODE => l_BASE_PERCENT_COMP_DERIV_CODE
,X_BASE_PROGRESS_STATUS_CODE => l_date_override_flag -- 4533112 l_BASE_PROGRESS_STATUS_CODE
,X_EFF_ROLLUP_PROG_STAT_CODE => l_EFF_ROLLUP_PROG_STAT_CODE
,x_percent_complete_id => l_percent_complete_id
,X_STRUCTURE_TYPE => p_structure_type
,X_PROJ_ELEMENT_ID => p_task_id
,X_STRUCTURE_VERSION_ID => l_structure_version_id
,X_PPL_ACT_EFFORT_TO_DATE => l_ppl_act_effort_to_date
,X_EQPMT_ACT_EFFORT_TO_DATE => l_eqpmt_act_effort_to_date
,X_EQPMT_ETC_EFFORT => l_eqpmt_etc_effort
,X_OTH_ACT_COST_TO_DATE_TC => l_oth_act_bur_cost_to_date_tc
,X_OTH_ACT_COST_TO_DATE_FC => l_oth_act_bur_cost_to_date_fc
,X_OTH_ACT_COST_TO_DATE_PC => l_oth_act_bur_cost_to_date_pc
,X_OTH_ETC_COST_TC => l_oth_etc_bur_cost_tc
,X_OTH_ETC_COST_FC => l_oth_etc_bur_cost_fc
,X_OTH_ETC_COST_PC => l_oth_etc_bur_cost_pc
,X_PPL_ACT_COST_TO_DATE_TC => l_ppl_act_bur_cost_to_date_tc
,X_PPL_ACT_COST_TO_DATE_FC => l_ppl_act_bur_cost_to_date_fc
,X_PPL_ACT_COST_TO_DATE_PC => l_ppl_act_bur_cost_to_date_pc
,X_PPL_ETC_COST_TC => l_ppl_etc_bur_cost_tc
,X_PPL_ETC_COST_FC => l_ppl_etc_bur_cost_fc
,X_PPL_ETC_COST_PC => l_ppl_etc_bur_cost_pc
,X_EQPMT_ACT_COST_TO_DATE_TC => l_eqp_act_bur_cost_to_date_tc
,X_EQPMT_ACT_COST_TO_DATE_FC => l_eqp_act_bur_cost_to_date_fc
,X_EQPMT_ACT_COST_TO_DATE_PC => l_eqp_act_bur_cost_to_date_pc
,X_EQPMT_ETC_COST_TC => l_eqpmt_etc_bur_cost_tc
,X_EQPMT_ETC_COST_FC => l_eqpmt_etc_bur_cost_fc
,X_EQPMT_ETC_COST_PC => l_eqpmt_etc_bur_cost_pc
,X_EARNED_VALUE => null
,X_TASK_WT_BASIS_CODE => null
,X_SUBPRJ_PPL_ACT_EFFORT => null
,X_SUBPRJ_EQPMT_ACT_EFFORT => null
,X_SUBPRJ_PPL_ETC_EFFORT => null
,X_SUBPRJ_EQPMT_ETC_EFFORT => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_TC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_FC => null
,X_SBPJ_OTH_ACT_COST_TO_DATE_PC => null
,X_SUBPRJ_PPL_ACT_COST_TC => null
,X_SUBPRJ_PPL_ACT_COST_FC => null
,X_SUBPRJ_PPL_ACT_COST_PC => null
,X_SUBPRJ_EQPMT_ACT_COST_TC => null
,X_SUBPRJ_EQPMT_ACT_COST_FC => null
,X_SUBPRJ_EQPMT_ACT_COST_PC => null
,X_SUBPRJ_OTH_ETC_COST_TC => null
,X_SUBPRJ_OTH_ETC_COST_FC => null
,X_SUBPRJ_OTH_ETC_COST_PC => null
,X_SUBPRJ_PPL_ETC_COST_TC => null
,X_SUBPRJ_PPL_ETC_COST_FC => null
,X_SUBPRJ_PPL_ETC_COST_PC => null
,X_SUBPRJ_EQPMT_ETC_COST_TC => null
,X_SUBPRJ_EQPMT_ETC_COST_FC => null
,X_SUBPRJ_EQPMT_ETC_COST_PC => null
,X_SUBPRJ_EARNED_VALUE => null
,X_CURRENT_FLAG => l_rollup_current_flag -- Bug 3879461 l_current_flag
,X_PROJFUNC_COST_RATE_TYPE => l_projfunc_cost_rate_type
,X_PROJFUNC_COST_EXCHANGE_RATE => l_projfunc_cost_exch_rate
,X_PROJFUNC_COST_RATE_DATE => l_projfunc_cost_rate_date
,X_PROJ_COST_RATE_TYPE => l_project_rate_type
,X_PROJ_COST_EXCHANGE_RATE => l_project_exch_rate
,X_PROJ_COST_RATE_DATE => l_project_rate_date
,X_TXN_CURRENCY_CODE => l_txn_currency_code -- Fix for Bug # 3988457.
-- p_txn_currency_code --maansari4/30
,X_PROG_PA_PERIOD_NAME => l_prog_pa_period_name
,X_PROG_GL_PERIOD_NAME => l_prog_gl_period_name
--bug 3608801
,X_OTH_QUANTITY_TO_DATE => l_oth_quantity_to_date -- bug no.3608801
,X_OTH_ETC_QUANTITY => l_oth_etc_quantity
--bug 3608801
,X_OTH_ACT_RAWCOST_TO_DATE_TC => l_oth_act_raw_cost_to_date_tc
,X_OTH_ACT_RAWCOST_TO_DATE_FC => l_oth_act_raw_cost_to_date_fc
,X_OTH_ACT_RAWCOST_TO_DATE_PC => l_oth_act_raw_cost_to_date_pc
,X_OTH_ETC_RAWCOST_TC => l_oth_etc_raw_cost_tc
,X_OTH_ETC_RAWCOST_FC => l_oth_etc_raw_cost_fc
,X_OTH_ETC_RAWCOST_PC => l_oth_etc_raw_cost_pc
,X_PPL_ACT_RAWCOST_TO_DATE_TC => l_ppl_act_raw_cost_to_date_tc
,X_PPL_ACT_RAWCOST_TO_DATE_FC => l_ppl_act_raw_cost_to_date_fc
,X_PPL_ACT_RAWCOST_TO_DATE_PC => l_ppl_act_raw_cost_to_date_pc
,X_PPL_ETC_RAWCOST_TC => l_ppl_etc_raw_cost_tc
,X_PPL_ETC_RAWCOST_FC => l_ppl_etc_raw_cost_fc
,X_PPL_ETC_RAWCOST_PC => l_ppl_etc_raw_cost_pc
,X_EQPMT_ACT_RAWCOST_TO_DATE_TC => l_eqp_act_raw_cost_to_date_tc
,X_EQPMT_ACT_RAWCOST_TO_DATE_FC => l_eqp_act_raw_cost_to_date_fc
,X_EQPMT_ACT_RAWCOST_TO_DATE_PC => l_eqp_act_raw_cost_to_date_pc
,X_EQPMT_ETC_RAWCOST_TC => l_eqpmt_etc_raw_cost_tc
,X_EQPMT_ETC_RAWCOST_FC => l_eqpmt_etc_raw_cost_fc
,X_EQPMT_ETC_RAWCOST_PC => l_eqpmt_etc_raw_cost_pc
,X_SP_OTH_ACT_RAWCOST_TODATE_TC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_FC => null
,X_SP_OTH_ACT_RAWCOST_TODATE_PC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_TC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_FC => null
,X_SUBPRJ_PPL_ACT_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ACT_RAWCOST_PC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_TC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_FC => null
,X_SUBPRJ_OTH_ETC_RAWCOST_PC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_TC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_FC => null
,X_SUBPRJ_PPL_ETC_RAWCOST_PC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_TC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_FC => null
,X_SUBPRJ_EQPMT_ETC_RAWCOST_PC => null
);
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'COMPLETED ', x_Log_Level=> 3);
pa_fp_planning_transaction_pub.update_planning_transactions
(
p_context => 'WORKPLAN'
,p_struct_elem_version_id => p_structure_version_id
,p_task_elem_version_id_tbl => l_task_elem_version_id_tbl
,p_planned_people_effort_tbl => l_planned_people_effort_tbl
,p_planned_equip_effort_tbl => l_planned_equip_effort_tbl
,p_resource_assignment_id_tbl => l_resource_assignment_id_tbl
,p_resource_list_member_id_tbl => l_resource_list_member_id_tbl
,p_resource_class_code_tbl => l_resource_class_code_tbl
-- ,p_start_date_tbl => l_start_date_tbl
-- ,p_end_date_tbl => l_end_date_tbl
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
);
p_procedure_name => 'UPDATE_ASSIGNMENT_PROGRESS',
p_error_text => SUBSTRB('pa_fp_planning_transaction_pub.update_planning_transactions:'||SQLERRM,1,240));
pa_debug.write(x_Module=>'PA_ASSIGNMENT_PROGRESS_PUB.UPDATE_ASSIGNMENT_PROGRESS', x_Msg => 'EXITING ', x_Log_Level=> 3);
rollback to UPDATE_ASSIGNMENT_PROGRESS;
rollback to UPDATE_ASSIGNMENT_PROGRESS;
p_procedure_name => 'UPDATE_ASSIGNMENT_PROGRESS',
p_error_text => SUBSTRB(SQLERRM,1,240));
rollback to UPDATE_DELIVERABLE_PROGRESS;
p_procedure_name => 'UPDATE_ASSIGNMENT_PROGRESS',
p_error_text => SUBSTRB(SQLERRM,1,240));
END UPDATE_ASSIGNMENT_PROGRESS;