pb报
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
制作powerbuilder报表制作教程pb报表编制教程步骤在通常的管理信息系统开发过程中,总是有没完没了的报表需要制作,调试报表花费的时间也是最多而且乏味,还常常不能满足客户的要求。如果能够让用户自己调整报表的格式和内容,然后将它保存下来,程序下次启动时若能自动调用保存了的报表格式那就方便多了。实现原理PowerBuilder中有一种以PSR为后缀的特殊的保存报表的文件格式(本文简称PSR文件),数据窗口可以直接读取PSR文件生成报表,而程序通过生成PSR文件,就可以实现动态报表格式的保存。首先,通过设置数据窗口对象(dataobject)中的文本、列等的Resizeable和moveable属性为1来实现对象位置的拖动控制,通过数据窗口的Modify
函数
excel方差函数excelsd函数已知函数 2 f x m x mx m 2 1 4 2拉格朗日函数pdf函数公式下载
实现对象值的更改(包括增加和删除)。其次要保存报表格式。在一个应用中,数据窗口对象的名称总是惟一的,将每一个数据窗口对象转化成PSR文件存于数据库表中。在窗口打开时,程序先校验报表格式是否存在。如果存在,将报表格式读出来放在一个临时文件当中,然后设置数据窗口(datawindow)的数据对象(dataobject)为这个报表文件,并提取数据;如果不存在,直接提取数据即可。实现过程1.建立一个数据库表用以保存报表格式文件,各个字段定义如下:2.建立一个窗口w_temp。定义实例变量如下:stringis_dwtype,is_dwobject//保存报表中对象的类型及名称3.在窗口的Open事件中加入如下代码,校验报表格式是否存在,如果存在,读取定义好的报表格式到数据窗口。blobemp_piclongll_handlestringls_dwobject,ls_reportfile,ls_pathls_dwobject=dw_print.dataobject//判断是否存在该数据窗口的报表格式selectcount(*)into:ll_countfromdyn_reportwheredwobject=:ls_dwobject;ifll_count>0then//读取报表格式文件到大文本变量selectblobmemointo:emp_picfromdyn_reportwheredwobject=:ls_dwobject;//创建PSR临时文件并保存到硬盘ls_reportfile=‘\temp7089.psr’ll_handle=FileOpen(is_reportfile,StreamMode!,write!,LockWrite!,Replace!)FileWrite(ll_handle,emp_pic)FileClose(ll_handle)dw_print.dataobject=ls_reportfiledw_print.settransobject(sqlca)elseDw_print.settransobject(sqlca)EndifDw_print.retrieve()4.保存报表格式,这可以通过Cb_savereport按钮的clicked事件实现。stringls_filenamelongll_countblobEmp_id_picls_filename=“temp70201.psr”//保存报表格式到硬盘临时文件dw_print.saveas(ls_filename,PSReport!,false)sqlca.autocommit=trueselectcount(*)into:ll_countfromdyn_reportwheredwobject=:is_dwobject;ifll_count=0theninsertintodyn_report(dwobject,rptitle)values(:is_dwobject,:ls_filename,:ls_path);endif//从硬盘临时文件读取数据保存到数据库表中emp_id_pic=of_readbmpfile(ls_filename)//该函数将二进制文件内容读到大文本对象中UPDATEBLOBdyn_reportSETmemo=:Emp_id_picwheredwobject=:is_dwobject;//更新数据库sqlca.autocommit=false5.动态报表的实现。通过数据窗口dw_print的clicked事件捕获数据窗口中的对象,并将对象名存放在实例变量is_dwobject中,为下一步修改报表做准备。stringls_type,ls_dwoname//得到对象类型和名称ls_type=trim(upper(dwo.type))ls_dwoname=trim(dwo.name)is_dwtype=ls_typechoosecasels_typecase“TEXT”,“CommandButton”,“GROUPBOX”is_dwobject=ls_dwoname//设置为可以拖动和改变大小this.modify(ls_dwoname“.Resizeable=‘”“1’”)this.modify(ls_dwoname“.moveable=”“1”)case“LINE”//直线对象不能通过设置Resizeable和moveable属性进行调整,必须通过其他途径is_dwobject=ls_dwonamecase“RECTANGLE”,“ELLIPSE”,“GRAPH”,“BITMAP”is_dwobject=ls_dwonamethis.modify(ls_dwoname“.Resizeable=‘”“1’”)this.modify(ls_dwoname“.moveable=‘”“1’”)case“COLUMN”,“COMPUTE”is_dwobject=ls_dwonamethis.modify(ls_dwoname“.Resizeable=‘”“1’”)this.modify(ls_dwoname“.moveable=‘”“1’”)endchoose最后再通过modify()函数就可以实现基本的动态报表操作,这一类的文章较多,PB中也有大量的例子可直接使用,在此不再赘述。6.在cb_exit按钮的clicked()事件中加入:close(parent)。7.在应用的open事件中加入:open(w_temp)。然后保存并运行,全部工作到此结束!本程序在PB7.0、Oracle8.05下调试通过。