Declare
Type C0_Typ Is Ref Cursor;
C0 C0_Typ;
C Number;
Begin
For T In (Select Table_Name From User_Tables)
Loop
Open C0 For 'Select Count(*) Cnt From '||T.Table_Name;
Loop
Fetch C0 Into C;
Exit When C0%Notfound;
Dbms_Output.Put_Line(T.Table_Name||' = '||C);
End Loop;
End Loop;
End;
/
----------------------------------------------------------------------------
The person who says it can't be done should not interrupt the person doing it. -- Chinese proverb
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.