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

调用CEE3DMP进行追溯后使用BPXWDYN


IBM大型机论坛 -> COBOL程式设计
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
玛加

新的用户


加入:2020年7月8日
帖子:1
地点:西班牙

发布发表:2020年7月8日星期三下午4:46
引用回复

你好
我是这个问题的新手,这是我的第一个问题:

我正在尝试获取模块调用链的回溯。

这些步骤是:

1.调用BPXWDYN为cee3dmp分配文件,执行以下操作:

码:
STRING'''A141310.CL'                                   
       '.D'                                             
       FAIL-TIME(3:6) '.T'                               
       FAIL-TIME(9:6)''''太空定界           
       进入DSNAME指针DSN-LEN                       
STRING'ALLOC DD(FITRACE1) DSN(' DSNAME(1:DSN-LEN - 1)   
       ') NEW  CATALOG LRECL(133) RECFM(F,B)'           
    DELIMITED BY SIZE                                   
     INTO WS-ALLOC-TEXT                                 
    END-STRING.                                         

呼叫BPXWDYN USING WS-ALLOC-STRING.                     

没关系

2.然后,我调用CEE3DMP以仅在文件FITRACE1中使用回溯givin结果生成转储。

码:
将“标题-追溯”移至DMPTITL。                         
STRING'THREAD(CURRENT)追踪NOFILES FNAME(FITRACE1)'   
       '储存创新产品无障碍条件'         
       ' NOGENOPTS NOENTRY'                                 
    DELIMITED BY SIZE                                       
    INTO OPTIONS                                             
呼叫"CEE3DMP"使用DMPTITL,OPTIONS,FC。                   
如果不是FC的CEE000  THEN                                   
   display "cee3dmp失败,出现味精"                       
        Msg-No of FC                                         
   STOP RUN                                                 
万一。                   

而且也有效


3.但是问题是当我尝试阅读FITRACE时

每当我尝试阅读:

我将其称为BPXWDYN,但这次使用SHR和FITRACE2,但文件相同:

码:
STRING'ALLOC DD(FITRACE2) DSN('same dsn') SHR'           
    DELIMITED BY SIZE                                   
     INTO WS-ALLOC-TEXT                                 
    END-STRING.                                         

呼叫BPXWDYN USING WS-ALLOC-STRING.                     

而且似乎进展顺利

然后

码:
打开输入FI-TRACE2。



码:
阅读FI-TRAZA2
总是返回文件状态10,就好像里面什么都没有

Â使用CEE3DMP生成文件后如何再次读取?

问候。
回到顶部
查看用户资料 发送私信


新的用户


已加入:2020年6月10日
帖子:3
地点:加拿大

发布发表于:2020年7月22日星期三上午9:21
引用回复

你好

您解决问题了吗?
我是COBOL的新手,但是我注意到您的文件名在您文章的底部看起来有所不同,并且想知道名称不匹配是否可能是您的问题?
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> COBOL程式设计

 


类似主题
话题 论坛 回覆
没有新帖 从REXX调用FTP的任何示例吗? 清单和REXX 1
没有新帖 从REXX调用汇编程序 PL / I和组装商 5
没有新帖 从Cobol调用Rexx程序 清单和REXX 12
没有新帖 使用BP动态读取输入文件... COBOL程式设计 20
没有新帖 从另一个Rexx内调用Rexx 清单和REXX 3
搜索我们的论坛:


回到顶部