[Home] [Help]
33: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
34: Close cur_old_ref_values;
35: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
36: IGS_GE_MSG_STACK.ADD;
37: App_Exception.Raise_Exception;
38: Return;
39: END IF;
40: Close cur_old_ref_values;
41:
76: new_references.enrolment_cat,
77: v_message_name) = FALSE THEN
78: fnd_message.set_name('IGS',v_message_name);
79: IGS_GE_MSG_STACK.ADD;
80: app_exception.raise_exception;
81: END IF;
82: END IF;
83: -- Set the Admission Category value.
84: IF p_deleting THEN
91: v_admission_cat,
92: v_message_name) = FALSE THEN
93: fnd_message.set_name('IGS',v_message_name);
94: IGS_GE_MSG_STACK.ADD;
95: app_exception.raise_exception;
96: END IF;
97:
98:
99: END BeforeRowInsertUpdateDelete1;
118: if new_references.dflt_cat_ind NOT IN ('Y','N') OR
119: new_references.dflt_cat_ind <> upper(new_references.dflt_cat_ind) then
120: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
121: IGS_GE_MSG_STACK.ADD;
122: App_Exception.Raise_Exception;
123: end if;
124: end if;
125: IF upper(column_name) = 'ADMISSION_CAT' OR
126: column_name is null then
126: column_name is null then
127: if new_references.admission_cat <> upper(new_references.admission_cat) then
128: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
129: IGS_GE_MSG_STACK.ADD;
130: App_Exception.Raise_Exception;
131: end if;
132: end if;
133: IF upper(column_name) = 'ENROLMENT_CAT' OR
134: column_name is null then
134: column_name is null then
135: if new_references.enrolment_cat <> upper(new_references.enrolment_cat) then
136: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
137: IGS_GE_MSG_STACK.ADD;
138: App_Exception.Raise_Exception;
139: end if;
140: end if;
141: END check_constraints;
142:
152: 'N'
153: )then
154: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
155: IGS_GE_MSG_STACK.ADD;
156: App_Exception.Raise_Exception;
157: end if;
158: END IF;
159:
160: IF (((old_references.enrolment_cat = new_references.enrolment_cat)) OR
165: new_references.enrolment_cat
166: ) then
167: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
168: IGS_GE_MSG_STACK.ADD;
169: App_Exception.Raise_Exception;
170: end if;
171: END IF;
172:
173: END Check_Parent_Existance;
218: IF (cur_rowid%FOUND) THEN
219: Close cur_rowid;
220: Fnd_Message.Set_Name ('IGS', 'IGS_EN_ECM_AC_FK');
221: IGS_GE_MSG_STACK.ADD;
222: App_Exception.Raise_Exception;
223: Return;
224: END IF;
225: Close cur_rowid;
226:
244: IF (cur_rowid%FOUND) THEN
245: Close cur_rowid;
246: Fnd_Message.Set_Name ('IGS', 'IGS_EN_ECM_EC_FK');
247: IGS_GE_MSG_STACK.ADD;
248: App_Exception.Raise_Exception;
249: Return;
250: END IF;
251: Close cur_rowid;
252:
288: ) then
289:
290: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
291: IGS_GE_MSG_STACK.ADD;
292: App_Exception.Raise_Exception;
293: end if;
294: Check_constraints;
295: Check_Parent_Existance;
296: ELSIF (p_action = 'UPDATE') THEN
308: ) then
309:
310: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
311: IGS_GE_MSG_STACK.ADD;
312: App_Exception.Raise_Exception;
313: end if;
314: Check_constraints;
315: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
316: Check_constraints;
369: end if;
370: else
371: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
372: IGS_GE_MSG_STACK.ADD;
373: app_exception.raise_exception;
374: end if;
375: Before_DML (
376: p_action => 'INSERT',
377: x_rowid => X_ROWID,
436: if (c1%notfound) then
437: close c1;
438: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
439: IGS_GE_MSG_STACK.ADD;
440: app_exception.raise_exception;
441: return;
442: end if;
443: close c1;
444:
447: null;
448: else
449: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
450: IGS_GE_MSG_STACK.ADD;
451: app_exception.raise_exception;
452: end if;
453: return;
454: end LOCK_ROW;
455:
479: end if;
480: else
481: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
482: IGS_GE_MSG_STACK.ADD;
483: app_exception.raise_exception;
484: end if;
485: Before_DML (
486: p_action => 'UPDATE',
487: x_rowid => X_ROWID,