-- ************************************************************** -- *** Feel free to use this SQL-code, but please *** -- *** do not remove these copyright lines. *** -- *** (C) Roger Felix - Lund - Sweden *** -- *** [roger_felix@hotmail.com, web_master@work.utfors.se] *** -- *** URL: http://hem.fyristorg.com/publish/index.html *** -- ************************************************************** set echo off; set feedback off; clear columns clear breaks set linesize 900 set termout on set feedback off set head off set verify off set pagesize 0 set recsep off set time off set timing off set heading off; set recsepchar ' '; set verify off; set headsep off; set trimspool on; set arraysize 1; COLUMN T NEW_VALUE TB SELECT '&TABLE_NAME' T FROM DUAL; DEFINE TAB = &TB select 'insert into &TAB (' from dual; select ' '||COLUMN_NAME from user_tab_columns where table_name = upper('&TAB') and column_id = 1 order by column_id; select ' ,'||COLUMN_NAME from user_tab_columns where table_name = upper('&TAB') and column_id != 1 order by column_id; select ') values (' from dual; select ' '||COLUMN_NAME from user_tab_columns where table_name = upper('&TAB') and column_id = 1 order by column_id; select ' ,'||COLUMN_NAME from user_tab_columns where table_name = upper('&TAB') and column_id != 1 order by column_id; select ');' from dual; set heading on; set feedback on; set recsep wrap; set verify on; set echo on;