免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
论坛 操作系统 AS400 请教
最近访问板块 发新帖
查看: 1094 | 回复: 1
打印 上一主题 下一主题

请教 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2004-08-03 17:11 |只看该作者 |倒序浏览
DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
*************** Beginning of data *************************************
D AvlCost         S              7  2 INZ(12500.00)                     
D AvlPrice        S              9  2 INZ(250000.00)                    
D EditAmount      S             50                                      
D EditWd          C                   ' , , **Dollars& &Cents'         
                                                                        
C                   Eval   EditAmount='Inventory cost is'               
C                                      +%editc(AvlCost:'K':*cursym)     
  ** EditAmout='Inventory cost is $12,500.00'                           
C                   Eval   EditAmount='Inventory price is'              
C                                     +%editw(AvlPrice:EditWd)         
  **EditAmount='Inventory price is **250,000*Dollars 00 Cents'           
请问%editc(AvlCost:'K':*cursym)  中k是代表什么意思呢?
  **EditAmount='Inventory price is **250,000*Dollars 00 Cents'      为什么会是这样的结果呢?

论坛徽章:
0
2 [报告]
发表于 2004-08-03 22:04 |只看该作者

请教

C Eval EditAmount='Inventory price is'
C +%editw(AvlPrice:EditWd)
就是按EditWd定义好的格式显示啊
EditWd C ' , , **Dollars& &Cents'

两个& &分别是整数与小数据部分,
**前面不足以'*'显示而不是空格,
,是分隔符;
不知对不对,很久没用了!!
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP