The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE INSERT_ROW( P_rec GMS_FUNDING_PATTERNS_ALL%ROWTYPE)
IS
X_rec GMS_FUNDING_PATTERNS_ALL%ROWTYPE;
select gms_funding_pattern_s.nextval
into X_REC.funding_pattern_id
from dual;
insert into GMS_FUNDING_PATTERNS_ALL( funding_pattern_id
,org_id
,funding_sequence
,funding_name
,retroactive_flag
,project_id
,task_id
,status
,funds_status
,start_date
,end_date
,last_update_date
,last_updated_by
,creation_date
,created_by
,last_update_login)
values(X_rec.funding_pattern_id
, X_rec.org_id
,X_rec.funding_sequence
,X_rec.funding_name
,X_rec.retroactive_flag
,X_rec.project_id
,X_rec.task_id
,X_rec.status
, X_rec.funds_status
, X_rec.start_date
, X_rec.end_date
, X_rec.last_update_date
, X_rec.last_updated_by
, X_rec.creation_date
, X_rec.created_by
, X_rec.last_update_login);
SELECT funding_pattern_id
,org_id
,funding_sequence
,funding_name
,retroactive_flag
,project_id
,task_id
,status
,funds_status
,start_date
,end_date
FROM GMS_FUNDING_PATTERNS_ALL
WHERE funding_pattern_id = P_rec.funding_pattern_id
AND funding_sequence = P_rec.funding_sequence
AND funding_name = P_rec.funding_name
AND status = P_rec.status;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
PROCEDURE UPDATE_ROW( P_rec GMS_FUNDING_PATTERNS_ALL%ROWTYPE)
IS
X_rec GMS_FUNDING_PATTERNS_ALL%ROWTYPE;
update GMS_FUNDING_PATTERNS_ALL
set funding_sequence = X_rec.funding_sequence
,funding_name = X_rec.funding_name
,retroactive_flag = X_rec.retroactive_flag
,status = X_rec.status
,start_date = nvl(X_rec.start_date,sysdate)
,end_date = X_rec.end_date
where funding_pattern_id = X_rec.funding_pattern_id ;
END UPDATE_ROW;
PROCEDURE DELETE_ROW( P_rec GMS_FUNDING_PATTERNS_ALL%ROWTYPE)
IS
X_rec GMS_FUNDING_PATTERNS_ALL%ROWTYPE;
delete gms_funding_patterns_all
where funding_pattern_id=X_rec.funding_pattern_id ;
END DELETE_ROW;