免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
› 论坛 › 操作系统 › AS400 › 急需帮助 RPGLE中定义双字节空格常量
最近访问板块 发新帖
查看: 2614 | 回复: 8
打印 上一主题 下一主题

急需帮助 RPGLE中定义双字节空格常量 [复制链接]

4321258sun

论坛徽章:
0
跳转到指定楼层
1楼 [收藏(0)] [报告]
发表于 2009-11-13 10:09 |只看该作者 |倒序浏览
我想在RPGLE中定义双字节空格常量怎么做呀   向高手求助
ux400

论坛徽章:
0
2楼 [报告]
发表于 2009-11-13 11:17 |只看该作者
用
EVAL  A1='　'
或者
EVAL  A2=x'0e40400F'
行不？
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
giggsone

论坛徽章:
0
3楼 [报告]
发表于 2009-11-13 11:26 |只看该作者
DW#A              S              4    INZ(' 　 ')
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
4321258sun

论坛徽章:
0
4楼 [报告]
发表于 2009-11-13 11:27 |只看该作者
我需要的是32位长的双字节常量
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
giggsone

论坛徽章:
0
5楼 [报告]
发表于 2009-11-13 11:36 |只看该作者
0001.00      DW#A              S             32    DIM(1) CTDATA               
0002.00      C     W#A(1)        DSPLY                                          
0003.00      C                   SETON                                        LR
0004.00      C                   RETURN                                         
0005.00 **                                                                     
0006.00  　　　　　　　　　　　　　　　
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
giggsone

论坛徽章:
0
6楼 [报告]
发表于 2009-11-13 11:37 |只看该作者
第6行打15个全角空格
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
4321258sun

论坛徽章:
0
7楼 [报告]
发表于 2009-11-13 11:55 |只看该作者
没看太懂，不好意思  我现在画面有一个32位长的J型变量，需要判断它是否为空怎么做呀
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
giggsone

论坛徽章:
0
8楼 [报告]
发表于 2009-11-13 14:36 |只看该作者
用XLATE先把这个32J的变量转换成半角的，再判断是不是*BLANK

这个里的值长度都是32
W#A:W#B    XLATE     W#C        W#D
W#A的值是15个全角的空格
W#B是*BLANK
W#C是画面上的值
W#D是转换后的值
判断W#D是不是*BLANK就行了
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
4321258sun

论坛徽章:
0
9楼 [报告]
发表于 2009-11-13 15:59 |只看该作者
OK  用你上面的方法就解决了
实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP