[Home] [Help]
39: Open cur_old_ref_values;
40: Fetch cur_old_ref_values INTO old_references;
41: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
42: Close cur_old_ref_values;
43: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
44: IGS_GE_MSG_STACK.ADD;
45: App_Exception.Raise_Exception;
46: Return;
47: END IF;
111: IF IGS_PS_VAL_CRS.crsp_val_iud_crv_dtl (
112: v_course_cd,
113: v_version_number,
114: v_message_name) = FALSE THEN
115: Fnd_Message.Set_Name('IGS',v_message_name);
116: IGS_GE_MSG_STACK.ADD;
117: App_Exception.Raise_Exception;
118: END IF;
119:
144:
145: IF upper(column_name) = 'ATTENDANCE_MODE' OR
146: column_name is null Then
147: IF ( new_references.attendance_mode <> UPPER(new_references.attendance_mode) ) Then
148: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
149: IGS_GE_MSG_STACK.ADD;
150: App_Exception.Raise_Exception;
151: END IF;
152: END IF;
153:
154: IF upper(column_name) = 'ATTENDANCE_TYPE' OR
155: column_name is null Then
156: IF ( new_references.attendance_type <> UPPER(new_references.attendance_type) ) Then
157: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
158: IGS_GE_MSG_STACK.ADD;
159: App_Exception.Raise_Exception;
160: END IF;
161: END IF;
162:
163: IF upper(column_name) = 'CAL_TYPE' OR
164: column_name is null Then
165: IF ( new_references.cal_type <> UPPER(new_references.cal_type) ) 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;
171:
172: IF upper(column_name) = 'COURSE_CD' OR
173: column_name is null Then
174: IF ( new_references.course_cd <> UPPER(new_references.course_cd) ) Then
175: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
176: IGS_GE_MSG_STACK.ADD;
177: App_Exception.Raise_Exception;
178: END IF;
179: END IF;
180:
181: IF upper(column_name) = 'CRS_NOTE_TYPE' OR
182: column_name is null Then
183: IF ( new_references.crs_note_type <> UPPER(new_references.crs_note_type) ) Then
184: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
185: IGS_GE_MSG_STACK.ADD;
186: App_Exception.Raise_Exception;
187: END IF;
188: END IF;
189:
190: IF upper(column_name) = 'LOCATION_CD' OR
191: column_name is null Then
192: IF ( new_references.location_cd <> UPPER(new_references.location_cd) ) Then
193: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
194: IGS_GE_MSG_STACK.ADD;
195: App_Exception.Raise_Exception;
196: END IF;
197: END IF;
207: ELSE
208: IF NOT IGS_PS_NOTE_TYPE_PKG.Get_PK_For_Validation (
209: new_references.crs_note_type
210: ) THEN
211: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
212: IGS_GE_MSG_STACK.ADD;
213: App_Exception.Raise_Exception;
214: END IF;
215: END IF;
238: new_references.location_cd,
239: new_references.attendance_mode,
240: new_references.attendance_type
241: ) THEN
242: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
243: IGS_GE_MSG_STACK.ADD;
244: App_Exception.Raise_Exception;
245: END IF;
246: END IF;
251: ELSE
252: IF NOT IGS_PS_OFR_PAT_PKG.Get_UK_For_Validation (
253: new_references.cop_id
254: ) THEN
255: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
256: IGS_GE_MSG_STACK.ADD;
257: App_Exception.Raise_Exception;
258: END IF;
259: END IF;
264: ELSE
265: IF NOT IGS_GE_NOTE_PKG.Get_PK_For_Validation (
266: new_references.reference_number
267: ) THEN
268: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
269: IGS_GE_MSG_STACK.ADD;
270: App_Exception.Raise_Exception;
271: END IF;
272: END IF;
330: Open cur_rowid;
331: Fetch cur_rowid INTO lv_rowid;
332: IF (cur_rowid%FOUND) THEN
333: Close cur_rowid;
334: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COPN_CNT_FK');
335: IGS_GE_MSG_STACK.ADD;
336: App_Exception.Raise_Exception;
337: Return;
338: END IF;
368: Open cur_rowid;
369: Fetch cur_rowid INTO lv_rowid;
370: IF (cur_rowid%FOUND) THEN
371: Close cur_rowid;
372: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COPN_COP_FK');
373: IGS_GE_MSG_STACK.ADD;
374: App_Exception.Raise_Exception;
375: Return;
376: END IF;
394: Open cur_rowid;
395: Fetch cur_rowid INTO lv_rowid;
396: IF (cur_rowid%FOUND) THEN
397: Close cur_rowid;
398: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COPN_COP_FK');
399: IGS_GE_MSG_STACK.ADD;
400: App_Exception.Raise_Exception;
401: Return;
402: END IF;
420: Open cur_rowid;
421: Fetch cur_rowid INTO lv_rowid;
422: IF (cur_rowid%FOUND) THEN
423: Close cur_rowid;
424: Fnd_Message.Set_Name ('IGS', 'IGS_PS_COPN_NOTE_FK');
425: IGS_GE_MSG_STACK.ADD;
426: App_Exception.Raise_Exception;
427: Return;
428: END IF;
482: new_references.location_cd,
483: new_references.attendance_mode,
484: new_references.attendance_type,
485: new_references.reference_number ) THEN
486: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
487: IGS_GE_MSG_STACK.ADD;
488: App_Exception.Raise_Exception;
489: END IF;
490: Check_Constraints;
506: new_references.location_cd,
507: new_references.attendance_mode,
508: new_references.attendance_type,
509: new_references.reference_number ) THEN
510: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
511: IGS_GE_MSG_STACK.ADD;
512: App_Exception.Raise_Exception;
513: END IF;
514: Check_Constraints;
569: if X_LAST_UPDATE_LOGIN is NULL then
570: X_LAST_UPDATE_LOGIN := -1;
571: end if;
572: else
573: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
574: IGS_GE_MSG_STACK.ADD;
575: app_exception.raise_exception;
576: end if;
577: Before_DML (
666: open c1;
667: fetch c1 into tlinfo;
668: if (c1%notfound) then
669: close c1;
670: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
671: IGS_GE_MSG_STACK.ADD;
672: app_exception.raise_exception;
673: return;
674: end if;
678: AND (tlinfo.CRS_NOTE_TYPE = X_CRS_NOTE_TYPE)
679: ) then
680: null;
681: else
682: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
683: IGS_GE_MSG_STACK.ADD;
684: app_exception.raise_exception;
685: end if;
686: return;
717: if X_LAST_UPDATE_LOGIN is NULL then
718: X_LAST_UPDATE_LOGIN := -1;
719: end if;
720: else
721: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
722: IGS_GE_MSG_STACK.ADD;
723: app_exception.raise_exception;
724: end if;
725: Before_DML (