1019: )
1020: IS
1021: -- Check to see schedule Resource id exists
1022: CURSOR Sch_id_exists (x_id IN NUMBER) IS
1023: SELECT 1 FROM dual
1024: WHERE EXISTS (SELECT 1
1025: FROM AHL_WORK_ASSIGNMENTS
1026: WHERE ASSIGNMENT_ID = x_id);
1027:
1825:
1826: --
1827: -- Get Sequence Number for Resource Assignment ID
1828: SELECT AHL_WORK_ASSIGNMENTS_S.NEXTVAL
1829: INTO l_assignment_id FROM DUAL;
1830:
1831: --Check for Record Exists
1832: OPEN Sch_id_exists(l_assignment_id);
1833: FETCH Sch_id_exists INTO l_dummy;