HP XP Racks - Manual (Page 726)

6. Quit the ISPF editor.
Using a Script for Retrieval
To use a script for retrieval:
1.
Create a dataset to which SYSLOG is to be output. The name of the sequential dataset is
assumed to be YUKON.SYSLOG.
2. Create a dataset to which only the CLI command-execution logs are to be output. The name
of the sequential dataset is assumed to be YUKON.BCMLOG.
3. In the SDSF panel, display SYSLOG.
4. In the panel displaying SYSLOG, enter commands to output SYSLOG for the desired period
to the dataset created in step 1.
To output the information between 13:00 and 14:00, enter as follows:
PT OSDN 'YUKON.SYSLOG'
PRT 13:00:00 14:00:00
PRINT CLOSE
5. Execute the following CLI command-execution log retrieval procedure to retrieve the CLI
command-execution logs into the dataset created in step 2:
If the procedure is stored in the sequential dataset named YUKON.EXTCMD, for example, then
executing the log retrieval procedure will result as follows:
If CLI command-execution logs are set to be output to SYSLOG (SYSLOG=YES):
EXEC 'YUKON.EXTCMD' 'YKZ31 YUKON.SYSLOG YUKON.BCMLOG'
If CLI command-execution logs are set to be output to the console (SYSLOG=CONSOLE):
EXEC 'YUKON.EXTCMD' 'YKZ91 YUKON.SYSLOG YUKON.BCMLOG'
Example of a CLI command-execution log retrieval procedure:
/* REXX ***/
Parse Upper Arg Mystrg Myinds Myoutds;
"ALLOCATE DA('"Myinds"') F(INDD) SHR REUSE"
"ALLOCATE DA('"Myoutds"') F(OUTDD) OLD REUSE"
"EXECIO 0 DISKR INDD (OPEN)"
eof='NO'
DO WHILE eof = 'NO'
"EXECIO 1 DISKR INDD (STEM LINE.)"
IF RC = 2 THEN
eof='YES'
ELSE
DO
IF INDEX(LINE.1,Mystrg) <> 0 THEN
DO
"EXECIO 1 DISKW OUTDD (STEM LINE.)"
END
END
END
"EXECIO 0 DISKR INDD (FINIS"
"EXECIO 0 DISKW OUTDD (FINIS"
"FREE F(INDD)"
"FREE F(OUTDD)"
EXIT 0
NOTE: If the YKZ910I message spans two lines, the second line is not retrieved.
726 Troubleshooting