CREATE TABLE usermsg(use_id NUMBER(5),use_name VARCHAR2(30),password VARCHAR2(6));
CREATE OR REPLACE PROCEDURE pusermsgins(p_id IN NUMBER,p_name IN VARCHAR2,ppassword IN VARCHAR2) IS
v_password NUMBER;
BEGIN
SELECT To_Number(ppassword) INTO v_password FROM dual;
INSERT INTO usermsg VALUES (p_id,p_name,ppassword);
COMMIT;
EXCEPTION WHEN OTHERS THEN
raise_application_error(-20102,'** plz input the Correct password **' ||sqlerrm);
END;