电子地图中接受字符的数字字段 [英] Numeric field accepting characters in cics map
本文介绍了电子地图中接受字符的数字字段的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
如果ROLLNUM不是NUMERIC
移动DFHRED TO ROLLNUMC
MOVE'无效数据'恢复
移动ROLLNUMI到ROLLNUMO
执行发送映射THRU发送映射退出
执行密钥验证THRY密钥验证退出。
但是,从Cics将数据库中插入像A12AK这样的值,我没有遇到任何错误。它正在用1替换A,B和2等等...
为什么会发生这种情况?并且如何避免这个
解决方案
将ATTRB =(UNPROT,NUM,FSET,IC)添加到BMS地图集的DFHMDF字段对于数字字段。
您还需要JUSTIFY =(RIGHT,ZERO)。
I have 4 fields in my map which are 9(6),9(3),9(3),9(3). I wrote validation code like this:
IF ROLLNUM IS NOT NUMERIC
MOVE DFHRED TO ROLLNUMC
MOVE 'INVALID DATA' TO RESMSGO
MOVE ROLLNUMI TO ROLLNUMO
PERFORM SEND-MAP THRU SEND-MAP-EXIT
PERFORM KEY-VALIDATION THRU KEY-VALIDATION-EXIT.
But I am not getting any kind of error while inserting the values like A12AK into the database from cics. It is replacing A with 1, B with 2, and so on... Why is this happening? And how to avoid this
解决方案
Add ATTRB=(UNPROT,NUM,FSET,IC) to the DFHMDF fields of the BMS mapset for the numeric fields.
You'll also need JUSTIFY=(RIGHT,ZERO).
这篇关于电子地图中接受字符的数字字段的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文