JCL - 获取给定区域(大型机)中非空间字符的数量

Question

我需要准备一些输入数据来运行程序,数据应该采用以下格式.

 UID (1-11)|TxtLen (12-16)| Text (17-62)

我可以使用sort来正确定位字段并获取UID和文本字段.'TxtLen'应该包含从文本字段的开头到文本字段中的最后一个字符的字符数.

i.e. “Hello”’s TxtLen is 5, “Hel lo”’s TxtLen is 6, “Hello World”’s TxtLen is 11, etc...

我想知道是否有办法通过JCL获取TxtLen,还是需要执行此操作的程序？

-谢谢

Answer 1

你需要一个程序.

我在Stack Overflow上看到了相当多的大型机问题,询问是否只有"JCL"才能实现.请记住,JCL主要是执行程序的一种手段,实际上除此之外几乎没有.例如,当你说

我可以使用sort来正确定位字段并获取UID和文本字段

sort是一个程序.它恰好是在大多数系统上找到的程序(虽然有不同供应商的实现,IBM有一个,SyncSort有一个,CA有一个,等等.)在大型机系统上常见的大量其他程序.

只是为了迂腐,JCL实际上并没有做任何事情,JES在解释JCL时做了工作.

对于您的特定情况,您可以创建一个SORT出口,或者在Rexx中处理您的数据,或者您可以使用一些Unix系统服务 命令并通过BPXBATCH或COZBATCH执行这些命令.