BEGIN
-
htp.htitle('Query Results');
-
htp.ulistOpen;
-
OPEN person_cur(name); -- open the cursor
-
LOOP; -- Fetch each row matching the query into variables repeatedly
-
FETCH person_cur INTO lname,fname,phone,ptype;
-
EXIT WHEN person_cur%NOTFOUND; -- check end of result buffer
|
|
/* print out the query result */
|
|
htp.p(htp.item||'The ' || ptype ||' phone no. of ' || fname || ' '
|
|
|| lname || ': ' || phone);
|
|
END LOOP;
|
|
CLOSE person_cur; -- close the cursor after it is done
|
|
htp.ulistClose;
|
|
END get_person_by_name;
|
|
END EXAMPLE;
|
