[Home] [Help]
47: Fetch cur_old_ref_values INTO old_references;
48: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT')) THEN
49: Close cur_old_ref_values;
50: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
51: IGS_GE_MSG_STACK.ADD;
52: App_Exception.Raise_Exception;
53: Return;
54: END IF;
55: Close cur_old_ref_values;
98: v_commencement_dt,
99: v_attendance_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;
106: IF p_inserting OR
111: new_references.person_id,
112: new_references.ca_sequence_number,
113: v_message_name) = FALSE THEN
114: Fnd_Message.Set_Name ('IGS', v_message_name);
115: IGS_GE_MSG_STACK.ADD;
116: App_Exception.Raise_Exception;
117: END IF;
118: END IF;
119: IF p_inserting OR
130: new_references.hist_start_dt,
131: new_references.hist_end_dt,
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 IF;
138: END IF;
154: v_ca_sequence_number,
155: 'Y', -- validate first history start date
156: v_message_name) = FALSE THEN
157: Fnd_Message.Set_Name ('IGS', v_message_name);
158: IGS_GE_MSG_STACK.ADD;
159: App_Exception.Raise_Exception;
160: END IF;
161: END IF;
162: END IF;
182:
183: IF upper(column_name) = 'ATTENDANCE_TYPE' OR COLUMN_NAME IS NULL THEN
184: IF new_references.ATTENDANCE_TYPE <> upper(new_references.ATTENDANCE_TYPE) then
185: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
186: IGS_GE_MSG_STACK.ADD;
187: App_Exception.Raise_Exception ;
188: END IF;
189: END IF;
190:
190:
191: IF upper(column_name) = 'CA_SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
192: IF new_references.CA_SEQUENCE_NUMBER < 1 OR new_references.CA_SEQUENCE_NUMBER > 999999 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;
198:
198:
199: IF upper(column_name) = 'SEQUENCE_NUMBER' OR COLUMN_NAME IS NULL THEN
200: IF new_references.SEQUENCE_NUMBER < 1 OR new_references.SEQUENCE_NUMBER > 999999 then
201: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
202: IGS_GE_MSG_STACK.ADD;
203: App_Exception.Raise_Exception ;
204: END IF;
205: END IF;
206:
206:
207: IF upper(column_name) = 'ATTENDANCE_PERCENTAGE' OR COLUMN_NAME IS NULL THEN
208: IF new_references.ATTENDANCE_PERCENTAGE < 1 OR new_references.ATTENDANCE_PERCENTAGE > 100 then
209: Fnd_Message.Set_Name('IGS','IGS_GE_INVALID_VALUE');
210: IGS_GE_MSG_STACK.ADD;
211: App_Exception.Raise_Exception ;
212: END IF;
213: END IF;
214:
226: IF NOT IGS_EN_ATD_TYPE_PKG.Get_PK_For_Validation (
227: new_references.attendance_type
228: ) THEN
229: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
230: IGS_GE_MSG_STACK.ADD;
231: App_Exception.Raise_Exception;
232: END IF;
233: END IF;
234:
242: new_references.person_id,
243: new_references.ca_sequence_number
244: ) THEN
245: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
246: IGS_GE_MSG_STACK.ADD;
247: App_Exception.Raise_Exception;
248: END IF;
249: END IF;
250:
297: Fetch cur_rowid INTO lv_rowid;
298: IF (cur_rowid%FOUND) THEN
299: Close cur_rowid;
300: Fnd_Message.Set_Name ('IGS', 'IGS_RE_CAH_ATT_FK');
301: IGS_GE_MSG_STACK.ADD;
302: App_Exception.Raise_Exception;
303: Return;
304: END IF;
305: Close cur_rowid;
325: Fetch cur_rowid INTO lv_rowid;
326: IF (cur_rowid%FOUND) THEN
327: Close cur_rowid;
328: Fnd_Message.Set_Name ('IGS', 'IGS_RE_CAH_CA_FK');
329: IGS_GE_MSG_STACK.ADD;
330: App_Exception.Raise_Exception;
331: Return;
332: END IF;
333: Close cur_rowid;
380: new_references.sequence_number
381: ) THEN
382:
383: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
384: IGS_GE_MSG_STACK.ADD;
385: App_Exception.Raise_Exception;
386: END IF;
387: Check_Constraints;
388: Check_Parent_Existance;
402: new_references.sequence_number
403: ) THEN
404:
405: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
406: IGS_GE_MSG_STACK.ADD;
407: App_Exception.Raise_Exception;
408: END IF;
409: Check_Constraints;
410: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
446: X_LAST_UPDATE_LOGIN := -1;
447: end if;
448: else
449: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
450: IGS_GE_MSG_STACK.ADD;
451: app_exception.raise_exception;
452: end if;
453:
454: Before_DML (
518: WHEN OTHERS THEN
519: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
520: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
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
526: igs_sc_gen_001.unset_ctx('R');
602: X_LAST_UPDATE_LOGIN := -1;
603: end if;
604: else
605: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
606: IGS_GE_MSG_STACK.ADD;
607: app_exception.raise_exception;
608: end if;
609:
610: Before_DML (
638: where ROWID = X_ROWID;
639:
640: if (sql%notfound) then
641: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
642: igs_ge_msg_stack.add;
643: igs_sc_gen_001.unset_ctx('R');
644: app_exception.raise_exception;
645: end if;
646: IF (x_mode = 'S') THEN
653: WHEN OTHERS THEN
654: IF (SQLCODE = (-28115)) THEN
655: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
656: fnd_message.set_token ('ERR_CD', SQLCODE);
657: igs_ge_msg_stack.add;
658: igs_sc_gen_001.unset_ctx('R');
659: app_exception.raise_exception;
660: ELSE
661: igs_sc_gen_001.unset_ctx('R');
728: delete from IGS_RE_CDT_ATT_HIST_ALL
729: where ROWID = X_ROWID;
730: if (sql%notfound) then
731: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
732: igs_ge_msg_stack.add;
733: igs_sc_gen_001.unset_ctx('R');
734: app_exception.raise_exception;
735: end if;
736: IF (x_mode = 'S') THEN