列出指定表的所有字段

晚上时,师弟yangyu说他有一个表,里面有90多个字段,需要把所有字段都列出来,如果手动一个一个复制出来的话,太麻烦了,就写了个小脚本. 无 /* 列出指定表的所有字段, 使用时将 SYS_TABLE 换成具体表名即可[Oracle 10g下运行通过]*/declare cursor c is select a

晚上时,师弟yangyu说他有一个表,里面有90多个字段,需要把所有字段都列出来,如果手动一个一个复制出来的话,太麻烦了,就写了个小脚本.

<无>

/*
 列出指定表的所有字段, 使用时将 SYS_TABLE 换成具体表名即可[Oracle 10g下运行通过]
*/
declare
  cursor c is 
  select a.COLUMN_NAME||' ' from user_tab_columns a
  where a.TABLE_NAME = 'SYS_TABLE';
  
  col user_tab_columns.COLUMN_NAME%type;
  cols varchar2(4000);
begin
  open c;
  loop
    fetch c into col;
    exit when c%notfound;
    cols := cols || col;
  end loop;
  close c;
  
  dbms_output.put_line(cols);
end;