查看上一个主题 :: 查看下一个主题
|
作者 |
信息 |
Mainakdalal
新的用户
已加入:2005年9月5日 帖子:6 地点:加尔各答
|
|
|
|
大家好,在我们的网站上,我们遇到了一些批处理代码,这些代码实际上是以<XXX>TBBLD以结尾<XXX>TBEND。下面给出了示例代码。
码: |
NELTBBLD模型022
NELFORMT'X(06)'
NELVALUE'SP '
NELVALUE'DIR '
NELVALUE'FD '
NELVALUE'DSC '
NELVALUE'LIB '
NELVALUE' '
内尔本德
|
正在使用COBOL字帖布局从另一个COBOL代码中调用此代码。我查看了表模块的负载,并从签名中看到了数字569623400,它对应于高级汇编程序。
但是,我从未见过这样的汇编程序表。没有DS或DC操作码,如何在汇编器中定义变量?可以使用cobol抄写本来调用它吗?
我们还找到了一些代码,看起来像一些带有验证检查的在线屏幕说明。但是不确定用于编写它们的语言。它们既不像IMS MFS,也不像CICS,也不像ISPF面板编码。也不会从任何其他模块/屏幕COBOL代码中调用这些。谁能告诉我这里使用的语言是什么?
码: |
NL NYN L 02 00 *** E'样本选项 NUMBER (01 =基本,02-99 =高级)'
名称“ SMP-OPT-NUM”
范围01,99
NL AXN L 03 00 *** I'530'*
名字'FIELD-530'
SL NNN L 01 00 *** E'FLD / AGE CALC RULE(1=NEAREST, 2=LAST)'
|
|
|
回到顶部 |
|
 |
恩里科·索里切蒂
高级主持人

已加入:2007年3月14日 帖子:10715 所在地:意大利
|
|
|
|
引用: |
正在使用COBOL字帖布局从另一个COBOL代码中调用此代码。
|
正确定义以上句子的含义! |
|
回到顶部 |
|
 |
罗希特·乌马尔吉卡(Rohit Umarjikar)
全球主持人

已加入:2010年9月21日 帖子:2583 地点:美国纽约
|
|
|
|
它们可能是像Macros一样的Delta Cobol。向我们显示编译清单怎么样? |
|
回到顶部 |
|
 |
Mainakdalal
新的用户
已加入:2005年9月5日 帖子:6 地点:加尔各答
|
|
|
|
嗨,恩里科,
我的意思是表被编码为批处理模块。另一个Cobol代码使用一个抄写本来调用相同的代码,该抄写本使用出现次数读取表中定义的每个值。就像将普通的cobol表(带有图片提示和Value Literal)读入抄写本一样。我真的不确定这是如何工作的。
另外...第二个屏幕截图(好像是在线代码)完全令人困惑。 |
|
回到顶部 |
|
 |
恩里科·索里切蒂
高级主持人

已加入:2007年3月14日 帖子:10715 所在地:意大利
|
|
|
|
您的同事/支持人员对此有何评论? |
|
回到顶部 |
|
 |
Mainakdalal
新的用户
已加入:2005年9月5日 帖子:6 地点:加尔各答
|
|
|
|
他们说表是汇编程序。但我不同意:-(
另外...在第二张屏幕截图上没有人确定。 |
|
回到顶部 |
|
 |
罗伯特·桑普
全球主持人

已加入:2008年6月6日 帖子:8569 地点:美国爱荷华州迪比克
|
|
|
|
该表可能正在使用汇编程序宏,但肯定不是汇编程序代码。第二个屏幕快照似乎是某种高级变量定义,包括长度,初始值,错误消息和允许值的范围(以及其他内容)。
除非您找到一些文档(在系统,硬拷贝或Intranet上),否则您不太可能会发现它们。您是否有工作来汇编/编译这些代码段?如果没有,则需要搜索以查看是否可以在系统上找到它们。没有这个JCL,您将需要计划在不知道他详细信息的情况下复制功能(无论它是什么)-这可能是一项非常困难的任务。 |
|
回到顶部 |
|
 |
比尔·伍德格
主持人荣誉
加入时间:2011年3月9日 帖子:7311 位置:矩阵内部
|
|
|
|
它们都看起来像某种“字典”定义。第一个是字段的描述,第二个是几个字段的不同类型的描述。
也许第一种类型的多个实例将描述一个文件,第二种可能是屏幕(或报告或输出文件)。
它看起来像是“自家种植的”并且看起来已经存在了一段时间(“关键字”最多只能包含8个字符)。
不过,大胆的猜测。 |
|
回到顶部 |
|
 |
凯瑞·罗珀
新的用户
已加入:2016年9月14日 帖子:25 所在地:澳大利亚
|
|
|
|
Mainakdalal,您在商店中使用Ricoh Mainframe Printer吗? |
|
回到顶部 |
|
 |
Mainakdalal
新的用户
已加入:2005年9月5日 帖子:6 地点:加尔各答
|
|
|
|
大家好,
我能够弄清楚。该表实际上是由汇编程序宏组成的。它们不在标准maclib中,而是在其他PDS中。当我在表中扩展用作关键字的宏时,我发现代码实际上是将表加载到寄存器中,该寄存器指向用于链接到调用模块的寄存器1的地址。这就是将表值传递到称为COBOL代码的方式。
在另一段看起来像屏幕布局的代码上,实际上是作为某些代码的卡输入。不幸的是,我们没有驱动程序源代码,而只有它的负载:-(
感谢您为我提供解决方案的所有帮助。 |
|
回到顶部 |
|
 |
|