[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;
87: -- Validate Result Type
88: IF IGS_AD_VAL_OSES.admp_val_teua_sret(
89: new_references.result_type,
90: v_message_name) = FALSE THEN
91: Fnd_Message.Set_Name('IGS', v_message_name);
92: IGS_GE_MSG_STACK.ADD;
93: App_Exception.Raise_Exception;
94: END IF;
95: END IF;
127: END IF;
128:
129: IF upper(Column_Name) = 'TE_SEQUENCE_NUMBER' OR Column_Name IS NULL THEN
130: IF new_references.te_sequence_number < 1 OR new_references.te_sequence_number > 999999 THEN
131: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
132: IGS_GE_MSG_STACK.ADD;
133: App_Exception.Raise_Exception;
134: END IF;
135: END IF;
134: END IF;
135: END IF;
136: IF upper(Column_Name) = 'SEQUENCE_NUMBER' OR Column_Name IS NULL THEN
137: IF new_references.sequence_number < 1 OR new_references.sequence_number > 999999 THEN
138: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
139: IGS_GE_MSG_STACK.ADD;
140: App_Exception.Raise_Exception;
141: END IF;
142: END IF;
141: END IF;
142: END IF;
143: IF upper(Column_Name) = 'CREDIT_POINTS' OR Column_Name IS NULL THEN
144: IF new_references.credit_points < 0 OR new_references.credit_points > 999.999 THEN
145: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
146: IGS_GE_MSG_STACK.ADD;
147: App_Exception.Raise_Exception;
148: END IF;
149: END IF;
148: END IF;
149: END IF;
150: IF upper(Column_Name) = 'ENROLLED_YR' OR Column_Name IS NULL THEN
151: IF new_references.enrolled_yr < 1900 OR new_references.enrolled_yr > 2050 THEN
152: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
153: IGS_GE_MSG_STACK.ADD;
154: App_Exception.Raise_Exception;
155: END IF;
156: END IF;
155: END IF;
156: END IF;
157: IF upper(Column_Name) = 'DISCIPLINE_GROUP_CD' OR Column_Name IS NULL THEN
158: IF new_references.discipline_group_cd <> UPPER(new_references.discipline_group_cd) THEN
159: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
160: IGS_GE_MSG_STACK.ADD;
161: App_Exception.Raise_Exception;
162: END IF;
163: END IF;
162: END IF;
163: END IF;
164: IF upper(Column_Name) = 'UNIT_CD' OR Column_Name IS NULL THEN
165: IF new_references.unit_cd <> UPPER(new_references.unit_cd) THEN
166: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
167: IGS_GE_MSG_STACK.ADD;
168: App_Exception.Raise_Exception;
169: END IF;
170: END IF;
169: END IF;
170: END IF;
171: IF upper(Column_Name) = 'GRADE' OR Column_Name IS NULL THEN
172: IF new_references.grade <> UPPER(new_references.grade) THEN
173: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
174: IGS_GE_MSG_STACK.ADD;
175: App_Exception.Raise_Exception;
176: END IF;
177: END IF;
176: END IF;
177: END IF;
178: IF upper(Column_Name) = 'TITLE' OR Column_Name IS NULL THEN
179: IF new_references.title <> UPPER(new_references.title) THEN
180: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
181: IGS_GE_MSG_STACK.ADD;
182: App_Exception.Raise_Exception;
183: END IF;
184: END IF;
183: END IF;
184: END IF;
185: IF upper(Column_Name) = 'RESULT_TYPE' OR Column_Name IS NULL THEN
186: IF new_references.result_type <> UPPER(new_references.result_type) 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;
201: ELSE
202: IF NOT IGS_PS_DSCP_PKG.Get_PK_For_Validation (
203: new_references.discipline_group_cd
204: ) THEN
205: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
206: IGS_GE_MSG_STACK.ADD;
207: App_Exception.Raise_Exception;
208: END IF;
209: END IF;
217: IF NOT IGS_AD_TER_EDU_PKG.Get_PK_For_Validation (
218: new_references.person_id,
219: new_references.te_sequence_number
220: ) THEN
221: Fnd_Message.Set_Name('FND','FORM_RECORD_DELETED');
222: IGS_GE_MSG_STACK.ADD;
223: App_Exception.Raise_Exception;
224: END IF;
225: END IF;
274: Open cur_rowid;
275: Fetch cur_rowid INTO lv_rowid;
276: IF (cur_rowid%FOUND) THEN
277: Close cur_rowid;
278: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TEUA_DI_FK');
279: IGS_GE_MSG_STACK.ADD;
280: App_Exception.Raise_Exception;
281: Return;
282: END IF;
302: Open cur_rowid;
303: Fetch cur_rowid INTO lv_rowid;
304: IF (cur_rowid%FOUND) THEN
305: Close cur_rowid;
306: Fnd_Message.Set_Name ('IGS', 'IGS_AD_TEUA_TE_FK');
307: IGS_GE_MSG_STACK.ADD;
308: App_Exception.Raise_Exception;
309: Return;
310: END IF;
361: new_references.te_sequence_number,
362: new_references.unit_cd,
363: new_references.sequence_number
364: ) THEN
365: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
366: IGS_GE_MSG_STACK.ADD;
367: App_Exception.Raise_Exception;
368: END IF;
369: Check_Constraints;
382: new_references.te_sequence_number,
383: new_references.unit_cd,
384: new_references.sequence_number
385: ) THEN
386: Fnd_Message.Set_Name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
387: IGS_GE_MSG_STACK.ADD;
388: App_Exception.Raise_Exception;
389: END IF;
390: Check_Constraints;
440: if X_LAST_UPDATE_LOGIN is NULL then
441: X_LAST_UPDATE_LOGIN := -1;
442: end if;
443: else
444: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
445: IGS_GE_MSG_STACK.ADD;
446: app_exception.raise_exception;
447: end if;
448: Before_DML (
541: open c1;
542: fetch c1 into tlinfo;
543: if (c1%notfound) then
544: close c1;
545: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
546: IGS_GE_MSG_STACK.ADD;
547: app_exception.raise_exception;
548: return;
549: end if;
565: AND (X_DISCIPLINE_GROUP_CD is null)))
566: ) then
567: null;
568: else
569: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
570: IGS_GE_MSG_STACK.ADD;
571: app_exception.raise_exception;
572: end if;
573: return;
604: if X_LAST_UPDATE_LOGIN is NULL then
605: X_LAST_UPDATE_LOGIN := -1;
606: end if;
607: else
608: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
609: IGS_GE_MSG_STACK.ADD;
610: app_exception.raise_exception;
611: end if;
612: Before_DML (