461: )
462: IS
463:
464: BEGIN
465: UPDATE AHL_WORK_ASSIGNMENTS SET
466: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER + 1,
467: ASSIGNMENT_ID = X_ASSIGNMENT_ID,
468: OPERATION_RESOURCE_ID = X_OPERATION_RESOURCE_ID,
469: EMPLOYEE_ID = X_EMPLOYEE_ID,
1824: END IF;
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);