2014版门诊发票明细项目打印方法的改进

2015-04-21王晓虹王志文

实用医药杂志 2015年3期

王晓虹，王志文

今年全军卫生医疗单位更换了2014版医疗收费票据，其中门诊收费票据统一使用了“34号票据”，提供门诊收费明细，满足社会医疗保险对门诊收费明细的要求［1］。但这种发票，由于票面尺寸限制，最多只能打印18个项目，超过部分不打印，仅显示“空间不足，明细可能未打完”标志。笔者在门诊收费工作中发现，约有10%的患者门诊收费项目会超过18项，造成明细项目打印不全，还需另打收费明细。这给挂号、收费一体化收费窗的工作造成了很大麻烦，工作效率也明显下降。

1 解决思路

1.1 压缩明细项目行距 “34号票据”的字形已经很小，在不改变其尺寸的基础上，通过压缩明细项目行距可以在项目打印区末增加一行即2条打印项目。

1.2 利用发票底部空白 “34号票据”底部空白部分较大，约占项目打印区的三分之二。当门诊收费项目超过20个的时候，可利用此空间续打项目明细［2］。经综合考虑按上述压缩后的明细行距，可增加5行2列即10条打印项目。

这样整个发票可增加打印项目12个，共可打印30个明细项，增幅达67%。基本满足了需要。

2 实现方法

2.1 用powerbuilder 9.0打开“门诊收费”文件夹“obilling”中的usrpbl.pbl文件此文件是“军卫一号”信息系统开放的门诊收费打印源代码程序，用户可根据需要，灵活选用门诊发票格式或自定义门诊收据格式［3］。修改 d＿outp＿rcpt＿2014＿32数据窗口对象［4］。

2.1.1 改行距将明细区的9行打印项目之间的行距改为0，然后将首行第 2列的打印项目（t＿itemname10，t＿itemamount10，t＿itemcosts10，t＿itemcharge10）拖到末行下面新整理出的空白处并与第9行零距离摆放并对齐，成为第10行。将第2列余下的打印项目整体上移至与第1列对齐，然后在其末端空位上增加2行打印项目文本框。

2.1.2 扩展票据底部空白区打印项目将上述修改后的打印项目复制5行至票据底部空白区适当位置。

2.1.3 增加2个文本框一个在operator文本框前，相当于发票的“收款单位（盖章）”与“收款人（签章）”之间t＿1.text。另一个在底部新扩展的票据打印项目区右下方t＿6.text。

2.2 修改相关函数 ①修改n＿rcpt对象中的of＿prt＿outp＿rcpt＿2012＿32函数［5］将语句int bill＿items＿count＝18改为：30；②在 lds＿rcpt.DataObject＝＂d＿outp＿rcpt＿2014＿32＂后增加以下语句完成收费项目超过20时显示明细续打，超过30时，显示空间不足，明细未打完。