The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure insert_dml
(p_rec in out nocopy irc_rtm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_dml';
insert into irc_rec_team_members
(rec_team_member_id
,person_id
,party_id
,vacancy_id
,job_id
,start_date
,end_date
,update_allowed
,delete_allowed
,object_version_number
,interview_security
)
Values
(p_rec.rec_team_member_id
,p_rec.person_id
,p_rec.party_id
,p_rec.vacancy_id
,p_rec.job_id
,p_rec.start_date
,p_rec.end_date
,p_rec.update_allowed
,p_rec.delete_allowed
,p_rec.object_version_number
,p_rec.interview_security
);
End insert_dml;
Procedure pre_insert
(p_rec in out nocopy irc_rtm_shd.g_rec_type
) is
--
cursor c1 is select irc_rec_team_members_s.nextval from sys.dual;
select null from irc_rec_team_members
where rec_team_member_id = irc_rtm_ins.g_rec_team_member_id_i;
l_proc varchar2(72) := g_package||'pre_insert';
End pre_insert;
Procedure post_insert
(p_rec in irc_rtm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_insert';
irc_rtm_rki.after_insert
(p_rec_team_member_id => p_rec.rec_team_member_id
,p_person_id => p_rec.person_id
,p_vacancy_id
=> p_rec.vacancy_id
,p_job_id
=> p_rec.job_id
,p_start_date
=> p_rec.start_date
,p_end_date
=> p_rec.end_date
,p_update_allowed
=> p_rec.update_allowed
,p_interview_security
=> p_rec.interview_security
,p_delete_allowed
=> p_rec.delete_allowed
,p_object_version_number
=> p_rec.object_version_number
);
End post_insert;
irc_rtm_bus.insert_validate
(p_rec
);
irc_rtm_ins.pre_insert(p_rec);
irc_rtm_ins.insert_dml(p_rec);
irc_rtm_ins.post_insert
(p_rec
);
,p_update_allowed in varchar2
,p_delete_allowed in varchar2
,p_start_date in date default null
,p_end_date in date default null
,p_vacancy_id in number
,p_person_id in number
,p_object_version_number out nocopy number
,p_rec_team_member_id out nocopy number
,p_interview_security in varchar2 default 'SELF'
) is
--
l_rec irc_rtm_shd.g_rec_type;
,p_update_allowed
,p_delete_allowed
,null
,p_interview_security
);