1: PACKAGE BODY IGS_EN_VAL_ECPD AS
2: /* $Header: IGSEN35B.pls 115.3 2002/11/28 23:57:43 nsidana ship $ */
3: --
4: -- To validate enr category procedure detail comm type
5: FUNCTION ENRP_VAL_ECPD_COMM(
56: END;
57: EXCEPTION
58: WHEN OTHERS THEN
59: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
60: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_ECPD.enrp_val_ecpd_comm');
61: IGS_GE_MSG_STACK.ADD;
62: App_Exception.Raise_Exception;
63:
64: END enrp_val_ecpd_comm;
94: END IF;
95: EXCEPTION
96: WHEN OTHERS THEN
97: Fnd_Message.Set_Name('IGS','IGS_GE_UNHANDLED_EXP');
98: FND_MESSAGE.SET_TOKEN('NAME', 'IGS_EN_VAL_ECPD.enrp_val_ecpd_emt');
99: IGS_GE_MSG_STACK.ADD;
100: App_Exception.Raise_Exception;
101:
102: END;
100: App_Exception.Raise_Exception;
101:
102: END;
103: END enrp_val_ecpd_emt;
104: END IGS_EN_VAL_ECPD;