[Home] [Help]
38: Open cur_old_ref_values;
39: Fetch cur_old_ref_values INTO old_references;
40: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
41: Close cur_old_ref_values;
42: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
43: IGS_GE_MSG_STACK.ADD;
44: App_Exception.Raise_Exception;
45: Return;
46: END IF;
80: new_references.person_id,
81: new_references.ca_sequence_number,
82: new_references.FIELD_OF_STUDY,
83: v_message_name) = FALSE THEN
84: Fnd_Message.Set_Name ('IGS', v_message_name);
85: IGS_GE_MSG_STACK.ADD;
86: App_Exception.Raise_Exception;
87: END IF;
88: END IF;
97: IF IGS_RE_VAL_CAH.resp_val_ca_childupd (
98: new_references.person_id,
99: new_references.ca_sequence_number,
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: end if;
124:
125: IF upper(column_name) = 'FIELD_OF_STUDY' OR COLUMN_NAME IS NULL THEN
126: IF new_references.FIELD_OF_STUDY <> upper(new_references.FIELD_OF_STUDY) then
127: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
128: IGS_GE_MSG_STACK.ADD;
129: App_Exception.Raise_Exception ;
130: END IF;
131: END IF;
131: END IF;
132:
133: IF upper(column_name) = 'PERCENTAGE' OR COLUMN_NAME IS NULL THEN
134: IF new_references.PERCENTAGE < 1 OR new_references.PERCENTAGE > 100 THEN
135: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
136: IGS_GE_MSG_STACK.ADD;
137: App_Exception.Raise_Exception ;
138: END IF;
139: END IF;
139: END IF;
140:
141: IF upper(column_name) = 'CA_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
142: IF new_references.CA_SEQUENCE_NUMBER < 1 OR new_references.CA_SEQUENCE_NUMBER > 999999 then
143: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
144: IGS_GE_MSG_STACK.ADD;
145: App_Exception.Raise_Exception ;
146: END IF;
147: END IF;
161: IF NOT IGS_RE_CANDIDATURE_PKG.Get_PK_For_Validation (
162: new_references.person_id,
163: new_references.ca_sequence_number
164: ) THEN
165: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
166: IGS_GE_MSG_STACK.ADD;
167: App_Exception.Raise_Exception;
168: END IF;
169: END IF;
174: ELSE
175: IF NOT IGS_PS_FLD_OF_STUDY_PKG.Get_PK_For_Validation (
176: new_references.field_of_study
177: ) THEN
178: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
179: IGS_GE_MSG_STACK.ADD;
180: App_Exception.Raise_Exception;
181: END IF;
182: END IF;
232: Open cur_rowid;
233: Fetch cur_rowid INTO lv_rowid;
234: IF (cur_rowid%FOUND) THEN
235: Close cur_rowid;
236: Fnd_Message.Set_Name ('IGS', 'IGS_RE_CAFOS_CA_FK');
237: IGS_GE_MSG_STACK.ADD;
238: App_Exception.Raise_Exception;
239: Return;
240: END IF;
280: new_references.ca_sequence_number,
281: new_references.field_of_study
282: ) THEN
283:
284: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
285: IGS_GE_MSG_STACK.ADD;
286: App_Exception.Raise_Exception;
287: END IF;
288: Check_Constraints;
301: new_references.ca_sequence_number,
302: new_references.field_of_study
303: ) THEN
304:
305: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
306: IGS_GE_MSG_STACK.ADD;
307: App_Exception.Raise_Exception;
308: END IF;
309: Check_Constraints;
341: if X_LAST_UPDATE_LOGIN is NULL then
342: X_LAST_UPDATE_LOGIN := -1;
343: end if;
344: else
345: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
346: IGS_GE_MSG_STACK.ADD;
347: app_exception.raise_exception;
348: end if;
349:
400:
401: EXCEPTION
402: WHEN OTHERS THEN
403: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
404: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
405: fnd_message.set_token ('ERR_CD', SQLCODE);
406: igs_ge_msg_stack.add;
407: igs_sc_gen_001.unset_ctx('R');
408: app_exception.raise_exception;
401: EXCEPTION
402: WHEN OTHERS THEN
403: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
404: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
405: fnd_message.set_token ('ERR_CD', SQLCODE);
406: igs_ge_msg_stack.add;
407: igs_sc_gen_001.unset_ctx('R');
408: app_exception.raise_exception;
409: ELSE
431: open c1;
432: fetch c1 into tlinfo;
433: if (c1%notfound) then
434: close c1;
435: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
436: app_exception.raise_exception;
437: return;
438: end if;
439: close c1;
441: if ( (tlinfo.PERCENTAGE = X_PERCENTAGE)
442: ) then
443: null;
444: else
445: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
446: app_exception.raise_exception;
447: end if;
448: return;
449: end LOCK_ROW;
473: if X_LAST_UPDATE_LOGIN is NULL then
474: X_LAST_UPDATE_LOGIN := -1;
475: end if;
476: else
477: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
478: IGS_GE_MSG_STACK.ADD;
479: app_exception.raise_exception;
480: end if;
481:
503: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
504: where ROWID = X_ROWID;
505:
506: if (sql%notfound) then
507: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
508: igs_ge_msg_stack.add;
509: igs_sc_gen_001.unset_ctx('R');
510: app_exception.raise_exception;
511: end if;
516:
517: EXCEPTION
518: WHEN OTHERS THEN
519: IF (SQLCODE = (-28115)) THEN
520: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
521: fnd_message.set_token ('ERR_CD', SQLCODE);
522: igs_ge_msg_stack.add;
523: igs_sc_gen_001.unset_ctx('R');
524: app_exception.raise_exception;
517: EXCEPTION
518: WHEN OTHERS THEN
519: IF (SQLCODE = (-28115)) THEN
520: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
521: fnd_message.set_token ('ERR_CD', SQLCODE);
522: igs_ge_msg_stack.add;
523: igs_sc_gen_001.unset_ctx('R');
524: app_exception.raise_exception;
525: ELSE
583: delete from IGS_RE_CDT_FLD_OF_SY
584: where ROWID = X_ROWID;
585:
586: if (sql%notfound) then
587: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
588: igs_ge_msg_stack.add;
589: igs_sc_gen_001.unset_ctx('R');
590: app_exception.raise_exception;
591: end if;