如何从FORM中调用REPORT程序?

发表于:2007-06-22来源:作者:点击数: 标签:
在菜单中调用REPORT程序(不传参数,传参数可用下面的程序段) Run_Product(REPORTS, '报表程序名.REP', SYNCHRONOUS, RUNTIME, FILESYSTEM, '', NULL); 在FORM中调用REPORT程序(可传参数) DECLARE pl_id ParamList; BEGIN pl_id := Get_Parameter_List('

   
在菜单中调用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;

原文转自:http://www.ltesting.net