[Home] [Help]
73: FETCH cur_old_ref_values INTO old_references;
74: IF ((cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT', 'VALIDATE_INSERT'))) THEN
75: CLOSE cur_old_ref_values;
76: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
77: igs_ge_msg_stack.add;
78: app_exception.raise_exception;
79: RETURN;
80: END IF;
81: CLOSE cur_old_ref_values;
174: IF new_references.visa_issue_date > l_exp_date THEN
175: fnd_message.set_name ('IGS', 'IGS_PE_VIS_ASOC_PASS_EXP');
176: fnd_message.set_token('PASSPORT_DATE',to_char(l_exp_date,'DD-MON-YYYY'));
177: fnd_message.set_token('VISA_DATE',to_char(new_references.visa_issue_date,'DD-MON-YYYY'));
178: igs_ge_msg_stack.add;
179: app_exception.raise_exception;
180: END IF;
181: END IF;
182:
182:
183:
184: IF new_references.visa_issue_date > new_references.visa_expiry_date THEN
185: FND_MESSAGE.SET_NAME ('IGS', 'IGS_PE_FROM_DT_GRT_TO_DATE');
186: IGS_GE_MSG_STACK.ADD;
187: APP_EXCEPTION.RAISE_EXCEPTION;
188: END IF;
189:
190: OPEN get_dob_dt_cur(new_references.person_id);
193:
194: IF l_birth_dt IS NOT NULL AND new_references.visa_issue_date IS NOT NULL THEN
195: IF l_birth_dt > new_references.visa_issue_date THEN
196: FND_MESSAGE.SET_NAME ('IGS', 'IGS_PE_INT_DT_LT_BRDT');
197: IGS_GE_MSG_STACK.ADD;
198: APP_EXCEPTION.RAISE_EXCEPTION;
199: END IF;
200: END IF;
201:
210: CLOSE overlap_poe_cur;
211: FND_MESSAGE.SET_NAME ('IGS', 'IGS_PE_POE_VISA_OVERLAP');
212: FND_MESSAGE.SET_TOKEN('VISA_ISSUE', NULL);
213: FND_MESSAGE.SET_TOKEN('VISA_EXP', NULL);
214: IGS_GE_MSG_STACK.ADD;
215: APP_EXCEPTION.RAISE_EXCEPTION;
216: END IF;
217: CLOSE overlap_poe_cur;
218: END IF;
238: new_references.visa_issue_date
239: )
240: ) THEN
241: fnd_message.set_name ('IGS', 'IGS_PE_VISA_DUP_EXISTS');
242: igs_ge_msg_stack.add;
243: app_exception.raise_exception;
244: END IF;
245:
246: END check_uniqueness;
264: ELSIF NOT igs_pe_passport_pkg.get_pk_for_validation (
265: new_references.passport_id
266: ) THEN
267: fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
268: igs_ge_msg_stack.add;
269: app_exception.raise_exception;
270: END IF;
271:
272: IF (((old_references.person_id = new_references.person_id)) OR
275: ELSIF NOT Igs_Pe_Person_Pkg.Get_PK_For_Validation (
276: new_references.person_id
277: ) THEN
278: Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
279: IGS_GE_MSG_STACK.ADD;
280: App_Exception.Raise_Exception;
281: END IF;
282:
283: END check_parent_existance;
401: FETCH cur_rowid INTO lv_rowid;
402: IF (cur_rowid%FOUND) THEN
403: CLOSE cur_rowid;
404: fnd_message.set_name ('IGS', 'IGS_FOREIGN_KEY_REFERENCE');
405: igs_ge_msg_stack.add;
406: app_exception.raise_exception;
407: RETURN;
408: END IF;
409: CLOSE cur_rowid;
517: new_references.visa_id
518: )
519: ) THEN
520: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
521: igs_ge_msg_stack.add;
522: app_exception.raise_exception;
523: END IF;
524: check_uniqueness;
525: check_parent_existance;
537: new_references.visa_id
538: )
539: ) THEN
540: fnd_message.set_name('IGS','IGS_GE_RECORD_ALREADY_EXISTS');
541: igs_ge_msg_stack.add;
542: app_exception.raise_exception;
543: END IF;
544: check_uniqueness;
545: ELSIF (p_action = 'VALIDATE_UPDATE') THEN
582: CLOSE c_visa_overlap;
583:
584: IF l_count > 0 THEN
585: FND_MESSAGE.SET_NAME('IGS','IGS_PE_VISA_DATE_OVERLAP');
586: IGS_GE_MSG_STACK.ADD;
587: APP_EXCEPTION.RAISE_EXCEPTION;
588: END IF;
589:
590: END afterrowinsertupdate;
694: x_last_update_login := -1;
695: END IF;
696: ELSE
697: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
698: igs_ge_msg_stack.add;
699: app_exception.raise_exception;
700: END IF;
701:
702: before_dml(
843: WHEN OTHERS THEN
844: IF (SQLCODE IN (-28115, -28113, -28111)) THEN
845: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_EXCEPTION');
846: fnd_message.set_token ('ERR_CD', SQLCODE);
847: igs_ge_msg_stack.add;
848: igs_sc_gen_001.unset_ctx('R');
849: app_exception.raise_exception;
850: ELSE
851: igs_sc_gen_001.unset_ctx('R');
946: OPEN c1;
947: FETCH c1 INTO tlinfo;
948: IF (c1%notfound) THEN
949: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
950: igs_ge_msg_stack.add;
951: CLOSE c1;
952: app_exception.raise_exception;
953: RETURN;
954: END IF;
991: ) THEN
992: NULL;
993: ELSE
994: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
995: igs_ge_msg_stack.add;
996: app_exception.raise_exception;
997: END IF;
998:
999: RETURN;
1068: x_last_update_login := -1;
1069: END IF;
1070: ELSE
1071: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
1072: igs_ge_msg_stack.add;
1073: app_exception.raise_exception;
1074: END IF;
1075:
1076: before_dml(
1161: WHERE rowid = x_rowid;
1162:
1163: IF (SQL%NOTFOUND) THEN
1164: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1165: igs_ge_msg_stack.add;
1166: igs_sc_gen_001.unset_ctx('R');
1167: app_exception.raise_exception;
1168: END IF;
1169: IF (x_mode = 'S') THEN
1181: WHEN OTHERS THEN
1182: IF (SQLCODE = (-28115)) THEN
1183: fnd_message.set_name ('IGS', 'IGS_SC_UPD_POLICY_EXCP');
1184: fnd_message.set_token ('ERR_CD', SQLCODE);
1185: igs_ge_msg_stack.add;
1186: igs_sc_gen_001.unset_ctx('R');
1187: app_exception.raise_exception;
1188: ELSE
1189: igs_sc_gen_001.unset_ctx('R');
1362: WHERE rowid = x_rowid;
1363:
1364: IF (SQL%NOTFOUND) THEN
1365: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1366: igs_ge_msg_stack.add;
1367: igs_sc_gen_001.unset_ctx('R');
1368: app_exception.raise_exception;
1369: END IF;
1370: IF (x_mode = 'S') THEN