[Home] [Help]
52: Open cur_old_ref_values;
53: Fetch cur_old_ref_values INTO old_references;
54: IF (cur_old_ref_values%NOTFOUND) AND p_action NOT IN ('INSERT','VALIDATE_INSERT') THEN
55: Close cur_old_ref_values;
56: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
57: IGS_GE_MSG_STACK.ADD;
58: App_Exception.Raise_Exception;
59: Return;
60: END IF;
112: -- Validate tertiary education level of completion
113: IF IGS_AD_VAL_TE.admp_val_telocclosed(
114: new_references.tertiary_edu_lvl_comp,
115: v_message_name) = FALSE THEN
116: Fnd_Message.Set_Name('IGS', v_message_name);
117: IGS_GE_MSG_STACK.ADD;
118: App_Exception.Raise_Exception;
119: END IF;
120: END IF;
125: -- Validate tertiary education level of qualification
126: IF IGS_AD_VAL_TE.admp_val_teloqclosed(
127: new_references.tertiary_edu_lvl_qual,
128: v_message_name) = FALSE THEN
129: Fnd_Message.Set_Name('IGS', v_message_name);
130: IGS_GE_MSG_STACK.ADD;
131: App_Exception.Raise_Exception;
132: END IF;
133: END IF;
144: IF IGS_AD_VAL_TE.admp_val_te_enr_yr(
145: new_references.enrolment_first_yr,
146: new_references.enrolment_latest_yr,
147: v_message_name) = FALSE THEN
148: Fnd_Message.Set_Name('IGS', v_message_name);
149: IGS_GE_MSG_STACK.ADD;
150: App_Exception.Raise_Exception;
151: END IF;
152: END IF;
160: IF IGS_AD_VAL_TE.admp_val_te_inst(
161: new_references.institution_cd,
162: new_references.institution_name,
163: v_message_name) = FALSE THEN
164: Fnd_Message.Set_Name('IGS', v_message_name);
165: IGS_GE_MSG_STACK.ADD;
166: App_Exception.Raise_Exception;
167: END IF;
168: END IF;
224: END IF;
225:
226: IF upper(Column_Name) = 'SEQUENCE_NUMBER' OR Column_Name IS NULL THEN
227: IF new_references.sequence_number < 1 OR new_references.sequence_number > 999999 THEN
228: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
229: IGS_GE_MSG_STACK.ADD;
230: App_Exception.Raise_Exception;
231: END IF;
232: END IF;
231: END IF;
232: END IF;
233: IF upper(Column_Name) = 'ENROLMENT_FIRST_YR' OR Column_Name IS NULL THEN
234: IF new_references.enrolment_first_yr < 1900 OR new_references.enrolment_first_yr > 2050 THEN
235: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: END IF;
239: END IF;
238: END IF;
239: END IF;
240: IF upper(Column_Name) = 'ENROLMENT_LATEST_YR' OR Column_Name IS NULL THEN
241: IF new_references.enrolment_latest_yr < 1900 OR new_references.enrolment_latest_yr > 2050 THEN
242: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
243: IGS_GE_MSG_STACK.ADD;
244: App_Exception.Raise_Exception;
245: END IF;
246: END IF;
245: END IF;
246: END IF;
247: IF upper(Column_Name) = 'EXCLUSION_IND' OR Column_Name IS NULL THEN
248: IF new_references.exclusion_ind NOT IN ('Y','N') THEN
249: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
250: IGS_GE_MSG_STACK.ADD;
251: App_Exception.Raise_Exception;
252: END IF;
253: END IF;
252: END IF;
253: END IF;
254: IF upper(Column_Name) = 'COUNTRY_CD' OR Column_Name IS NULL THEN
255: IF new_references.country_cd <> UPPER(new_references.country_cd) THEN
256: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
257: IGS_GE_MSG_STACK.ADD;
258: App_Exception.Raise_Exception;
259: END IF;
260: END IF;
259: END IF;
260: END IF;
261: IF upper(Column_Name) = 'COURSE_CD' OR Column_Name IS NULL THEN
262: IF new_references.course_cd <> UPPER(new_references.course_cd) THEN
263: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
264: IGS_GE_MSG_STACK.ADD;
265: App_Exception.Raise_Exception;
266: END IF;
267: END IF;
266: END IF;
267: END IF;
268: IF upper(Column_Name) = 'COURSE_TITLE' OR Column_Name IS NULL THEN
269: IF new_references.course_title <> UPPER(new_references.course_title) THEN
270: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
271: IGS_GE_MSG_STACK.ADD;
272: App_Exception.Raise_Exception;
273: END IF;
274: END IF;
273: END IF;
274: END IF;
275: IF upper(Column_Name) = 'FIELD_OF_STUDY' OR Column_Name IS NULL THEN
276: IF new_references.field_of_study <> UPPER(new_references.field_of_study) THEN
277: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
278: IGS_GE_MSG_STACK.ADD;
279: App_Exception.Raise_Exception;
280: END IF;
281: END IF;
280: END IF;
281: END IF;
282: IF upper(Column_Name) = 'HONOURS_LEVEL' OR Column_Name IS NULL THEN
283: IF new_references.honours_level <> UPPER(new_references.honours_level) THEN
284: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
285: IGS_GE_MSG_STACK.ADD;
286: App_Exception.Raise_Exception;
287: END IF;
288: END IF;
287: END IF;
288: END IF;
289: IF upper(Column_Name) = 'INSTITUTION_NAME' OR Column_Name IS NULL THEN
290: IF new_references.institution_name <> UPPER(new_references.institution_name) THEN
291: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
292: IGS_GE_MSG_STACK.ADD;
293: App_Exception.Raise_Exception;
294: END IF;
295: END IF;
294: END IF;
295: END IF;
296: IF upper(Column_Name) = 'LANGUAGE_COMPONENT' OR Column_Name IS NULL THEN
297: IF new_references.language_component <> UPPER(new_references.language_component) THEN
298: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
299: IGS_GE_MSG_STACK.ADD;
300: App_Exception.Raise_Exception;
301: END IF;
302: END IF;
301: END IF;
302: END IF;
303: IF upper(Column_Name) = 'LANGUAGE_OF_TUITION' OR Column_Name IS NULL THEN
304: IF new_references.language_of_tuition <> UPPER(new_references.language_of_tuition) THEN
305: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
306: IGS_GE_MSG_STACK.ADD;
307: App_Exception.Raise_Exception;
308: END IF;
309: END IF;
308: END IF;
309: END IF;
310: IF upper(Column_Name) = 'LEVEL_OF_ACHIEVEMENT_TYPE' OR Column_Name IS NULL THEN
311: IF new_references.level_of_achievement_type <> UPPER(new_references.level_of_achievement_type) THEN
312: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
313: IGS_GE_MSG_STACK.ADD;
314: App_Exception.Raise_Exception;
315: END IF;
316: END IF;
315: END IF;
316: END IF;
317: IF upper(Column_Name) = 'QUALIFICATION' OR Column_Name IS NULL THEN
318: IF new_references.qualification <> UPPER(new_references.qualification) THEN
319: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
320: IGS_GE_MSG_STACK.ADD;
321: App_Exception.Raise_Exception;
322: END IF;
323: END IF;
322: END IF;
323: END IF;
324: IF upper(Column_Name) = 'STUDENT_ID' OR Column_Name IS NULL THEN
325: IF new_references.student_id <> UPPER(new_references.student_id) THEN
326: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
327: IGS_GE_MSG_STACK.ADD;
328: App_Exception.Raise_Exception;
329: END IF;
330: END IF;
329: END IF;
330: END IF;
331: IF upper(Column_Name) = 'TERTIARY_EDU_LVL_COMP' OR Column_Name IS NULL THEN
332: IF new_references.tertiary_edu_lvl_comp <> UPPER(new_references.tertiary_edu_lvl_comp) THEN
333: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
334: IGS_GE_MSG_STACK.ADD;
335: App_Exception.Raise_Exception;
336: END IF;
337: END IF;
336: END IF;
337: END IF;
338: IF upper(Column_Name) = 'TERTIARY_EDU_LVL_QUAL' OR Column_Name IS NULL THEN
339: IF new_references.tertiary_edu_lvl_qual <> UPPER(new_references.tertiary_edu_lvl_qual) THEN
340: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
341: IGS_GE_MSG_STACK.ADD;
342: App_Exception.Raise_Exception;
343: END IF;
344: END IF;
343: END IF;
344: END IF;
345: IF upper(Column_Name) = 'EQUIV_FULL_TIME_YRS_ENR' OR Column_Name IS NULL THEN
346: IF new_references.equiv_full_time_yrs_enr < 0 OR new_references.equiv_full_time_yrs_enr > 99.99 THEN
347: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
348: IGS_GE_MSG_STACK.ADD;
349: App_Exception.Raise_Exception;
350: END IF;
351: END IF;
350: END IF;
351: END IF;
352: IF upper(Column_Name) = 'GRADE_POINT_AVERAGE' OR Column_Name IS NULL THEN
353: IF new_references.grade_point_average < 0 OR new_references.grade_point_average > 999.99 THEN
354: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
355: IGS_GE_MSG_STACK.ADD;
356: App_Exception.Raise_Exception;
357: END IF;
358: END IF;
357: END IF;
358: END IF;
359: IF upper(Column_Name) = 'STATE_CD' OR Column_Name IS NULL THEN
360: IF new_references.state_cd <> UPPER(new_references.state_cd) THEN
361: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
362: IGS_GE_MSG_STACK.ADD;
363: App_Exception.Raise_Exception;
364: END IF;
365: END IF;
375: ELSE
376: IF NOT IGS_PE_COUNTRY_CD_PKG.Get_PK_For_Validation (
377: new_references.country_cd
378: ) THEN
379: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
380: IGS_GE_MSG_STACK.ADD;
381: App_Exception.Raise_Exception;
382: END IF;
383: END IF;
388: ELSE
389: IF NOT IGS_PS_FLD_OF_STUDY_PKG.Get_PK_For_Validation (
390: new_references.field_of_study
391: ) THEN
392: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
393: IGS_GE_MSG_STACK.ADD;
394: App_Exception.Raise_Exception;
395: END IF;
396: END IF;
401: ELSE
402: IF NOT IGS_GR_HONOURS_LEVEL_PKG.Get_PK_For_Validation (
403: new_references.honours_level
404: ) THEN
405: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
406: IGS_GE_MSG_STACK.ADD;
407: App_Exception.Raise_Exception;
408: END IF;
409: END IF;
414: ELSE
415: IF NOT IGS_OR_INSTITUTION_PKG.Get_PK_For_Validation (
416: new_references.institution_cd
417: ) THEN
418: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
419: IGS_GE_MSG_STACK.ADD;
420: App_Exception.Raise_Exception;
421: END IF;
422: END IF;
427: ELSE
428: IF NOT IGS_PE_LANGUAGE_CD_PKG.Get_PK_For_Validation (
429: new_references.language_component
430: ) THEN
431: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
432: IGS_GE_MSG_STACK.ADD;
433: App_Exception.Raise_Exception;
434: END IF;
435: END IF;
440: ELSE
441: IF NOT IGS_PE_LANGUAGE_CD_PKG.Get_PK_For_Validation (
442: new_references.language_of_tuition
443: ) THEN
444: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
445: IGS_GE_MSG_STACK.ADD;
446: App_Exception.Raise_Exception;
447: END IF;
448: END IF;
453: ELSE
454: IF NOT IGS_PE_PERSON_PKG.Get_PK_For_Validation (
455: new_references.person_id
456: ) THEN
457: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
458: IGS_GE_MSG_STACK.ADD;
459: App_Exception.Raise_Exception;
460: END IF;
461: END IF;
467: IF NOT IGS_AD_TER_ED_LV_COM_PKG.Get_PK_For_Validation (
468: new_references.tertiary_edu_lvl_comp,
469: 'N'
470: ) THEN
471: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
472: IGS_GE_MSG_STACK.ADD;
473: App_Exception.Raise_Exception;
474: END IF;
475: END IF;
481: IF NOT IGS_AD_TER_ED_LVL_QF_PKG.Get_PK_For_Validation (
482: new_references.tertiary_edu_lvl_qual,
483: 'N'
484: ) THEN
485: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
486: IGS_GE_MSG_STACK.ADD;
487: App_Exception.Raise_Exception;
488: END IF;
489: END IF;
544: Open cur_rowid;
545: Fetch cur_rowid INTO lv_rowid;
546: IF (cur_rowid%FOUND) THEN
547: Close cur_rowid;
548: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_CNC_FK');
549: IGS_GE_MSG_STACK.ADD;
550: App_Exception.Raise_Exception;
551: Return;
552: END IF;
571: Open cur_rowid;
572: Fetch cur_rowid INTO lv_rowid;
573: IF (cur_rowid%FOUND) THEN
574: Close cur_rowid;
575: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_HL_FK');
576: IGS_GE_MSG_STACK.ADD;
577: App_Exception.Raise_Exception;
578: Return;
579: END IF;
597: Open cur_rowid;
598: Fetch cur_rowid INTO lv_rowid;
599: IF (cur_rowid%FOUND) THEN
600: Close cur_rowid;
601: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_INS_FK');
602: IGS_GE_MSG_STACK.ADD;
603: App_Exception.Raise_Exception;
604: Return;
605: END IF;
624: Open cur_rowid;
625: Fetch cur_rowid INTO lv_rowid;
626: IF (cur_rowid%FOUND) THEN
627: Close cur_rowid;
628: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_LC_COMPONENT_FK');
629: IGS_GE_MSG_STACK.ADD;
630: App_Exception.Raise_Exception;
631: Return;
632: END IF;
651: Open cur_rowid;
652: Fetch cur_rowid INTO lv_rowid;
653: IF (cur_rowid%FOUND) THEN
654: Close cur_rowid;
655: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_PE_FK');
656: IGS_GE_MSG_STACK.ADD;
657: App_Exception.Raise_Exception;
658: Return;
659: END IF;
677: Open cur_rowid;
678: Fetch cur_rowid INTO lv_rowid;
679: IF (cur_rowid%FOUND) THEN
680: Close cur_rowid;
681: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_TELOC_FK');
682: IGS_GE_MSG_STACK.ADD;
683: App_Exception.Raise_Exception;
684: Return;
685: END IF;
703: Open cur_rowid;
704: Fetch cur_rowid INTO lv_rowid;
705: IF (cur_rowid%FOUND) THEN
706: Close cur_rowid;
707: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TE_TELOQ_FK');
708: IGS_GE_MSG_STACK.ADD;
709: App_Exception.Raise_Exception;
710: Return;
711: END IF;
785: IF Get_PK_For_Validation (
786: new_references.person_id,
787: new_references.sequence_number
788: ) THEN
789: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
790: IGS_GE_MSG_STACK.ADD;
791: App_Exception.Raise_Exception;
792: END IF;
793: Check_Constraints;
803: IF Get_PK_For_Validation (
804: new_references.person_id,
805: new_references.sequence_number
806: ) THEN
807: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
808: IGS_GE_MSG_STACK.ADD;
809: App_Exception.Raise_Exception;
810: END IF;
811: Check_Constraints;
888: X_PROGRAM_UPDATE_DATE := SYSDATE;
889: end if;
890: else
891:
892: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
893:
894: IGS_GE_MSG_STACK.ADD;
895:
896: app_exception.raise_exception;
1066: open c1;
1067: fetch c1 into tlinfo;
1068: if (c1%notfound) then
1069: close c1;
1070: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
1071: IGS_GE_MSG_STACK.ADD;
1072: app_exception.raise_exception;
1073: return;
1074: end if;
1135: AND (X_NOTES is null)))
1136: ) then
1137: null;
1138: else
1139: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1140: IGS_GE_MSG_STACK.ADD;
1141: app_exception.raise_exception;
1142: end if;
1143: return;
1191: if X_LAST_UPDATE_LOGIN is NULL then
1192: X_LAST_UPDATE_LOGIN := -1;
1193: end if;
1194: else
1195: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
1196: IGS_GE_MSG_STACK.ADD;
1197: app_exception.raise_exception;
1198: end if;
1199: Before_DML (