SQL>
SQL>
SQL> create table product(
2 product_id number(4) not null,
3 product_description varchar2(20) not null
4 );
Table created.
SQL>
SQL> insert into product values (1,'Java');
1 row created.
SQL> insert into product values (2,'Oracle');
1 row created.
SQL> insert into product values (3,'C#');
1 row created.
SQL> insert into product values (4,'Javascript');
1 row created.
SQL> insert into product values (5,'Python');
1 row created.
SQL>
SQL>
SQL> create table company(
2 product_id number(4) not null,
3 company_id NUMBER(8) not null,
4 company_short_name varchar2(30) not null,
5 company_long_name varchar2(60)
6 );
Table created.
SQL> insert into company values(1,1001,'A Inc.','Long Name A Inc.');
1 row created.
SQL> insert into company values(1,1002,'B Inc.','Long Name B Inc.');
1 row created.
SQL> insert into company values(1,1003,'C Inc.','Long Name C Inc.');
1 row created.
SQL> insert into company values(2,1004,'D Inc.','Long Name D Inc.');
1 row created.
SQL> insert into company values(2,1005,'E Inc.','Long Name E Inc.');
1 row created.
SQL> insert into company values(2,1006,'F Inc.','Long Name F Inc.');
1 row created.
SQL>
SQL>
SQL>
SQL> CREATE OR REPLACE PROCEDURE webProc
2 IS
3 BEGIN
4 htp.p('<HTML>');
5 htp.p('<HEAD>');
6 htp.p('<TITLE>Organization Records</TITLE>');
7 htp.p('</HEAD>');
8 htp.p('<BODY>');
9 htp.p('<H1>Organization Records</H1>');
10 htp.p('<TABLE BORDER="1 ">');
11 htp.p('<TR><TH>Hierarchy</TH><TH>Org Long Name</TH></TR>');
12 for idx in (select h.product_description,o.company_long_name
13 from company o,product h
14 where o.product_id =h.product_id
15 order by h.product_id )loop
16 htp.p('<TR>');
17 htp.p('<TD>'||idx.product_description||'</TD>');
18 htp.p('<TD>'||idx.company_long_name||'</TD>');
19 htp.p('</TR>');
20 end loop;
21 htp.p('</TABLE>');
22 htp.p('</BODY>');
23 htp.p('</HTML>');
24 end;
25 /
Procedure created.
SQL>
SQL> drop table company;
Table dropped.
SQL>
SQL> drop table product;
Table dropped.
SQL>