IBM大型机论坛索引
 
登录
 
IBM大型机论坛索引 大型机:搜索 IBM Mainframe论坛:常见问题解答 寄存器
 

十六进制值


IBM大型机论坛 -> COBOL程式设计
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
sandip_datta

活跃用户


已加入:2003年12月2日
帖子:150
地点:日本东京

发布发表:2003年12月5日星期五7:19上午
引用回复

字符值和十六进制值之间有什么区别。

我们有一个地址字段X(32)。它可能包含适当的值或一些垃圾,例如X'0000'。我们需要在“地址”字段中分离出那些具有垃圾值的记录。

您的帮助将不胜感激。

问候,
Sandip。
回到顶部
查看用户资料 发送私信
妻子

超级版主


加入:2003年5月30日
帖子:1592

发布发表:2003年12月8日星期一1:11 pm
引用回复

嗨桑迪普,

在环境分区的配置部分的特殊名称pgraph中检查CLASS子句。

您可以创建一个CLASS,其中包含您认为可接受的所有字符。然后,在proc div中,您可以编写CLASS测试代码,以确定您的32字节字段仅包含那些可接受的字符。

示例:将CLASS定义为“ ACCEPTABLE”

在proc div中,代码:
码:

如果FLD-32可接受
    PERFORM PROCESS-FLD
其他
    PERFORM BY-PASS-FLD
万一

一则注意事项。使用THRU功能定义CLASS时,请记住,'A'THRU'Z'定义了X'C1'和X'E9'之间具有位配置的所有字符。这意味着在“ I”和“ J”,“ R”和“ S”之间存在包含非字母值的间隙。

看一下《 COBOL参考手册》的附录B。它包含EBCDIC和ASCII整理序列,您将明白我的意思。

杰克。
回到顶部
查看用户资料 发送私信
sandip_datta

活跃用户


已加入:2003年12月2日
帖子:150
地点:日本东京

发布发表:2003年12月8日星期一1点26分
引用回复

嗨杰克,

在您看来,这似乎很可笑,但我不知道该领域中可能出现的垃圾字符。

问候,
Sandip。
回到顶部
查看用户资料 发送私信
妻子

超级版主


加入:2003年5月30日
帖子:1592

发布发表:2003年12月10日,星期三12:42 pm
引用回复

嗨桑迪普,

您知道有效的字符是什么吗?

杰克。
回到顶部
查看用户资料 发送私信
sandip_datta

活跃用户


已加入:2003年12月2日
帖子:150
地点:日本东京

发布发表:2003年12月16日,星期二,下午6:29
引用回复

嗨杰克,

可以是A-Z,a-z,0-9。

问候,
Sandip。
回到顶部
查看用户资料 发送私信
妻子

超级版主


加入:2003年5月30日
帖子:1592

发布发表:2003年12月18日,星期四,凌晨3:38
引用回复

嗨桑迪普,

尝试这个:
码:

       环境司。
        SPECIAL NAMES.
            ACCEPTABLE IS
                '0' THRU '9'
               'A''B'C'D'E'F'G'H'I'J'K'L'M
               'N''O'P'Q'R'S'T'U'V'W'X'Y'Z'
               'a''b''c'd'e'f'g'g'h'i'j'k'l'm
               'n''o''p'q'r's't'u'v'w'x'y'z'。


使用我在上一篇文章中列出的PROC DIV代码。如果IF stmt仅包含上面列出的字符,它将执行将处理该字段的代码。如果您的测试表明该列表未包含所有可接受的字符,则只需展开该列表即可。

杰克。
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> COBOL程式设计

 


类似主题
话题 论坛 回覆
没有新帖 抄写本在...中获取不正确的值 COBOL程式设计 7
没有新帖 JDBC驱动程序-默认值 DB2 1
没有新帖 无法查看变量的值... CA产品 1
没有新帖 ADD / SUB值 DFSORT / ICETOOL 7
没有新帖 位置,起始位置,列长... 同步排序 14
搜索我们的论坛:


回到顶部