小编dee*_*ner的帖子

将多行值从JCL instream传递到Cobol变量88

例:

01  VAR1             PIC 9(05).      
    88 WS-VAR1  VALUE 1000 1001 1002 1003      
       1004 1009 2000 2002 3000 4000 4009           
       5000 5001 6000 7000 8000 2332 8484.
Run Code Online (Sandbox Code Playgroud)

我们如何将值从JCL作为instream传递给Cobol程序变量88.因此,在不更改程序的情况下修改值会更容易.

我找到了两个解决方案:
1.使用内部索引表.这样二进制搜索就能快速完成任务.
2.使用VSAM文件而不是传递数据.(不太可能)

我认为二进制搜索肯定比88条件检查慢.我试图在88条件检查中找到相同效率的东西.

cobol mainframe jcl

1
推荐指数
1
解决办法
426
查看次数

使用顺序文件中的数据通过Parm将值传递给Cobol程序

我正在设置一个JCL,它将将来自顺序文件(具有一个记录)(例如20190320)的日期值传递给parm,如下所示:

// STEP1 EXEC PGM = ABC,PARM ='20190320'

我试图通过包含顺序文件中的日期值传递PARM的值。

cobol jcl

1
推荐指数
1
解决办法
443
查看次数

标签 统计

cobol ×2

jcl ×2

mainframe ×1