[Home] [Help]
38: Open cur_old_ref_values;
39: Fetch cur_old_ref_values INTO old_references;
40: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
41: Close cur_old_ref_values;
42: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
43: IGS_GE_MSG_STACK.ADD;
44: App_Exception.Raise_Exception;
45: Return;
46: END IF;
90: new_references.attendance_type);
91: IF IGS_AD_VAL_ACCT.admp_val_ac_closed(
92: new_references.admission_cat,
93: v_message_name) = FALSE THEN
94: FND_MESSAGE.SET_NAME('IGS',v_message_name);
95: IGS_GE_MSG_STACK.ADD;
96: APP_EXCEPTION.RAISE_EXCEPTION;
97: END IF;
98: IF IGS_AD_VAL_COOAC.admp_val_ac_acct(
99: new_references.admission_cat,
100: new_references.course_cd,
101: new_references.version_number,
102: v_message_name) = FALSE THEN
103: FND_MESSAGE.SET_NAME('IGS',v_message_name);
104: IGS_GE_MSG_STACK.ADD;
105: APP_EXCEPTION.RAISE_EXCEPTION;
106: END IF;
107: END IF;
117: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl (
118: v_course_cd,
119: v_version_number,
120: v_message_name) = FALSE THEN
121: FND_MESSAGE.SET_NAME('IGS',v_message_name);
122: IGS_GE_MSG_STACK.ADD;
123: APP_EXCEPTION.RAISE_EXCEPTION;
124: END IF;
125:
151: END IF;
152: IF upper(column_name) = 'ADMISSION_CAT' OR
153: column_name is null Then
154: IF new_references.admission_cat <> UPPER(new_references.admission_cat) Then
155: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
156: IGS_GE_MSG_STACK.ADD;
157: App_Exception.Raise_Exception;
158: END IF;
159: END IF;
159: END IF;
160: IF upper(column_name) = 'ATTENDANCE_MODE' OR
161: column_name is null Then
162: IF new_references.attendance_mode <> UPPER(new_references.attendance_mode) Then
163: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
164: IGS_GE_MSG_STACK.ADD;
165: App_Exception.Raise_Exception;
166: END IF;
167: END IF;
167: END IF;
168: IF upper(column_name) = 'ATTENDANCE_TYPE' OR
169: column_name is null Then
170: IF new_references.attendance_type <> UPPER(new_references.attendance_type) Then
171: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
172: IGS_GE_MSG_STACK.ADD;
173: App_Exception.Raise_Exception;
174: END IF;
175: END IF;
175: END IF;
176: IF upper(column_name) = 'CAL_TYPE' OR
177: column_name is null Then
178: IF new_references.cal_type <> UPPER(new_references.cal_type) Then
179: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
180: IGS_GE_MSG_STACK.ADD;
181: App_Exception.Raise_Exception;
182: END IF;
183: END IF;
183: END IF;
184: IF upper(column_name) = 'COURSE_CD' OR
185: column_name is null Then
186: IF new_references.course_cd <> UPPER(new_references.course_cd) Then
187: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
188: IGS_GE_MSG_STACK.ADD;
189: App_Exception.Raise_Exception;
190: END IF;
191: END IF;
191: END IF;
192: IF upper(column_name) = 'LOCATION_CD' OR
193: column_name is null Then
194: IF new_references.location_cd <> UPPER(new_references.location_cd) Then
195: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
196: IGS_GE_MSG_STACK.ADD;
197: App_Exception.Raise_Exception;
198: END IF;
199: END IF;
200:
201: IF upper(column_name) = 'SYSTEM_DEFAULT_IND' OR
202: column_name is null Then
203: IF new_references.system_default_ind <> 'Y' AND new_references.system_default_ind <> 'N' Then
204: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
205: IGS_GE_MSG_STACK.ADD;
206: App_Exception.Raise_Exception;
207: END IF;
208: END IF;
218: IF NOT IGS_AD_CAT_PKG.Get_PK_For_Validation (
219: new_references.admission_cat ,
220: 'N'
221: ) THEN
222: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
223: IGS_GE_MSG_STACK.ADD;
224: App_Exception.Raise_Exception;
225: END IF;
226:
247: new_references.location_cd,
248: new_references.attendance_mode,
249: new_references.attendance_type
250: ) THEN
251: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
252: IGS_GE_MSG_STACK.ADD;
253: App_Exception.Raise_Exception;
254: END IF;
255: END IF;
260: ELSE
261: IF NOT IGS_PS_OFR_OPT_PKG.Get_UK_For_Validation (
262: new_references.coo_id
263: ) THEN
264: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
265: IGS_GE_MSG_STACK.ADD;
266: App_Exception.Raise_Exception;
267: END IF;
268: END IF;
338: Open cur_rowid;
339: Fetch cur_rowid INTO lv_rowid;
340: IF (cur_rowid%FOUND) THEN
341: Close cur_rowid;
342: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COOAC_AC_FK');
343: IGS_GE_MSG_STACK.ADD;
344: App_Exception.Raise_Exception;
345: Return;
346: END IF;
374: Open cur_rowid;
375: Fetch cur_rowid INTO lv_rowid;
376: IF (cur_rowid%FOUND) THEN
377: Close cur_rowid;
378: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COOAC_COO_FK');
379: IGS_GE_MSG_STACK.ADD;
380: App_Exception.Raise_Exception;
381: Return;
382: END IF;
400: Open cur_rowid;
401: Fetch cur_rowid INTO lv_rowid;
402: IF (cur_rowid%FOUND) THEN
403: Close cur_rowid;
404: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COOAC_COO_FK');
405: IGS_GE_MSG_STACK.ADD;
406: App_Exception.Raise_Exception;
407: Return;
408: END IF;
460: new_references.attendance_mode,
461: new_references.attendance_type,
462: new_references.admission_cat
463: ) THEN
464: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
465: IGS_GE_MSG_STACK.ADD;
466: App_Exception.Raise_Exception;
467: END IF;
468: Check_Constraints;
485: new_references.attendance_mode,
486: new_references.attendance_type,
487: new_references.admission_cat
488: ) THEN
489: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
490: IGS_GE_MSG_STACK.ADD;
491: App_Exception.Raise_Exception;
492: END IF;
493: Check_Constraints;
547: if X_LAST_UPDATE_LOGIN is NULL then
548: X_LAST_UPDATE_LOGIN := -1;
549: end if;
550: else
551: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
552: IGS_GE_MSG_STACK.ADD;
553: app_exception.raise_exception;
554: end if;
555:
641: open c1;
642: fetch c1 into tlinfo;
643: if (c1%notfound) then
644: close c1;
645: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
646: IGS_GE_MSG_STACK.ADD;
647: app_exception.raise_exception;
648: return;
649: end if;
653: AND (tlinfo.SYSTEM_DEFAULT_IND = X_SYSTEM_DEFAULT_IND)
654: ) then
655: null;
656: else
657: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
658: IGS_GE_MSG_STACK.ADD;
659: app_exception.raise_exception;
660: end if;
661: return;
691: if X_LAST_UPDATE_LOGIN is NULL then
692: X_LAST_UPDATE_LOGIN := -1;
693: end if;
694: else
695: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
696: IGS_GE_MSG_STACK.ADD;
697: app_exception.raise_exception;
698: end if;
699: Before_DML( p_action => 'UPDATE',