The following lines contain the word 'select', 'insert', 'update' or 'delete':
Update PA_PROJECT_ACCUM_COMMITMENTS PAA SET
CMT_RAW_COST_ITD = CMT_RAW_COST_ITD + X_Raw_Cost,
CMT_RAW_COST_YTD = CMT_RAW_COST_YTD + X_Raw_Cost,
CMT_RAW_COST_PTD = CMT_RAW_COST_PTD + X_Raw_Cost,
CMT_BURDENED_COST_ITD = CMT_BURDENED_COST_ITD + X_Burdened_Cost,
CMT_BURDENED_COST_YTD = CMT_BURDENED_COST_YTD + X_Burdened_Cost,
CMT_BURDENED_COST_PTD = CMT_BURDENED_COST_PTD + X_Burdened_Cost,
LAST_UPDATED_BY = pa_proj_accum_main.x_last_updated_by,
LAST_UPDATE_DATE = Trunc(Sysdate),
LAST_UPDATE_LOGIN = pa_proj_accum_main.x_last_update_login
Where PAA.Project_Accum_id In
(Select Pah.Project_Accum_id from PA_PROJECT_ACCUM_HEADERS PAH
Where Pah.Project_id = x_project_id and
pah.Resource_list_member_id = 0 and
Pah.Task_id in (Select Pt.Task_Id from PA_TASKS pt
start with pt.task_id = x_task_id
connect by prior pt.parent_task_id = pt.task_id)
UNION select to_number(X_Proj_accum_id) from sys.dual );
Select PA_PROJECT_ACCUM_HEADERS_S.Nextval into V_Accum_id
From sys.Dual;
PA_MAINT_PROJECT_ACCUMS.Insert_Headers_tasks (X_project_id,
v_task_array(i),
x_current_period,
v_accum_id,
x_err_stack,
x_err_stage,
x_err_code);
Insert into PA_PROJECT_ACCUM_COMMITMENTS (
PROJECT_ACCUM_ID,CMT_RAW_COST_ITD,CMT_RAW_COST_YTD,CMT_RAW_COST_PP,
CMT_RAW_COST_PTD,
CMT_BURDENED_COST_ITD,CMT_BURDENED_COST_YTD,
CMT_BURDENED_COST_PP,CMT_BURDENED_COST_PTD,
CMT_QUANTITY_ITD,CMT_QUANTITY_YTD,
CMT_QUANTITY_PP,CMT_QUANTITY_PTD,
CMT_UNIT_OF_MEASURE,
LAST_UPDATED_BY,LAST_UPDATE_DATE,CREATION_DATE,CREATED_BY,
LAST_UPDATE_LOGIN) Values
(V_Accum_id,X_Raw_Cost,X_Raw_Cost,0,X_Raw_Cost,
X_Burdened_Cost,X_Burdened_Cost,0,X_Burdened_Cost,
0,0,0,0,
X_Unit_Of_Measure,pa_proj_accum_main.x_last_updated_by,Trunc(sysdate),
Trunc(Sysdate),pa_proj_accum_main.x_created_by,pa_proj_accum_main.x_last_update_login);
Update PA_PROJECT_ACCUM_COMMITMENTS PAA SET
CMT_RAW_COST_ITD = CMT_RAW_COST_ITD + X_Raw_Cost,
CMT_RAW_COST_YTD = CMT_RAW_COST_YTD + X_Raw_Cost,
CMT_RAW_COST_PP = CMT_RAW_COST_PP + X_Raw_Cost,
CMT_BURDENED_COST_ITD = CMT_BURDENED_COST_ITD + X_Burdened_Cost,
CMT_BURDENED_COST_YTD = CMT_BURDENED_COST_YTD + X_Burdened_Cost,
CMT_BURDENED_COST_PP = CMT_BURDENED_COST_PP + X_Burdened_Cost,
LAST_UPDATED_BY = pa_proj_accum_main.x_last_updated_by,
LAST_UPDATE_DATE = Trunc(Sysdate),
LAST_UPDATE_LOGIN = pa_proj_accum_main.x_last_update_login
Where PAA.Project_Accum_id In
(Select Pah.Project_Accum_id from PA_PROJECT_ACCUM_HEADERS PAH
Where Pah.Project_id = x_project_id and
pah.Resource_list_member_id = 0 and
Pah.Task_id in (Select Pt.Task_Id from PA_TASKS pt
start with pt.task_id = x_task_id
connect by prior pt.parent_task_id = pt.task_id)
UNION select to_number(X_Proj_accum_id) from sys.dual );
Select PA_PROJECT_ACCUM_HEADERS_S.Nextval into V_Accum_id
From sys.Dual;
PA_MAINT_PROJECT_ACCUMS.Insert_Headers_tasks (X_project_id,
v_task_array(i),
x_current_period,
v_accum_id,
x_err_stack,
x_err_stage,
x_err_code);
Insert into PA_PROJECT_ACCUM_COMMITMENTS (
PROJECT_ACCUM_ID,CMT_RAW_COST_ITD,CMT_RAW_COST_YTD,CMT_RAW_COST_PP,
CMT_RAW_COST_PTD,
CMT_BURDENED_COST_ITD,CMT_BURDENED_COST_YTD,
CMT_BURDENED_COST_PP,CMT_BURDENED_COST_PTD,
CMT_QUANTITY_ITD,CMT_QUANTITY_YTD,
CMT_QUANTITY_PP,CMT_QUANTITY_PTD,
CMT_UNIT_OF_MEASURE,
LAST_UPDATED_BY,LAST_UPDATE_DATE,CREATION_DATE,CREATED_BY,
LAST_UPDATE_LOGIN) Values
(V_Accum_id,X_Raw_Cost,X_Raw_Cost,X_Raw_Cost,0,
X_Burdened_Cost,X_Burdened_Cost,
X_Burdened_Cost,0,
0,0,
0,0,
X_Unit_Of_Measure,pa_proj_accum_main.x_last_updated_by,Trunc(sysdate),
Trunc(Sysdate),pa_proj_accum_main.x_created_by,pa_proj_accum_main.x_last_update_login);
Update PA_PROJECT_ACCUM_COMMITMENTS PAA SET
CMT_RAW_COST_ITD = CMT_RAW_COST_ITD + X_Raw_Cost,
CMT_RAW_COST_PP = CMT_RAW_COST_PP + X_Raw_Cost,
CMT_BURDENED_COST_ITD = CMT_BURDENED_COST_ITD + X_Burdened_Cost,
CMT_BURDENED_COST_PP = CMT_BURDENED_COST_PP + X_Burdened_Cost,
LAST_UPDATED_BY = pa_proj_accum_main.x_last_updated_by,
LAST_UPDATE_DATE = Trunc(Sysdate),
LAST_UPDATE_LOGIN = pa_proj_accum_main.x_last_update_login
Where PAA.Project_Accum_id In
(Select Pah.Project_Accum_id from PA_PROJECT_ACCUM_HEADERS PAH
Where Pah.Project_id = x_project_id and
pah.Resource_list_member_id = 0 and
Pah.Task_id in (Select Pt.Task_Id from PA_TASKS pt
start with pt.task_id = x_task_id
connect by prior pt.parent_task_id = pt.task_id)
UNION select to_number(X_Proj_accum_id) from sys.dual );
Select PA_PROJECT_ACCUM_HEADERS_S.Nextval into V_Accum_id
From sys.Dual;
PA_MAINT_PROJECT_ACCUMS.Insert_Headers_tasks (X_project_id,
v_task_array(i),
x_current_period,
v_accum_id,
x_err_stack,
x_err_stage,
x_err_code);
Insert into PA_PROJECT_ACCUM_COMMITMENTS (
PROJECT_ACCUM_ID,CMT_RAW_COST_ITD,CMT_RAW_COST_YTD,CMT_RAW_COST_PP,
CMT_RAW_COST_PTD,
CMT_BURDENED_COST_ITD,CMT_BURDENED_COST_YTD,
CMT_BURDENED_COST_PP,CMT_BURDENED_COST_PTD,
CMT_QUANTITY_ITD,CMT_QUANTITY_YTD,
CMT_QUANTITY_PP,CMT_QUANTITY_PTD,
CMT_UNIT_OF_MEASURE,
LAST_UPDATED_BY,LAST_UPDATE_DATE,CREATION_DATE,CREATED_BY,
LAST_UPDATE_LOGIN) Values
(V_Accum_id,X_Raw_Cost,0,X_Raw_Cost,0,
X_Burdened_Cost,0,X_Burdened_Cost,0,
0,0,0,0,
X_Unit_Of_Measure,pa_proj_accum_main.x_last_updated_by,Trunc(sysdate),
Trunc(Sysdate),pa_proj_accum_main.x_created_by,pa_proj_accum_main.x_last_update_login);
Update PA_PROJECT_ACCUM_COMMITMENTS PAA SET
CMT_RAW_COST_ITD = CMT_RAW_COST_ITD + X_Raw_Cost,
CMT_RAW_COST_YTD = CMT_RAW_COST_YTD + X_Raw_Cost,
CMT_BURDENED_COST_ITD = CMT_BURDENED_COST_ITD + X_Burdened_Cost,
CMT_BURDENED_COST_YTD = CMT_BURDENED_COST_YTD + X_Burdened_Cost,
LAST_UPDATED_BY = pa_proj_accum_main.x_last_updated_by,
LAST_UPDATE_DATE = Trunc(Sysdate),
LAST_UPDATE_LOGIN = pa_proj_accum_main.x_last_update_login
Where PAA.Project_Accum_id In
(Select Pah.Project_Accum_id from PA_PROJECT_ACCUM_HEADERS PAH
Where Pah.Project_id = x_project_id and
pah.Resource_list_member_id = 0 and
Pah.Task_id in (Select Pt.Task_Id from PA_TASKS pt
start with pt.task_id = x_task_id
connect by prior pt.parent_task_id = pt.task_id)
UNION select to_number(X_Proj_accum_id) from sys.dual );
Select PA_PROJECT_ACCUM_HEADERS_S.Nextval into V_Accum_id
From sys.Dual;
PA_MAINT_PROJECT_ACCUMS.Insert_Headers_tasks (X_project_id,
v_task_array(i),
x_current_period,
v_accum_id,
x_err_stack,
x_err_stage,
x_err_code);
Insert into PA_PROJECT_ACCUM_COMMITMENTS (
PROJECT_ACCUM_ID,CMT_RAW_COST_ITD,CMT_RAW_COST_YTD,CMT_RAW_COST_PP,
CMT_RAW_COST_PTD,
CMT_BURDENED_COST_ITD,CMT_BURDENED_COST_YTD,
CMT_BURDENED_COST_PP,CMT_BURDENED_COST_PTD,
CMT_QUANTITY_ITD,CMT_QUANTITY_YTD,
CMT_QUANTITY_PP,CMT_QUANTITY_PTD,
CMT_UNIT_OF_MEASURE,
LAST_UPDATED_BY,LAST_UPDATE_DATE,CREATION_DATE,CREATED_BY,
LAST_UPDATE_LOGIN) Values
(V_Accum_id,X_Raw_Cost,X_Raw_Cost,0,0,
X_Burdened_Cost,X_Burdened_Cost,0,0,
0,0,0,0,
X_Unit_Of_Measure,pa_proj_accum_main.x_last_updated_by,Trunc(sysdate),
Trunc(Sysdate),pa_proj_accum_main.x_created_by,pa_proj_accum_main.x_last_update_login);
Update PA_PROJECT_ACCUM_COMMITMENTS PAA SET
CMT_RAW_COST_ITD = CMT_RAW_COST_ITD + X_Raw_Cost,
CMT_BURDENED_COST_ITD = CMT_BURDENED_COST_ITD + X_Burdened_Cost,
LAST_UPDATED_BY = pa_proj_accum_main.x_last_updated_by,
LAST_UPDATE_DATE = Trunc(Sysdate),
LAST_UPDATE_LOGIN = pa_proj_accum_main.x_last_update_login
Where PAA.Project_Accum_id In
(Select Pah.Project_Accum_id from PA_PROJECT_ACCUM_HEADERS PAH
Where Pah.Project_id = x_project_id and
pah.Resource_list_member_id = 0 and
Pah.Task_id in (Select Pt.Task_Id from PA_TASKS pt
start with pt.task_id = x_task_id
connect by prior pt.parent_task_id = pt.task_id)
UNION select to_number(X_Proj_accum_id) from sys.dual );
Select PA_PROJECT_ACCUM_HEADERS_S.Nextval into V_Accum_id
From sys.Dual;
PA_MAINT_PROJECT_ACCUMS.Insert_Headers_tasks (X_project_id,
v_task_array(i),
x_current_period,
v_accum_id,
x_err_stack,
x_err_stage,
x_err_code);
Insert into PA_PROJECT_ACCUM_COMMITMENTS (
PROJECT_ACCUM_ID,CMT_RAW_COST_ITD,CMT_RAW_COST_YTD,CMT_RAW_COST_PP,
CMT_RAW_COST_PTD,
CMT_BURDENED_COST_ITD,CMT_BURDENED_COST_YTD,
CMT_BURDENED_COST_PP,CMT_BURDENED_COST_PTD,
CMT_QUANTITY_ITD,CMT_QUANTITY_YTD,
CMT_QUANTITY_PP,CMT_QUANTITY_PTD,
CMT_UNIT_OF_MEASURE,
LAST_UPDATED_BY,LAST_UPDATE_DATE,CREATION_DATE,CREATED_BY,
LAST_UPDATE_LOGIN) Values
(V_Accum_id,X_Raw_Cost,0,0,0,
X_Burdened_Cost,0,0,0,
0,0,0,0,
X_Unit_Of_Measure,pa_proj_accum_main.x_last_updated_by,Trunc(sysdate),
Trunc(Sysdate),pa_proj_accum_main.x_created_by,pa_proj_accum_main.x_last_update_login);
SELECT task_id
FROM pa_tasks pt
WHERE project_id = x_project_id
AND NOT EXISTS
(SELECT 'x'
FROM
pa_project_accum_headers pah
WHERE pah.project_id = X_project_id
AND pah.task_id = pt.task_id
AND pah.resource_list_member_id = 0)
START WITH task_id = x_task_id
CONNECT BY PRIOR parent_task_id = task_id;