5,889
社区成员
发帖
与我相关
我的任务
分享oracle自定义函数迁移到DB2，高手进来帮忙，多谢了
create or replace function GET_SEQ( seq_name in char, o_seq_v out numeric )
return int
AS
t_sqlstr varchar(100);
begin
t_sqlstr := 'select '||seq_name||'.nextval from dual';
execute immediate t_sqlstr into o_seq_v;
return(0);
exception
when OTHERS then
--dbms_output.put_line( sqlerrm );
rollback;
return(-1);
end GET_SEQ;
----------------------------------------------
CREATE OR REPLACE function P_GET_SEQ(IN i_seq_name char(20),OUT o_seq_v
double )
returns integer
LANGUAGE SQL
begin
DECLARE t_sqlstr varchar(100) default '';--
SET t_sqlstr = 'select nextval for '||i_seq_name||' from syspublic.dual';--
execute immediate t_sqlstr;--
/*异常怎么处理*/ return(0);--
end
return int
AS
t_sqlstr varchar(100);
begin
t_sqlstr := 'select '||seq_name||'.nextval from dual';
execute immediate t_sqlstr into o_seq_v;
return(0);
exception
when OTHERS then
--dbms_output.put_line( sqlerrm );
rollback;
return(-1);
end GET_SEQ;
----------------------------------------------
CREATE OR REPLACE function P_GET_SEQ(IN i_seq_name char(20),OUT o_seq_v
double )
returns integer
LANGUAGE SQL
begin
DECLARE t_sqlstr varchar(100) default '';--
SET t_sqlstr = 'select nextval for '||i_seq_name||' from syspublic.dual';--
execute immediate t_sqlstr;--
/*异常怎么处理*/ return(0);--
end
...全文
请发表友善的回复…
发表回复
smallMage 2013-08-06
- 打赏
- 举报
create or replace procedure batch_his( v_sett_date varchar2 ) is
CNT_ERROR exception;
v_cnt integer;
begin
select count(*) into v_cnt from his_trans where settle_date=v_sett_date;
if v_cnt < 1 then
raise CNT_ERROR;
end if;
insert into batch_save
select sysdate, t.* from his_trans t
where t.settle_date=v_sett_date;
delete from his_trans where settle_date=v_sett_date;
commit;
exception
when CNT_ERROR then
raise_application_error( -1, 'his_trans表里无该日的数据' );
when OTHERS then
rollback;
RAISE;end batch_hist;
迁移到DB2下，异常怎么改写
