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;
-- 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;
没有找到相关结果
重要提示:提问者不能发表回复,可以通过评论与回答者沟通,沟通后可以通过编辑功能完善问题描述,以便后续其他人能够更容易理解问题.
1 个回复
li052468 2015-12-17 回答
赞同来自:
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; 这一部分吗?你是想实现什么?