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

SDSF REXX用于DB2命令输出


IBM大型机论坛 -> 清单& REXX
发表新话题   回复主题
查看上一个主题 :: 查看下一个主题  
作者 信息
瓦桑斯

全球主持人


已加入:2007年8月28日
帖子:1689
地点:印度蒂鲁普布尔

 发布 发表于:周四四月25,2019 11:29下午
引用回复

你好

我试图在文件中捕获DB2命令的输出。
命令为/ -SS12 DISPLAY BUFFERPOOL(ACTIVE)详情

SS12是DB2子系统ID。
码:
/ * REXX * /                                                        
"ALLOC F(OUTFILE) DS('"WELLS.CONSOLE.OUTPUT"') MOD REUSE"
跟踪   "O"                                                     
PARSE SOURCE _SYS _HOW _CMD。                                   
帕尔塞凉亭                                                 
调试= 1                                                        
ISFRC = ISFCALLS("ON")                                         
如果ISFRC¬= 0,则执行                                           
    SAY "ISFCALLS RC" ISFRC                                     
    出口                                                        
结束                                                              
CMD ="/ -SS12显示缓冲区(ACTIVE) DETAIL"               
呼叫 CONSOLEGET                                                 
删除ISFULOG。                                                   
"FREE DD(OUTFILE)"                                     
呼叫  ISFCALLS "OFF"                                           
出口                                                            
                                                               
控制台:                                                   
ISFDELAY = 20                                                     
地址SDSF"ISFEXEC '" || CMD || "'"                         
如果RC¬= 0,那么做                                             
    SAY "ISFEXEC  RC" RC                                       
    SAY ISFMSG                                                 
    DO  IM = 1 TO ISFMSG2.0                                     
        SAY ISFMSG2.IM                                         
    结束                                                          
    出口                                                        
结束                                                              
 "EXECIO * DISKW 输出文件 (STEM ISFULOG. FINIS"                 
返回

但是运行该程序后,文件WELLS.CONSOLE.OUTPUT仅具有部分命令输出。
码:
索姆帕尔  2019114  11:56:30.06             ISF031I控制台已启用                                     
索姆帕尔  2019114  11:56:30.06           --SS12显示缓冲池(ACTIVE) DETAIL                             
索姆帕尔  2019114  11:56:30.07  STC02418   DSNB401I -SS12 BUFFERPOOL名称BP0,BUFFERPOOL ID 0,使用计数658
索姆帕尔  2019114  11:56:30.08  STC02418   DSNB402I -SS12缓冲池大小= 6000缓冲  AUTOSIZE = NO     
                                                     VPSIZE MINIMUM = 0 VPSIZE MAXIMUM = 0                   
                                                        ALLOCATED       =     6000   TO BE DELETED   =        0
                                                        IN-USE/UPDATED  =      285                             
索姆帕尔  2019114  11:56:30.08  STC02418   DSNB431I -SS12模拟的缓冲区池大小= 0缓冲区-           
                                                        ALLOCATED       =        0                             
                                                        IN-USE          =        0   HIGH IN-USE     =        0
                                                        SEQ-IN-USE      =        0   HIGH SEQ-IN-USE =        0
索姆帕尔  2019114  11:56:30.08  STC02418   DSNB406I -SS12 PGFIX属性-                                   
                                                        CURRENT = NO                                           
                                                        PENDING = NO                                           
                                                     页面填充方法= LRU                               
索姆帕尔  2019114  11:56:30.09  STC02418   DSNB404I  -SS12 THRESHOLDS -                                       
                                                       VP 顺序的    = 80   SP 顺序的   =  0           
                                                       DEFERRED WRITE   = 30   垂直递延WRT  =  5,  0
                                                       并行顺序= 50   辅助并行SEQT =  0   
索姆帕尔  2019114  11:56:30.09  STC02418   DSNB546I -SS12首选镜框尺寸4K                             
                                                   使用4K帧大小分配的6000个缓冲区                 
索姆帕尔  2019114  11:56:30.10  STC02418   DSNB409I -SS12自11起的递增统计:51:10 APR 24, 2019 
索姆帕尔  2019114  11:56:30.10  STC02418   DSNB411I -SS12随机获取    =652                             
                                                       SYNC READ I/O (R) =111                                 
                                                       SEQ.   GETPAGE    =50195                               
                                                       SYNC READ I/O (S) =222                                 
                                                       DMTH HIT          =0                                   
                                                       PAGE-INS REQUIRED =0                                   
                                                       SEQUENTIAL        =4897                                 
                                                       VPSEQT HIT        =3                                   
                                                       RECLASSIFY        =5       


在“ STC02414 DSN9022I -SS12 DSNB1CMD'-DISPLAY BUFFERPOOL'正常完成”之前,它无法捕获所有响应。

您能否让我知道为什么会这样。

问候,
回到顶部
查看用户资料 发送私信
尼克·克劳斯顿

全球主持人


加入时间:2007年5月10日
帖子:2455
地点:英国汉普郡

 发布 发表于:星期五四月26,2019 1:51上午
引用回复

可能是因为您的EXECIO *。如果您的一行之一为空,则表示停止执行EXECIO。使用实际的行数。

那只是一种可能性。
回到顶部
查看用户资料 发送私信
瓦桑斯

全球主持人


已加入:2007年8月28日
帖子:1689
地点:印度蒂鲁普布尔

 发布 发表于:星期五四月26,2019 3:44上午
引用回复

Thank you for the solution. 执行力* was the problem.

已变更
码:
"EXECIO * DISKW 输出文件 (STEM ISFULOG. FINIS"


码:
"EXECIO " ISFULOG.0 " DISKW 输出文件 (STEM ISFULOG. FINIS" 


现在,所有消息均已捕获。精彩 icon_smile.gif
回到顶部
查看用户资料 发送私信
查看上一个主题 :: :: 查看下一个主题  
发表新话题   回复主题 查看书签
所有时间均为格林尼治标准时间+ 6小时
论坛索引 -> 清单& REXX

 


类似主题
话题 论坛 回覆
该主题已锁定:您无法编辑帖子或回复。 将匹配的记录写入输出文件 DFSORT / ICETOOL 11
没有新帖 DB2I面板中的命令行放置 TSO / ISPF 2
没有新帖 从REXX调用FTP的任何示例吗? 清单& REXX 1
没有新帖 SummeRx:REXX z / OS的新框架 清单& REXX 6
没有新帖 更改存在的LRECL的命令... JCL和VSAM 7
搜索我们的论坛:


回到顶部