CREATE OR REPLACE procedure test16 is
-- Internal link
  l_blob blob;
  l_link number;
 begin
    plpdf.init; -- initialize, without parameters means: page orientation: portrait, unit: mm, default page format: A4 
    plpdf.NewPage; -- begin a new page, without parameters means: page orientation: default (portrait)
    l_link := plpdf.CrInternalLink; -- create internal link ID
	plpdf.SetPrintFont('Arial',null,12);
	plpdf.PrintCell(50,10,'Start point');
    plpdf.SetLinkDest(l_link); -- set link destination to the current position
	plpdf.NewPage; -- begin a new page, without parameters means: page orientation: default (portrait)
	plpdf.PutLink(50,50,50,10,l_link); -- set clikkable area
	plpdf.DrawRect(50,50,50,10,'D'); -- draw rectangle
    plpdf.SendDoc(l_blob); -- create content
	
	-- print
	-- plpdf_util.print_blob(l_blob);
    
	-- or store
	insert into STORE_BLOB (blob_file, created_date) values (l_blob, sysdate);
	commit;
 end;
/