The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT unit_config_status_code
FROM ahl_unit_config_headers
WHERE unit_config_header_id = c_unit_header_id
AND trunc(nvl(active_start_date,sysdate)) <= trunc(sysdate)
AND trunc(sysdate) < trunc(nvl(active_end_date, sysdate+1))
FOR UPDATE OF unit_config_status_code NOWAIT;
UPDATE AHL_UNIT_CONFIG_HEADERS
SET UNIT_CONFIG_STATUS_CODE = 'COMPLETE',
OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER+1,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
WHERE unit_config_header_id = p_unit_header_id;
UPDATE AHL_UNIT_CONFIG_HEADERS
SET UNIT_CONFIG_STATUS_CODE = 'INCOMPLETE',
OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER+1,
LAST_UPDATE_DATE = sysdate,
LAST_UPDATED_BY = fnd_global.USER_ID,
LAST_UPDATE_LOGIN = fnd_global.LOGIN_ID
WHERE unit_config_header_id = p_unit_header_id;