Oracle Report中加入下载超链接操作方法

196 阅读 0 评论 130 点赞

我是靠谱客的博主标致书本，最近开发中收集的这篇文章主要介绍Oracle Report中加入下载超链接操作方法，觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

1、在报表页面布局相应的位置加入文本框，一般为Download
右键用PL/SQL编辑器编写成超链接，加入以下内容：

复制代码代码如下:

 
function B_13FormatTrigger return boolean is 
begin 
IF upper(:P_ACTION) != 'DOWNLOAD' THEN 
return (FALSE); 
ELSE 
srw.set_hyperlink(EXP_FILE.linkto); 
return (TRUE); 
END IF; 
end; 

2、建立程序单元EXP_FILE和EXP_FILE，加入link_to函数，内容如下：

复制代码代码如下:

 
FUNCTION linkto RETURN VARCHAR2 
IS 
BEGIN 
RETURN (:P_URL||filename); 
END linkto; 

3、编写触发器BEFORE_REPORT，把要下载内容追加到下载页面中，内容如下：

复制代码代码如下:

 
function BeforeReport return boolean is 
begin 
If upper(:P_ACTION) = 'DOWNLOAD' then 
:P_SESSION := USERENV('SESSIONID'); 
:P_TEST := EXP_FILE.make('Vendor_Item_Reference_Enquiry_'||to_char(sysdate,'yyyymmddhh24miss'),:P_USERID,'csv',false); 
EXP_FILE.append('|'||'|'||'|'||'|'||'Vendor Item Reference Enquiry'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'); 
EXP_FILE.append('|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'); 
EXP_FILE.append('Selection criteria'||'|'||'CCN:'||'|'||:P_CCN||'|'||'|'||'Mas Loc:'||'|'||:P_MASLOC||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'); 
EXP_FILE.append('|'||'Division:'||'|'||:P_FR_DIV||'|'||'|'||'To:'||'|'||:P_TO_DIV||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'); 
EXP_FILE.append('|'||'|'||'Vendor:'||'|'||:P_FR_VENDOR||'|'||'|'||'To:'||'|'||:P_TO_VENDOR||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'); 
EXP_FILE.append('|'||'|'||'Item:'||'|'||:P_FR_ITEM||'|'||'|'||'To:'||'|'||:P_TO_ITEM||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'||'|'); 
EXP_FILE.append('Dept*'|| '|' ||'Vendor'||'|'||'Pur Loc '||'|'||'Item'||'|'||'Make'||'|'||'Description'||'|'||'Env. Std.'||'|'||'Env. Status '); 
return(true); 
else 
return(true); 
end if; 
end; 