问题标签 [copybook]

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 回答
1120 浏览

cobol - 写一本 Cobol 字帖?

我正在使用需要添加记录的字帖..

是否可以将记录移动到字帖记录中,然后在 COBOL 中写出字帖?如果是这样,有关如何执行此操作的任何参考?

我有这个代码(基于这个问题的答案),它工作正常,但是我被告知我不需要 TRNREC94-OUT,我可以只写 TRNREC94 字帖。当我尝试用“WRITE REPORT-RECORD FROM TRNREC94”替换 B700-MOVE-RECORD 时。我收到一条错误消息,指出 TRNREC94 未定义为数据名称并被丢弃。不知道从这里去哪里..

0 投票
2 回答
756 浏览

java - COBOL 字帖中的字符串长度

我正在使用托管在 Mainframe 上的 Java Web 服务,我们正在为其生成 Copybook 文件。我有一个包含字符串字段的复杂类型的 XSD。我想将字符串字段的长度指定为 1024。目前,它正在生成 PIC X(255) 类型的元素,长度为 255 个字符。我怎样才能将其更改为 1024?

复杂类型:

生成的字帖:

不幸的是,其余代码位于安全网络中,我不允许将其复制出来。任何帮助表示赞赏。谢谢!

编辑:我尝试了建议的解决方案并且它有效。但是文本现在包含很多空格。很抱歉之前没有提到这一点 - 我是介于 0 到 1024 个字符之间的字符串。我只尝试了 maxLength,但它为我抛出了 LENGTH_TOO_LONG CICS 错误。如果需要更多信息来提出解决方案,请告诉我。谢谢!

0 投票
2 回答
1607 浏览

store - 具有多种记录类型的 COBOL 存储文件

本练习的目标是读取输入文件并将其存储到表中,然后验证输入中的某些字段并输出任何错误记录。需要存储的输入文件是 285 条记录。问题是每条记录都是不同的,都有自己的字帖,所以我不知道如何将它加载到一个表中,我可以在其中搜索每个 10、20 或 32 条记录的某个字段。这是输入文件的示例,仅供参考...不确定此时是否需要我当前的代码,因为除了 READ 语句之外没有太多内容。

我能够将文件加载到表中,但现在我的困境是如何搜索表中的每个不同记录字段以进行验证?即如何验证记录 32 中的邮政编码是否为数字?

我知道我可以读入字帖,但我不知道如何,或者如果可能的话,将一个文件读入多个字帖,然后将其全部存储在一个表中......如果这有意义的话。

任何关于从这里去哪里的建议将不胜感激!

0 投票
1 回答
2017 浏览

wsdl - 用于运行地图的 WTX 测试数据

我已经创建了 copybook 元素到 WSDL 字段的映射。并且地图构建成功。但是在本地运行地图时,我正在映射的两个不同操作出现两个错误之一:

1)对于第一个映射:“找到输入有效但未知的数据”并且在我得到的跟踪日志中:INPUT 1 存在(3012 字节)但没有内容。

错误的更多详细信息:(级别 0:偏移量 0,长度 0,comp 1 of 0,#1,DI 000000000001:)偏移量 0 处的数据(类型 X'0004 的'<retrFunction1'(retrFunction1Request retrFunction1Request 消息 WSDLService)。

INPUT 1 存在(3012 字节)但没有内容。

输入卡 1 的验证消息结束。

(偏移量 26130:映射编号 0 (CobolFuncData),DI 000000000000:) TYPE X'0148'(COBOL_OBJECT 组 CopyBook)已构建。

(偏移量 26130:地图编号 0 (CobolFuncData),DI 000000000000:) TYPE X'0124'(000_COBOL_OPERATION Record CopyBook)已构建。

OUTPUT 1 已成功构建。

2)对于第二个映射:“多个输入之一无效”并且在我得到的跟踪日志中:INPUT 1 存在,但其类型错误。

对于case2,我得到:(级别3:偏移量0,len 0,comp 1 of 2,#1,DI 000000000001:)偏移量0的数据(类型X'0008'的'xmlns'(前缀XMLS WSDLService)。

我认为问题不在于 WSDL 类型树与 COBOL 类型树的映射,而是我用于在本地运行这些映射的 XML 请求和响应数据。是否有任何指导方针可用于创建正确的输入并在 WTX 本地成功运行地图。

PS。我通过导入 WSDL 而不是 XSD 来创建类型树。导入 WSDL 时,我没有在类型树中获得节点“DOC”。在这种情况下,我应该使用什么类型的树级别来创建我的地图。我试过 WSDLService -> Type -> ~TypeName -> TypeDef 和 WSDLService -> Type -> ~TypeName -> Seq

0 投票
1 回答
78 浏览

cobol - Rational Developer for System Z 中一个属性组中的多个 SYSLIB 或一个 COBOL 程序中的多个属性组

我想知道是否可以在一个属性组中设置多个 SYSLIB 或在 COBOL 程序中设置多个属性组。我正在使用 Rational Developer for System Z v9。我的程序需要来自不同来源的字帖,据我尝试和谷歌搜索,我似乎找不到任何对它的引用。任何帮助将非常感激。提前致谢!

0 投票
0 回答
586 浏览

xml - 在 MFL 中转换数据时出错

我在 OSB 中有一个 MFL,可以将从大型机系统接收到的数据转换为 XML。直到最近它工作正常。但最近大型机系统开始发送一些数据,这些数据在 OSB 中显示为 âäàáãåçñ¢éêêëèíîïïìßÂÄÀÁÃÅÇÑøÉÊËÈÍÎÏÌØæÆý£¥©Ý®ôöòóõûüùúÿÔÖÒÓÕÛÜÙÚ。似乎它是不在 ascii 字符集中的 ebcidic 数据。

MFL 无法转换此数据。请告知这里发生了什么以及任何解决方法。我尝试了 MFL 配置中的所有选项,例如将此字段视为 ebcidic ,使用不同的基本代码等。

MFL 抛出的错误:

0 投票
2 回答
210 浏览

regex - 如何使用 awk 重复一行行?

我正在尝试重复该行中包含的OCCURS单词次数。要重复的行块在行首的编号较小。

我的意思是,有了这个输入:

这将是输出:

我通过这种方式尝试过:

但我没有得到我想要得到的结果。awk 是最好的方法吗?你有什么选择吗?

0 投票
1 回答
730 浏览

cobol - CopyBooks,.cpy 文件,WTX 设计工作室

我正在使用抄写本在 WTX 设计工作室工作,我有一本抄写本,但我没有任何关于该 .cpy 文件的相应示例输入。

有什么方法可以从副本中生成示例文本文件,而不是手动编写文本文档?

0 投票
1 回答
1446 浏览

java - 使用 Java 将 Excel 转换为基于 CopyBook 格式的可变长度数据文件

我正在尝试将 excel 转换为具有可变长度格式的 COBOL 数据文件。我能够将 excel 转换为制表符格式的文本文件。该数据文件涉及大约 400 个字段。我不想尝试为每个数据块设置块长度,而是喜欢在我的代码中利用 copybook 文件将数据转换为可变长度。我想知道是否有任何框架或建议来实现这一目标。

部分字帖格式

0 投票
0 回答
1884 浏览

java - Java - 从 COBOL Copybook 读取数据

我有以下copybook

和我在types.txt文件中的输入:

我正在使用cb2java 5.3将输入转换为Java。

下面是我的代码:

当我运行这段代码时,我希望19被阅读。但它09不是19从我的输入文件中读取的:

我是否遗漏或误解了什么?