Upgrading to PL / Ienterprise compiler - S0C4

fahir83 · 新的用户 已加入：2006年1月27日 帖子：22

我们正在升级到PL / I企业今天双色球开奖结果器。我们今天双色球开奖结果了程序，但没有任何问题，但是尝试运行该程序时，出现错误8094。

在我们的程序中，我们将调用DSNTIAR for DB2 errros。

+ IDI0081I IEWBIND异常情况包括GGHADP87 rc = 83000526
+ IDI0002I模块GGHADP87，程序GGHADP0，偏移量X'1842'：中止S0C4-X'4'（保护异常）
IBM0534S ONCODE = 8094保护异常

以下是DSNTIAR的电话：

DCL DSNTIAR输入选项（ASM，INTER，RETCODE）；
0 / * SQLCODE错误处理区域* /
DCL 01 DB2_SQLR，
05 DB2_SQLR_TEXT_LEN FIXED BIN（31）INIT（120），
05 DB2_SQLR_MESSAGE，
10 DB2_SQLR_LEN固定BIN（15）INIT（960），
10个DB2_MSGS（08），
15 DB2_SQLR_TEXT CHAR（120）INIT（（*）''）;
放入跳过列表（“严重错误或遇到警告”）；
跳过列表（'SQLCODE ====> ',SQLCODE);
跳过列表（'SQLERRM ====> ',SQLERRM);
跳过列表（'SQLERRD（3）====> ',SQLERRD(3));
跳过列表（'SQLWARN0 ====> ',SQLWARN0);
跳过列表（'SQLWARN1 ====> ',SQLWARN1);
跳过列表（'SQLWARN2 ====> ',SQLWARN2);
跳过列表（'SQLWARN3 ====> ',SQLWARN3);
跳过列表（'SQLWARN4 ====> ',SQLWARN4);
跳过列表（'SQLWARN5 ====> ',SQLWARN5);
跳过列表（'SQLWARN6 ====> ',SQLWARN6);
跳过列表（'SQLWARN7 ====> ',SQLWARN7);
致电DSNTIAR（SQLCA，DB2_SQLR_MESSAGE，DB2_SQLR_TEXT_LEN）;
如果PLIRETV = 0
然后
做;
DO J = 1到DIM（DB2_SQLR_TEXT，1）;
如果DB2_SQLR_TEXT（J）¬=``则
跳过清单（DB2_SQLR_TEXT（J））;
结束;
结束;
执行SQL
回滚;
信号错误；
结束; / * P9999_DB2_ABEND * /

谁知道我们该如何解决？

德君竹

就像您提到的那样，我曾经遇到过一个问题。

此类问题始终是由于链接错误引起的。

我的解决方案是：
1.更改SCLM定义的链接参数；
2.在今天双色球开奖结果选项中指定“ NORENT”。

您可以尝试一下，尽管我不能保证您可以使用。

恩里科·索里切蒂

该程序在做什么？
程序GGHADP0，偏移量X'1842' ??
确切地，请

fahir83 · 新的用户 已加入：2006年1月27日 帖子：22

这是我遇到的错误。在过程P9999_DB2_ABEND中，存在上述代码。

IBM0534S ONCODE = 8094保护异常
从今天双色球开奖结果单元GGHADP0在入口点P9999_DB2_ABEND处在地址20C05070处在入口偏移量-10E51980处的今天双色球开奖结果单元偏移量-10E50350处。
可能的错误分支：语句：偏移量：-FFFFFE9E

转储类似程序：
================================================== =============================
<H2>事件14之7：通话（DSA地址000803A0）

****************************************************** ******************************
*********************** P O I N T O F F A I L U R E **********************
****************************************************** ******************************

这是在S0C4异常终止之前控制左程序GGHADP0的位置。

注意：无法显示程序GGHADP0的源代码信息，因为
没有提供今天双色球开奖结果器列表或辅助文件数据集。源文件
是SYS09213.T070105.RA000.SGHSXG0F.ELMOUT.H01，行号来自GONUMBER
偏移X'1842'的选项为674。

加载模块名称。。。。。。：PGC01.GPDCM.TEST.LOAD（GGHADP87）
</RTline>
在地址。。。。。。。。：31A55AA8
<XMline>
At Address. . . . . . . . : <a href="ADDR: 31A55AA8">31A55AA8</a>
</XMline>
<RTline>
加载模块长度。。。。：X'24558'
链接编辑日期和时间。：2009/08/01 07:01:16

程序名称。。。。。。。。：GGHADP0
</RTline>
在地址。。。。。。。。：31A55D40（模块GGHADP87偏移量X'298'）
<XMline>
At Address. . . . . . . . : <a href="ADDR: 31A55D40">31A55D40</a> (Module
GGHADP87偏移量X'298'）
</XMline>
<RTline>
程序长度。。。。。。：X'10FC8'
Program Language. . . . . : PL / I(Compiled using IBM Enterprise PL / Ifor z/OS
V3 R6 M0 on 2009/08/01 at 07:01:09）
入口点名称。。。。。：GGHADP0
在地址。。。。。。。：31A55D90（程序GGHADP0偏移X'50'）

机器指令。。。。：05EF巴尔R14，R15
在地址。。。。。。。。：31A57582（程序GGHADP0偏移X'1842'）
AMODE。。。。。。。。。。：31

有关故障点的说明：

偏移十六进制指令
------ -------------- ------------------------------ --------------------------
-2C 5820 600C L R2,12（，R6）
-28 5020 109C ST R2,156（，R1）
-24 5000 1098 ST R0,152（，R1）
-20 4100 1098 LA R0,152（，R1）
-1C 58F0 3F78 L R15,3960（，R3）
-18 4110 D098 LA R1,152（，R13）
-14 5000 D098 ST R0,152（，R13）
-10 05EF巴尔R14，R15
-E 4400 C1AC EX 0,428（，R12）
-A 185D LR R5，R13
-8 58F0 3F80 L R15,3968（，R3）
-4 4400 C1C0 EX 0,448（，R12）
***** 05EF巴尔R14，R15
+2 4400 C1C4 EX 0,452（，R12）
+6 4400 C1AC EX 0,428（，R12）
+ A 185D LR R5，R13
+ C 58F0 3F84 L R15,3972（，R3）
+10 4400 C1C0 EX 0,448（，R12）
+14 05EF BALR R14，R15
+16 4400 C1C4 EX 0,452（，R12）

<H2>事件8之14：ABEND S0C4

终止代码。。。。。。。。。：S0C4-X'4'
程序中断代码。：0004（保护异常）
试图访问受保护的存储
使用错误的存储访问密钥的位置。

机器指令。。。。：不适用
在地址。。。。。。。。：008D15FE
AMODE。。。。。。。。。。：24
故障描述。。。：指令地址无效

有关事件偏移量的其他说明：

偏移十六进制指令
------ -------------- ------------------------------ --------------------------
无可用说明。

程序状态字（PSW）。：00000000 078D1600
通用寄存器：
</RTline>
R0：31A55C30（115848144字节的可寻址存储空间）
<XMline>
R0: <a href="ADDR: 31A55C30">31A55C30</a> (115848144 bytes of storage
可寻址）
</XMline>
R1：0000CE2C（643540字节的存储可寻址）
<XMline>
R1: <a href="ADDR: 0000CE2C">0000CE2C</a> (643540 bytes of storage
可寻址）
</XMline>
R2：00002DF0（存储无效）
<XMline>
R2: <a href="ADDR: 00002DF0">00002DF0</a> (Storage invalid)
</XMline>
R3：31A5F002（115810302字节的可寻址存储空间）

我的不好，我不确定如何检查偏移量X'1842'中的确切语句。

特里·海因兹

根据您发布的内容是：

罗伯特·桑普

fahir83 · 新的用户 已加入：2006年1月27日 帖子：22

开始了。

我找到了引发错误的地方。这是一个打开的游标语句。

执行SQL
OPEN BRANCH_CUR;

当我查看DB2日志时，它说

08/06 18.07.20 D2T2MSTR DSN3201I -D2T2用户的EOT异常进展= SGMYKG0 CONNECTION-ID = BATCH CORRELATION-ID =
D2T2MSTR JOBNAME = MRLBSC35 ASID = 0225 TCB = 008A2E88

如果我们看我的第一篇文章，错误信息的第一行是

IDI0081I IEWBIND异常情况包括GGHADP87 rc = 83000526

当我为DSN3201I搜索时，它说
说明：在转换装入模块格式时，IEWBIND
函数的返回码大于0。

而且我在今天双色球开奖结果器消息中发现，即使BIND的返回码为0，我仍然发现BINDKTSO ... RC = 0005。我不明白那是什么

您能帮我解决这个问题吗？我是否需要重新绑定某些选项。仅供参考，我们正在使用endevor。

在BIND选项中已从旧今天双色球开奖结果器更改为新今天双色球开奖结果器的一个参数是CURRENTDATA，该参数先前设置为YES，现在我们设置为NO以符合默认值。

另一个想法：无论是由于某些PLAN AUTHORIZATION错误，在以前的今天双色球开奖结果器中，它将清楚地显示PLAN AUTHORIZATION错误，但我不知道是否会这样。我真的不这么认为。

迪克·谢勒

您好，

建议您在预今天双色球开奖结果器/今天双色球开奖结果器步骤的输出中查找一些无辜的警告和绑定的输出。

fahir83 · 新的用户 已加入：2006年1月27日 帖子：22

处理器。

处理器....... P4PXD2GE
CLEANUP ....... RC = 0000
....
扫描1 ...... RC = 0001
扫描2 ......... RC = 0001
今天双色球开奖结果....... RC = 0004
LINK .......... RC = 0000
DBRMCOPY ...... RC = 0000
BINDALW1 ...... RC = 0000
......
......
BINDKTSO ...... RC = 0005
EXPLMODB ...... RC = 0000
EXPL .......... RC = 0000
BINDMODB ...... RC = 0000
绑定......... RC = 0000

迪克·谢勒

您好，

我对BINDKTSO不熟悉

这听起来像特定于站点的东西。

如果它发布的rc不为零，则可能是该进程创建的某些诊断/信息。

建议您与支持今天双色球开奖结果/绑定过程的人员联系。

fahir83 · 新的用户 已加入：2006年1月27日 帖子：22

我在SYSTSPRT中得到以下代码。我知道在很多情况下都会扔掉它。但是，如果将此错误消息与我上面提到的消息相结合，有什么想法可能是问题所在？

准备
DSN系统（D2T2）
DSN
运行程序（GGHADP87）计划（PTHADP87）
IKJ56641I DSN因错误+而结束
IKJ56641I系统终止代码0C4原因代码00000004

迪克·谢勒

您好，

fahir83 · 新的用户 已加入：2006年1月27日 帖子：22

问题解决了。

在旧今天双色球开奖结果器中，使用DSNELI链接了程序，以便在TSO（IKJEFT01）下运行。但是在新的今天双色球开奖结果器中，程序使用DSNHLI进行链接，而DSNHLI是使用CAF工具运行的。 Endevor团队已通过将符号LDB2LNG设置为DSNELI来更正此问题。

迪克·谢勒

很高兴听到它的声音-感谢您发布解决方案

d