PLSQL:打印序号脚本

declare cursor c_seq is 
 -- 查询 序列号清单 
  SELECT dseq.sequence_owner,
   sequence_name, min_value, max_value, increment_by, cycle_flag, order_flag, cache_size, last_number
   FROM SYS.DBA_SEQUENCES DSEQ
 WHERE DSEQ.SEQUENCE_OWNER ='INFODBA'
  AND SEQUENCE_NAME ='SEQ_EVBLMIQ3FJCYVHWR_TIF'
 order by dseq.sequence_name ;
begin
   for r1 in c_seq loop
     dbms_output.put_line('create sequence '|| R1.sequence_owner ||'."'|| R1.sequence_name ||'"');
     dbms_output.put_line(' minvalue ' || R1.min_value);
     dbms_output.put_line(' maxvalue ' || R1.max_value);
     dbms_output.put_line(' start with ' || R1.last_number);
     dbms_output.put_line(' increment by '|| R1.increment_by );
     
     if r1.cycle_flag ='N'  THEN
        dbms_output.put_line(' nocycle ');
     ELSE dbms_output.put_line(' cycle ');
     END IF;
     dbms_output.put_line(' cache ' || R1.cache_size || ' ; ');
    -- dbms_output.put_line(';');
    -- dbms_output.put_line('');
   
   end loop;
end;