自制程序打印往来账目
来源:百度文库 编辑:神马文学网 时间:2024/10/02 16:13:21
自制程序打印往来账目
首先在用友软件将往来科目账的数据导出为DBF数据文件。然后在ODBC中通过如下代码将DBF数据文件进行连接。最后在PB环境中,对DBF文件建立数据窗口。
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=wanglai;UID=;PWD='"
connect using sqlca;
在用友财务软件中导出的数据包括往来账中总账及明细科目账中的所有数据,而打印到账簿只打印明细科目数据,故对此数据要按明细科目代码进行筛选,在数据窗口中的doubleclicked事件的代码如下:
string ls_id
ll_insertrow=0
if ll_row〈〉0 then
dw_1.selectrow(0,false)
dw_1.selectrow(ll_row,true)
dw_1.scrolltorow(ll_row)
ls_id=trim(dw_1.getitemstring( ll_row,'科目编码'))
dw_1.setfilter('科目编码="'+ls_id+'"')
dw_1.filter()
end if
手工账簿的格式是有统一标准的,所以适应此格式非常重要,况且对于账簿打印的格式及距离有着非常精确的设置,用文件paperset.ini对账簿的纸张大小、边距、行高、开始行数等通过下列一系列代码进行格式设置。
dw_1.Modify("DataWindow.Trailer.1.Height="+string(ll_tzkd))
dw_1.modify("datawindow.print.preview.rulers=yes")
dw_1.modify("datawindow.print.orientation=1")
dw_1.modify("datawindow.print.orientation=2")
dw_1.modify("datawindow.print.Margin.Left=10")
打印界面的最终效果 不能直接使用“dw_1.printer()”进行打印,因往来账簿每一页有固定的行数,并且正反两面的账簿格式是不同的,所以系统中使用函数“paperset()”对正反两面账簿的打印格式及字体进行分别设置。
通过此设计思路,在其他任何一款财务软件上都可实现往来账簿的计算机打印功能。
以上代码可以在http://www.shudoo.com/bzsoft中下载。
往来账手工账簿是企业必需的,对于往来账特别多的企业,逐笔登记手工账簿是一件特别费时费力的工作。为了打印的账簿更准确、整洁、标准,笔者根据自己多年的计算机与财务工作经验,特将PB与用友财务软件相结合,就打印往来账簿的一些心得与大家分享。
首先在用友软件将往来科目账的数据导出为DBF数据文件。然后在ODBC中通过如下代码将DBF数据文件进行连接。最后在PB环境中,对DBF文件建立数据窗口。
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=wanglai;UID=;PWD='"
connect using sqlca;
在用友财务软件中导出的数据包括往来账中总账及明细科目账中的所有数据,而打印到账簿只打印明细科目数据,故对此数据要按明细科目代码进行筛选,在数据窗口中的doubleclicked事件的代码如下:
string ls_id
ll_insertrow=0
if ll_row〈〉0 then
dw_1.selectrow(0,false)
dw_1.selectrow(ll_row,true)
dw_1.scrolltorow(ll_row)
ls_id=trim(dw_1.getitemstring( ll_row,'科目编码'))
dw_1.setfilter('科目编码="'+ls_id+'"')
dw_1.filter()
end if
手工账簿的格式是有统一标准的,所以适应此格式非常重要,况且对于账簿打印的格式及距离有着非常精确的设置,用文件paperset.ini对账簿的纸张大小、边距、行高、开始行数等通过下列一系列代码进行格式设置。
dw_1.Modify("DataWindow.Trailer.1.Height="+string(ll_tzkd))
dw_1.modify("datawindow.print.preview.rulers=yes")
dw_1.modify("datawindow.print.orientation=1")
dw_1.modify("datawindow.print.orientation=2")
dw_1.modify("datawindow.print.Margin.Left=10")
打印界面的最终效果 不能直接使用“dw_1.printer()”进行打印,因往来账簿每一页有固定的行数,并且正反两面的账簿格式是不同的,所以系统中使用函数“paperset()”对正反两面账簿的打印格式及字体进行分别设置。
通过此设计思路,在其他任何一款财务软件上都可实现往来账簿的计算机打印功能。
以上代码可以在http://www.shudoo.com/bzsoft中下载。
自制程序打印往来账目
打印服务清理程序
自制摄像头监控程序
抛弃打印机 用虚拟打印自制电子读物
账目分析
往来款项
内部往来
往来帐户
30秒自制简单程序,和任意QQ号码聊天!!!
"30秒自制简单程序,和任意QQ号码聊天"
30秒自制简单程序,和任意QQ号码聊天
10秒钟自制出小程序 与任意
教你自制XP系统下的垃圾清理程序!
教你自制XP系统下的垃圾清理程序!
30秒自制简单程序,和任意QQ号码聊天
自制出小程序与任意QQ号聊天
自制XP系统下的垃圾清理程序!
好野介绍~自制清理C盘程序
Excel 超级打印高手请进来指导 - ExcelVBA程序开发 - Excel Home...
会计账目用语
财务账目上
会计账目用语1
外贸邮件往来模版
往来账户问题