[Home] [Help]
45: Open cur_old_ref_values;
46: Fetch cur_old_ref_values INTO old_references;
47: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
48: Close cur_old_ref_values;
49: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
50: IGS_GE_MSG_STACK.ADD;
51: App_Exception.Raise_Exception;
52: Return;
53: END IF;
97: IF IGS_PE_VAL_PIGM.idgp_val_pigm_iud (
98: new_references.group_id,
99: 'INSERT',
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;
108: IF IGS_PE_VAL_PIGM.idgp_val_pigm_iud (
109: new_references.group_id,
110: 'UPDATE',
111: v_message_name) = FALSE THEN
112: Fnd_Message.Set_Name('IGS', v_message_name);
113: IGS_GE_MSG_STACK.ADD;
114: App_Exception.Raise_Exception;
115: END IF;
116: END IF;
119: IF IGS_PE_VAL_PIGM.idgp_val_pigm_iud (
120: old_references.group_id,
121: 'DELETE',
122: v_message_name) = FALSE THEN
123: Fnd_Message.Set_Name('IGS', v_message_name);
124: IGS_GE_MSG_STACK.ADD;
125: App_Exception.Raise_Exception;
126: END IF;
127: END IF;
135: -- message is to be displayed.
136: IF NOT IGS_PE_PERSID_GROUP_PKG.val_persid_group(new_references.group_id,p_message_name) THEN
137: FND_MSG_PUB.initialize; -- Bug 3671159: Error msg displayed multiple times in Self Service. Hence,
138: -- clearing message stack.
139: Fnd_Message.Set_Name('IGS', 'IGS_PE_PIG_CLOSED_NO_INSRT');
140: IGS_GE_MSG_STACK.ADD;
141: App_Exception.Raise_Exception;
142: END IF;
143: ELSIF (p_updating = TRUE AND new_references.group_id <> old_references.group_id ) THEN
143: ELSIF (p_updating = TRUE AND new_references.group_id <> old_references.group_id ) THEN
144: IF NOT IGS_PE_PERSID_GROUP_PKG.val_persid_group(new_references.group_id,p_message_name) THEN
145: FND_MSG_PUB.initialize; -- Bug 3671159: Error msg displayed multiple times in Self Service. Hence,
146: -- clearing message stack.
147: Fnd_Message.Set_Name('IGS', p_message_name);
148: IGS_GE_MSG_STACK.ADD;
149: App_Exception.Raise_Exception;
150: END IF;
151: END IF;
171: NULL;
172: ELSIF upper(Column_name) = 'GROUP_ID' then
173: new_references.group_id := IGS_GE_NUMBER.to_num(column_value);
174: IF new_references.group_id < 1 OR new_references.group_id > 999999 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;
200: NULL;
201: ELSIF NOT Igs_Pe_Person_Pkg.Get_PK_For_Validation (
202: new_references.person_id
203: ) THEN
204: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
205: IGS_GE_MSG_STACK.ADD;
206: App_Exception.Raise_Exception;
207: END IF;
208:
212: ELSE
213:
214: IF NOT IGS_PE_PERSID_GROUP_PKG.Get_PK_For_Validation (
215: new_references.group_id ) THEN
216: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
217: IGS_GE_MSG_STACK.ADD;
218: App_Exception.Raise_Exception;
219: END IF;
220: END IF;
287: Open cur_rowid;
288: Fetch cur_rowid INTO lv_rowid;
289: IF (cur_rowid%FOUND) THEN
290: Close cur_rowid;
291: Fnd_Message.Set_Name ('IGS', 'IGS_PE_PIGM_PE_FK');
292: IGS_GE_MSG_STACK.ADD;
293: App_Exception.Raise_Exception;
294: Return;
295: END IF;
347: IF(p_action IN ('INSERT','UPDATE')) THEN
348: OPEN c_get_birth_date; FETCH c_get_birth_date INTO l_birth_date; CLOSE c_get_birth_date;
349: IF l_birth_date IS NOT NULL THEN
350: IF x_start_date < l_birth_date THEN
351: FND_MESSAGE.SET_NAME ('IGS','IGS_AD_STRT_DT_LESS_BIRTH_DT');
352: IGS_GE_MSG_STACK.ADD;
353: APP_EXCEPTION.RAISE_EXCEPTION;
354: END IF;
355: END IF;
359: BeforeInsertUpdate(TRUE,FALSE);
360: IF Get_PK_For_Validation (
361: new_references.group_id ,
362: new_references.person_id) THEN
363: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
364: IGS_GE_MSG_STACK.ADD;
365: App_Exception.Raise_Exception;
366: END IF;
367:
378: ELSIF (p_action = 'VALIDATE_INSERT') THEN
379: IF Get_PK_For_Validation (
380: new_references.group_id ,
381: new_references.person_id) THEN
382: Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
383: IGS_GE_MSG_STACK.ADD;
384: App_Exception.Raise_Exception;
385: END IF;
386:
480: else
481: X_PROGRAM_UPDATE_DATE := SYSDATE;
482: end if;
483: else
484: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
485: IGS_GE_MSG_STACK.ADD;
486: app_exception.raise_exception;
487: end if;
488: Before_DML(
571: begin
572: open c1;
573: fetch c1 into tlinfo;
574: if (c1%notfound) then
575: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
576: IGS_GE_MSG_STACK.ADD;
577: app_exception.raise_exception;
578: return;
579: end if;
583: ((tlinfo.END_DATE = X_END_DATE) OR ((tlinfo.END_DATE is null) AND (X_END_DATE is null)))
584: ) then
585: null;
586: else
587: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
588: IGS_GE_MSG_STACK.ADD;
589: app_exception.raise_exception;
590: end if;
591: return;
632: if X_LAST_UPDATE_LOGIN is NULL then
633: X_LAST_UPDATE_LOGIN := -1;
634: end if;
635: else
636: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
637: IGS_GE_MSG_STACK.ADD;
638: app_exception.raise_exception;
639: end if;
640: Before_DML(