435:
436: -- Set the message type to one we use in Web Expenses
437: P_Msg_Type := NULL;
438: IF (l_MsgType = 'E') THEN
439: P_Msg_Type := AP_WEB_DFLEX_PKG.C_CustValidResMsgTypeError;
440: ELSIF (l_MsgType = 'W') THEN
441: P_Msg_Type := AP_WEB_DFLEX_PKG.C_CustValidResMsgTypeWarning;
442: END IF;
443: EXCEPTION
437: P_Msg_Type := NULL;
438: IF (l_MsgType = 'E') THEN
439: P_Msg_Type := AP_WEB_DFLEX_PKG.C_CustValidResMsgTypeError;
440: ELSIF (l_MsgType = 'W') THEN
441: P_Msg_Type := AP_WEB_DFLEX_PKG.C_CustValidResMsgTypeWarning;
442: END IF;
443: EXCEPTION
444: WHEN OTHERS THEN
445: BEGIN