DBA Data[Home] [Help]

APPS.IGS_PE_MIL_SERVICES_PKG dependencies on IGS_GE_MSG_STACK

Line 79: IGS_GE_MSG_STACK.ADD;

75: Fetch cur_old_ref_values INTO old_references;
76: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
77: Close cur_old_ref_values;
78: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
79: IGS_GE_MSG_STACK.ADD;
80: App_Exception.Raise_Exception;
81: Return;
82: END IF;
83: Close cur_old_ref_values;

Line 160: IGS_GE_MSG_STACK.ADD;

156: CLOSE validate_mil_dt;
157:
158: IF new_references.END_DATE IS NOT NULL AND new_references.END_DATE < new_references.START_DATE THEN
159: FND_MESSAGE.SET_NAME('IGS','IGS_GE_INVALID_DATE');
160: IGS_GE_MSG_STACK.ADD;
161: APP_EXCEPTION.RAISE_EXCEPTION;
162:
163: ELSIF l_bth_dt IS NOT NULL AND l_bth_dt > new_references.START_DATE THEN
164: FND_MESSAGE.SET_NAME('IGS','IGS_PE_SERVICE_STDT_LS_BRDT');

Line 165: IGS_GE_MSG_STACK.ADD;

161: APP_EXCEPTION.RAISE_EXCEPTION;
162:
163: ELSIF l_bth_dt IS NOT NULL AND l_bth_dt > new_references.START_DATE THEN
164: FND_MESSAGE.SET_NAME('IGS','IGS_PE_SERVICE_STDT_LS_BRDT');
165: IGS_GE_MSG_STACK.ADD;
166: APP_EXCEPTION.RAISE_EXCEPTION;
167: END IF;
168:
169: END IF;

Line 243: IGS_GE_MSG_STACK.ADD;

239: new_references.military_type_cd,
240: new_references.start_date
241: )THEN
242: Fnd_Message.Set_Name ('IGS', 'IGS_PE_MILTARY_DUP_EXISTS');
243: IGS_GE_MSG_STACK.ADD;
244: App_Exception.Raise_Exception;
245: END IF;
246: End Check_Uniqueness;
247:

Line 274: IGS_GE_MSG_STACK.ADD;

270: ELSIF NOT Igs_Lookups_view_pkg.Get_PK_For_Validation (
271: 'PE_MIL_SEV_TYPE',new_references.military_type_cd
272: ) THEN
273: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
274: IGS_GE_MSG_STACK.ADD;
275: App_Exception.Raise_Exception;
276: END IF;
277:
278: IF (((old_references.person_id = new_references.person_id)) OR

Line 285: IGS_GE_MSG_STACK.ADD;

281: ELSIF NOT Igs_Pe_Person_Pkg.Get_PK_For_Validation (
282: new_references.person_id
283: ) THEN
284: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
285: IGS_GE_MSG_STACK.ADD;
286: App_Exception.Raise_Exception;
287: END IF;
288:
289: IF (((old_references.separation_type_cd = new_references.separation_type_cd)) OR

Line 297: IGS_GE_MSG_STACK.ADD;

293: 'PE_MIL_SEP_TYPE',new_references.separation_type_cd
294:
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:
301: IF (((old_references.assistance_status_cd = new_references.assistance_status_cd)) OR

Line 308: IGS_GE_MSG_STACK.ADD;

304: ELSIF NOT Igs_Lookups_view_pkg.Get_PK_For_Validation (
305: 'PE_MIL_ASS_STATUS',new_references.assistance_status_cd
306: ) THEN
307: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
308: IGS_GE_MSG_STACK.ADD;
309: App_Exception.Raise_Exception;
310: END IF;
311:
312: IF (((old_references.assistance_type_cd = new_references.assistance_type_cd)) OR

Line 320: IGS_GE_MSG_STACK.ADD;

316: 'PE_MIL_ASS_TYPE',new_references.assistance_type_cd
317:
318: ) THEN
319: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
320: IGS_GE_MSG_STACK.ADD;
321: App_Exception.Raise_Exception;
322: END IF;
323:
324: END Check_Parent_Existance;

Line 399: IGS_GE_MSG_STACK.ADD;

395: Fetch cur_rowid INTO lv_rowid;
396: IF (cur_rowid%FOUND) THEN
397: Close cur_rowid;
398: Fnd_Message.Set_Name ('IGS', 'IGS_PE_PMS_PP_FK');
399: IGS_GE_MSG_STACK.ADD;
400: App_Exception.Raise_Exception;
401: Return;
402: END IF;
403: Close cur_rowid;

Line 511: IGS_GE_MSG_STACK.ADD;

507: Null;
508: IF Get_Pk_For_Validation(
509: new_references.milit_service_id) THEN
510: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
511: IGS_GE_MSG_STACK.ADD;
512: App_Exception.Raise_Exception;
513: END IF;
514: Check_Constraints;
515: Check_Uniqueness;

Line 532: IGS_GE_MSG_STACK.ADD;

528: -- Call all the procedures related to Before Insert.
529: IF Get_PK_For_Validation (
530: new_references.milit_service_id) THEN
531: Fnd_Message.Set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
532: IGS_GE_MSG_STACK.ADD;
533: App_Exception.Raise_Exception;
534: END IF;
535: Check_Constraints;
536: Check_Uniqueness;

Line 653: IGS_GE_MSG_STACK.ADD;

649: X_LAST_UPDATE_LOGIN := -1;
650: end if;
651: else
652: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
653: IGS_GE_MSG_STACK.ADD;
654: app_exception.raise_exception;
655: end if;
656: SELECT IGS_PE_MIL_SERVICE_S.NEXTVAL INTO X_MILIT_SERVICE_ID
657: FROM DUAL;

Line 791: igs_ge_msg_stack.add;

787: WHEN OTHERS THEN
788: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
789: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
790: fnd_message.set_token ('ERR_CD', SQLCODE);
791: igs_ge_msg_stack.add;
792: igs_sc_gen_001.unset_ctx('R');
793: app_exception.raise_exception;
794: ELSE
795: igs_sc_gen_001.unset_ctx('R');

Line 886: IGS_GE_MSG_STACK.ADD;

882: open c1;
883: fetch c1 into tlinfo;
884: if (c1%notfound) then
885: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
886: IGS_GE_MSG_STACK.ADD;
887: close c1;
888: app_exception.raise_exception;
889: return;
890: end if;

Line 976: IGS_GE_MSG_STACK.ADD;

972: ) then
973: null;
974: else
975: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
976: IGS_GE_MSG_STACK.ADD;
977: app_exception.raise_exception;
978: end if;
979: return;
980: end LOCK_ROW;

Line 1049: IGS_GE_MSG_STACK.ADD;

1045: X_LAST_UPDATE_LOGIN := -1;
1046: end if;
1047: else
1048: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
1049: IGS_GE_MSG_STACK.ADD;
1050: app_exception.raise_exception;
1051: end if;
1052: Before_DML(
1053: p_action=>'UPDATE',

Line 1132: igs_ge_msg_stack.add;

1128: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
1129: where ROWID = X_ROWID;
1130: if (sql%notfound) then
1131: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1132: igs_ge_msg_stack.add;
1133: igs_sc_gen_001.unset_ctx('R');
1134: app_exception.raise_exception;
1135: end if;
1136: IF (x_mode = 'S') THEN

Line 1150: igs_ge_msg_stack.add;

1146: WHEN OTHERS THEN
1147: IF (SQLCODE = (-28115)) THEN
1148: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1149: fnd_message.set_token ('ERR_CD', SQLCODE);
1150: igs_ge_msg_stack.add;
1151: igs_sc_gen_001.unset_ctx('R');
1152: app_exception.raise_exception;
1153: ELSE
1154: igs_sc_gen_001.unset_ctx('R');

Line 1318: igs_ge_msg_stack.add;

1314: delete from IGS_PE_MIL_SERVICES_ALL
1315: where ROWID = X_ROWID;
1316: if (sql%notfound) then
1317: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1318: igs_ge_msg_stack.add;
1319: igs_sc_gen_001.unset_ctx('R');
1320: app_exception.raise_exception;
1321: end if;
1322: IF (x_mode = 'S') THEN