[Home] [Help]
42: Open cur_old_ref_values;
43: Fetch cur_old_ref_values INTO old_references;
44: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
45: Close cur_old_ref_values;
46: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
47: IGS_GE_MSG_STACK.ADD;
48: App_Exception.Raise_Exception;
49: Return;
50: END IF;
91: -- Validate the enrolment method type
92: IF IGS_EN_VAL_ECPD.enrp_val_ecpd_emt(
93: new_references.enr_method_type,
94: v_message_name) = FALSE THEN
95: Fnd_Message.Set_Name('IGS', v_message_name);
96: IGS_GE_MSG_STACK.ADD;
97: App_Exception.Raise_Exception;
98: END IF;
99: END IF;
129: v_ecpd_rec.enrolment_cat,
130: v_ecpd_rec.enr_method_type,
131: v_ecpd_rec.s_student_comm_type,
132: v_message_name) = FALSE THEN
133: Fnd_Message.Set_Name('IGS', v_message_name);
134: IGS_GE_MSG_STACK.ADD;
135: App_Exception.Raise_Exception;
136: END IF;
137: END LOOP;
164: END IF;
165:
166: IF ((UPPER (column_name) = 'S_STUDENT_COMM_TYPE') OR (column_name IS NULL)) THEN
167: IF new_references.s_student_comm_type NOT IN ( 'NEW' , 'RETURN' , 'ALL' ) THEN
168: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
169: IGS_GE_MSG_STACK.ADD;
170: App_Exception.Raise_Exception;
171: END IF;
172: END IF;
172: END IF;
173:
174: IF ((UPPER (column_name) = 'PERSON_ADD_ALLOW_IND') OR (column_name IS NULL)) THEN
175: IF new_references.person_add_allow_ind NOT IN ( 'Y' , 'N' ) THEN
176: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
177: IGS_GE_MSG_STACK.ADD;
178: App_Exception.Raise_Exception;
179: END IF;
180: END IF;
180: END IF;
181:
182: IF ((UPPER (column_name) = 'COURSE_ADD_ALLOW_IND') OR (column_name IS NULL)) THEN
183: IF new_references.course_add_allow_ind NOT IN ( 'Y' , 'N' ) 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;
188: END IF;
189:
190: IF ((UPPER (column_name) = 'ENROLMENT_CAT') OR (column_name IS NULL)) THEN
191: IF (new_references.enrolment_cat <> UPPER (new_references.enrolment_cat)) THEN
192: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
193: IGS_GE_MSG_STACK.ADD;
194: App_Exception.Raise_Exception;
195: END IF;
196: END IF;
196: END IF;
197:
198: IF ((UPPER (column_name) = 'ENR_METHOD_TYPE') OR (column_name IS NULL)) THEN
199: IF (new_references.enr_method_type <> UPPER (new_references.enr_method_type)) THEN
200: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
201: IGS_GE_MSG_STACK.ADD;
202: App_Exception.Raise_Exception;
203: END IF;
204: END IF;
216: IF NOT IGS_EN_METHOD_TYPE_PKG.Get_PK_For_Validation (
217: new_references.enr_method_type
218: ) THEN
219:
220: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
221: IGS_GE_MSG_STACK.ADD;
222: App_Exception.Raise_Exception;
223:
224: END IF;
231: ELSE
232: IF NOT IGS_EN_ENROLMENT_CAT_PKG.Get_PK_For_Validation (
233: new_references.enrolment_cat
234: ) THEN
235: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238:
239: END IF;
300: Open cur_rowid;
301: Fetch cur_rowid INTO lv_rowid;
302: IF (cur_rowid%FOUND) THEN
303: Close cur_rowid;
304: Fnd_Message.Set_Name ('IGS', 'IGS_EN_ECPD_EMT_FK');
305: IGS_GE_MSG_STACK.ADD;
306: App_Exception.Raise_Exception;
307: Return;
308: END IF;
326: Open cur_rowid;
327: Fetch cur_rowid INTO lv_rowid;
328: IF (cur_rowid%FOUND) THEN
329: Close cur_rowid;
330: Fnd_Message.Set_Name ('IGS', 'IGS_EN_ECPD_EC_FK');
331: IGS_GE_MSG_STACK.ADD;
332: App_Exception.Raise_Exception;
333: Return;
334: END IF;
353: OPEN cur_rowid;
354: FETCH cur_rowid INTO lv_rowid;
355: IF (cur_rowid%FOUND) THEN
356: CLOSE cur_rowid;
357: fnd_message.set_name ('IGS', 'IGS_EN_ECPD_DA_FK');
358: igs_ge_msg_stack.add;
359: app_exception.raise_exception;
360: RETURN;
361: END IF;
408: new_references.enrolment_cat,
409: new_references.s_student_comm_type,
410: new_references.enr_method_type
411: ) THEN
412: Fnd_message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
413: IGS_GE_MSG_STACK.ADD;
414: App_Exception.Raise_Exception;
415:
416: END IF;
431: new_references.enrolment_cat,
432: new_references.s_student_comm_type,
433: new_references.enr_method_type
434: ) THEN
435: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
436: IGS_GE_MSG_STACK.ADD;
437: App_Exception.Raise_Exception;
438: END IF;
439: Check_Constraints;
501: if X_LAST_UPDATE_LOGIN is NULL then
502: X_LAST_UPDATE_LOGIN := -1;
503: end if;
504: else
505: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
506: IGS_GE_MSG_STACK.ADD;
507: app_exception.raise_exception;
508: end if;
509:
592: open c1;
593: fetch c1 into tlinfo;
594: if (c1%notfound) then
595: close c1;
596: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
597: IGS_GE_MSG_STACK.ADD;
598: app_exception.raise_exception;
599: return;
600: end if;
606: AND ((tlinfo.CONFIG_MIN_CP_VALDN = X_CONFIG_MIN_CP_VALDN) OR ((tlinfo.CONFIG_MIN_CP_VALDN IS NULL) AND (X_CONFIG_MIN_CP_VALDN IS NULL)))
607: ) THEN
608: NULL;
609: else
610: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
611: IGS_GE_MSG_STACK.ADD;
612: app_exception.raise_exception;
613: end if;
614: 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: