create or replace procedure JPGWaterMark_test
  is
  l_blob_30 blob;
  l_blob_50 blob;
  l_blob_108 blob;
begin
  select t.blob_file
    into l_blob_30
  from store_blob_tk t
  where t.filename = '00_ReadMe.pdf';
  
  select t.blob_file
    into l_blob_50
  from store_blob_tk t
  where t.filename = 'image1.jpg';

  dbms_lob.createtemporary(l_blob_108,TRUE);
  
  l_blob_108 := plpdf_toolkit.JPGWaterMark(
    p_inputfile => l_blob_30,
    p_imagefile => l_blob_50,
    p_x => -1,
    p_y => -1,
    p_width => 200,
    p_height => 200
    );
    
  delete from store_blob_tk where id = 108;
  insert into store_blob_tk 
    (id,blob_file,filename,desctext) 
    values 
    (108,l_blob_108,'JPGWaterMark.pdf','id:30 + id:50 JPGWaterMark');
  commit;      
end;  
/