SET VERIFY OFF;
SET LINESIZE 60
COLUMN TIPO FORMAT A25
COLUMN OBJETOS FORMAT 999999


SELECT OBJECT_TYPE TIPO,COUNT(*) OBJETOS
FROM DBA_OBJECTS
WHERE OWNER=upper('&1')
GROUP BY OBJECT_TYPE;

SET VERIFY ON;
SET LINESIZE 160