The following lines contain the word 'select', 'insert', 'update' or 'delete':
ELSIF l_return_status = EAM_PROCESS_WO_PVT.G_RECORD_NOT_FOUND AND p_work_permit_header_rec.transaction_type IN (EAM_PROCESS_WO_PVT.G_OPR_UPDATE, EAM_PROCESS_WO_PVT.G_OPR_DELETE) THEN
l_token_tbl(1).token_name := 'PERMIT_NAME';
SELECT 1
INTO g_dummy
FROM mtl_parameters mp
WHERE mp.organization_id = p_work_permit_header_rec.organization_id;
SELECT NVL(hou.date_to,sysdate+1)
INTO l_disable_date
FROM hr_organization_units hou
WHERE organization_id = p_work_permit_header_rec.organization_id;
SELECT 1
INTO g_dummy
FROM wip_eam_parameters wep,
mtl_parameters mp
WHERE wep.organization_id = mp.organization_id
AND mp.eam_enabled_flag = 'Y'
AND wep.organization_id = p_work_permit_header_rec.organization_id;
SELECT COUNT(*)
INTO l_count
FROM EAM_WORK_PERMITS
WHERE PERMIT_ID = p_work_permit_header_rec.PERMIT_ID
AND organization_id = p_work_permit_header_rec.organization_id;
IF EAM_PROCESS_WO_PVT.GET_DEBUG = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug('Validating if Permit ID exists for update . . . '); END IF;
IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
SELECT COUNT(*)
INTO l_count
FROM EAM_WORK_PERMITS
WHERE PERMIT_ID = p_work_permit_header_rec.PERMIT_ID
AND organization_id = p_work_permit_header_rec.organization_id;
SELECT COUNT(*)
INTO l_count
FROM EAM_WORK_PERMITS
WHERE PERMIT_NAME = p_work_permit_header_rec.PERMIT_NAME
AND organization_id = p_work_permit_header_rec.organization_id;
IF (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE) THEN
BEGIN
SELECT permit_id
INTO l_permit_id
FROM EAM_WORK_PERMITS
WHERE PERMIT_NAME = p_work_permit_header_rec.PERMIT_NAME
AND organization_id = p_work_permit_header_rec.organization_id;
elsif (p_work_permit_header_rec.transaction_type = EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND p_work_permit_header_rec.status_type NOT IN (wip_constants.released, wip_constants.cancelled,wip_constants.comp_chrg,wip_constants.comp_nochrg )) THEN
raise fnd_api.g_exc_unexpected_error;
IF (p_work_permit_header_rec.transaction_type= EAM_PROCESS_WO_PVT.G_OPR_UPDATE AND
p_work_permit_header_rec.status_type = wip_constants.cancelled OR
p_work_permit_header_rec.PERMIT_NAME <> p_old_work_permit_header_rec.PERMIT_NAME OR
p_work_permit_header_rec.PERMIT_TYPE <> p_old_work_permit_header_rec.PERMIT_TYPE OR
p_work_permit_header_rec.DESCRIPTION <> p_old_work_permit_header_rec.DESCRIPTION OR
p_work_permit_header_rec.ORGANIZATION_ID <> p_old_work_permit_header_rec.ORGANIZATION_ID OR
p_work_permit_header_rec.VALID_FROM <> p_old_work_permit_header_rec.VALID_FROM OR
p_work_permit_header_rec.VALID_TO <> p_old_work_permit_header_rec.VALID_TO OR
p_work_permit_header_rec.PENDING_FLAG <> p_old_work_permit_header_rec.PENDING_FLAG OR
p_work_permit_header_rec.COMPLETION_DATE <> p_old_work_permit_header_rec.COMPLETION_DATE OR
p_work_permit_header_rec.USER_DEFINED_STATUS_ID <> p_old_work_permit_header_rec.USER_DEFINED_STATUS_ID OR
p_work_permit_header_rec.ATTRIBUTE_CATEGORY <> p_old_work_permit_header_rec.ATTRIBUTE_CATEGORY OR
p_work_permit_header_rec.ATTRIBUTE1 <> p_old_work_permit_header_rec.ATTRIBUTE1 OR
p_work_permit_header_rec.ATTRIBUTE2 <> p_old_work_permit_header_rec.ATTRIBUTE2 OR
p_work_permit_header_rec.ATTRIBUTE3 <> p_old_work_permit_header_rec.ATTRIBUTE3 OR
p_work_permit_header_rec.ATTRIBUTE4 <> p_old_work_permit_header_rec.ATTRIBUTE4 OR
p_work_permit_header_rec.ATTRIBUTE5 <> p_old_work_permit_header_rec.ATTRIBUTE5 OR
p_work_permit_header_rec.ATTRIBUTE6 <> p_old_work_permit_header_rec.ATTRIBUTE6 OR
p_work_permit_header_rec.ATTRIBUTE7 <> p_old_work_permit_header_rec.ATTRIBUTE7 OR
p_work_permit_header_rec.ATTRIBUTE8 <> p_old_work_permit_header_rec.ATTRIBUTE8 OR
p_work_permit_header_rec.ATTRIBUTE9 <> p_old_work_permit_header_rec.ATTRIBUTE9 OR
p_work_permit_header_rec.ATTRIBUTE10<> p_old_work_permit_header_rec.ATTRIBUTE10 OR
p_work_permit_header_rec.ATTRIBUTE11 <> p_old_work_permit_header_rec.ATTRIBUTE11 OR
p_work_permit_header_rec.ATTRIBUTE12 <> p_old_work_permit_header_rec.ATTRIBUTE12 OR
p_work_permit_header_rec.ATTRIBUTE13 <> p_old_work_permit_header_rec.ATTRIBUTE13 OR
p_work_permit_header_rec.ATTRIBUTE14 <> p_old_work_permit_header_rec.ATTRIBUTE14 OR
p_work_permit_header_rec.ATTRIBUTE15 <> p_old_work_permit_header_rec.ATTRIBUTE15 OR
p_work_permit_header_rec.APPROVED_BY <> p_old_work_permit_header_rec.APPROVED_BY ) THEN
raise fnd_api.g_exc_unexpected_error;
SELECT 1
INTO g_dummy
FROM fnd_user
WHERE user_id = p_work_permit_header_rec.user_id;
SELECT 1
INTO g_dummy
FROM fnd_responsibility
WHERE responsibility_id = p_work_permit_header_rec.responsibility_id;