2013-11-01 67 views
1

我试图创建一个存储过程,将单行插入到表中。传递给此过程的参数 将被插入到表中。存储过程 - PL/SQL - 插入错误

CREATE OR REPLACE PROCEDURE proc_sal(
    ename IN VARCHAR2, basic IN NUMBER, 
    hra IN NUMBER, doj IN VARCHAR2, gender IN VARCHAR2, 
    deptcode IN VARCHAR2, err OUT NUMBER, emsg OUT VARCHAR2) 
IS 
    eid VARCHAR2(30); 
    no NUMBER; 
BEGIN 
    SELECT salseq.NEXTVAL INTO no FROM dual; 

    eid := CONCAT(deptcode,LPAD(no,5,'0')); 

    INSERT INTO salary_det 
    VALUES('eid', 'ename', basic, hra, 'doj', 'gender'); 

    err := 1; 
EXCEPTION 
    WHEN OTHERS THEN 
    err := SQLCODE; 
    emsg := SQLERRM; 
    DBMS_OUTPUT.PUT_LINE(emsg); 
END; 

通过匿名块调用这个程序:

DECLARE 
    errcd NUMBER; 
    errmsg VARCHAR2(200); 
BEGIN 
    proc_sal('&empname',&basic, &hra,'&date','&gender','&deptcode', errcd, errmsg); 
    DBMS_OUTPUT.PUT_LINE(errcd||' '||errmsg); 
END; 

而且下面是输出我收到:

Enter value for empname: Mohan 
    Enter value for basic: 56000 
    Enter value for hra: 560 
    Enter value for date: 12-JUL-12 
    Enter value for gender: M 
    Enter value for deptcode: EA 
    old 5: proc_sal('&empname',&basic, &hra, '&date','&gender','&deptcode', errcd, errmsg); 
    new 5: proc_sal('Mohan',56000, 560, '12-JUL-12','M','EA', errcd, errmsg); 

    ORA-01858: a non-numeric character was found where a numeric was expected  
    -1858 ORA-01858: a non-numeric character was found where a numeric was expected 

    PL/SQL procedure successfully completed. 

其他一切试图单独运行时程序工作。在sql中尝试插入时发生。没有不匹配的列名或值,仍然无法弄清楚什么是错的。

+0

欢迎SO。表格的定义是什么? – igr

+1

insert命令试图在这里插入字符串值:'VALUES('eid','ename',basic,hra,'doj','gender');' - 'eid','ename','doj'和'gender'是字符串,因为它们被包含在撇号中。 – krokodilko

回答

1

的问题是,你用撇号变量的名字,试试这个:

CREATE OR REPLACE PROCEDURE proc_sal(
    ename IN VARCHAR2, basic IN NUMBER, 
    hra IN NUMBER, doj IN VARCHAR2, gender IN VARCHAR2, 
    deptcode IN VARCHAR2, err OUT NUMBER, emsg OUT VARCHAR2) 
IS 
    eid VARCHAR2(30); 
    no NUMBER; 
BEGIN 
    SELECT salseq.NEXTVAL INTO no FROM dual; 

    eid := CONCAT(deptcode,LPAD(no,5,'0')); 

    INSERT INTO salary_det 
    VALUES(eid, ename, basic, hra, doj, gender); 

    err := 1; 
EXCEPTION 
    WHEN OTHERS THEN 
    err := SQLCODE; 
    emsg := SQLERRM; 
    DBMS_OUTPUT.PUT_LINE(emsg); 
END; 
+0

非常感谢。有效。检查了一切,但忘了引号!!!! – Tao