SQL>
SQL> CREATE OR REPLACE PROCEDURE list_tables IS
2 CURSOR cur_tables IS
3 SELECT table_name
4 FROM user_tables
5 ORDER BY table_name;
6 BEGIN
7 HTP.PRINT('');
8 HTP.PRINT('');
9 HTP.PRINT('Display a List Tables ');
11 HTP.PRINT('');
12 HTP.PRINT('');
13 HTP.PRINT('');
14 FOR cur_tables_rec IN cur_tables LOOP
15 HTP.PRINT('- ' || cur_tables_rec.table_name);
16 END LOOP;
17 HTP.PRINT('
');
18 HTP.PRINT('');
19 HTP.PRINT('');
20 END list_tables;
21 /
Procedure created.
SQL>