oracle 存储过程哪里错了

0
create or replace package body PKG_UBI_TOTW_LJ1 is

  -- Function and procedure implementations
  function f_get_transactionid return integer is
    i_max_id integer;

procedure createUpdatecar(i_calcdate in varchar2,
                          i_statdate in varchar2) as
    --DECLARE
    --异常定义
      E_NUMERIC_FORMAT EXCEPTION; --数字格式异常
      VSQL              VARCHAR2(30000);
      V_EXISTS_TMPTABLE NUMBER(2) := 0;
       I_ROW_NUMBER NUMBER := 0;
      row_flt      row_flt_type;
    begin
        -- 输入参数有效性判断
        IF NOT (LTRIM(I_CALCDATE, '0123456789') IS NULL) and
       NOT (LTRIM(I_STATDATE, '0123456789') IS NULL) THEN
           RAISE E_NUMERIC_FORMAT;
        END IF;
   end createUpdatecar;

 
已邀请:
0

li052468 2015-12-17 回答

procedure createUpdatecar(i_calcdate in varchar2,
                          i_statdate in varchar2) as
    --DECLARE
    --异常定义
      E_NUMERIC_FORMAT EXCEPTION; --数字格式异常
      VSQL              VARCHAR2(30000);
      V_EXISTS_TMPTABLE NUMBER(2) := 0;
       I_ROW_NUMBER NUMBER := 0;
      row_flt      row_flt_type;
    begin
        -- 输入参数有效性判断
        IF NOT (LTRIM(I_CALCDATE, '0123456789') IS NULL) and
       NOT (LTRIM(I_STATDATE, '0123456789') IS NULL) THEN
           RAISE E_NUMERIC_FORMAT;
        END IF;
   end createUpdatecar;  这一部分吗?你是想实现什么?

要回复问题请先登录注册