The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row ( p_Request_set_id NUMBER
, p_Set_app_id NUMBER
, p_Stage_id NUMBER
, p_Request_id NUMBER
, p_Set_request_id NUMBER
, p_Start_date DATE
, p_Completion_date DATE
, p_Status_code VARCHAR2
, p_phase_code VARCHAR2
, p_Creation_date DATE
, p_Created_by NUMBER
, p_Last_update_date DATE
, p_Last_updated_by NUMBER
, p_completion_text VARCHAR2
)
is
CURSOR C_check IS SELECT ROWID from BIS_RS_STAGE_RUN_HISTORY
where Request_set_id =p_Request_set_id;
insert into BIS_RS_STAGE_RUN_HISTORY
(Request_set_id
, Set_app_id
, Stage_id
, Request_id
, Set_request_id
, Start_date
, Completion_date
, Status_code
, phase_code
, Creation_date
, Created_by
, Last_update_date
, Last_updated_by
, Completion_Text)
values
(p_Request_set_id
, p_Set_app_id
, p_Stage_id
, p_Request_id
, p_Set_request_id
, p_Start_date
, p_Completion_date
, p_Status_code
, p_phase_code
, p_Creation_date
, p_Created_by
, p_Last_update_date
, p_Last_updated_by
, p_completion_text);
BIS_COLLECTION_UTILITIES.put_line('Exception happens in BIS_RS_STAGE_RUN_HISTORY_PKG.Insert_Row ' || sqlerrm);
function Update_Row (p_Request_id NUMBER
, p_Set_request_id NUMBER
, p_start_date DATE DEFAULT NULL
, p_Completion_date DATE DEFAULT NULL
, p_Status_code VARCHAR2 DEFAULT NULL
, p_phase_code VARCHAR2 DEFAULT NULL
, p_Last_update_date DATE
, p_Last_updated_by NUMBER
, p_completion_text VARCHAR2 DEFAULT NULL) return boolean
IS
setClause varchar2(1024):=null;
if(p_Request_id is null or p_Set_request_id is null or p_Last_update_date is null or p_Last_updated_by is null) THEN
return FALSE;
setClause :=setClause || 'Last_update_date = ''' || p_Last_update_date || ''', ' ;
setClause :=setClause || 'Last_updated_by= ' || p_Last_updated_by ;
stmt := 'update BIS_RS_STAGE_RUN_HISTORY set '|| setClause ;
update BIS_RS_STAGE_RUN_HISTORY
set Completion_text = p_completion_text ,
Last_update_date = p_Last_update_date ,
Last_updated_by = p_Last_updated_by
where Set_request_id = p_Set_request_id
and Request_id = p_Request_id;
BIS_COLLECTION_UTILITIES.put_line('Exception happens in BIS_RS_STAGE_RUN_HISTORY_PKG.Update_Row ' || sqlerrm);
PROCEDURE Delete_Row (p_set_req_id number)
IS
BEGIN
DELETE FROM BIS_RS_STAGE_RUN_HISTORY
WHERE SET_REQUEST_ID = p_set_req_id;
BIS_COLLECTION_UTILITIES.put_line('Exception happens in BIS_RS_STAGE_RUN_HISTORY_PKG.Delete_Row ' || sqlerrm);