REM **********************************************************
REM * @c:\oracle\sql\rows2blk.sql                            *
REM *                                                        *
REM * Owner: R.Kupcunas                                      *
REM * Date:  01-MAY-95                                       *
REM *                                                        *
REM * Script: rowblock                                       *
REM * Show how many rows-per-block are actually being stored * 
REM *                                                        *
REM **********************************************************

spool rows2blk.rslt;

select substr(rowid,1,8),
       count(*) 
  from &NAME_OF_TABLE
  group by substr(rowid,1,8);

spool off;
undefine NAME_OF_TABLE;
commit;