oracle-----procedure练习

create or replace procedure lsydisable as
begin
declare

  cursor mycursor is
    select table_name from USER_CONSTRAINTS;
    vtablename USER_CONSTRAINTS.table_name%TYPE;
begin
    open mycursor;
    LOOP
      fetch mycursor into vtablename;
      exit when mycursor%notfound;
      if mycursor%found then
       dbms_output.put_line(vtablename);
       end if;
    end LOOP;
    dbms_output.put_line('查询完毕！');
    close  mycursor;
end;
end lsydisable;