5. FILES › 5.4 WLM Information Area Files › 5.4.2 Resource Group File (WLMRGP) › 5.4.2.4 Retrieval Examples

Previous Topic: 5.4.2.3 Usage Considerations

Next Topic: 5.4.3 Service Client File (WLMSVC)

5.4.2.4 Retrieval Examples


This section presents a typical WLMRGP retrieval example.

_ins1003

Service Class Resource Group Assignments

    TITLE1 "Service Class Resource Group Assignments";

    DATA WORK.RGP1
     (KEEP=SYSPLEX WLMSDFNM WLMSDFTS WLMCLASS WLMPOLCY
      WLMCLSDE WLMGROUP WLMGRPDE RGPMNCAP RGPMXCAP);
      MERGE
        &PWLMX..WLMSEA01 (IN=SEA)
        &PWLMX..WLMRGP01 (IN=RGP);
      BY SYSID ENDTS WLMSDFNM WLMSDFTS WLMCLASS WLMPOLCY;
      IF (SEA & RGP) THEN OUTPUT WORK.RGP1;
    RUN;

    PROC SORT NODUPKEY OUT=WORK.RGP2 DATA=WORK.RGP1;
      BY SYSPLEX WLMSDFNM WLMSDFTS WLMCLASS WLMPOLCY
        WLMGROUP;
    RUN;

    PROC PRINT DATA=WORK.RGP2;
      BY SYSPLEX WLMSDFNM WLMSDFTS; ID WLMCLASS;
      VAR WLMCLSDE WLMPOLCY
        WLMGROUP WLMGRPDE RGPMNCAP RGPMXCAP;
    RUN;