Retrieve partition ID

The submitted RPG code retrieves the number of partions and the partition ID. Partition IDs start at zero. The pgm calls API QWCRSSTS. There is a great deal of system statistical information that is available using this API.

James Greene

Published: 01 Feb 2007

The submitted RPG code retrieves the number of partions and the partition ID. Partition IDs start at zero. The pgm calls API QWCRSSTS. There is a great deal of system statistical information that is available using this API. If you're interested, I have and will share a pgm that retrieves most of what is available and places info into a file.

Step 2 of 2:

You forgot to provide an Email Address.

This email address doesn’t appear to be valid.

This email address is already registered. Please login.

You have exceeded the maximum character limit.

Please provide a Corporate E-mail Address.
- I agree to TechTarget’s Terms of Use, Privacy Policy, and the transfer of my information to the United States for processing to provide me with relevant information as described in our Privacy Policy.
Please check the box if you want to proceed.
- I agree to my information being processed by TechTarget and its Partners to contact me via phone, email, or other means regarding information relevant to my professional interests. I may unsubscribe at any time.
Please check the box if you want to proceed.

               
d returndata      s           2560

d datalength      s              4b 0 inz(2560)              
d rcdfmt          s              8    inz('SSTS0200')        
d x               s              5  0                        
d errorcode       s             10                           
d resetstatus     s             10    inz('*NO')             
d s0200           ds                  inz                    
d status0200              1    256                           
d partitions             77     80b 0                        
d partitionid            81     84b 0                        
c                   call      'QWCRSSTS'                     
c                   parm                    returndata       
c                   parm                    datalength       
c                   parm                    rcdfmt           
c                   parm                    resetstatus      
c                   parm                    errorcode        
c                   eval      s0200 = %subst(returndata:1:131)
c     partitions    dsply                                    
c     partitionid   dsply                                    
c                   eval      *inlr = *on

Checking the status of LPAR partitions

How many LPARs are being used?

Using partitions? Apply PTF before upgrading to certain 8xx boxes

Troubleshoot LPAR and disk management GUI

Checking the status of LPAR partitions

How many LPARs are being used?

Using partitions? Apply PTF before upgrading to certain 8xx boxes

Troubleshoot LPAR and disk management GUI

Please create a username to comment.

IBM quantum computers' usefulness in sight -- using binoculars

Addendum sets ASHRAE 90.4 as energy-efficiency standard

How to realize the benefits of software-defined infrastructure

Dig Deeper on Setting up partitions

Start the conversation

0 comments

Register

Login

Forgot your password?

Your password has been sent to:

Please create a username to comment.