Oracle Forms 12c本地保存报表：替代Forms 6i run_product()方案问询

背景 #

在Forms 6i中，我们通过run_product()过程实现报表本地保存，示例代码如下：

pl_id := create_parameter_list('us00300p');
add_parameter(pl_id,'paramform',text_parameter,'no');
add_parameter(pl_id,'xiposl',text_parameter,sl_no); 
-- 其他参数设置
run_product(reports,filepath&filename,synchronous,runtime,filesystem,pl_id,null);

现在需要在Forms 12c中替换该逻辑，已编写部分代码如下：

select ora_12c,report_server,rep_str into m_12c,vc_reportserver,mrep_str from single_row;
if m_12c = 1 then
    v_report_id := find_report_object('rat');
    
    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_COMM_MODE,SYNCHRONOUS);
 
    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_DESTYPE,CACHE);
    
    SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESFORMAT,'pdf');

    SET_REPORT_OBJECT_PROPERTY(report_id,REPORT_SERVER,vc_reportserver);

    SET_REPORT_OBJECT_PROPERTY(report_id,report_filename,Filepath&FileName);
    
    v_ReportServerJob := run_report_object(report_id,pl_id);

    vjob_id := substr(ReportServerJob,instr(ReportServerJob,'_',-1)+1);

    vc_rep_status := REPORT_OBJECT_STATUS(ReportServerJob);
    
    IF  vc_rep_status = 'FINISHED' THEN
      -- WEB.SHOW_DOCUMENT (serverURL,Servername,Jobid,'_blank');
      -- 需要替换此处代码，实现无需打开浏览器即可将报表保存至本地系统

解决方案 #

在Forms 12c中，要实现无需浏览器直接将报表保存到本地，可通过以下两种方式实现：

方式1：使用WEB.DOWNLOAD_FILE API（推荐） #

当报表生成完成后，直接调用WEB.DOWNLOAD_FILE接口，将报表内容从服务器缓存下载到本地，无需打开浏览器。需要先构建报表的完整访问URL，然后传入该API：

IF vc_rep_status = 'FINISHED' THEN
    -- 构建报表的访问URL
    v_rep_url := 'http://' || vc_reportserver || '/reports/rwservlet/getjobid?jobid=' || vjob_id || '&server=' || vc_reportserver;
    
    -- 调用下载接口，指定保存的文件名
    WEB.DOWNLOAD_FILE(v_rep_url, FileName);
END IF;

方式2：修改报表输出目标为文件系统 #

如果需要先将报表保存到应用服务器指定路径，再下载到本地，可调整REPORT_DESTYPE参数为FILE，并设置目标路径：

-- 修改报表属性，直接输出到服务器文件系统
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESTYPE, FILE);
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESNAME, '/app/reports/output/' || FileName); -- 服务器端有效路径

-- 运行报表后，将服务器上的文件推送到本地
IF vc_rep_status = 'FINISHED' THEN
    -- 构建服务器文件的下载URL（需确保该路径已配置为Web可访问）
    v_file_url := 'http://your-app-server-domain/reports/output/' || FileName;
    WEB.DOWNLOAD_FILE(v_file_url, FileName);
END IF;

关键注意事项 #

• 确保Forms运行时环境已启用WEB包，且服务器端报表输出路径具备读写权限。
• WEB.DOWNLOAD_FILE会触发浏览器的下载弹窗，用户可直接选择本地保存路径，无需手动打开新页面。
• 若需完全静默保存（无用户交互），需依赖客户端插件或Java Bean实现，但受限于浏览器安全策略，不建议采用。

内容的提问来源于stack exchange，提问作者Veera mani