SMS環境構築_ACSルーチンの作成/反映篇

本記事はSMS環境構築する際、ACS Routineの設定、及び定義反映手順を紹介しています。

関連記事は以下を参照してください

1. 事前作業
2. Storage Classの設定
3. Storage Groupの設定
4. ACS Routineの設定&定義反映(本記事)

PDSの作成

• ACSルーチンのライブラリー(PDS)をアロケーションする。
  (*1)アロケーションする先のボリューム名を指定

//STEP1 EXEC PGM=IEFBR14                                          
//SYSUT1 DD DSN=TEST.ACS00,DISP=(,CATLG),UNIT=3390,VOL=SER=volume(*1),
//       SPACE=(CYL,(1,,50)),                                     
//       DCB=(DSORG=PO,BLKSIZE=27920,LRECL=80,RECFM=FB)

ACSルーチンのコーディング

• 以下の例では、データセット名「TEST.**」が作成される際、Storage Classは「TSTCLASS」、Storage Groupは「TSTGROUP」が選択される。

▼Storage Class

PROC STORCLAS                              
   FILTLIST OEDSN   INCLUDE(TEST.**)       
   SELECT                                  
        WHEN (&DSN = &OEDSN)               
                 SET &STORCLAS = 'TSTCLASS'
        OTHERWISE                          
                 SET &STORCLAS = ''        
        END                                
   END                                     

　　
▼Storage Group

PROC STORGRP                              
   SELECT                                 
       WHEN (&STORCLAS = 'TSTCLASS')      
                 SET &STORGRP = 'TSTGROUP'
       OTHERWISE                          
                 SET &STORGRP = &STORGRP  
       END                                
   END                                                                  

ISMFからACSルーチンの確認

• TSO画面から「ISMF(Integrated Storage Management Facility)」を選択
  

　　

• 「Automatic Class Selection - Specify ACS Routines and Test Criteria」を選択
  
  　　

• 「1. Edit - Edit ACS Routine source code 」を選択
  
  　　

• 「Other Partitioned,～」にPDSを入力
  
  　　

• 必要に応じてACSルーチンを修正
  

Translate処理

• 「ACS APPLICATION SELECTION」画面に戻り、「2. Translate - Translate ACS Routines to ACS Object Form」を選択

　　

• Translate対象のCDS、PDS、ACSルーチン、Listing Data Set(*2)を入力し、実行キーを入力
  ※Listing Data Setはログ用のデータセットのため、任意のデータセット名を指定
  

　　

• 画面右上の「ACS OBJECT SAVED」 を確認し、PF3行キーを入力
  

　　

• 画面右上の「TRANSLATION SUCCESSFUL」を確認
  

Validate処理

• 「ACS APPLICATION SELECTION」画面に戻り、「3. Validate - Validate ACS Routines Against Storage Constructs」を選択

　　

• Validate対象のCDS名、ACS Routine Type(*3)、Linting Data Setを入力
  　(*2)ACS Routine Typeには、「SC」(Storage Class)、「SG」(Storage Group)を順次選択しValidateする

　　

• 「VALIDATION SUCCESSFUL」を確認し、PF3キーで戻る
  

　　

• 画面右上の「SUCCESSFUL VALIDATION」を確認
  

SMS反映

• SDSF画面で「D SMS」コマンドで現在の設定を確認
  ※後述の「定義の戻し」にてデータセット名を使用するため、控えておくこと
  

　　

• 「ISMF PRIMARY OPTION MENU」画面で「8 Control Data Set - Specify System Names and Default Criteria」を選択

　　

• SMS反映対象のCDSを入力し、「5. Activate - Activate the CDS」を選択

　　

• 「CONFIRM ACTIVATE REQUEST」画面にて、「Perform Activation」の左側に「/(スラッシュ)」を入力し実行

　　

• メッセージ「IGD008I NEW CONFIGURATION ACTIVATED FROM SCDS TEST.SCDS BY 」を確認、実行キーを入力

　　

• 画面右上の「ACTIVATION SCHEDULED」を確認

　　

• SDSF画面で「D SMS」コマンドで設定が反映されているか確認

テスト

• 設定したACSルーチンが想定通りに実施されるか、以下JCLで確認

例1). データセット名「TEST.**」を指定しているとき

//STEP1 EXEC PGM=IEFBR14                                  
//SYSUT1 DD DSN=TEST.DATASET0,DISP=(,CATLG),UNIT=3390,SPACE=(CYL,(1,1)),                               
//       DCB=(,BLKSIZE=27920,LRECL=80,RECFM=FB)           
/*                                                        
//                                                        

　　

▼例1). 実行結果(JOBLOG)
実行した結果、データセット名「TEST.DATASET0」がボリューム「WORK03」にアロケーションされていることを確認

IEFA111I JOBID01 IS USING THE FOLLOWING JOB RELATED SETTINGS:      
         SWA=ABOVE,TIOT SIZE=32K,DSENQSHR=DISALLOW,GDGBIAS=JOB     
IEF236I ALLOC. FOR JOBID01 STEP1                                   
IGD101I SMS ALLOCATED TO DDNAME (SYSUT1  )                         
        DSN (TEST.DATASET0                               )         
        STORCLAS (TSTCLASS) MGMTCLAS (        ) DATACLAS (        )
        VOL SER NOS= WORK03                                        
IEF142I JOBID01 STEP1 - STEP WAS EXECUTED - COND CODE 0000         

　　

例2). データセット名「TEST.**」と、ボリューム名「IPCS11」を指定しているとき

//STEP1 EXEC PGM=IEFBR14                                             
//SYSUT1 DD DSN=TEST.DATASET0,DISP=(,CATLG),UNIT=3390,VOL=SER=IPCS11,
//       SPACE=(CYL,(1,1)),                                          
//       DCB=(,BLKSIZE=27920,LRECL=80,RECFM=FB)    
/*                                                    
//                                                    

　　

▼例2). 実行結果(JOBLOG)
実行した結果、データセット名「TEST.DATASET1」はボリューム名「IPCS11」ではなく「WORK03」にアロケーションされていることを確認

IGD101I SMS ALLOCATED TO DDNAME (SYSUT1  )                         
        DSN (TEST.DATASET1                               )         
        STORCLAS (TSTCLASS) MGMTCLAS (        ) DATACLAS (        )
        VOL SER NOS= WORK03                                        
IEF142I E98749K STEP1 - STEP WAS EXECUTED - COND CODE 0000         

　　

例3). データセット名「TESY.**」を指定しているとき

//STEP1 EXEC PGM=IEFBR14                              
//SYSUT1 DD DSN=TESY.DATASET3,DISP=(,CATLG),UNIT=3390,
//       SPACE=(CYL,(1,1)),                           
//       DCB=(,BLKSIZE=27920,LRECL=80,RECFM=FB)       
/*                                                    
//                                                    

　　
　　
▼3). 実行結果(JOBLOG)
実行した結果、データセット名「TESY.DATASET3」はボリューム名「WORK03」ではなく「C3SYS1」にアロケーションされていることを確認。(STORCLAS (TSTCLASS)への参照なし)

IGD100I 0A82 ALLOCATED TO DDNAME SYSUT1   DATACLAS (        )    
IEF142I E98749T STEP1 - STEP WAS EXECUTED - COND CODE 0000       
IEF285I   TESY.DATASET0                                CATALOGED 
IEF285I   VOL SER NOS= C3SYS1.                                            

定義の戻し

• 「ISMF PRIMARY OPTION MENU」画面で「8 Control Data Set - Specify System Names and Default Criteria」を選択
  

• 「SMS反映」で控えておいたデータセット名を入力し、「SMS反映」に記載した手順を実施
  　　

• SDSF画面で「D SMS」を実行し、控えておいたデータセット名に戻っているかを確認