The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT * FROM AHL_PROG_TYPE_SUBTYPES
WHERE PROG_TYPE_SUBTYPE_ID=C_PROG_TYPE_SUBTYPE_ID;
SELECT lookup_code
FROM FND_LOOKUP_VALUES_VL
WHERE lookup_code = c_lookup_code
AND lookup_type = c_lookup_type
AND sysdate between start_date_active
AND nvl(end_date_active,sysdate);
SELECT lookup_code
FROM FND_LOOKUP_VALUES_VL
WHERE lookup_type= c_lookup_type
AND upper(meaning) =upper(c_meaning)
AND sysdate between start_date_active
AND nvl(end_date_active,sysdate);
SELECT count(*)
FROM AHL_PROG_TYPE_SUBTYPES
WHERE
UPPER(PROGRAM_TYPE_CODE)=UPPER(C_PROGRAM_TYPE_CODE) AND
UPPER(PROGRAM_SUBTYPE_CODE)=UPPER(C_PROGRAM_SUBTYPE_CODE);
SELECT count(*)
FROM AHL_PROG_TYPE_SUBTYPES
WHERE
UPPER(PROGRAM_TYPE_CODE)=UPPER(C_PROGRAM_TYPE_CODE) AND
UPPER(PROGRAM_SUBTYPE_CODE)=UPPER(C_PROGRAM_SUBTYPE_CODE);*/
SELECT COUNT(MR_HEADER_ID) INTO l_cnt_mrs_subtype
FROM AHL_MR_HEADERS_B
WHERE PROGRAM_TYPE_CODE = (SELECT PROGRAM_TYPE_CODE
FROM AHL_PROG_TYPE_SUBTYPES
WHERE PROG_TYPE_SUBTYPE_ID = p_prog_type_subtype_rec.PROG_TYPE_SUBTYPE_ID)
AND PROGRAM_SUBTYPE_CODE = (SELECT PROGRAM_SUBTYPE_CODE
FROM AHL_PROG_TYPE_SUBTYPES
WHERE PROG_TYPE_SUBTYPE_ID = p_prog_type_subtype_rec.PROG_TYPE_SUBTYPE_ID)
AND TRUNC(NVL(EFFECTIVE_TO,SYSDATE + 1)) > TRUNC(SYSDATE);
SELECT PROGRAM_SUBTYPE_CODE into l_prog_sub_type
FROM AHL_PROG_TYPE_SUBTYPES
WHERE PROG_TYPE_SUBTYPE_ID = p_prog_type_subtype_rec.PROG_TYPE_SUBTYPE_ID;
DELETE from AHL_PROG_TYPE_SUBTYPES
where PROG_TYPE_SUBTYPE_ID =p_x_prog_type_subtype_tabl(i).PROG_TYPE_SUBTYPE_ID
and OBJECT_VERSION_NUMBER=p_x_prog_type_subtype_tabl(i).OBJECT_VERSION_NUMBER;
AHL_PROG_TYPE_SUBTYPES_PKG.UPDATE_ROW (
X_PROG_TYPE_SUBTYPE_ID =>p_x_prog_type_subtype_tabl(i).PROG_TYPE_SUBTYPE_ID,
X_OBJECT_VERSION_NUMBER =>p_x_prog_type_subtype_tabl(i).object_version_number,
X_PROGRAM_TYPE_CODE =>p_x_prog_type_subtype_tabl(i).PROGRAM_TYPE_CODE,
X_PROGRAM_SUBTYPE_CODE =>p_x_prog_type_subtype_tabl(i).PROGRAM_SUBTYPE_CODE,
X_ATTRIBUTE_CATEGORY =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE_CATEGORY,
X_ATTRIBUTE1 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE1,
X_ATTRIBUTE2 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE2,
X_ATTRIBUTE3 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE3,
X_ATTRIBUTE4 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE4,
X_ATTRIBUTE5 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE5,
X_ATTRIBUTE6 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE6,
X_ATTRIBUTE7 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE7,
X_ATTRIBUTE8 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE8,
X_ATTRIBUTE9 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE9,
X_ATTRIBUTE10 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE10,
X_ATTRIBUTE11 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE11,
X_ATTRIBUTE12 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE12,
X_ATTRIBUTE13 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE13,
X_ATTRIBUTE14 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE14,
X_ATTRIBUTE15 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE15,
X_LAST_UPDATE_DATE =>sysdate,
X_LAST_UPDATED_BY =>fnd_global.user_id,
X_LAST_UPDATE_LOGIN =>fnd_global.user_id);
select AHL_PROG_TYPE_SUBTYPES_S.nextval
into p_x_prog_type_subtype_tabl(i).PROG_TYPE_SUBTYPE_ID
from dual;
AHL_PROG_TYPE_SUBTYPES_PKG.INSERT_ROW (
X_PROG_TYPE_SUBTYPE_ID =>p_x_prog_type_subtype_tabl(i).PROG_TYPE_SUBTYPE_ID,
X_OBJECT_VERSION_NUMBER =>1,
X_PROGRAM_TYPE_CODE =>p_x_prog_type_subtype_tabl(i).PROGRAM_TYPE_CODE,
X_PROGRAM_SUBTYPE_CODE =>p_x_prog_type_subtype_tabl(i).PROGRAM_SUBTYPE_CODE,
X_ATTRIBUTE_CATEGORY =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE_CATEGORY,
X_ATTRIBUTE1 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE1,
X_ATTRIBUTE2 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE2,
X_ATTRIBUTE3 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE3,
X_ATTRIBUTE4 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE4,
X_ATTRIBUTE5 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE5,
X_ATTRIBUTE6 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE6,
X_ATTRIBUTE7 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE7,
X_ATTRIBUTE8 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE8,
X_ATTRIBUTE9 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE9,
X_ATTRIBUTE10 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE10,
X_ATTRIBUTE11 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE11,
X_ATTRIBUTE12 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE12,
X_ATTRIBUTE13 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE13,
X_ATTRIBUTE14 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE14,
X_ATTRIBUTE15 =>p_x_prog_type_subtype_tabl(i).ATTRIBUTE15,
X_CREATION_DATE =>sysdate,
X_CREATED_BY =>fnd_global.user_id,
X_LAST_UPDATE_DATE =>sysdate,
X_LAST_UPDATED_BY =>fnd_global.user_id,
X_LAST_UPDATE_LOGIN =>fnd_global.user_id);