RPGIV @ Work

A unique site for RPG and System i Lovers

Welcome!

Hi, this site will provide all what you need in System i and RPG developments.

My Name is Chamara Withanachchi, System i Expert and RPG Developer. And in the field for last 11 years.

I hope you will find lot of valuable information from this site

Retrieve System Status (QWCRSSTS) API Print E-mail
User Rating: / 0
PoorBest 
Written by Chamara Withanachchi   

The Retrieve System Status (QWCRSSTS) API allows you to retrieve a group of statistics that represents the current status of the system.


 D dSysRcvDDS      DS           140                           
 D  sSysCpuUsd            33     36B 0                        
 D  sSysDb_Usd            69     72B 0                        
                                                              
 D wSysRcvLen      S             10I 0 INZ(%SIZE(dSysRcvDDS)) 
 D wSysFmtNam      S              8A   INZ('SSTS0200')        
 D wSysRstSts      S             10A    INZ('*NO')            
                                                              
 D dApiRtnDDS      DS                                         
 D  sArtPrvSiz                   10I 0 INZ(%SIZE(dApiRtnDDS)) 
 D  sArtAvlSiz                   10I 0                        
 D  sArtRtnCod                    7A                          
 D                                1A                          
 D  sArtMsgDta                  128A                          
                                                              
 C                   CALL(E)   'QWCRSSTS'                 
 C                   PARM                    dSysRcvDDS   
 C                   PARM                    wSysRcvLen   
 C                   PARM                    wSysFmtNam   
 C                   PARM                    wSysRstSts   
 C                   PARM                    dApiRtnDDS   
                                                         
 C                   IF        %ERROR
  * Error Handling Goes Here                                 
 C                   ENDIF 

 C                   EVAL      *INLR = *ON  
                                           

Format name


1. SSTS0100 - Basic system status information about the signed-on users and batch jobs in the system. The information returned in this format is similar to the basic display of the Display System Status (DSPSYSSTS) command.
2. SSTS0200 - System status information. The information returned in this format is similar to the disk information of the intermediate or advanced display of the DSPSYSSTS command.
3. SSTS0300 - System status information. The information returned in this format is similar to the pool information of the intermediate or advanced display of the DSPSYSSTS command.
4. SSTS0400 - Pool status information. The information returned in this format is the SSTS0300 format information and additional pool information. The pool selection information parameter must be used when this format is used.
5. SSTS0500 - Pool subsystem information. The information returned in this format is a list of active subsystems using a pool. The pool selection information parameter must be used to select one system pool when this format is used.



User Comments

Please login or register to add comments

<Previous   Next>