问题标签 [jcl]
For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.
jcl - 作业的 SYSOUT 和 SYSPRINT 有什么区别?
在编码 aJCL
时,我们给出SYSOUT
和SYSPRINT
DD
s。哪种类型的输出去,SYSOUT
还有什么SYSPRINT
?
jcl - 从文件中读取记录
我有一个包含一些记录的文件,我只想将第一条和最后 10 条记录复制到另一个文件中。
任何人都可以告诉如何编写 jcl,使用 sort、icetool 等。
cobol - 如何故意放弃工作
是否可以通过 COBOL 程序故意放弃您的工作。假设我有一个包含 Header、Detail 和 Trailer 记录的输入文件。我将编写一个读取此文件的 COBOL pgm。如果在此文件中找不到详细记录,那么我想通过提供一些异常结束消息和一些异常结束代码来终止我的工作。这可能吗?
cobol - 将记录附加到现有文件
如果我想将记录附加到现有文件中,我需要使用哪些 DISP 参数?
mainframe - JCL 用于将某些成员从一个 PDS 复制到另一个
我正在尝试将一些成员从一个 PDS 复制到另一个。假设我在一个 PDS 中有 500 个成员。我正在尝试将前 100 个移至第二个 PDS,下一个 100 移至第三个 PDS,依此类推。复制到另一个 PDS 的成员也应该从源 PDS 中删除。
是否可以使用 JCL 做到这一点?我正在查看 IEBGENER,但我发现我们可以通过指定名称直接复制成员。
numeric - 如何使用 SYNCSORT 格式化具有特定符号值的压缩十进制字段?
我想使用 SYNCSORT 将所有 Packed Decimal 字段强制为负号值。关键要求是第二个半字节必须是十六进制“D”。我有一个可行的方法,但它似乎太复杂了。按照 KISS 原则,我希望有人有更好的方法。也许在最后 4 位上使用位掩码?这是我想出的代码。有没有更好的办法?
notepad++ - 如何使用记事本 ++ 自动缩进 Cobol 和 JCl
任何人请告诉我如何自动缩进我的 cobol 和 JCL 代码。如果我使用那些意图在notepad ++中编写程序,我将很容易编写程序。请回复我。
cobol - 我们是否为 COBOL、JCL 等大型机技术内置了任何代码改造工具?
我希望是什么retrofitting of code
意思?
由于您从 prod 签出代码,如果在 prod 中部署了任何更改,那么修改代码会将这些更改添加到您的代码中,以使您的代码可以部署。
希望改造是已知的东西。我知道SUPERCE
可以识别代码发生的更改,但是我们是否有一个工具可以自动合并更改?让我知道您是否有解决方案或需要改写的问题?
unix - 如何检查 Unix 系统服务文件是否存在
我在 JZOS 下的 IBM 大型机上运行批处理 Java。该作业根据在数据库中找到的内容创建 0 - 6 个“.txt”输出。然后,我需要将这些文件从 Unix 转换为 MVS (ebcdic),并且我正在使用在 IKJEFT01 下运行的 OCOPY 命令。但是,当未创建特定输出时,我收到 JCL 错误并且作业结束。我想检查每个文件名是否存在并设置条件代码来控制是否执行 IKJEFT01 步骤,但不知道使用什么来访问 Unix 文件路径名。
我已经通过编写一个 COBOL 程序来检查转换后的 MVS 文件并设置返回码来控制后续 JCL 步骤的执行,从而解决了这个问题。已完成的作业现在正在进行用户验收测试。也许这听起来像一个杂牌,但它确实有效,我很高兴分享这个解决方案。
sorting - jcl排序划分大型机数据集
我正在尝试将 MF PS 分成几个数据集。例如,如果我有一个包含 600 条记录的数据集,我想将它分成 6 个文件,每个文件有 100 条记录。是否可以使用 JCL 排序来做到这一点?