1: PACKAGE BODY IGS_EN_VAL_API AS
2: /* $Header: IGSEN23B.pls 120.1 2005/08/29 08:01:12 appldev ship $ */
3:
4: -------------------------------------------------------------------------------------------
5: --Change History:
54: WHERE rowid = gt_rowid_table(v_index);
55: EXCEPTION
56: WHEN OTHERS THEN
57: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
58: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_VAL_API.enrp_prc_api_rowids');
59: IGS_GE_MSG_STACK.ADD;
60: App_Exception.Raise_Exception;
61:
62: END;
64: OPEN c_pit (r_alternate_person_id.person_id_type);
65: FETCH c_pit INTO v_dummy;
66: IF (c_pit%FOUND) THEN
67: CLOSE c_pit;
68: IF IGS_EN_VAL_API.enrp_val_api_pan (
69: r_alternate_person_id.pe_person_id,
70: r_alternate_person_id.api_person_id,
71: p_message_name) = FALSE THEN
72: RETURN FALSE;
126: END;
127: EXCEPTION
128: WHEN OTHERS THEN
129: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
130: FND_MESSAGE.SET_TOKEN('NAME','IGS_EN_VAL_API.enrp_val_api_pan');
131: IGS_GE_MSG_STACK.ADD;
132: App_Exception.Raise_Exception;
133:
134: END enrp_val_api_pan;
382: return 0;
383: end if;
384: END fm_equal_wrap;
385:
386: END igs_en_val_api;