Administrative data utility for SFM policy data

Sample JCL to run the utility to create or update an SFM administrative policy is shown in Figure 1. The SYS1.SAMPLIB member name is IXCSFMP.

Figure 1. IXCSFMP - Administrative Policy Data in SFM Couple Data Set

//STEP20   EXEC PGM=IXCMIAPU
//SYSPRINT DD   SYSOUT=A
//SYSABEND DD   SYSOUT=A
//SYSIN    DD   *

     DATA TYPE(SFM) REPORT(YES)

     DEFINE POLICY NAME(POLICY1) CONNFAIL(NO) REPLACE(YES)

        SYSTEM NAME(*)
           ISOLATETIME(0) SSUMLIMIT(NONE)
           MEMSTALLTIME(NO)
           CFSTRHANGTIME(300)

     DEFINE POLICY NAME(POLICY2) CONNFAIL(YES) REPLACE(YES)

        SYSTEM NAME(*)
           ISOLATETIME(0) SSUMLIMIT(25)
           WEIGHT(5)

        SYSTEM NAME(SYS1)
           PROMPT
           WEIGHT(25)
           MEMSTALLTIME(25)
           CFSTRHANGTIME(NO)

     DEFINE POLICY NAME(POLICY3) REPLACE(YES)

        SYSTEM NAME(SYS1)
           DEACTTIME(10)
           WEIGHT(3)

        SYSTEM NAME(SYS2)
           DEACTTIME(10)
           WEIGHT(10)

        RECONFIG
           FAILSYS(SYS1) ACTSYS(SYS2) TARGETSYS(ALL)
           ESTORE(YES) STORE(YES)

  /* DELETE POLICY NAME(POLICY1) */

/*

Sample JCL to run the utility to create or update an SFM administrative policy is shipped in SYS1.SAMPLIB member IXCSFMP.