|
查看上一个主题 :: 查看下一个主题
|
| 作者 |
信息 |
瓦桑斯
全球主持人
已加入：2007年8月28日
帖子：1689
地点：印度蒂鲁普布尔
|
|
|
|
你好
我试图在文件中捕获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
地点：英国汉普郡
|
|
|
|
可能是因为您的EXECIO *。如果您的一行之一为空，则表示停止执行EXECIO。使用实际的行数。
那只是一种可能性。 |
|
| 回到顶部 |
|
|
瓦桑斯
全球主持人
已加入：2007年8月28日
帖子：1689
地点：印度蒂鲁普布尔
|
|
|
|
Thank you for the solution. 执行力* was the problem.
已变更
| 码： |
| "EXECIO * DISKW 输出文件 (STEM ISFULOG. FINIS" |
至
| 码： |
| "EXECIO " ISFULOG.0 " DISKW 输出文件 (STEM ISFULOG. FINIS" |
现在，所有消息均已捕获。精彩  |
|
| 回到顶部 |
|
|
|
|
