Sample procedures

The following procedures serve as examples for automating frequently recurring operations when the SM2 is used in normal computer center operation. They can also be found in the SYSLIB.SM2.<ver> library.

The first procedure starts short-term monitoring with output to a separate file, defining and starting monitoring programs.

The second procedure presupposes that the preceding monitoring operation has already been in progress for some time (e.g. 30 minutes). It terminates monitoring and closes the SM2 output file.

The third procedure makes the preparations for analysis with SM2R1 and updates the master output file. In the example it is assumed that the master output file is on disk. If it is on tape, the procedure has to be modified.

Input files Output file

Old master output file and the SM2 output file that was just closed. New master output file.

The fourth procedure causes the SM2 output file just closed to be analyzed.

Start short-term monitoring (SM2.START.MEASUREMENT)

/SET-PROCEDURE-OPTIONS -
/    LOGGING-ALLOWED = *YES -
/   ,DATA-ESCAPE-CHAR = *STD
/
/BEG-PAR-DECL
/ DECL-PAR NAME = CYCLE    (INIT-VAL ='300')
/ DECL-PAR NAME = SAMPLE   (INIT-VAL ='500')
/ DECL-PAR NAME = SM2-FILE (INIT-VAL = 'SM2.OUTPUT')
/END-PAR-DECL
/
/ASSIGN-SYSDTA TO-FILE=*SYSCMD
/
/&*====================================================
/&**** EXAMPLE 1                                    ***
/&**** START MONITORING AND                         ***
/&**** OPEN OUTPUT FILE                             ***
/&*====================================================
/IF (IS-CATALOGED-FILE(FILE = SM2-FILE))
/   DELETE-FILE FILE-NAME = &SM2-FILE
/END-IF
/
/CREATE-FILE FILE-NAME = &SM2-FILE,             -
/            SUPPORT   = PUBLIC-DISK (          -
/               SPACE = RELATIVE (              -
/                  PRIMARY-ALLOCATION   = 576,  -
/                  SECONDARY-ALLOCATION = 576))
/
/ADD-FILE-LINK LINK-NAME     = SMLINK,          -
/              FILE-NAME     = &SM2-FILE,       -
/              ACCESS-METHOD = SAM,             -
/              OPEN-MODE     = OUTPUT
/
/START-SM2
 REMARK   =============================================================
 REMARK   ****   BRANCH TO ADMINISTRATION PART                     ****
 REMARK   =============================================================
 CALL-ADMINISTRATION-PART
//
//REMARK   ============================================================
//REMARK   ****   DEFINE SYSTEM MONITORING PROGRAM                 ****
//REMARK   ****   MONITOR ALL DISKS AND TAPE DEVICES               ****
//REMARK   ============================================================
//SET-SYSTEM-PARAMETERS DEVICES = *SPECIFIED(      -
//                         DEVICE = (*TAPE,*DISK))
//
//REMARK   ============================================================
//REMARK   ****   DEFINE TASK MONITORING PROGRAM                   ****
//REMARK   ============================================================
//SET-TASK-PARAMETERS TASK-SELECTION = *SPECIFIED(    -
//                       TSN      = (0VTG,0VTE),      -
//                       JOB-NAME = TEST),            -
//                    DEVICES = *SPECIFIED(           -
//                       DEVICE = (144D,144E))
//
//REMARK   ============================================================
//REMARK   ****   DEFINE FILE MONITORING PROGRAM                   ****
//REMARK   ============================================================
//ADD-FILE FILE-NAME = :4V07:$TSOS.TSOSCAT
//
//REMARK   ============================================================
//REMARK   ****   DEFINE BCAM-CONNECTION MONITORING PROGRAM         ***
//REMARK   ============================================================
//SET-BCAM-CONNECTION-PARAMETERS  INWAIT-BUCKETS  = *STD-LIMITS, -
//                                REACT-BUCKETS   = *STD-LIMITS, -
//                                INPROC-BUCKETS  = *STD-LIMITS, -
//                                OUTPROC-BUCKETS = *STD-LIMITS
//
//ADD-BCAM-CONNECTION-SET                             -
//          SET-NAME             = DIALOG,            -
//          CONNECTION-SELECTION = *BY-NEA-NAME(      -
//             CONNECTION-NAME = *SPECIFIED(          -
//                LOCAL-APPLICATION   = $DIALOG,      -
//                PARTNER-APPLICATION = *ANY)),       -
//          HOST-SELECTION       = *ANY
//
//REMARK   ============================================================
//REMARK   ****   OPEN SM2 FILE, SPECIFY MONITORING CYCLE AND      ****
//REMARK   ****   SAMPLING CYCLE                                   ****
//REMARK   ============================================================
//MODIFY-MEASUREMENT-PERIODS OFFLINE-PERIOD  = &CYCLE,   -
//                           SAMPLING-PERIOD = &SAMPLE
//
//OPEN-LOG-FILE FILE = *BY-LINK-NAME
//
//REMARK   ============================================================
//REMARK   ****   START MONITORING PROGRAMS                        ****
//REMARK   ============================================================
//START-MEASUREMENT-PROGRAM TYPE = (   -
//                     *SYSTEM,*TASK,*FILE,*BCAM-CONNECTION)
//
//REMARK   ============================================================
//REMARK   ****   TERMINATE SM2 USER PROGRAM                       ****
//REMARK   ****   MONITORING CONTINUES IN THE BACKGROUND !!!       ****
//REMARK   ============================================================
//END
/
/EXIT-PROCEDURE

Terminate short-term monitoring and resume former monitoring operations (SM2.STOP.MEASUREMENT)

It is assumed that SM2 was started with the preceding procedure.

/SET-PROCEDURE-OPTIONS -
/    LOGGING-ALLOWED = *YES -
/   ,DATA-ESCAPE-CHAR = *STD
/
/BEG-PAR-DECL
/ DECL-PAR NAME = FROM-FILE (INIT-VAL = 'SM2.OUTPUT')
/ DECL-PAR NAME = TO-FILE   (INIT-VAL = 'SM2.CHANGE')
/END-PAR-DECL
/
/ASSIGN-SYSDTA TO-FILE=*SYSCMD
/
/&*==========================================================
/&**** EXAMPLE 2                                          ***
/&**** STOP MEASUREMENT                                   ***
/&**** CLOSE AND RENAME FILE                              ***
/&*==========================================================
/
/&*==========================================================
/&****   DELETE TO-FILE                                   ***
/&*==========================================================
/IF (IS-CATALOGED-FILE(FILE = TO-FILE))
/   DELETE-FILE FILE-NAME = &TO-FILE
/END-IF
/
/START-SM2
 REMARK   =============================================================
 REMARK   ****   BRANCH TO ADMINISTRATION PART AND TERMINATE       ****
 REMARK   ****   ACTIVE MONITORING PROGRAMS                        ****
 REMARK   =============================================================
 CALL-ADMINISTRATION-PART
// 
//STOP-MEASUREMENT-PROGRAM TYPE = (   -
//                     *SYSTEM,*TASK,*FILE,*BCAM-CONNECTION)
//
//REMARK   ============================================================
//REMARK   ****   CLOSE SM2 FILE                                   ****
//REMARK   ============================================================
//CLOSE-LOG-FILE
//
//REMARK   ============================================================
//REMARK   ****   THE MONITORING PROGRAM DEFINITIONS ARE           ****
//REMARK   ****   STILL VALID                                      ****
//REMARK   ============================================================
//
//REMARK   ============================================================
//REMARK   ****   TERMINATE SM2 USER PROGRAM                       ****
//REMARK   ****   RENAME CLOSED FILE                               ****
//REMARK   ============================================================
//END
/
/MODIFY-FILE-ATTRIBUTES FILE-NAME = &FROM-FILE,                      -
/                       NEW-NAME  = &TO-FILE,                        -
/                       SUPPORT   = PUBLIC-DISK (SPACE=RELEASE(100))
/
/EXIT-PROCEDURE

Prepare for SM2R1 analysis with the SM2U1 utility (SM2U1.PREPARE)

Update the master output file with all the records with the exception of those for the TASK monitoring program.

/SET-PROCEDURE-OPTIONS -
/    LOGGING-ALLOWED = *YES -
/   ,DATA-ESCAPE-CHAR = *STD
/
/BEG-PAR-DECL
/ DECL-PAR NAME = SM2U-IN      (INIT-VAL = 'SM2.CHANGE')
/ DECL-PAR NAME = SM2U-TASK    (INIT-VAL = 'SM2.SAM.TASK')
/ DECL-PAR NAME = SM2U-MASTER  (INIT-VAL = 'SM2.MASTER')
/END-PAR-DECL
/
/ASSIGN-SYSDTA TO-FILE=*SYSCMD
/
/&*==========================================================
/&****   ASSIGN INPUT FILE                                ***
/&*==========================================================
/ADD-FILE-LINK LINK-NAME = SM2UI1,   -
/              FILE-NAME = &SM2U-IN
/
/&*==========================================================
/&****   ASSIGN OUTPUT FILE (SM2 MASTER FILE)             ***
/&*==========================================================
/IF (NOT IS-CATALOGED-FILE(FILE = SM2U-MASTER))
/   CREATE-FILE FILE-NAME = &SM2U-MASTER,                -
/               SUPPORT   = PUBLIC-DISK (                -
/                  SPACE = RELATIVE (                    -
/                     PRIMARY-ALLOCATION   = 20000,      -
/                     SECONDARY-ALLOCATION = 5000))
/END-IF
/ADD-FILE-LINK LINK-NAME = SM2UO,        -
/              FILE-NAME = &SM2U-MASTER
/
/&*==========================================================
/&****   LOAD SM2U1, UPDATE SM2 MASTER FILE AND ALL       ***
/&****   RECORDS EXCEPT THOSE FOR THE TASK MONITORING     ***
/&****   PROGRAM                                          ***
/&*==========================================================
/START-SM2U1
//SELECT-MEASUREMENT-GROUPS                -
//          SELECTION = *ALL(              -
//             EXCEPT = *TASK-STATISTICS)
//END
/
/&*==========================================================
/&****   ASSIGN INPUT FILE AGAIN                          ***
/&*==========================================================
/ADD-FILE-LINK LINK-NAME = SM2UI1,   -
/              FILE-NAME = &SM2U-IN
/
/&*==========================================================
/&****   ASSIGN OUTPUT FILE FOR TASK RECORDS              ***
/&*==========================================================
/IF (IS-CATALOGED-FILE(FILE = SM2U-TASK))
/   DELETE-FILE FILE-NAME = &SM2U-TASK
/END-IF
/
/CREATE-FILE FILE-NAME = &SM2U-TASK,                -
/            SUPPORT   = PUBLIC-DISK (              -
/               SPACE = RELATIVE (                  -
/                  PRIMARY-ALLOCATION   = 576,      -
/                  SECONDARY-ALLOCATION = 576))
/
/ADD-FILE-LINK LINK-NAME = SM2UO,      -
/              FILE-NAME = &SM2U-TASK
/
/&*==========================================================
/&****   LOAD SM2U1, CREATE SM2 FILE FOR TASK ANALYSIS    ***
/&*==========================================================
/START-SM2U1
//SELECT-MEASUREMENT-GROUPS SELECTION = *TASK-STATISTICS
//END
/
/EXIT-PROCEDURE

Perform analysis with SM2R1 (SM2R1.EVALUATION)

This procedure analyzes the SM2 output file just closed.

/SET-PROCEDURE-OPTIONS -
/    LOGGING-ALLOWED = *YES -
/   ,DATA-ESCAPE-CHAR = *STD
/
/BEG-PAR-DECL
/ DECL-PAR NAME = SM2OUT      (INIT-VAL = 'SM2.CHANGE')
/ DECL-PAR NAME = SM2R1OUT    (INIT-VAL = 'SM2R1.OUT')
/ DECL-PAR NAME = SM2UTASK    (INIT-VAL = 'SM2.SAM.TASK')
/ DECL-PAR NAME = SM2R1OTASK  (INIT-VAL = 'SM2R1.OUT.TASK')
/END-PAR-DECL
/
/MODIFY-TERMINAL-OPTIONS OVERFLOW-CONTROL = *NO-CONTROL
/ASSIGN-SYSDTA TO-FILE = *SYSCMD
/
/IF (IS-CATALOGED-FILE(FILE = SM2R1OUT))
/   DELETE-FILE FILE-NAME = &SM2R1OUT
/END-IF
/
/&*==========================================================
/&****      LOAD SM2R1 AND ANALYZE SM2 FILE               ***
/&*==========================================================
/START-SM2R1 MONITOR-FILE-NAME = &SM2OUT,     -
/            LIST-FILE-NAME    = &SM2R1OUT
//PRINT-CONFIGURATION
//SET-TITLE TEXT='*** STANDARD-STATISTIKEN ***'
//PRINT-REPORTS REPORT-LIST = (*STD, *FILE)
//PRINT-QUEUE-TRANSITION
//END
/
/&*==========================================================
/&****      PRINT SM2R1 OUTPUT FILE                       ***
/&*==========================================================
/PRINT-DOCUMENT FROM-FILE          = &SM2R1OUT,             -
/               DELETE-AFTER-PRINT = *YES,                  -
/               DOCUMENT-FORMAT    = *TEXT(                 -
/                  LINE-SPACING = *BY-EBCDIC-CONTROL)
/
/&*==========================================================
/&****      ANALYZE TASK                                  ***
/&*==========================================================
/IF (IS-CATALOGED-FILE(FILE = SM2R1OTASK))
/   DELETE-FILE FILE-NAME = &SM2R1OTASK
/END-IF
/
/&*==========================================================
/&****     LOAD SM2R1 AND ANALYZE SM2 FILE                ***
/&****     (TASK RECORDS)                                 ***
/&*==========================================================
/START-SM2R1 MONITOR-FILE-NAME = &SM2UTASK,      -
/            LIST-FILE-NAME    = &SM2R1OTASK
//SET-TITLE TEXT='*** TASKSTATISTIK ***'
//PRINT-TASK-STATISTICS INFORMATION=*HIGH
//END
/
/&*==========================================================
/&****    PRINT SM2R1 OUTPUT FILE                         ***
/&*==========================================================
/PRINT-DOCUMENT FROM-FILE          = &SM2R1OTASK,  -
/               DELETE-AFTER-PRINT = *YES,         -
/               DOCUMENT-FORMAT    = *TEXT(        -
/                  LINE-SPACING = *BY-EBCDIC-CONTROL)
/
/MODIFY-TERMINAL-OPTIONS OVERFLOW-CONTROL = *USER-ACKNOWLEDGE
/EXIT-PROCEDURE