Re: DASD API

The API is QWCRSSTS.
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/index.jsp?topic=/apis/qwcrssts.htm


not for the RPG group but here is a CL version:

/*    Here is a quick way to see the percent used of ASP1.          */
/*    The API used is QWCRSSTS.                                     */
/*                                                                  */
/*                                                                  */
/*        comments to bryandietz@xxxxxxxxx                          */


     PGM
     DCL VAR(&PCT) TYPE(*CHAR) LEN(7)
     DCL VAR(&RCVDTA) TYPE(*CHAR) LEN(067)
     DCL VAR(&RCVLEN) TYPE(*CHAR) LEN(4) VALUE(X'00000043')
     DCL VAR(&RESETO) TYPE(*CHAR) LEN(10) VALUE('*YES      ')
     DCL VAR(&FMTNAM) TYPE(*CHAR) LEN(08) VALUE('SSTS0200')
     DCL VAR(&ERRSTS) TYPE(*CHAR) LEN(08) VALUE(X'00000000')
     DCL VAR(&PCTASP) TYPE(*DEC) LEN(7) VALUE(0)
     DCL VAR(&PCTX) TYPE(*DEC) LEN(7 4) VALUE(0)
     CALL PGM(QWCRSSTS) PARM(&RCVDTA &RCVLEN &FMTNAM &RESETO &ERRSTS)
     CHGVAR VAR(&PCTASP) VALUE(%BIN(&RCVDTA 53 4))
     CHGVAR VAR(&PCTX) VALUE(&PCTASP / 10000)
     CHGVAR VAR(&PCT) VALUE(&PCTX)
     SNDPGMMSG MSG('The system disk is ' || &PCT *TCAT '% used')
     ENDPGM


Bryan


Jon S said the following on 2/28/2007 9:02 AM:

Does anyone know if there is an API I can call that will return the percentage of storage used similar to WRKSYSSTS?

Thanks, Jon

_________________________________________________________________

Play Flexicon: the crossword game that feeds your brain. PLAY now for FREE. http://zone.msn.com/en/flexicon/default.htm?icid=flexicon_hmtagline