Musterprozeduren

Folgende Prozeduren dienen als Beispiel zur Automatisierung häufiger Abläufe beim Einsatz des SM2 im normalen Rechenzentrumsbetrieb. Sie befinden sich auch in der Bibliothek SYSLIB.SM2.<ver>.

Die erste Prozedur startet eine Kurzzeitmessung mit Ausgabe in eine eigene Datei. Dabei werden Messprogramme definiert und gestartet.

Die zweite Prozedur setzt voraus, dass die vorangegangene Messung eine gewisse Zeit (z.B. 1/2 Stunde) bereits gelaufen ist. Sie beendet die Messung und schließt die Messwertedatei.

Die dritte Prozedur bereitet die Auswertung des SM2R1 vor und aktualisiert die Stamm-Messwertedatei. Im Beispiel wird angenommen, dass diese Stamm-Messwertedatei eine Plattendatei sei. Für eine Banddatei muss der Ablauf modifiziert werden.

Eingabedateien	alte Stamm-Messwertedatei und die gerade geschlossene Messwertedatei
Ausgabedatei	neue Stamm-Messwertedatei

Die vierte Prozedur wertet die gerade geschlossene Messwertedatei aus.

Starten der Kurzzeitmessung (SM2.START.MEASUREMENT)

/BEGIN-PROCEDURE LOGGING=C,PARAMETERS=YES(PROCEDURE-PARAMETERS=( -
/      &CYCLE  = 300,                       -
/      &SAMPLE = 500,                       -
/      &TSN    = '(BCAM,BCAT)',             -
/      &DEVICE = '(E018,E019,E01A)'         -
/      ),ESCAPE-CHARACTER=C'&')
/ASSIGN-SYSDTA TO-FILE=*SYSCMD
/
/REMARK   ====================================================
/REMARK   *** BEISPIEL 1                                   ***
/REMARK   *** STANDARDWERT FUERS MESSINTERVALL = 300 S UND ***
/REMARK   *** FUERS STICHPROBENINTERVALL       = 500 MS    ***
/REMARK   ====================================================
/
/REMARK   ====================================================
/REMARK   *** SM2-MESSWERTEDATEI DEFINIEREN UND SM2 LADEN  ***
/REMARK   ====================================================
/
/DELETE-FILE FILE-NAME=SM2.OUTPUT
/SET-JOB-STEP
/
/CREATE-FILE FILE-NAME = SM2.OUTPUT,                                -
/            SUPPORT   = PUBLIC-DISK (SPACE = RELATIVE (            -
/                                      PRIMARY-ALLOCATION   = 576,  -
/                                      SECONDARY-ALLOCATION = 576))
/
/ADD-FILE-LINK LINK-NAME     = SMLINK,          -
/              FILE-NAME     = SM2.OUTPUT,      -
/              ACCESS-METHOD = SAM,             -
/              OPEN-MODE     = OUTPUT
/
/START-SM2
 REMARK   =============================================================
 REMARK   ****   IN ADMINISTRATIONSTEIL VERZWEIGEN                 ****
 REMARK   =============================================================
 CALL-ADMINISTRATION-PART
 REMARK   =============================================================
 REMARK   ****   MESSPROGRAMM SYSTEM DEFINIEREN                    ****
 REMARK   ****   ALLE PLATTEN UND BAENDER UEBERWACHEN              ****
 REMARK   =============================================================
 SET-SYSTEM-PARAMETERS DEVICES = *SPECIFIED(DEVICE = (*TAPE,*DISK))
 REMARK   =============================================================
 REMARK   ****   MESSPROGRAMM TASK DEFINIEREN                      ****
 REMARK   ****   TASKS MIT DEN TSN'S 1111 UND 1112 SOWIE MIT       ****
 REMARK   ****   DEM JOBNAMEN TEST UEBERWACHEN                     ****
 REMARK   ****   NUR DIE PLATTE F00B UEBERWACHEN                   ****
 REMARK   =============================================================
 SET-TASK-PARAMETERS TASK-SELECTION = *SPECIFIED(TSN      = &TSN,  -
                                                 JOB-NAME = TEST), -
                     DEVICES = *SPECIFIED(DEVICE = &DEVICE)
 REMARK   =============================================================
 REMARK   ****   MESSPROGRAMM FILE DEFINIEREN                      ****
 REMARK   =============================================================
 ADD-FILE FILE-NAME=:4V05:$TSOS.TSOSCAT
 REMARK   =============================================================
 REMARK   ****   MESSPROGRAMM BCAM-CONNECTION DEFINIEREN            ***
 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   ****   SM2-DATEI EROEFFNEN, MESSINTERVALL UND            ****
 REMARK   ****   STICHPROBEN-INTERVALL ANGEBEN                     ****
 REMARK   =============================================================
 MODIFY-MEASUREMENT-PERIODS OFFLINE-PERIOD  = &CYCLE,   -
                            SAMPLING-PERIOD = &SAMPLE
 OPEN-LOG-FILE FILE = *BY-LINK-NAME
 REMARK   =============================================================
 REMARK   ****   MESSPROGRAMME STARTEN                             ****
 REMARK   =============================================================
 START-MEASUREMENT-PROGRAM TYPE=(*SYSTEM,*TASK,*FILE,*BCAM-CONNECTION)
 REMARK   =============================================================
 REMARK   ****   SM2-BENUTZER-PROGRAMM BEENDEN                     ****
 REMARK   ****   DIE MESSUNG LAEUFT IM HINTERGRUND !!!             ****
 REMARK   =============================================================
 END
/
/END-PROCEDURE

Kurzzeitmessung beenden und alte Messung fortsetzen (SM2.STOP.MEASUREMENT)

Dabei wird davon ausgegangen, dass der SM2 mit der vorhergehenden Prozedur gestartet wurde.

/BEGIN-PROCEDURE LOGGING=C,PARAMETERS=YES(PROCEDURE-PARAMETERS=(       -
/      &CYCLE  = 300,                 -
/      &SAMPLE = 500                  -
/      ),ESCAPE-CHARACTER=C'&')
/ASSIGN-SYSDTA TO-FILE=*SYSCMD
/
/REMARK   ==========================================================
/REMARK   ***   BEISPIEL 2                                       ***
/REMARK   ***   STANDARDWERT FUERS MESSINTERVALL  = 300 S UND    ***
/REMARK   ***   FUERS STICHPROBENINTERVALL        = 500 MS       ***
/REMARK   ==========================================================
/
/REMARK   ==========================================================
/REMARK   ***   UNKATALOGISIERTE DATEI LOESCHEN                  ***
/REMARK   ==========================================================
/
/DELETE-FILE FILE-NAME=SM2.CHANGE
/SET-JOB-STEP
/
/REMARK   ==========================================================
/REMARK   ***   SM2-BENUTZER-PROGRAMM LADEN                      ***
/REMARK   ==========================================================
/
/START-SM2
 REMARK   =============================================================
 REMARK   ****   IN ADMINISTRATIONSTEIL VERZWEIGEN UND             ****
 REMARK   ****   ALLE AKTIVEN MESSPROGRAMME BEENDEN                ****
 REMARK   =============================================================
 CALL-ADMINISTRATION-PART
 STOP-MEASUREMENT-PROGRAM TYPE=(*SYSTEM,*TASK,*FILE,*BCAM-CONNECTION)
 REMARK   =============================================================
 REMARK   ****   SM2-DATEI SCHLIESSEN                              ****
 REMARK   =============================================================
 CLOSE-LOG-FILE
 REMARK   =============================================================
 REMARK   ****   DIE MESSPROGRAMM-DEFINITIONEN SIND                ****
 REMARK   ****   NOCH GUELTIG                                      ****
 REMARK   =============================================================
 REMARK   =============================================================
 REMARK   ****   SM2-BENUTZER-PROGRAMM BEENDEN, UM DIE             ****
 REMARK   ****   GESCHLOSSENE DATEI UMZUBENENNEN                   ****
 REMARK   =============================================================
 END
/
/MODIFY-FILE-ATTRIBUTES FILE-NAME = SM2.OUTPUT,                      -
/                       NEW-NAME  = SM2.CHANGE,                      -
/                       SUPPORT   = PUBLIC-DISK (SPACE=RELEASE(100))
/
/END-PROCEDURE

SM2R1-Auswertung mit dem Dienstprogramm SM2U1 vorbereiten (SM2U1.PREPARE)

Stamm-Messwertedatei mit allen Sätzen außer denen für das Messprogramm TASK aktualisieren.

/BEGIN-PROCEDURE LOGGING=C,PARAMETERS=YES(PROCEDURE-PARAMETERS=(       -
/     &SM2UIN    = SM2.CHANGE,              -
/     &SM2UTASK  = SM2.SAM.TASK,            -
/     &SM2MASTER = SM2.MASTER               -
/     ),ESCAPE-CHARACTER=C'&')
/ASSIGN-SYSDTA TO-FILE=*SYSCMD
/
/REMARK   ==========================================================
/REMARK   ***   EINGABEDATEI  ZUWEISEN                           ***
/REMARK   ==========================================================
/
/ADD-FILE-LINK LINK-NAME = SM2UI1,   -
/              FILE-NAME = &SM2UIN
/
/REMARK  ==========================================================
/REMARK  ***   AUSGABEDATEI (SM2-STAMMDATEI) ANLEGEN/ZUWEISEN   ***
/REMARK  ==========================================================
/
/CREATE-FILE FILE-NAME = &SM2MASTER
/SET-JOB-STEP
/
/ADD-FILE-LINK LINK-NAME = SM2UO,      -
/              FILE-NAME = &SM2MASTER
/
/REMARK   ==========================================================
/REMARK   ***   SM2U1 LADEN, SM2-STAMMDATEI AKTUALISIEREN        ***
/REMARK   ***   UND ALLE SAETZE, AUSSER DENEN FUER DAS           ***
/REMARK   ***   MESSPROGRAMM TASK KOPIEREN                       ***
/REMARK   ==========================================================
/
/START-SM2U1
 SELECT-MEASUREMENT-GROUPS SELECTION = *ALL(EXCEPT = *TASK-STATISTICS)
 END
/
/REMARK   ==========================================================
/REMARK   ***   EINGABEDATEI  ZUWEISEN                           ***
/REMARK   ==========================================================
/
/ADD-FILE-LINK LINK-NAME = SM2UI1,   -
/              FILE-NAME = &SM2UIN
/
/REMARK   ==========================================================
/REMARK   ***   AUSGABEDATEI FUER TASK-SAETZE ZUWEISEN           ***
/REMARK   ==========================================================
/
/DELETE-FILE FILE-NAME = &SM2UTASK
/SET-JOB-STEP
/
/CREATE-FILE FILE-NAME = &SM2UTASK
/
/ADD-FILE-LINK LINK-NAME = SM2UO,      -
/              FILE-NAME = &SM2UTASK
/
/REMARK   ==========================================================
/REMARK   ***   SM2U1 LADEN, SM2-DATEI FUER TASKAUSWERTUNG       ***
/REMARK   ***   ERSTELLEN.                                       ***
/REMARK   ==========================================================
/
/START-SM2U1
 SELECT-MEASUREMENT-GROUPS SELECTION=*TASK-STATISTICS
 END
/
/END-PROCEDURE

Auswertung mit dem SM2R1 (SM2R1.EVALUATION)

Mit dieser Prozedur kann man die gerade geschlossene SM2-Ausgabedatei auswerten.

/BEGIN-PROCEDURE LOGGING=C,PARAMETERS=YES(PROCEDURE-PARAMETERS=(       -
/      &SM2OUT     = SM2.CHANGE,       -
/      &SM2R1OUT   = SM2R1.OUT,        -
/      &SM2UTASK   = SM2.SAM.TASK,     -
/      &SM2R1OTASK = SM2R1.OUT.TASK    -
/      ),ESCAPE-CHARACTER=C'&')
/
/MODIFY-TERMINAL-OPTIONS OVERFLOW-CONTROL = NO-CONTROL
/
/ASSIGN-SYSDTA TO-FILE = *SYSCMD
/
/DELETE-FILE FILE-NAME = &SM2R1OUT
/SET-JOB-STEP
/
/REMARK   ==========================================================
/REMARK   ***      SM2R1 LADEN UND SM2-DATEI AUSWERTEN           ***
/REMARK   ==========================================================
/
/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
/
/REMARK   =========================================================='
/REMARK   ***      SM2R1-AUSGABEDATEI AUSDRUCKEN                 ***'
/REMARK   =========================================================='
/
/PRINT-DOCUMENT FROM-FILE          = &SM2R1OUT,               -
/               DELETE-AFTER-PRINT = *YES,                    -
/               DOCUMENT-FORMAT    = *TEXT(                   -
/                                     LINE-SPACING=*BY-EBCDIC-CONTROL)
/
/REMARK   =========================================================='
/REMARK   ***              TASK-AUSWERTUNG                       ***'
/REMARK   =========================================================='
/
/DELETE-FILE FILE-NAME = &SM2R1OTASK
/SET-JOB-STEP
/
/REMARK   =========================================================='
/REMARK   ***     SM2R1 LADEN UND SM2-DATEI                      ***'
/REMARK   ***     (TASK-SAETZE) AUSWERTEN                        ***'
/REMARK   =========================================================='
/
/START-SM2R1 MONITOR-FILE-NAME = &SM2UTASK,      -
/            LIST-FILE-NAME    = &SM2R1OTASK
 SET-TITLE TEXT='*** TASKSTATISTIK ***'
 PRINT-TASK-STATISTICS INFORMATION=*HIGH
 END
/
/REMARK   =========================================================='
/REMARK   ***    SM2R1-AUSGABEDATEI AUSDRUCKEN                   ***'
/REMARK   =========================================================='
/
/PRINT-DOCUMENT FROM-FILE          = &SM2R1OTASK,  -
/               DELETE-AFTER-PRINT = *YES,         -
/               DOCUMENT-FORMAT    = *TEXT(        -
/                                     LINE-SPACING=*BY-EBCDIC-CONTROL)
/
/MODIFY-TERMINAL-OPTIONS OVERFLOW-CONTROL=USER-ACKNOWLEDGE
/END-PROCEDURE