诚求水晶报表如何准确打印发票（套打），大写金额如何分开套打，谢谢！

owen 2013-09-09 11:59:12

诚求水晶报表如何准确打印发票（套打），大写金额如何分开套打，谢谢！

...全文

4066 1 打赏收藏举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

熙风 2013-09-27

打赏
举报

回复

你把需要套打的模板扫描成图片，然后把图片放在报表中，设置图片不显示就行了

水晶报表下将数字转换成金额大写的公式版本一：这种金额大写忽略不同进度间的零的显示，显示效果如：二十万九百一元四角整(200901.40) CodeStringVarx;StringVarxx:="";NumberVarz;NumberVari;x:=ToText(Sum({@@AMOUNT}));x:=Replace(x,",","");...

Function (stringvar number)( stringvar str1 := "零壹贰叁肆伍陆柒捌玖"; //0-9所对应的汉字 stringvar str2 := "万仟佰拾亿仟佰拾万仟佰拾元角分"; //数字位所对应的汉字 stringvar str3 := ""; //从原num值中取出的值 stringvar str4 := "";

Dim x As String
Dim y As String
Dim zimu as String
Dim temp As String
Dim letter As String
Dim upcase As String
Dim i as Number
dim j as Number
zimu = ".sbqwsbqysbqwsbq" '定义位置代码
letter = "0123456789sbq

自定义一个变量如下： ( {@TotalWithTax} 是要显示成人民币大写金额的变量 ) ________________________________________________ Global StringVar Array PreDotUnit; Global StringVar Array ChineseDolla...

客户要求： 1，纸张用高1400mm,宽2400mm的压感纸 2，每行打印10条记录 3，每页进行金额统计 4，按照商品类别分类打印（换类换纸） 5，表头可以输入 1，这个问题和第二个问题是相关的。解决如下：在打印机中自定义满足条件的纸类型，但是发现宽不能超过216，于是设置高2400，宽1400的纸张，改变一下打印

4,818

社区成员

14,133

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章