[Home] [Help]
40: Open cur_old_ref_values;
41: Fetch cur_old_ref_values INTO old_references;
42: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
43: Close cur_old_ref_values;
44: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
45: IGS_GE_MSG_STACK.ADD;
46: App_Exception.Raise_Exception;
47: Return;
48: END IF;
91: new_references.s_admission_process_type,
92: new_references.adm_cal_type,
93: new_references.adm_ci_sequence_number,
94: v_message_name) = FALSE THEN
95: Fnd_Message.Set_Name('IGS',v_message_name);
96: IGS_GE_MSG_STACK.ADD;
97: App_Exception.Raise_Exception;
98: END IF;
99: END IF;
110: new_references.adm_ci_sequence_number,
111: new_references.admission_cat,
112: new_references.s_admission_process_type,
113: v_message_name) = FALSE THEN
114: Fnd_Message.Set_Name('IGS',v_message_name);
115: IGS_GE_MSG_STACK.ADD;
116: App_Exception.Raise_Exception;
117: END IF;
118: END IF;
143: new_references.location_cd,
144: new_references.attendance_mode,
145: new_references.attendance_type,
146: v_message_name) = FALSE THEN
147: Fnd_Message.Set_Name('IGS',v_message_name);
148: IGS_GE_MSG_STACK.ADD;
149: App_Exception.Raise_Exception;
150: END IF;
151: END IF;
188: IF upper(column_name) = 'ADM_CI_SEQUENCE_NUMBER' OR
189: column_name is null Then
190: IF new_references.adm_ci_sequence_number < 1 OR
191: new_references.adm_ci_sequence_number > 999999 Then
192: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
193: IGS_GE_MSG_STACK.ADD;
194: App_Exception.Raise_Exception;
195: END IF;
196: END IF;
198: IF upper(column_name) = 'VERSION_NUMBER' OR
199: column_name is null Then
200: IF new_references.version_number < 1 OR
201: new_references.version_number > 999 Then
202: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
203: IGS_GE_MSG_STACK.ADD;
204: App_Exception.Raise_Exception;
205: END IF;
206: END IF;
208: IF upper(column_name) = 'SEQUENCE_NUMBER' OR
209: column_name is null Then
210: IF new_references.sequence_number < 1 OR
211: new_references.sequence_number > 999999 Then
212: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
213: IGS_GE_MSG_STACK.ADD;
214: App_Exception.Raise_Exception;
215: END IF;
216: END IF;
217:
218: IF upper(column_name) = 'ROLLOVER_INCLUSION_IND' OR
219: column_name is null Then
220: IF new_references.rollover_inclusion_ind NOT IN ( 'Y','N' ) Then
221: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
222: IGS_GE_MSG_STACK.ADD;
223: App_Exception.Raise_Exception;
224: END IF;
225: END IF;
227: IF upper(column_name) = 'ADM_CAL_TYPE' OR
228: column_name is null Then
229: IF new_references.adm_cal_type <>
230: UPPER(new_references.adm_cal_type) Then
231: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
232: IGS_GE_MSG_STACK.ADD;
233: App_Exception.Raise_Exception;
234: END IF;
235: END IF;
237: IF upper(column_name) = 'ADMISSION_CAT' OR
238: column_name is null Then
239: IF new_references.admission_cat <>
240: UPPER(new_references.admission_cat) Then
241: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
242: IGS_GE_MSG_STACK.ADD;
243: App_Exception.Raise_Exception;
244: END IF;
245: END IF;
247: IF upper(column_name) = 'S_ADMISSION_PROCESS_TYPE' OR
248: column_name is null Then
249: IF new_references.s_admission_process_type <>
250: UPPER(new_references.s_admission_process_type) Then
251: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
252: IGS_GE_MSG_STACK.ADD;
253: App_Exception.Raise_Exception;
254: END IF;
255: END IF;
257: IF upper(column_name) = 'COURSE_CD' OR
258: column_name is null Then
259: IF new_references.course_cd <>
260: UPPER(new_references.course_cd) Then
261: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
262: IGS_GE_MSG_STACK.ADD;
263: App_Exception.Raise_Exception;
264: END IF;
265: END IF;
267: IF upper(column_name) = 'ACAD_CAL_TYPE' OR
268: column_name is null Then
269: IF new_references.acad_cal_type <>
270: UPPER(new_references.acad_cal_type) Then
271: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
272: IGS_GE_MSG_STACK.ADD;
273: App_Exception.Raise_Exception;
274: END IF;
275: END IF;
277: IF upper(column_name) = 'LOCATION_CD' OR
278: column_name is null Then
279: IF new_references.location_cd <>
280: UPPER(new_references.location_cd) Then
281: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
282: IGS_GE_MSG_STACK.ADD;
283: App_Exception.Raise_Exception;
284: END IF;
285: END IF;
287: IF upper(column_name) = 'ATTENDANCE_MODE' OR
288: column_name is null Then
289: IF new_references.attendance_mode <>
290: UPPER(new_references.attendance_mode) 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;
297: IF upper(column_name) = 'ATTENDANCE_TYPE' OR
298: column_name is null Then
299: IF new_references.attendance_type <>
300: UPPER(new_references.attendance_type) Then
301: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
302: IGS_GE_MSG_STACK.ADD;
303: App_Exception.Raise_Exception;
304: END IF;
305: END IF;
314: ELSE
315: IF NOT IGS_EN_ATD_MODE_PKG.Get_PK_For_Validation (
316: new_references.attendance_mode
317: ) THEN
318: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
319: IGS_GE_MSG_STACK.ADD;
320: App_Exception.Raise_Exception;
321: END IF;
322: END IF;
337: new_references.admission_cat,
338: new_references.s_admission_process_type ,
339: 'N'
340: ) THEN
341: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
342: IGS_GE_MSG_STACK.ADD;
343: App_Exception.Raise_Exception;
344: END IF;
345: END IF;
350: ELSE
351: IF NOT IGS_EN_ATD_TYPE_PKG.Get_PK_For_Validation (
352: new_references.attendance_type
353: ) THEN
354: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
355: IGS_GE_MSG_STACK.ADD;
356: App_Exception.Raise_Exception;
357: END IF;
358: END IF;
369: new_references.course_cd,
370: new_references.version_number,
371: new_references.acad_cal_type
372: ) THEN
373: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
374: IGS_GE_MSG_STACK.ADD;
375: App_Exception.Raise_Exception;
376: END IF;
377: END IF;
382: ELSE
383: IF NOT IGS_AD_LOCATION_PKG.Get_PK_For_Validation (
384: new_references.location_cd , 'N'
385: ) THEN
386: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
387: IGS_GE_MSG_STACK.ADD;
388: App_Exception.Raise_Exception;
389: END IF;
390: END IF;
447: Open cur_rowid;
448: Fetch cur_rowid INTO lv_rowid;
449: IF (cur_rowid%FOUND) THEN
450: Close cur_rowid;
451: Fnd_Message.Set_Name ('IGS', 'IGS_AD_APCOO_AM_FK');
452: IGS_GE_MSG_STACK.ADD;
453: App_Exception.Raise_Exception;
454: Return;
455: END IF;
479: Open cur_rowid;
480: Fetch cur_rowid INTO lv_rowid;
481: IF (cur_rowid%FOUND) THEN
482: Close cur_rowid;
483: Fnd_Message.Set_Name ('IGS', 'IGS_AD_APCOO_APAPC_FK');
484: IGS_GE_MSG_STACK.ADD;
485: App_Exception.Raise_Exception;
486: Return;
487: END IF;
505: Open cur_rowid;
506: Fetch cur_rowid INTO lv_rowid;
507: IF (cur_rowid%FOUND) THEN
508: Close cur_rowid;
509: Fnd_Message.Set_Name ('IGS', 'IGS_AD_APCOO_ATT_FK');
510: IGS_GE_MSG_STACK.ADD;
511: App_Exception.Raise_Exception;
512: Return;
513: END IF;
535: Open cur_rowid;
536: Fetch cur_rowid INTO lv_rowid;
537: IF (cur_rowid%FOUND) THEN
538: Close cur_rowid;
539: Fnd_Message.Set_Name ('IGS', 'IGS_AD_APCOO_CO_FK');
540: IGS_GE_MSG_STACK.ADD;
541: App_Exception.Raise_Exception;
542: Return;
543: END IF;
561: Open cur_rowid;
562: Fetch cur_rowid INTO lv_rowid;
563: IF (cur_rowid%FOUND) THEN
564: Close cur_rowid;
565: Fnd_Message.Set_Name ('IGS', 'IGS_AD_APCOO_LOC_FK');
566: IGS_GE_MSG_STACK.ADD;
567: App_Exception.Raise_Exception;
568: Return;
569: END IF;
627: new_references.version_number,
628: new_references.acad_cal_type,
629: new_references.sequence_number
630: ) THEN
631: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
632: IGS_GE_MSG_STACK.ADD;
633: App_Exception.Raise_Exception;
634: END IF;
635: Check_Constraints;
650: new_references.version_number,
651: new_references.acad_cal_type,
652: new_references.sequence_number
653: ) THEN
654: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
655: IGS_GE_MSG_STACK.ADD;
656: App_Exception.Raise_Exception;
657: END IF;
658: Check_Constraints;
734: else
735: X_PROGRAM_UPDATE_DATE := SYSDATE;
736: end if;
737: else
738: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
739: IGS_GE_MSG_STACK.ADD;
740: app_exception.raise_exception;
741: end if;
742:
849: open c1;
850: fetch c1 into tlinfo;
851: if (c1%notfound) then
852: close c1;
853: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
854: IGS_GE_MSG_STACK.ADD;
855: app_exception.raise_exception;
856: return;
857: end if;
869: AND (tlinfo.ROLLOVER_INCLUSION_IND = X_ROLLOVER_INCLUSION_IND)
870: ) then
871: null;
872: else
873: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
874: IGS_GE_MSG_STACK.ADD;
875: app_exception.raise_exception;
876: end if;
877: return;
914: if X_LAST_UPDATE_LOGIN is NULL then
915: X_LAST_UPDATE_LOGIN := -1;
916: end if;
917: else
918: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
919: IGS_GE_MSG_STACK.ADD;
920: app_exception.raise_exception;
921: end if;
922: