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

重新定义9(2)comp


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

新的用户


已加入:2007年12月21日
帖子:88
位置:我的办公桌

 发布 发表:2012年7月2日,星期一9:49 pm
 引用回复

变量声明:

码:
05  A              PIC 9(02) COMP.   
05  FILLER               REDEFINES A.
    10  FILLER                        PIC X.           
    10  B          PIC X.       


采购部:

码:
将1加到A
移动到C


在这里,A的初始值在加一之前为零。之后,A中包含“ 01”。但是我没有在B中获得A的第二个字节。

如果这是错误的声明方式,请告诉我。请帮我解决这个问题。
回到顶部
查看用户资料 发送私信
Craq Giegerich

高级会员


加入时间:2007年5月19日
帖子:1512
地点:美国弗吉尼亚

 发布 发表:2012年7月2日星期一10:07 pm
 引用回复

建议您在cobol手册中​​大量阅读有关如何存储数字数据项的信息!!!
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

 发布 发表:2012年7月2日星期一10:31 pm
 引用回复

您从B的价值中得到了什么?
您期望B的值是多少?
回到顶部
查看用户资料 发送私信
普拉巴卡

新的用户


已加入:2007年12月21日
帖子:88
位置:我的办公桌

 发布 发表:2012年7月2日,星期一11:37 pm
 引用回复

我希望B的值为“ 1”。但是我那里的值很低,在程序开始时就被移走了。我知道这是错误的声明方式,但不是100%确定。我想确认一下我的理解。
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

 发布 发表时间:2012年7月2日,星期一11:48 pm
 引用回复

当您将零移到A时,B将具有低值。这就是COBOL的工作方式-正如Craq所提到的,您需要在COBOL手册中花费大量时间来了解COBOL中数据的内部格式。如果希望B的值为“ 1”(十六进制F1),则需要将241移至A。
回到顶部
查看用户资料 发送私信
迪克·谢勒

主持人荣誉


已加入:2006年11月23日
帖子:19245
位置:矩阵内部

 发布 发表:2012年7月3日星期二12:42上午
 引用回复

您好,

您要在B中使用x'F1'还是x'01'?

如果您发布了您真正想要的东西,那么应该有人可以提供帮助。

现在,我们所建议的只是花些时间在文档中。我们真的不明白您的目标。 。 。
回到顶部
查看用户资料 发送私信
比尔·伍德格

主持人荣誉


加入时间:2011年3月9日
帖子:7311
位置:矩阵内部

 发布 发表:2012年7月3日,星期二,上午4:36
 引用回复

罗伯特·萨普(Robert Sample)写道:
W如果希望B的值为'1'(十六进制F1),则需要将241移至A。


我知道您知道Robert,但是对于PIC 99 COMP,它确实取决于241项是否真正适合该领域的编译选项……可能最终只包含41个,最大为99个。
回到顶部
查看用户资料 发送私信
罗伯特·桑普

全球主持人


已加入:2008年6月6日
帖子:8569
地点:美国爱荷华州迪比克

 发布 发表时间:2012年7月3日,星期二,上午5:25
 引用回复

你是对的,比尔-我应该这么说。感谢您抓住它!
回到顶部
查看用户资料 发送私信
杰普逊

新的用户


已加入:2008年10月24日
帖子:7
地点:印度

 发布 发表:2012年7月3日,星期二,下午4:11
 引用回复

B不会有x'01'的值吗?
回到顶部
查看用户资料 发送私信
比尔·伍德格

主持人荣誉


加入时间:2011年3月9日
帖子:7311
位置:矩阵内部

 发布 发表:2012年7月3日,星期二,下午4:25
 引用回复

根据已描述的内容,是的,X'01'将是B的值。目前尚不清楚这是否是必需的但描述不佳的“ 1”,还是X'F1'中的“ 1”是期待。

我们期待着TS的回报。
回到顶部
查看用户资料 发送私信
杰瑞克

新的用户


已加入:2012年6月21日
帖子:2
地点:英国

 发布 发表:2012年7月4日,星期三,9:48 pm
 引用回复

普拉巴卡 写道:
我希望B的值为“ 1”。但是我那里的价值低...


你有一个 二进制1 在B中显示,但DISPLAY B不会显示它可能会使您感到困惑。不过,如果将编辑器切换为十六进制模式,则可能会在sysout上看到它。
如果你想 角色1 (EBCDIC中的十六进制代码F1),然后使A成为字符项:没有COMP的PIC 9(2)。

编码,测试,发布。  icon_smile.gif
回到顶部
查看用户资料 发送私信
迪克·谢勒

主持人荣誉


已加入:2006年11月23日
帖子:19245
位置:矩阵内部

 发布 发表:2012年7月4日,星期三10:09 pm
 引用回复

您好,

建议PrabakarV查看编译器生成的长度和位移。 。 。

如果您不清楚此信息,请在此处发布,然后有人可以进行澄清。

它应该有助于了解正在发生的事情。
回到顶部
查看用户资料 发送私信
罗希特·乌马尔吉卡(Rohit Umarjikar)

全球主持人


已加入:2010年9月21日
帖子:2581
地点:美国纽约

 发布 发表:2012年7月5日,星期四,下午5:37
 引用回复

尝试使用TRUNC(BIN)编译器选项。
回到顶部
查看用户资料 发送私信
斯莱德

新的用户


已加入:2007年11月24日
帖子:1
地点:新泽西

 发布 发表:2012年7月8日,星期日9:29上午
 引用回复

你好
如果PrabakarV仍在建筑物中,他可能还会向我们提供“ C”的PIC等。
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
 发表新话题     回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> COBOL程式设计

 


类似主题
话题 论坛 回覆
 没有新帖 无法显示补偿变量 COBOL程式设计 4
 没有新帖 将9(07)comp-3数据写入输出文件 DFSORT / ICETOOL 4
 没有新帖 S9(11)V9(02)至S9(9)V9(2)COMP-3 同步排序 2
 没有新帖 比较面试题 大型主机面试题 5
 没有新帖 将comp-3字段值替换为comp-3 ... DFSORT / ICETOOL 5
搜索我们的论坛:


 回到顶部