更改如下
vv_Sql=;
    DBMS_SQL.Parse(v_CursorID,vv_Sql,DBMS_SQL.V7);
    DBMS_SQL.Define_column(v_CursorID,1,vn_ServId);
    DBMS_SQL.Define_column(v_CursorID,2,vn_MergeItemId);
    DBMS_SQL.Define_column(v_CursorID,3,vn_Charge);
    DBMS_SQL.Define_column(v_CursorID,4,to_number(vv_AcctNbr));