35: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
36: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
37: IGS_GE_MSG_STACK.ADD;
38: Close cur_old_ref_values;
39: App_Exception.Raise_Exception;
40: Return;
41: END IF;
42: Close cur_old_ref_values;
43:
88: v_version_number,
89: v_message_name) = FALSE THEN
90: Fnd_Message.Set_Name('IGS', v_message_name);
91: IGS_GE_MSG_STACK.ADD;
92: App_Exception.Raise_Exception;
93: END IF;
94:
95:
96: END BeforeRowInsertUpdateDelete1;
114: column_name is null Then
115: IF new_references.course_cd <> UPPER(new_references.course_cd ) Then
116: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
117: IGS_GE_MSG_STACK.ADD;
118: App_Exception.Raise_Exception;
119: END IF;
120: END IF;
121:
122: IF upper(column_name) = 'EXIT_COURSE_CD' OR
124: IF new_references.exit_course_cd <>
125: UPPER(new_references.exit_course_cd ) Then
126: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
127: IGS_GE_MSG_STACK.ADD;
128: App_Exception.Raise_Exception;
129: END IF;
130: END IF;
131: END Check_Constraints;
132:
141: new_references.exit_course_cd
142: ) THEN
143: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
144: IGS_GE_MSG_STACK.ADD;
145: App_Exception.Raise_Exception;
146: END IF;
147: END IF;
148:
149: IF (((old_references.course_cd = new_references.course_cd) AND
156: new_references.course_cd,
157: new_references.version_number)) THEN
158: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
159: IGS_GE_MSG_STACK.ADD;
160: App_Exception.Raise_Exception;
161: END IF;
162:
163: END IF;
164:
223: IF (cur_rowid%FOUND) THEN
224: Fnd_Message.Set_Name ('IGS', 'IGS_PE_AE_CRS_FK');
225: IGS_GE_MSG_STACK.ADD;
226: Close cur_rowid;
227: App_Exception.Raise_Exception;
228: Return;
229: END IF;
230: Close cur_rowid;
231:
251: IF (cur_rowid%FOUND) THEN
252: Fnd_Message.Set_Name ('IGS', 'IGS_PE_AE_CRV_FK');
253: IGS_GE_MSG_STACK.ADD;
254: Close cur_rowid;
255: App_Exception.Raise_Exception;
256: Return;
257: END IF;
258: Close cur_rowid;
259:
297: NEW_REFERENCES.exit_course_cd
298: ) THEN
299: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
300: IGS_GE_MSG_STACK.ADD;
301: App_Exception.Raise_Exception;
302: END IF;
303:
304: Check_Constraints; -- if procedure present
305: Check_Parent_Existance; -- if procedure present
320: NEW_REFERENCES.exit_course_cd
321: ) THEN
322: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
323: IGS_GE_MSG_STACK.ADD;
324: App_Exception.Raise_Exception;
325: END IF;
326:
327: Check_Constraints; -- if procedure present
328: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
388: end if;
389: else
390: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
391: IGS_GE_MSG_STACK.ADD;
392: app_exception.raise_exception;
393: end if;
394: Before_DML(
395: p_action=>'INSERT',
396: x_rowid=>X_ROWID,
460: if (c1%notfound) then
461: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
462:
463: close c1;
464: App_Exception.Raise_Exception;
465: return;
466: end if;
467: close c1;
468:
472: ) then
473: null;
474: else
475: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
476: app_exception.raise_exception;
477: end if;
478: return;
479: end LOCK_ROW;
480:
505: end if;
506: else
507: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
508: IGS_GE_MSG_STACK.ADD;
509: app_exception.raise_exception;
510: end if;
511: Before_DML(
512: p_action=>'UPDATE',
513: x_rowid=>X_ROWID,