Welcome to the world of Mainframe. 欢迎来到大型机的中文世界!

大机使用技巧2(不断更新中…).

今天介绍以下几个技巧

1. NUM ON STD COB

   在COBOL语言中,前六位作为序号区,是和实际代码无关的,运行以上命令,能够使页面前6列缩进,直接从第7列显示。这样给为编写COBOL程序提供了一定的方便。

如图:cob1.JPG

2. c  a   b   all  和    rchange

    大家都知道,在编译和执行COBOL等程序时,需要用到JCL程序,而JCL程序往往都是有一定的格式,有的只需要修改成自己的ID 就可以使用。一般情况下 如果原JCL的ID 为 DL001 而自己的ID 为 DL005 那么我们会用 C DL001 DL005 ALL 来实现用DL005替换所有DL001的操作,但是,如何在不同的JCL实现此操作呢?我们就要用到rchange,换句话说,你在JCL1中 用 C DL001 DL005 ALL后,打开JCL2, 在JCL2中直接用rchange命令,就能把JCL2中的DL001也全都替换成DL005。

3. X ALL 和 S ALL 以及 F DIVISION的组合运用

    在初学COBOL的时候,一定会大量看一些COBOL程序的代码,但是真正项目中的COBOL程序,都是很庞大的,而大机的屏幕有限,是不能够把所有的都一页显示,那么如何做能够让COBOL程序变得清晰呢? 我们可以运用 X ALL ; F DIVISION 这个小技巧来实现这一目的, 一下是一段COBOL 代码(图3.1),首先我们用命令 X ALL 讲所有的代码行隐藏(图3.2)。之后用 F DIVISION 找出4个部(图3.3),之后想看哪个部中的代码,用S * 就可以实现程序的成段显示。

图3.1

cob2.JPG

图3.2

cob3.JPG

图3.3

cob4.JPG

图3.4.1

cob5.JPG

图3.4.2

cob6.JPG

好了,今天先写到这里,希望能给大家一些帮助:) 末车了哈

随机日志

  • Top Links

  • 功能

  • 文章归档