set pagesize 0;
set heading off;
set verify off;
set feedback off;
set linesize 256;
spool ascii_file.lis
select a.pdt_name,name,x,y,z,comments from
 format2s_a12 a, format2as_a12 b
 where a.pdt_name=b.pdt_name
/
spool off;
exit;

