3725: fetch chk_apl_exists into l_cur_apl_id, l_current_apl_end_date;
3726: if chk_apl_exists%notfound then
3727:
3728: -- creating APLN since not found
3729: SELECT per_applications_s.nextval into l_new_application_id FROM sys.dual;
3730: l_cur_apl_id := l_new_application_id;
3731: begin
3732: INSERT INTO PER_APPLICATIONS(
3733: application_id,
6570: fetch chk_apl_exists into l_cur_apl_id, l_current_apl_end_date;
6571: if chk_apl_exists%notfound then
6572:
6573: -- creating APLN since not found
6574: SELECT per_applications_s.nextval into l_new_application_id FROM sys.dual;
6575: l_cur_apl_id := l_new_application_id;
6576: begin
6577: INSERT INTO PER_APPLICATIONS(
6578: application_id,