[Home] [Help]
36: Open cur_old_ref_values;
37: Fetch cur_old_ref_values INTO old_references;
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;
77: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl(
78: new_references.course_cd,
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;
97: -- Validate the Teaching Calendar Type
98: IF IGS_PS_VAL_POSp.crsp_val_posp_cat (
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;
123: new_references.sequence_number,
124: new_references.acad_period_num,
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:
158:
159: IF upper(column_name) = 'CAL_TYPE' OR
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;
213:
214: IF upper(column_name) = 'VERSION_NUMBER' OR
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;
232: ELSE
233: IF NOT IGS_CA_TYPE_PKG.Get_PK_For_Validation (
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;
253: new_references.version_number,
254: new_references.cal_type,
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;
323: Open cur_rowid;
324: Fetch cur_rowid INTO lv_rowid;
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;
355: Open cur_rowid;
356: Fetch cur_rowid INTO lv_rowid;
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;
410: new_references.cal_type,
411: new_references.pos_sequence_number,
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;
433: new_references.cal_type,
434: new_references.pos_sequence_number,
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;
500: if X_LAST_UPDATE_LOGIN is NULL then
501: X_LAST_UPDATE_LOGIN := -1;
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',
590: open c1;
591: fetch c1 into tlinfo;
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;
605: AND (X_DESCRIPTION is null)))
606: ) then
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;
642: if X_LAST_UPDATE_LOGIN is NULL then
643: X_LAST_UPDATE_LOGIN := -1;
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',