[Home] [Help]
140: file_ext := '';
141: end if;
142:
143: file_name := 'fnd_gfm'||file_ext;
144: update fnd_lobs set fnd_lobs.expiration_date = sysdate + 0.5
145: where fnd_lobs.file_id = construct_download_url2.file_id;
146:
147: else
148: select instr(file_name,'.',-1) into ext_length
371: else
372: if (fnd_gfm.authenticate(confirm_upload.access_id)) then
373:
374: if (verify_file_type(file_name => confirm_upload.file_name) = 'Y') then
375: select fnd_lobs_s.nextval into fid from dual;
376:
377: fn := SUBSTR(confirm_upload.file_name, INSTR(confirm_upload.file_name,'/')+1);
378:
379: -- bug 3045375, added select to get length of BLOB.
740:
741: insert into fnd_lobs (file_id, file_name, file_content_type,
742: file_data, upload_date, expiration_date, program_name, program_tag,
743: language,oracle_charset,file_format)
744: values (fnd_lobs_s.nextval, file_name, ct,
745: EMPTY_BLOB(), sysdate, sysdate + 1, program_name, program_tag,
746: l_lang, fnd_gfm.iana_to_oracle(iana_cs), l_file_format)
747: returning file_id into fh.fid;
748:
766: begin
767: fh := open_file_handles(fd);
768: open_file_handles(fd) := null;
769:
770: update fnd_lobs set expiration_date = null where file_id = fh.fid;
771: commit;
772:
773: return fh.fid;
774: exception
1269: fnd_usr_rec fnd_user%ROWTYPE;
1270: fnd_lobs_rec fnd_lobs%ROWTYPE;
1271: begin
1272:
1273: SELECT fnd_lobs_s.nextval
1274: INTO fid_to
1275: FROM dual;
1276:
1277: SELECT file_id,
1405: raise G_EXC_ERROR;
1406: end if;
1407:
1408: if fid is null then
1409: select fnd_lobs_s.nextval into fid from dual;
1410: end if;
1411:
1412: if file_content_type is null then
1413: v_content_type := 'text/plain';