问题标签 [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.

0 投票
1 回答
6165 浏览

jcl - Easytrieve A010 无效文件引用

我在我的easytrieve prog 的这一行中遇到了错误。

我有一个这样的DLBL..

我正在尝试使用输入文件DATAPRM(卡)通过数据填充主文件..正在读取记录(我假设因为我的计数器正在移动)但不幸的是,在它终止程序之前,错误发生了..可能是EOF?

0 投票
2 回答
688 浏览

perl - 词法分析/解析“这里”文档

对于那些在词法分析和解析方面的专家......我正在尝试用 perl 编写一系列程序,这些程序将解析 IBM 大型机 z/OS JCL 用于各种目的,但在方法论上遇到了障碍。我主要遵循 Mark Jason Dominus 在“Higher Order Perl”中提出的词法/解析思想,但有些事情我不太清楚该怎么做。

JCL 有所谓的内联数据,它与“here”文档非常相似。我不太确定如何将这些转换为令牌。

内联数据的布局如下:

按照惯例,“DD”后面的“*”表示以下行是内联数据本身,以“/*”或下一个有效的 JCL 记录(前 2 列中的“//”开头)终止。

更高级的是,内联数据可能如下所示:

有时,内联数据本身就是 JCL(可能被泵送到程序或内部阅读器,等等)。

但这就是问题所在。在 JCL 中,记录为 80 字节,长度固定。第 72 列(第 73-80 列)之后的所有内容都是“评论”。同样,在有效 JCL 之后的空白之后的所有内容同样是注释。由于我希望在我的程序中操作 JCL 并将其吐出,我想捕获评论以便我可以保留它们。

因此,这是内联数据情况下的内联注释示例:

我最初认为我可以让我最顶层的词法分析器拉入一行 JCL 并立即为 cols 1-72 创建一个非标记,然后为第 73 列评论创建一个标记 (['COL73COMMENT',$1]),如果任何。然后,这会将 cols 1-72 文本后跟 col73 令牌的字符串向下传递给下一个迭代器/标记器。

但是,我将如何从那里获取内联数据?我最初认为最顶层的标记器可以查找“DD \*(,DLM=(\S*))”(或类似的),然后继续从馈送迭代器中提取记录,直到它到达分隔符或有效的 JCL 启动器 ("//")。

但是您可能会在这里看到问题……我不能有 2 个最顶层的标记器……查找 COL73 注释的标记器必须位于顶部,或者获取内联数据的标记器必须位于顶部。

我想 perl 解析器也有同样的挑战,因为看到

<<DELIM

不一定是行尾,后面是这里的文档数据。毕竟,你可以看到 perl 像:

标记器/解析器如何知道标记“)->reformat();” 然后仍然按原样抓取以下记录?对于内联 JCL 数据,这些行按原样传递,在这种情况下,第 73-80 列不是注释...

那么,有没有人接受这个?我知道会有很多问题澄清我的需求,我很乐意尽可能多地澄清。

在此先感谢您的帮助...

0 投票
3 回答
866 浏览

xml - REXX 或 JCL 中的 XML 处理

在 PS 文件中,我有如下 XML 数据:

例如:

我希望数据进入一行。(中间没有任何空格)

那么我应该如何处理呢?(Rexx 或 JCL 哪一个易于处理和维护)

请告诉我如何接近。

0 投票
1 回答
1131 浏览

xml - REXX 和 JCL 中的 XML 处理

我的 PS 数据集中有 XML 数据,如下所示,格式与我的 PS 中的以下格式相同,示例如下:

我想要的是我希望整个 XML 进入一行,中间没有任何中断,我只需要在大型机上做那件事。我们有没有办法在 REXX 或 JCL 中做到这一点,我希望我的输出与 PS 中的一样:

http://www.w3.org ......等等

0 投票
2 回答
222 浏览

sas - 在 MVS SAS 上创建和定义 SAS 阵列

我需要在 MVS 上的 SAS 中构建一个数组

我尝试使用

但这不起作用

有什么建议么?

0 投票
1 回答
2792 浏览

mainframe - 如何在不同的步骤中删除 2 个 GDG 成员

我定义了一个生成数据组(GDG),限制参数为 5,让我们把(1,2,3,4,5)作为成员(假设 5 是当前位置)。

我使用的作业有 2 个步骤,每个步骤将尝试使用 IEFBR14 实用程序删除成员。

我希望我能得到 (1,2,5) 的结果,但实际上 (1,3,5) 被留下了,成员 2 和成员 4 被删除了?似乎在第 1 步之后,有一个提交操作,有人可以帮我吗?

但另一方面,如果我尝试删除成员 (0) 和成员 (-2),结果与我预期的一样。

我得到结果 (1,2,4),成员 3 和成员 5 被删除。

0 投票
4 回答
609 浏览

java - (Java) 重载:多少算太多?

我正在使用 Java 生成 JCL。我有四种添加数据定义语句的方法。一个接受一个字符,一个接受一个字符串,一个接受一个数组(字符串),另一个没有第二个参数。

我担心的是这些方法不仅接受不同的参数类型;整个方法根据类型而变化。如果是字符串,则需要“DSN=”。如果是字符,则需要“SYSOUT=”。同时,我不希望客户端担心为这些场景中的每一个使用不同的方法名称。

我目前的设计被认为是不好的做法还是好的?

0 投票
1 回答
177 浏览

mainframe - 汇编外部子程序和驱动程序

所以我试图在汇编中编写一些外部子例程,以便与我编写的驱动程序一起运行。我想通过sysin在程序中阅读,并提供一些流内汇编。

这是JCL部分:

我了解进入和退出链接的基础知识,但我是否需要为我的流内程序集添加另一个 DD 语句?或者,我可以在声明我的***.***.***数据集后开始编码吗?

0 投票
2 回答
1449 浏览

printing - 在 JCL/MVS 脚本变量中是否有要避免的特殊字符列表

我有一个生成随机密码的程序。这些引脚在 Java 中生成,然后通过NATURAL程序存储在大型机中。从那里,它们最终由批处理 JCL 作业进行物理打印,该作业调用MVS SCRIPT来打印表单,上面有 pin 码。

我之前遇到过一些特殊字符的问题,例如: |{}![]^~<>;由于某种原因无法正确打印。0OQ1l由于 OCR 的原因,我也删除了。

最近,我注意到另一个字符无法正确打印的错误,.但该.字符在它是PIN 码的第一个字符时才会失败。

因此,由于我遇到了这个问题,我想我会看看是否可以找到其他可能会干扰我的程序操作的特殊NaturalMVS 脚本字符,以便我现在可以测试它们,希望以后不会遇到这个问题或必须回退到仅使用 OCR 的 AlphaNumeric 字符。

编辑

  • Java - Web 应用程序在 Solaris 服务器上的 Tomcat 6.x 下运行。
  • Natural - 使用 Broker 生成的类 (POJO) 调用 Natural 程序。
    • 我的理解是它使用RPC进行实际通信。
    • 该程序验证一些数据并将 Pin 与 GUID 组合存储在 ADABAS 中的记录上。
  • 有一个批处理作业运行以打印表单。批处理作业是用 JCL 编写的。
    • 我从批处理作业的维护者那里得到的理解,表单的东西是描述表单本身以及它们如何打印的实际语言是一种过时/不受支持的语言,称为MVS SCRIPT
  • 脚本的底部部分如下所示:

.C#### 是一个实际数字,是一个指向所选打印机的变量。

注意:我是一名 Web 程序员,我不会说大型机、JCL、MVS 等。

0 投票
1 回答
2685 浏览

jcl - 比较两个 VB 平面文件中位置 1 到 5 的记录,并将匹配的记录写入第三个文件 JCL

将比较文件的前 5 个字母,因此将写入第 3 个文件