在COBOL语言中,前六位作为序号区,是和实际代码无关的,运行以上命令,能够使页面前6列缩进,直接从第7列显示。这样给为编写COBOL程序提供了一定的方便。
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
图3.2
图3.3
图3.4.1
图3.4.2
好了,今天先写到这里,希望能给大家一些帮助:) 末车了哈