livebos---动态方案使用存储过程

var ret = LB_sqlProcedure('call test_pro(?,:ids,:out_return)',[$PARAM0]);
var out_return=ret.get('out_return');

var uid=ret.get('ids');

"',"+uid+",' "+" like '%,'||ID||',%' "

 

 

 

 create or replace procedure test_pro(userid in number,ids out varchar2,out_return out varchar2)--用户id，返回用户集合，返回信息
is
   errorException exception; --申明异常
   errorCode number; --异常代号
   errorMsg varchar2(1000); --异常信息
   flag varchar2(10);
begin
     flag := 'true';
     out_return := 'flag=' || flag || ',errorCode=' || errorCode || ',errorMsg=' || errorMsg;
    
      ---判断用户是否传入是空值
      IF userid is null THEN
          -- sqlstring := 'INSERT INTO tSEQUENCE(name,id,RANGE_NO) SELECT '''||tablename||''',nvl(max(id),0)+1 , 0 FROM '||tablename;
          -- Execute Immediate sqlstring;
          raise errorException;
      END IF;
     select id into ids from tuser where userid='lvchunli';

    exception  --异常捕捉，不要把有需要的代码放在异常捕捉后面，有异常才会执行异常代码下所有代码，没有异常不会执行
    when errorException then
      errorCode := '-99000001';
      errorMsg := '用户ID是空值!';
      flag := 'false';
      out_return := 'flag=' || flag || ',errorCode=' || errorCode || ',errorMsg=' || errorMsg;
     when others then
       errorCode := SQLCODE;    
       errorMsg := SUBSTR(SQLERRM, 1, 200);
       flag := 'false';
       out_return := 'flag=' || flag || ',errorCode=' || errorCode || ',errorMsg=' || errorMsg;
     
     dbms_output.put_line(out_return);     
end;

 

转载于:https://www.cnblogs.com/luhanzhen/p/9510061.html