[Home] [Help]
38: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
39: Close cur_old_ref_values;
40: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
41: IGS_GE_MSG_STACK.ADD;
42: App_Exception.Raise_Exception;
43: Return;
44: END IF;
45: Close cur_old_ref_values;
46:
79: new_references.version_number,
80: v_message_name) = FALSE THEN
81: Fnd_Message.Set_Name('IGS', v_message_name);
82: IGS_GE_MSG_STACK.ADD;
83: App_Exception.Raise_Exception;
84: END IF;
85: ELSE
86: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
87: old_references.course_cd,
88: old_references.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: END IF;
95: -- Validate the insert/update
96: IF p_inserting OR p_updating THEN
99: new_references.teach_cal_type,
100: v_message_name) = FALSE THEN
101: Fnd_Message.Set_Name('IGS', v_message_name);
102: IGS_GE_MSG_STACK.ADD;
103: App_Exception.Raise_Exception;
104: END IF;
105: END IF;
106:
107: END BeforeRowInsertUpdateDelete1;
125: new_references.teach_cal_type,
126: v_message_name) = FALSE THEN
127: Fnd_Message.Set_Name('IGS', v_message_name);
128: IGS_GE_MSG_STACK.ADD;
129: App_Exception.Raise_Exception;
130: END IF;
131:
132: END AfterRowInsertUpdate2;
133:
160: column_name is null Then
161: IF new_references.cal_type <> UPPER(new_references.cal_type) Then
162: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
163: IGS_GE_MSG_STACK.ADD;
164: App_Exception.Raise_Exception;
165: END IF;
166: END IF;
167:
168: IF upper(column_name) = 'COURSE_CD' OR
169: column_name is null Then
170: IF new_references.course_cd <> UPPER(new_references.course_cd) 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;
176:
177: IF upper(column_name) = 'TEACH_CAL_TYPE' OR
178: column_name is null Then
179: IF new_references.teach_cal_type <> UPPER(new_references.teach_cal_type) 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;
185:
186: IF upper(column_name) = 'POS_SEQUENCE_NUMBER' OR
187: column_name is null Then
188: IF new_references.pos_sequence_number < 0 OR new_references.pos_sequence_number > 999999 Then
189: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
190: IGS_GE_MSG_STACK.ADD;
191: App_Exception.Raise_Exception;
192: END IF;
193: END IF;
194:
195: IF upper(column_name) = 'ACAD_PERIOD_NUM' OR
196: column_name is null Then
197: IF new_references.acad_period_num < 0 OR new_references.acad_period_num > 99 Then
198: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
199: IGS_GE_MSG_STACK.ADD;
200: App_Exception.Raise_Exception;
201: END IF;
202: END IF;
203:
204: IF upper(column_name) = 'SEQUENCE_NUMBER' OR
205: column_name is null Then
206: IF new_references.sequence_number < 0 OR new_references.sequence_number > 999999 Then
207: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
208: IGS_GE_MSG_STACK.ADD;
209: App_Exception.Raise_Exception;
210: END IF;
211: END IF;
212:
213:
215: column_name is null Then
216: IF new_references.version_number < 0 OR new_references.version_number > 999 Then
217: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
218: IGS_GE_MSG_STACK.ADD;
219: App_Exception.Raise_Exception;
220: END IF;
221: END IF;
222:
223:
234: new_references.teach_cal_type
235: ) THEN
236: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: END IF;
240: END IF;
241: IF (((old_references.course_cd = new_references.course_cd) AND
242: (old_references.version_number = new_references.version_number) AND
255: new_references.pos_sequence_number
256: ) THEN
257: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
258: IGS_GE_MSG_STACK.ADD;
259: App_Exception.Raise_Exception;
260: END IF;
261: END IF;
262: END Check_Parent_Existance;
263:
325: IF (cur_rowid%FOUND) THEN
326: Close cur_rowid;
327: Fnd_Message.Set_Name ('IGS', 'IGS_PS_POSP_CAT_FK');
328: IGS_GE_MSG_STACK.ADD;
329: App_Exception.Raise_Exception;
330: Return;
331: END IF;
332: Close cur_rowid;
333:
357: IF (cur_rowid%FOUND) THEN
358: Close cur_rowid;
359: Fnd_Message.Set_Name ('IGS', 'IGS_PS_POSP_POS_FK');
360: IGS_GE_MSG_STACK.ADD;
361: App_Exception.Raise_Exception;
362: Return;
363: END IF;
364: Close cur_rowid;
365:
412: new_references.sequence_number
413: ) THEN
414: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
415: IGS_GE_MSG_STACK.ADD;
416: App_Exception.Raise_Exception;
417: END IF;
418: Check_Constraints;
419: Check_Parent_Existance;
420: ELSIF (p_action = 'UPDATE') THEN
435: new_references.sequence_number
436: ) THEN
437: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
438: IGS_GE_MSG_STACK.ADD;
439: App_Exception.Raise_Exception;
440: END IF;
441: Check_Constraints;
442: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
443: Check_Constraints;
502: end if;
503: else
504: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
505: IGS_GE_MSG_STACK.ADD;
506: app_exception.raise_exception;
507: end if;
508: Before_DML( p_action => 'INSERT',
509: x_rowid => X_ROWID,
510: x_course_cd => X_COURSE_CD,
592: if (c1%notfound) then
593: close c1;
594: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
595: IGS_GE_MSG_STACK.ADD;
596: app_exception.raise_exception;
597: return;
598: end if;
599: close c1;
600:
607: null;
608: else
609: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
610: IGS_GE_MSG_STACK.ADD;
611: app_exception.raise_exception;
612: end if;
613: return;
614: end LOCK_ROW;
615:
644: end if;
645: else
646: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
647: IGS_GE_MSG_STACK.ADD;
648: app_exception.raise_exception;
649: end if;
650: Before_DML( p_action => 'UPDATE',
651: x_rowid => X_ROWID,
652: x_course_cd => X_COURSE_CD,