create or replace procedure pl1(str in varchar2, num in number) as
begin
   htp.htmlOpen;
   htp.headOpen;
   htp.title('Parameters');
   htp.headClose;
   htp.bodyOpen;
   htp.line;
   htp.header(1,'Parameter Passing');
   htp.line;
   for i in 1..num loop
     htp.print(i || '. ' || str);
     htp.br;
   end loop;
   htp.line;
   htp.bodyClose;
   htp.htmlClose;
end;
/
show errors
