set verify off
set linesize 72
set pagesize 9999
set feedback off

/*
variable owner varchar2(30)
variable tname varchar2(30)
begin
  :owner := USER;
  :tname := upper('&TABLE_NAME?');
end;


--Prompt Datatypes for Table &1
*/      
column data_type format a20
column column_name heading "Column Name"
column data_type heading "Data|Type"
column data_length heading "Data|Length"
column nullable heading "Nullable"

select column_name,

data_type,
substr(
decode( data_type, 'NUMBER',

  decode( data_precision, NULL, NULL,
'('||data_precision||','||data_scale||')' ),
data_length),
1,11) data_length,
decode( nullable, 'Y', 'null', 'not null' ) nullable

from all_tab_columns
where owner = &OWNER

and table_name = &tname

order by column_id
/

Hosted by www.Geocities.ws

1