| 本月文章推荐 |
实现类GRID报表功能的程序包发表日期：2008-2-9
|
|
1 前言 相信使用OracleDeveloper设计系统的同仁，都有一个愿望，就是实现类似于GRID OracleDeveloper自身并不支持实现该功能的任何方法，之前考虑过用JavaBean来实现，由于时间关系，加上对Java开发环境不熟悉，此愿望一直没有实现。 前几天在莫兄的SLK文章指引下，编制了SLK文件生成的程序包，又经过数天的编码，终于实现通过前台参数配置<可以是数据块、SQL语句、数据表名、视图名 designtimesp=13499>，生成SLK文件，并在IE中显示。用户可以另存该文件或打印该文件。 2 说明 2.1 调用接口<由于程序包不是类，无法通过Public与Private开放或屏蔽内部函数，所以将调用函数列出，以方便同仁们使用 designtimesp=13504> --以XLS报表方式输出查询结果，使用数据块语句方式，使用轮询方式，速度可能较慢 Procedure SP_RuntimeReport (P_BlockName In VarChar2 --查询的数据块名称 ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_FieldTitleList In VarChar2 --要查询的字段名称，以“，’分隔 ,P_SlkFileName In VarChar2 --要生成的SLK文件名 ,P_ServerName In VarChar2 --OC4J服务器名 ,P_ServerPort In Varchar2 --OC4J端口号 ,P_VirualPath In VarChar2 --存盘SLK文件的WEB虚拟路径名 ); --以XLS报表方式输出查询结果，使用查询语句方式 Procedure SP_RunTimeReport (P_SqlStr In Varchar2 --查询语句 ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_FieldName In VarChar2 --查询结果的标题，应与查询语句对应，以“，”分隔 ,P_FieldType In Varchar2 --查询结果的字段类型，以“，”分隔 ,P_FieldWidth In VarChar2 --标题宽度，应与查询语句对应，以“，”分隔 ,P_SlkFileName In VarChar2 --要生成的SLK文件名 ,P_ServerName In VarChar2 --OC4J服务器名 ,P_ServerPort In Varchar2 --OC4J端口号 ,P_VirualPath In VarChar2 --存盘SLK文件的WEB虚拟路径名 ); --以XLS报表方式输出查询结果，使用数据源语句方式 Procedure SP_RuntimeReport (P_DataSourceName In VarChar2 --查询的数据源名称<可以是视图或数据表 designtimesp=13530> ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_FieldName In VarChar2 --查询结果的标题，应与查询语句对应，以“，”分隔 ,P_FieldWidth In VarChar2 --标题宽度，应与查询语句对应，以“，”分隔 ,P_WhereStr In VarChar2 --查询条件 ,P_OrderBy In VarChar2 --排序 ,P_SlkFileName In VarChar2 --要生成的SLK文件名 ,P_ServerName In VarChar2 --OC4J服务器名 ,P_ServerPort In Varchar2 --OC4J端口号 ,P_VirualPath In VarChar2 --存盘SLK文件的WEB虚拟路径名 ); 2.2 调用说明 调用参数分为两类 2.2.1 数据参数 需要传入的参数中，包括指定数据源名称、需要在报表中显示的字段以及相应中文名称、中文、宽度； 2.2.2 SLK文件调用参数 需要传入的参数中，包括调用SLK文件需要的WEB服务器名、端口与，以及虚拟路径名 2.3 待完善的功能 2.3.1 目前关于数据参数仍有较多的配置项，有些可能可以简化， 如宽度设定、中文名设定<在FORM中，我使用Get_item_Property不能获得数据项的LABEL.... designtimesp=13553>等等，由于时间关系，目前将未明确可以程序自动实现的功能，全部使用参数传递方式。 2.3.2 排版功能较弱，较为重要的排版功能目前没有，如：合并单元格、页面设置、分页符...等。可能需要对SLK参数进行进一步的了解，目前对SLK参数的理解是基于将Excel转存为SLK，再通过阅读SLK代码获得。 2.3.3 目前没有对正要生成的SLK文件是否存在冲突以及存盘的目录是否合法进行判定和处理。 ------------------------------------------------------------- 3 代码<考虑许多同仁没有安装DS9i，所以将源代码贴上，以方便大家 ------------------------------------------------------------- PACKAGE Fmp_System_RuntimeReport IS --以XLS报表方式输出查询结果，使用数据块语句方式，使用轮询方式，速度可能较慢 Procedure SP_RuntimeReport (P_BlockName In VarChar2 --查询的数据块名称 ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_FieldTitleList In VarChar2 --要查询的字段名称，以“，’分隔 ,P_SlkFileName In VarChar2 --要生成的SLK文件名 ,P_ServerName In VarChar2 --OC4J服务器名 ,P_ServerPort In Varchar2 --OC4J端口号 ,P_VirualPath In VarChar2 --存盘SLK文件的WEB虚拟路径名 ); --以XLS报表方式输出查询结果，使用查询语句方式 Procedure SP_RunTimeReport (P_SqlStr In Varchar2 --查询语句 ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_FieldName In VarChar2 --查询结果的标题，应与查询语句对应，以“，”分隔 ,P_FieldType In Varchar2 --查询结果的字段类型，以“，”分隔 ,P_FieldWidth In VarChar2 --标题宽度，应与查询语句对应，以“，”分隔 ,P_SlkFileName In VarChar2 --要生成的SLK文件名 ,P_ServerName In VarChar2 --OC4J服务器名 ,P_ServerPort In Varchar2 --OC4J端口号 ,P_VirualPath In VarChar2 --存盘SLK文件的WEB虚拟路径名 ); --以XLS报表方式输出查询结果，使用数据源语句方式 Procedure SP_RuntimeReport (P_DataSourceName In VarChar2 --查询的数据源名称<可以是视图或数据表 designtimesp=13585> ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_FieldName In VarChar2 --查询结果的标题，应与查询语句对应，以“，”分隔 ,P_FieldWidth In VarChar2 --标题宽度，应与查询语句对应，以“，”分隔 ,P_WhereStr In VarChar2 --查询条件 ,P_OrderBy In VarChar2 --排序 ,P_SlkFileName In VarChar2 --要生成的SLK文件名 ,P_ServerName In VarChar2 --OC4J服务器名 ,P_ServerPort In Varchar2 --OC4J端口号 ,P_VirualPath In VarChar2 --存盘SLK文件的WEB虚拟路径名 ); --创建报表标题，从前台FORM数据块创建 Procedure SP_CreateReportTitle (P_SlkFile In Text_Io.File_Type --SLK文件对象 ,P_BlockName In VarChar2 --查询的数据源名称<可以是视图或数据表 designtimesp=13600> ,P_FieldList In VarChar2 --要生成报表的字段列表 ,P_FieldTitleList In VarChar2 --要返回至报表的字段名称，以“，”分隔 ,P_FieldWidthType In Number --字段宽度设定方式，值表：0->不设定字段宽度；1->根据数据顶设定字段宽度 ); --创建报表标题，根据用户设定创建 Procedure SP_CreateReportTitle (P_SlkFile In Text_Io.File_Type --SLK文件对象 ,P_FieldNameList In VarChar2 --标题名 ,P_FieldWidthList In VarChar2 --标题宽度，应与查询语句对应，以“，”分隔 ); --创建报表标题，从后台数据库对象创建 Procedure SP_CreateReportTitle (P_SlkFile In Text_Io.File_Type --SLK文件对象 ,P_DataSourceName In VarChar2 --数据源名 ,P_FieldWidthType In Number --字段宽度设定方式，值表：0->不设定字段宽度；1->根据数据源设定字段宽度； ); --将数据导入至SLK Procedure SP_ImportDataToSlk (P_SlkFile In Out Text_Io.File_Type --Slk文件对象 ,P_GetTypeObject In VarChar2 --查询字段类型标识，若数据源是BLOCK->数据块名；若数据源是SQL->字段类型列表；若数据源是数据库对象->数据库对象名 ,P_GroupName In Varchar2 --记录组名称 ,P_FieldList In VarChar2 --要查询的字段，以“，’分隔 ,P_DataSourceType In Varchar2:='Block' --查询方式，值表为：Block数据块； SQL查询语句；DBObject数据库对象 ); --获取字段类型 Function FN_GetFieldType (P_BlockName In VarChar2 --数据块名称 ,P_ItemName In Varchar2 --数据项名称 ) Return VarChar2; --返回字段类型，一般为“CHAR”字符型；“NUMBER”数值型；“DATE”日期型 --获取字段类型 Function FN_GetFieldType (P_DataSourceName In VarChar2 --数据库对象名称，可以是视图也可以是数据表 ,P_FieldName In Varchar2 --字段名称 ,P_DataSourceType In VarChar2 --数据库对象类型，值表为：“VIEW”或“TABLE” ) Return VarChar2; --返回字段类型，一般为“CHAR”字符型；“NUMBER”数值型；“DATE”日期型 ------------------------------------- --设置创建SLK文件-------------------- ------------------------------------- Procedure SP_CreateSlkFile (P_SlkFile In Out Text_Io.File_Type --SLK文件对象 ,P_FileName In VarChar2 --要创建的文件名 |
| 上一篇：浅谈Oracle 10G中的新事物：闪回恢复区
人气:553 下一篇：nvarchar和varchar的转换问题 人气:788 |
| 浏览全部Oracle教程的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
