如何从Oracle的FORM中调用REPORT

来源：互联网发布：中科大网络教育还在吗编辑：程序博客网时间：2024/05/21 11:02

在菜单中调用REPORT程序（不传参数，传参数可用下面的程序段）

Run_Product(REPORTS, '报表程序名.REP', SYNCHRONOUS, RUNTIME, FILESYSTEM, '', NULL);

在FORM中调用REPORT程序（可传参数）

DECLARE

pl_id ParamList;

BEGIN

pl_id := Get_Parameter_List('参数列表名');

IF NOT Id_Null(pl_id) THEN

Destroy_Parameter_List( pl_id );

END IF;

pl_id := Create_Parameter_List('参数列表名');

Add_Parameter(pl_id,'REPORT参数名1',DATA_PARAMETER,':FORM项名1');

Add_Parameter(pl_id,'REPORT参数名2',TEXT_PARAMETER,':FORM项名2');

… …

Run_Product(REPORTS, '报表程序名.REP', SYNCHRONOUS, RUNTIME, FILESYSTEM, pl_id, NULL);

END;

在报表中使用参数作为帮定变量时在其前面加一个冒号(:),如：有一个参数p_deptno，传来的值为10，则select * form emp where deptno=:p_deptno将返回表emp中deptno为10的记录。

在报表中使用参数作为词汇参数时在起前面加一个“与”符号(&),如：有一个参数p_where，传来的值为where deptno=10,则select * from emp &p_where也将返回表emp中deptno为10的记录。

在调用REPORT时，去掉report server：
Add_parameter(pl_id,'ORACLE_SHUTDOWN',TEXT_PARAMETER,'YES');

调用REPORT时，使报表结果直接输出到打印机上：
Add_parameter(pl_id,'PSRAMETER_FORM',TEXT_PARAMETER,'NO');

调用REPORT时，不弹出参数窗口：
add_parameter(pl_id,'PARAMFORM',TEXT_PARAMETER,'NO');

调用REPORT时，以满屏方式显示：
add_parameter(pl_id, 'maximize', TEXT_PARAMETER,'yes');