[Home] [Help]
54: Open cur_old_ref_values;
55: Fetch cur_old_ref_values INTO old_references;
56: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
57: Close cur_old_ref_values;
58: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
59: IGS_GE_MSG_STACK.ADD;
60: App_Exception.Raise_Exception;
61: Return;
62: END IF;
114: IF NOT IGS_GR_GRADUAND_PKG.Get_PK_For_Validation (
115: new_references.person_id,
116: new_references.create_dt
117: ) THEN
118: FND_MESSAGE.SET_NAME ('FND', 'FORM_RECORD_DELETED');
119: APP_EXCEPTION.RAISE_EXCEPTION;
120: END IF;
121: END IF;
122:
134: new_references.award_crs_version_number,
135: new_references.award_cd,
136: new_references.hist_start_dt
137: ) THEN
138: FND_MESSAGE.SET_NAME('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
139: APP_EXCEPTION.RAISE_EXCEPTION;
140: END IF;
141: END Check_Uniqueness;
142:
208: END IF ;
209:
210: IF upper(Column_name) = 'GRD_CI_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
211: IF new_references.GRD_CI_SEQUENCE_NUMBER < 0 OR new_references.GRD_CI_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;
216: END IF;
217:
218: IF upper(Column_name) = 'ORDER_IN_PRESENTATION' OR COLUMN_NAME IS NULL THEN
219: IF new_references.ORDER_IN_PRESENTATION < 0 OR new_references.ORDER_IN_PRESENTATION > 9999 THEN
220: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
221: IGS_GE_MSG_STACK.ADD;
222: App_Exception.Raise_Exception ;
223: END IF;
224: END IF;
224: END IF;
225:
226: IF upper(Column_name) = 'CEREMONY_NUMBER' OR COLUMN_NAME IS NULL THEN
227: IF new_references.CEREMONY_NUMBER < 0 OR new_references.CEREMONY_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;
232: END IF;
233:
234: IF upper(Column_name) = 'GUEST_TICKETS_ALLOCATED' OR COLUMN_NAME IS NULL THEN
235: IF new_references.GUEST_TICKETS_ALLOCATED < 0 OR new_references.GUEST_TICKETS_ALLOCATED > 999 THEN
236: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception ;
239: END IF;
240: END IF;
240: END IF;
241:
242: IF upper(Column_name) = 'GUEST_TICKETS_REQUESTED' OR COLUMN_NAME IS NULL THEN
243: IF new_references.GUEST_TICKETS_REQUESTED < 0 OR new_references.GUEST_TICKETS_REQUESTED > 999 THEN
244: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
245: IGS_GE_MSG_STACK.ADD;
246: App_Exception.Raise_Exception ;
247: END IF;
248: END IF;
248: END IF;
249:
250: IF upper(Column_name) = 'FEES_PAID_IND' OR COLUMN_NAME IS NULL THEN
251: IF new_references.FEES_PAID_IND not in ('Y','N') then
252: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
253: IGS_GE_MSG_STACK.ADD;
254: App_Exception.Raise_Exception ;
255: END IF;
256: END IF ;
256: END IF ;
257:
258: IF upper(Column_name) = 'ACADEMIC_DRESS_RQRD_IND' OR COLUMN_NAME IS NULL THEN
259: IF new_references.ACADEMIC_DRESS_RQRD_IND not in ('Y','N') then
260: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
261: IGS_GE_MSG_STACK.ADD;
262: App_Exception.Raise_Exception ;
263: END IF;
264: END IF ;
264: END IF ;
265:
266: IF upper(Column_name) = 'ACADEMIC_GOWN_SIZE' OR COLUMN_NAME IS NULL THEN
267: IF new_references.ACADEMIC_GOWN_SIZE<> upper(NEW_REFERENCES.ACADEMIC_GOWN_SIZE) then
268: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
269: IGS_GE_MSG_STACK.ADD;
270: App_Exception.Raise_Exception ;
271: END IF;
272:
273: END IF ;
274:
275: IF upper(Column_name) = 'ACADEMIC_HAT_SIZE' OR COLUMN_NAME IS NULL THEN
276: IF new_references.ACADEMIC_HAT_SIZE<> upper(NEW_REFERENCES.ACADEMIC_HAT_SIZE) 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:
282: END IF ;
283:
284: IF upper(Column_name) = 'AWARD_CD' OR COLUMN_NAME IS NULL THEN
285: IF new_references.AWARD_CD<> upper(NEW_REFERENCES.AWARD_CD) then
286: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
287: IGS_GE_MSG_STACK.ADD;
288: App_Exception.Raise_Exception ;
289: END IF;
290:
291: END IF ;
292:
293: IF upper(Column_name) = 'AWARD_COURSE_CD' OR COLUMN_NAME IS NULL THEN
294: IF new_references.AWARD_COURSE_CD<> upper(NEW_REFERENCES.AWARD_COURSE_CD) then
295: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
296: IGS_GE_MSG_STACK.ADD;
297: App_Exception.Raise_Exception ;
298: END IF;
299:
300: END IF ;
301:
302: IF upper(Column_name) = 'GRADUAND_SEAT_NUMBER' OR COLUMN_NAME IS NULL THEN
303: IF new_references.GRADUAND_SEAT_NUMBER<> upper(NEW_REFERENCES.GRADUAND_SEAT_NUMBER) then
304: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
305: IGS_GE_MSG_STACK.ADD;
306: App_Exception.Raise_Exception ;
307: END IF;
308:
309: END IF ;
310:
311: IF upper(Column_name) = 'GRD_CAL_TYPE' OR COLUMN_NAME IS NULL THEN
312: IF new_references.GRD_CAL_TYPE<> upper(NEW_REFERENCES.GRD_CAL_TYPE) then
313: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
314: IGS_GE_MSG_STACK.ADD;
315: App_Exception.Raise_Exception ;
316: END IF;
317:
318: END IF ;
319:
320: IF upper(Column_name) = 'GUEST_SEATS' OR COLUMN_NAME IS NULL THEN
321: IF new_references.GUEST_SEATS<> upper(NEW_REFERENCES.GUEST_SEATS) then
322: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
323: IGS_GE_MSG_STACK.ADD;
324: App_Exception.Raise_Exception ;
325: END IF;
326:
327: END IF ;
328:
329: IF upper(Column_name) = 'HIST_WHO' OR COLUMN_NAME IS NULL THEN
330: IF new_references.HIST_WHO<> upper(NEW_REFERENCES.HIST_WHO) then
331: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
332: IGS_GE_MSG_STACK.ADD;
333: App_Exception.Raise_Exception ;
334: END IF;
335:
336: END IF ;
337:
338: IF upper(Column_name) = 'NAME_ANNOUNCED' OR COLUMN_NAME IS NULL THEN
339: IF new_references.NAME_ANNOUNCED<> upper(NEW_REFERENCES.NAME_ANNOUNCED) 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:
345: END IF ;
346:
347: IF upper(Column_name) = 'NAME_PRONUNCIATION' OR COLUMN_NAME IS NULL THEN
348: IF new_references.NAME_PRONUNCIATION<> upper(NEW_REFERENCES.NAME_PRONUNCIATION) then
349: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
350: IGS_GE_MSG_STACK.ADD;
351: App_Exception.Raise_Exception ;
352: END IF;
353:
354: END IF ;
355:
356: IF upper(Column_name) = 'SPECIAL_REQUIREMENTS' OR COLUMN_NAME IS NULL THEN
357: IF new_references.SPECIAL_REQUIREMENTS<> upper(NEW_REFERENCES.SPECIAL_REQUIREMENTS) then
358: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
359: IGS_GE_MSG_STACK.ADD;
360: App_Exception.Raise_Exception ;
361: END IF;
362:
449: Open cur_rowid;
450: Fetch cur_rowid INTO lv_rowid;
451: IF (cur_rowid%FOUND) THEN
452: Close cur_rowid;
453: Fnd_Message.Set_Name ('IGS', 'IGS_GR_GACH_GR_FK');
454: IGS_GE_MSG_STACK.ADD;
455: App_Exception.Raise_Exception;
456: Return;
457: END IF;
535: IF (p_action = 'INSERT') THEN
536: -- Call all the procedures related to Before Insert.
537: IF Get_PK_For_Validation (
538: NEW_REFERENCES.gach_id) THEN
539: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
540: IGS_GE_MSG_STACK.ADD;
541: App_Exception.Raise_Exception;
542: END IF;
543: Check_Uniqueness;
549: Check_Constraints;
550: Check_Parent_Existance;
551: ELSIF (p_action = 'VALIDATE_INSERT') THEN
552: IF GET_PK_FOR_VALIDATION(NEW_REFERENCES.GACH_ID) THEN
553: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
554: IGS_GE_MSG_STACK.ADD;
555: App_Exception.Raise_Exception;
556: END IF;
557: check_uniqueness;
615: if X_LAST_UPDATE_LOGIN is NULL then
616: X_LAST_UPDATE_LOGIN := -1;
617: end if;
618: else
619: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
620: IGS_GE_MSG_STACK.ADD;
621: app_exception.raise_exception;
622: end if;
623:
796: open c1;
797: fetch c1 into tlinfo;
798: if (c1%notfound) then
799: close c1;
800: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
801: app_exception.raise_exception;
802: return;
803: end if;
804: close c1;
862: AND (tlinfo.HIST_START_DT = X_HIST_START_DT)
863: ) then
864: null;
865: else
866: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
867: app_exception.raise_exception;
868: end if;
869: return;
870: end LOCK_ROW;
916: if X_LAST_UPDATE_LOGIN is NULL then
917: X_LAST_UPDATE_LOGIN := -1;
918: end if;
919: else
920: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
921: IGS_GE_MSG_STACK.ADD;
922: app_exception.raise_exception;
923: end if;
924: