[Home] [Help]
1172: -- Delete IGS_GR_GRADUAND_PKG records
1173: DECLARE
1174: CURSOR c_gua IS
1175: SELECT create_dt
1176: FROM IGS_GR_GRADUAND_ALL gua
1177: WHERE gua.person_id = p_person_id AND
1178: gua.course_cd = p_course_cd;
1179: CURSOR c_gua_del (
1180: cp_create_dt IGS_GR_GRADUAND_ALL.create_dt%TYPE) IS
1176: FROM IGS_GR_GRADUAND_ALL gua
1177: WHERE gua.person_id = p_person_id AND
1178: gua.course_cd = p_course_cd;
1179: CURSOR c_gua_del (
1180: cp_create_dt IGS_GR_GRADUAND_ALL.create_dt%TYPE) IS
1181: SELECT rowid
1182: FROM IGS_GR_GRADUAND_ALL gua
1183: WHERE gua.person_id = p_person_id AND
1184: gua.create_dt = cp_create_dt
1178: gua.course_cd = p_course_cd;
1179: CURSOR c_gua_del (
1180: cp_create_dt IGS_GR_GRADUAND_ALL.create_dt%TYPE) IS
1181: SELECT rowid
1182: FROM IGS_GR_GRADUAND_ALL gua
1183: WHERE gua.person_id = p_person_id AND
1184: gua.create_dt = cp_create_dt
1185: FOR UPDATE OF gua.LAST_UPDATE_DATE NOWAIT ;
1186:
1297: END IF;
1298: IF c_gac_del%ISOPEN THEN
1299: CLOSE c_gac_del;
1300: END IF;
1301: l_entity_name := 'IGS_GR_GRADUAND_ALL';
1302: RETURN FALSE;
1303: WHEN OTHERS THEN
1304: IF c_gua%ISOPEN THEN
1305: CLOSE c_gua;