IBM大型机论坛索引
 
登录
 
IBM大型机论坛索引 大型机:搜索 IBM Mainframe论坛:常见问题解答 寄存器
 

错误:IBM0141S ONCODE = 41,已提出TRANSMIT条件


IBM大型机论坛 -> 异常与调试
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
贾尔坎塔拉

新的用户


加入时间:2007年1月15日
帖子:3
地点:菲律宾马尼拉

发布发表:2007年2月20日,星期二,7:08 pm
引用回复

你好

我收到此错误。谁能帮我解决这个问题?谢谢!

IBM0141S ONCODE = 41由于输出中出现不可纠正的错误('ONFILE'= SYSIN),因此引发了TRANSMIT条件。
从编译单元GP0685的语句1529的入口点GP0685_DELETE_DATASET在编译单元偏移+ 0000CF96处
地址000DAAC6处的条目偏移量+ 000002A6。
CEE3195W无法打开SNAP转储文件。

这是GP0685的编译:
1524 2 1 | IDCAMS_CONTROL_CARD ='删除'||文件;
1525 2 1 |如果DA11_DISPOSITION ='NEW'THEN
|做;
1526 2 2 |打开文件(SYSIN)输出;
1527 2 2 |从(IDCAMS_CONTROL_CARD)写入文件(SYSIN);
1528 2 2 | IDCAMS_CONTROL_CARD ='如果MAXCC LE 8 THEN SET MAXCC = 0';
1529 2 2 |从(IDCAMS_CONTROL_CARD)写入文件(SYSIN);
1530 2 2 |结束;
1531 2 1 |其他
|做;
1532 2 2 |打开文件(SYSIN)更新;
1533 2 2 |将文件(SYSIN)读入(IDCAMS_CONTROL_CARD);
1534 2 2 | IDCAMS_CONTROL_CARD ='删除'||文件;
1535 2 2 |从(IDCAMS_CONTROL_CARD)重写文件(SYSIN);
1536 2 2 |结束;
1537 2 1 |结束;
回到顶部
查看用户资料 发送私信
威廉·汤普森

全球主持人


已加入:2006年11月18日
帖子:3156
所在地:亚利桑那州图森

发布发表:2007年2月22日,星期四,上午5:18
引用回复

抱歉,您的帖子对我来说是希腊文,您可以扩展正在/在/下/使用的“产品”吗?
回到顶部
查看用户资料 发送私信
迪克·谢勒

主持人荣誉


已加入:2006年11月23日
帖子:19245
位置:矩阵内部

发布发表:2007年2月22日,星期四,上午8:28
引用回复

您好,

码:
1524 2 1 | IDCAMS_CONTROL_CARD ='删除'||文件;
1525 2 1 |如果DA11_DISPOSITION ='NEW'THEN
|做;
1526 2 2 |打开文件(SYSIN) OUTPUT;
1527 2 2 |写文件(SYSIN) FROM (IDCAMS_CONTROL_CARD);
1528 2 2 | IDCAMS_CONTROL_CARD ='如果MAXCC LE 8 THEN SET MAXCC = 0';
1529 2 2 |写文件(SYSIN) FROM (IDCAMS_CONTROL_CARD);
1530 2 2 |结束;
1531 2 1 |其他
|做;
1532 2 2 |打开文件(SYSIN) UPDATE;
1533 2 2 |读取文件(SYSIN) INTO (IDCAMS_CONTROL_CARD);
1534 2 2 | IDCAMS_CONTROL_CARD ='删除'||文件;
1535 2 2 |重写文件(SYSIN) FROM (IDCAMS_CONTROL_CARD);
1536 2 2 |结束;
1537 2 1 |结束;
您是否有创建此文件的说明,还是从其他类似文件中克隆?您的帖子说:
码:
这是GP0685的编译:
请发布编译jcl和执行jcl。如果您正在批量运行,则jcl需要一个
码:
// SYSSNAP DD SYSOUT = *
语句是否要创建“ SNAP”转储。

考虑一下,SYSIN DD定义可能与代码不兼容。发布后,我们将了解更多。
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> 异常与调试

 


类似主题
话题 论坛 回覆
没有新帖 加载D ...时二级索引错误 IMS数据库/ DC 2
没有新帖 错误0C1原因代码1与分支i ... PL / I和组装商 3
没有新帖 删除基于S ...的重复记录 DFSORT / ICETOOL 4
没有新帖 xped时出现错误 JCL和VSAM 10
没有新帖 有人可以帮我找到... IBM工具 9
搜索我们的论坛:


回到顶部