Posted by Bob Chapman on June 03, 2008 at 14:52:38:
I'm trying to snap the syslog to a dataset after an IPL. I found an example of a REXX that was written years ago, to write it to a PDS but it looks like it was written for an enviroment that only had 1 system per jes node. Here is what I have so far:
/*REXX */
TRACE I /*
'PROFILE MSGID'
PARSE SOURCE . . CMD . . . . . ENV .
IF ENV <> 'IOF' THEN DO
PUSH 'IOF * OPTMENU.%'CMD
EXIT
END
ADDRESS IOF
'IOF SYSLOG RUNNING'
'1 BROWSE'
'UP MAX'
"SD DA('dataset.xyz')"
SDRC = RC
"SNAP 9999999 LINES"
"SNAPCLOS"
"JUMP X"
EXIT 0
Unfornately, the 1 BROWSE is not exactly what I need. In my enviroment, I have 2 to 4 systems up, therefore, I have 2 to 4 different SYSLOGS running. I am interesting in obtaining the log for the system that my job is running on.
In IOF, I have this:
-------JOBNAME--JOBID---ACT-STAT-SYID-------CPU-------I/O-STEP-----PROCSTEP-SWP
_ 1 SYSLOG S061992 3811
_ 2 SYSLOG S076747 1841 43:57 1101.49 IN
_ 3 SYSLOG S084764 1831
Do you have any thoughts on how I can go about figuring out which SYSLOG is the one that I am after, prior to the SNAP? The one in this case would be the #2 or the one SWAPPED IN.
Thanks,
Bob