How to store pdf file to presentation or application server, as i mentioned

Question

hi,
I have used SO_NEW_DOCUMENT_ATT_SEND_API1 function module to send employ details through mail generating individual pdf files for each.but i need a copy of all files on to my computer also which has send through mail, what should i do?, can any one sugest me a function module or a sample code to achive this. Its urgent ,hope any one could help me in this

Answer 1

Thanks This really helped.
For other readers, I am summarising what I did.
create table test
id number primary key,
docs BLOB
create or replace directory doc_loc
as 'c:\test';
CREATE OR REPLACE PROCEDURE Load_BLOB_From_File (file_name in varchar2)
AS
src_loc bfile:= bfilename('DOC_LOC',Load_BLOB_From_File.file_name);
dest_loc BLOB;
begin
insert into tkctsf15t values(1,empty_blob()) returning docs
into dest_loc;
dbms_lob.open(src_loc,DBMS_LOB.LOB_READONLY);
DBMS_LOB.OPEN(dest_loc, DBMS_LOB.LOB_READWRITE);
DBMS_LOB.LOADFROMFILE(
dest_lob => dest_loc
,src_lob => src_loc
,amount => DBMS_LOB.getLength(src_loc));
DBMS_LOB.CLOSE(dest_loc);
DBMS_LOB.CLOSE(src_loc);
COMMIT;
end;
show errors;
exec Load_BLOB_From_File('test.pdf');
exec ctx_ddl.create_preference('mylex','BASIC_LEXER');
create index testx on test(docs) indextype is ctxsys.context
parameters
('filter ctxsys.AUTO_FILTER LEXER mylex ');
select id from test where contains(docs,'patch')>0;
Thanks Roger once more