1: PACKAGE BODY IGS_EN_VAL_PDI AS
2: /* $Header: IGSEN52B.pls 115.3 2002/11/29 00:02:47 nsidana ship $ */
3: --
4: -- To validate disability type of IGS_PE_PERSON disability record
5: FUNCTION ENRP_VAL_PDI_DIT(
46: END;
47: EXCEPTION
48: WHEN OTHERS THEN
49: FND_MESSAGE.SET_NAME('IGS', 'IGS_GE_UNHANDLED_EXP');
50: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_PDI.enrp_val_pdi_dit');
51: IGS_GE_MSG_STACK.ADD;
52: App_Exception.Raise_Exception;
53:
54:
99: END;
100: EXCEPTION
101: WHEN OTHERS THEN
102: FND_MESSAGE.SET_NAME('IGS', 'IGS_GE_UNHANDLED_EXP');
103: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_PDI.enrp_val_pd_contact');
104: IGS_GE_MSG_STACK.ADD;
105: App_Exception.Raise_Exception;
106:
107:
139: RETURN TRUE;
140: EXCEPTION
141: WHEN OTHERS THEN
142: FND_MESSAGE.SET_NAME('IGS', 'IGS_GE_UNHANDLED_EXP');
143: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_PDI.enrp_val_dit_closed');
144: IGS_GE_MSG_STACK.ADD;
145: App_Exception.Raise_Exception;
146:
147:
146:
147:
148: END;
149: END enrp_val_dit_closed;
150: END IGS_EN_VAL_PDI;