create or replace procedure TextWaterMark_test
  is
  l_blob_30 blob;
  l_blob_113 blob;
  l_color plpdf_toolkit.t_color;
begin
  select t.blob_file
    into l_blob_30
  from store_blob_tk t
  where t.filename = '00_ReadMe.pdf';
  
  dbms_lob.createtemporary(l_blob_113,TRUE);
  
  -- Yellow_green 154,205,50
  l_color.r := 154;
  l_color.g := 205;
  l_color.b := 50;
  
  l_blob_113 := plpdf_toolkit.TextWaterMark(
    p_inputfile => l_blob_30,
    p_message => 'PLPDF Text wm',
    p_x => -1,
    p_y => -1,
    p_font => plpdf_toolkit.helvetica_bold,
    p_fontSize => 40,
    p_color => l_color
    );

  delete from store_blob_tk where id = 113;
  insert into store_blob_tk 
    (id,blob_file,filename,desctext) 
    values 
    (113,l_blob_113,'TextWaterMark.pdf','id:30 TextWaterMark');
  commit;        
end;  
/