ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 113

113

原创 Linux操作系统 作者:simkyo 时间:2013-08-29 13:52:02 0 删除 编辑
create or replace procedure substring_array(name varchar2,
                                            ny   varchar2,
                                            str  in varchar2) as
  type array_str is table of varchar2(100) index by binary_integer;
  myarray array_str;
  v_str   varchar2(4000) default str;
begin
  for i in 0 .. length(str) - length(replace(str, ',', '')) + 1 loop
      if instr(v_str, ',') = 0 then
      myarray(i + 1) := v_str;
    else
      myarray(i + 1) := substr(v_str, 0, instr(v_str, ',') - 1);
    end if;
    v_str := substr(v_str, instr(v_str, ',') + 1);
  end loop;
  for i in 0 .. length(str) - length(replace(str, ',', '')) loop
    dbms_output.put_line(name || '   ' || ny || '   ' || myarray(i + 1));
  end loop;
end substring_array;
-- 用户不锁定
alter user scott account unlock;
ALTER PROFILE DEFAULT LIMIT FAILED_LOGIN_ATTEMPTS UNLIMITED;
show parameter FAILED_LOGIN_ATTEMPTS ;

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/12961536/viewspace-769591/,如需转载,请注明出处,否则将追究法律责任。

上一篇: 112
下一篇: 114
请登录后发表评论 登录
全部评论

注册时间:2013-06-20

  • 博文量
    193
  • 访问量
    137009