
	Home > AS/400 Tips > iSeries administrator tips > Retrieve partition ID

iSeries 400 Tips:

EMAIL THIS

TIPS & NEWSLETTERS TOPICS

ISERIES ADMINISTRATOR TIPS

Retrieve partition ID

James Greene
02.01.2007
Rating: -4.11- (out of 5)

Digg This!

StumbleUpon

Del.icio.us

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.

               
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

Rate this Tip
To rate tips, you must be a member of Search400.com. Register now to start rating these tips. Log in if you are already a member.
Submit a Tip

Digg This!

StumbleUpon

Del.icio.us

RELATED CONTENT

	iSeries administrator tips
	Analyze the health of your IBM i server with iScore
	Researching high availability for your System i shop
	Translating Linux for IBM i admins: Using GUI to make it easy
	Translating Linux for IBM i admins: Working with jobs and networking
	OpenOffice: What to know before making the transition from Microsoft Office
	OpenOffice: An enterprise open source solution
	Database performance comparisons on IBM i
	Translating Linux for IBM i admins: User profile commands
	Modern System i reports using Client Access
	Tips for installing Lotus Domino server on a System i partition

RELATED RESOURCES

2020software.com, trial software downloads for accounting software, ERP software, CRM software and business software systems

Search Bitpipe.com for the latest white papers and business webcasts

Whatis.com, the online computer dictionary

DISCLAIMER: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.

iSeries Security - Security Tools, Physical Security and System Security

SEARCH

TechTarget provides technology professionals with the information they need to perform their jobs - from developing strategy, to making cost-effective purchase decisions and managing their organizations' technology projects - with its network of technology-specific websites, events and online magazines.


TechTarget Corporate Web Site \| Media Kits \| Site Map All Rights Reserved, Copyright 1999 - 2009, TechTarget \| Read our Privacy Policy