The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Award_Id IN NUMBER,
X_Event_type IN VARCHAR2,
X_User_id IN NUMBER) IS
CURSOR C IS SELECT rowid FROM GMS_NOTIFICATIONS
WHERE Award_id = X_Award_id and
Event_type = X_Event_type and
User_id = X_User_id;
INSERT into GMS_NOTIFICATIONS(award_id,
event_type,
user_id)
values (X_award_id,
X_event_type,
X_user_id);
END Insert_row;
cursor c is select * from gms_notifications
where rowid = X_rowid
for update of Award_id, event_type, user_id nowait;
FND_MESSAGE.Set_Name('FND','FORM_RECORD_DELETED');
PROCEDURE Delete_Row(X_Rowid VARCHAR2) is
BEGIN
delete gms_notifications
where rowid = X_Rowid;
END Delete_row;
select distinct to_char(report_template_id)
from gms_default_reports_v
where award_id = p_award_id;
select user_id
from fnd_user
where employee_id = p_person_id;
INSERT into GMS_NOTIFICATIONS(award_id,
event_type,
user_id)
values (p_award_id,
'INSTALLMENT_CLOSEOUT',
l_user_id);
INSERT into GMS_NOTIFICATIONS(award_id,
event_type,
user_id)
values (p_award_id,
'BUDGET_BASELINE',
l_user_id);
INSERT into GMS_NOTIFICATIONS(award_id,
event_type,
user_id)
values (p_award_id,
'INSTALLMENT_ACTIVE',
l_user_id);
INSERT into GMS_NOTIFICATIONS(award_id,
event_type,
user_id)
values (p_award_id,
'REPORT_'||l_report_template_id,
l_user_id);
select user_id
from fnd_user
where employee_id = l_person_id;
select person_id
from gms_personnel
where award_id = p_award_id and
trunc(sysdate) between start_date_active and nvl(end_date_active,to_date('01/01/4000','DD/MM/YYYY'));
INSERT into GMS_NOTIFICATIONS(award_id,
event_type,
user_id)
values (p_award_id,
'REPORT_'||l_report_template_id,
l_user_id);
select user_id
from fnd_user
where employee_id = p_person_id;
delete gms_notifications
where user_id = l_user_id and
award_id = p_award_id and
-- Bug 1969587 : Installment closeout Notification
-- added in order not to delete the person if he still exists in gms_personnel with additional
-- award role.
not exists ( select 1
from gms_personnel
where award_id = p_award_id and
person_id = p_person_id
);
delete gms_notifications
where award_id = p_award_id and
event_type = 'REPORT_'||to_char(p_report_template_id);