[Home] [Help]
67: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
68: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
69: IGS_GE_MSG_STACK.ADD;
70: Close cur_old_ref_values;
71: App_Exception.Raise_Exception;
72: Return;
73: END IF;
74: Close cur_old_ref_values;
75: -- Populate New Values.
162: IF ((l_birth_date IS NOT NULL) AND (l_birth_date > new_references.enquiry_dt)) THEN
163: FND_MESSAGE.SET_NAME('IGS','IGS_AD_DOB_ERROR');
164: FND_MESSAGE.SET_TOKEN ('NAME',fnd_message.get_string('IGS','IGS_AD_INQ_DT'));
165: IGS_GE_MSG_STACK.ADD;
166: APP_EXCEPTION.RAISE_EXCEPTION;
167: END IF;
168:
169: ELSIF p_deleting THEN
170: OPEN c_deceased(old_references.person_id);
175: -- Validate that the person is not deceased
176: IF v_deceased_ind = 'Y' THEN
177: Fnd_Message.Set_Name('IGS', 'IGS_IN_DEC_NO_INQ');
178: IGS_GE_MSG_STACK.ADD;
179: App_Exception.Raise_Exception;
180: END IF;
181:
182: -- Validate that the indicated mailing date is not prior to the enquiry date.
183: IF p_inserting OR
188: new_references.indicated_mailing_dt,
189: v_message_name) = FALSE THEN
190: Fnd_Message.Set_Name('IGS', v_message_name);
191: IGS_GE_MSG_STACK.ADD;
192: App_Exception.Raise_Exception;
193: END IF;
194: END IF;
195: END BeforeRowInsertUpdate1;
196:
206: new_references.person_id
207: ))THEN
208: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
209: IGS_GE_MSG_STACK.ADD;
210: App_Exception.Raise_Exception;
211: END IF ;
212: END IF;
213: IF (((old_references.registering_person_id = new_references.registering_person_id)) OR
214: ((new_references.registering_person_id IS NULL))) THEN
218: new_references.registering_person_id
219: ))THEN
220: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
221: IGS_GE_MSG_STACK.ADD;
222: App_Exception.Raise_Exception;
223: END IF ;
224: END IF;
225: IF (((old_references.adm_cal_type = new_references.adm_cal_type) AND
226: (old_references.adm_ci_sequence_number = new_references.adm_ci_sequence_number) AND
239: new_references.acad_ci_sequence_number
240: ))THEN
241: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
242: IGS_GE_MSG_STACK.ADD;
243: App_Exception.Raise_Exception;
244: END IF ;
245: END IF;
246: IF (((old_references.inq_entry_level_id = new_references.inq_entry_level_id)) OR
247: ((new_references.inq_entry_level_id IS NULL))) THEN
252: 'N'
253: ))THEN
254: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
255: IGS_GE_MSG_STACK.ADD;
256: App_Exception.Raise_Exception;
257: END IF ;
258: END IF;
259: IF (((old_references.edu_goal_id = new_references.edu_goal_id)) OR
260: ((new_references.edu_goal_id IS NULL))) THEN
266: 'N'
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;
273: IF (((old_references.how_knowus_id = new_references.how_knowus_id)) OR
274: ((new_references.how_knowus_id IS NULL))) THEN
280: 'N'
281: ))THEN
282: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
283: IGS_GE_MSG_STACK.ADD;
284: App_Exception.Raise_Exception;
285: END IF ;
286: END IF;
287: IF (((old_references.who_influenced_id = new_references.who_influenced_id)) OR
288: ((new_references.who_influenced_id IS NULL))) THEN
294: 'N'
295: ))THEN
296: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
297: IGS_GE_MSG_STACK.ADD;
298: App_Exception.Raise_Exception;
299: END IF ;
300: END IF;
301:
302: END Check_Parent_Existance;
326: column_name is null Then
327: IF new_references.acad_cal_type <> UPPER(new_references.acad_cal_type) Then
328: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
329: IGS_GE_MSG_STACK.ADD;
330: App_Exception.Raise_Exception;
331: END IF;
332: END IF;
333:
334: IF upper(column_name) = 'ADM_CAL_TYPE' OR
335: column_name is null Then
336: IF new_references.adm_cal_type <> UPPER(new_references.adm_cal_type) Then
337: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
338: IGS_GE_MSG_STACK.ADD;
339: App_Exception.Raise_Exception;
340: END IF;
341: END IF;
342: IF upper(column_name) = 'OVERRIDE_PROCESS_IND' OR
343: column_name is null Then
343: column_name is null Then
344: IF new_references.override_process_ind NOT IN ( 'Y' , 'N' ) Then
345: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
346: IGS_GE_MSG_STACK.ADD;
347: App_Exception.Raise_Exception;
348: END IF;
349: END IF;
350: IF upper(column_name) = 'ACAD_CI_SEQUENCE_NUMBER' OR
351: column_name is null Then
351: column_name is null Then
352: IF new_references.acad_ci_sequence_number < 1 OR new_references.acad_ci_sequence_number > 999999 Then
353: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
354: IGS_GE_MSG_STACK.ADD;
355: App_Exception.Raise_Exception;
356: END IF;
357: END IF;
358: IF upper(column_name) = 'ADM_CI_SEQUENCE_NUMBER' OR
359: column_name is null Then
359: column_name is null Then
360: IF new_references.adm_ci_sequence_number < 1 AND new_references.adm_ci_sequence_number > 999999 Then
361: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
362: IGS_GE_MSG_STACK.ADD;
363: App_Exception.Raise_Exception;
364: END IF;
365: END IF;
366:
367:
425: IF (cur_rowid%FOUND) THEN
426: Fnd_Message.Set_Name ('IGS', 'IGS_IN_EAP_PE_FK');
427: IGS_GE_MSG_STACK.ADD;
428: Close cur_rowid;
429: App_Exception.Raise_Exception;
430: Return;
431: END IF;
432: Close cur_rowid;
433: END GET_FK_IGS_PE_PERSON;
452: IF (cur_rowid%FOUND) THEN
453: Fnd_Message.Set_Name ('IGS', 'IGS_IN_EAP_CIR_FK');
454: IGS_GE_MSG_STACK.ADD;
455: Close cur_rowid;
456: App_Exception.Raise_Exception;
457: Return;
458: END IF;
459: Close cur_rowid;
460: END GET_FK_IGS_CA_INST_REL;
476: IF (cur_rowid%FOUND) THEN
477: Fnd_Message.Set_Name ('IGS', 'IGS_IN_EAP_AIELV_FK');
478: IGS_GE_MSG_STACK.ADD;
479: Close cur_rowid;
480: App_Exception.Raise_Exception;
481: Return;
482: END IF;
483: Close cur_rowid;
484: END GET_FK_IGR_I_ENTRY_LVLS;
499: IF (cur_rowid%FOUND) THEN
500: Fnd_Message.Set_Name ('IGS', 'IGS_IN_EAP_ADCC_FK');
501: IGS_GE_MSG_STACK.ADD;
502: Close cur_rowid;
503: App_Exception.Raise_Exception;
504: Return;
505: END IF;
506: Close cur_rowid;
507: END GET_FK_IGS_AD_CODE_CLASSES;
617: new_references.enquiry_appl_number
618: ) THEN
619: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
620: IGS_GE_MSG_STACK.ADD;
621: App_Exception.Raise_Exception;
622: END IF;
623: Check_Constraints;
624: Check_Parent_Existance;
625: ELSIF (p_action = 'UPDATE') THEN
635: new_references.enquiry_appl_number
636: ) THEN
637: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
638: IGS_GE_MSG_STACK.ADD;
639: App_Exception.Raise_Exception;
640: END IF;
641: Check_Constraints;
642: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
643: Check_Constraints;
729: end if;
730: else
731: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
732: IGS_GE_MSG_STACK.ADD;
733: app_exception.raise_exception;
734: end if;
735: X_ENQUIRY_APPL_NUMBER := NULL;
736: Before_DML(
737: p_action=>'INSERT',
985: if (c1%notfound) then
986: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
987: IGS_GE_MSG_STACK.ADD;
988: close c1;
989: app_exception.raise_exception;
990: return;
991: end if;
992: close c1;
993:
1033: null;
1034: else
1035: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
1036: IGS_GE_MSG_STACK.ADD;
1037: app_exception.raise_exception;
1038: end if;
1039: return;
1040: end LOCK_ROW;
1041: procedure UPDATE_ROW (
1105: end if;
1106: else
1107: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
1108: IGS_GE_MSG_STACK.ADD;
1109: app_exception.raise_exception;
1110: end if;
1111: Before_DML(
1112: p_action=>'UPDATE',
1113: x_rowid=>X_ROWID,