ibm-information-center/dist/eclipse/plugins/i5OS.ic.rzahh_5.4.0.1/pcsystemstatexample.htm

279 lines
9.5 KiB
HTML
Raw Permalink Normal View History

2024-04-02 14:02:31 +00:00
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE html
PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html lang="en-us" xml:lang="en-us">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta name="security" content="public" />
<meta name="Robots" content="index,follow" />
<meta http-equiv="PICS-Label" content='(PICS-1.1 "http://www.icra.org/ratingsv02.html" l gen true r (cz 1 lz 1 nz 1 oz 1 vz 1) "http://www.rsac.org/ratingsv01.html" l gen true r (n 0 s 0 v 0 l 0) "http://www.classify.org/safesurf/" l gen true r (SS~~000 1))' />
<meta name="DC.Type" content="reference" />
<meta name="DC.Title" content="Example: Using ProgramCall" />
<meta name="abstract" content="" />
<meta name="description" content="" />
<meta name="copyright" content="(C) Copyright IBM Corporation 2006" />
<meta name="DC.Rights.Owner" content="(C) Copyright IBM Corporation 2006" />
<meta name="DC.Format" content="XHTML" />
<meta name="DC.Identifier" content="pcsystemstatexample" />
<meta name="DC.Language" content="en-us" />
<!-- All rights reserved. Licensed Materials Property of IBM -->
<!-- US Government Users Restricted Rights -->
<!-- Use, duplication or disclosure restricted by -->
<!-- GSA ADP Schedule Contract with IBM Corp. -->
<link rel="stylesheet" type="text/css" href="./ibmdita.css" />
<link rel="stylesheet" type="text/css" href="./ic.css" />
<title>Example: Using ProgramCall</title>
</head>
<body id="pcsystemstatexample"><a name="pcsystemstatexample"><!-- --></a>
<!-- Java sync-link --><script language="Javascript" src="../rzahg/synch.js" type="text/javascript"></script>
<h1 class="topictitle1">Example: Using ProgramCall</h1>
<div><p></p>
<div class="section"><div class="note"><span class="notetitle">Note:</span> Read the <a href="codedisclaimer.htm#codedisclaimer">Code
example disclaimer</a> for important legal information.</div>
<pre>/////////////////////////////////////////////////////////////////////////
//
// Program call example. This program calls the QWCRSSTS server program
// to retrieve the status of the system.
//
// Command syntax:
// PCSystemStatusExample system
//
// This source is an example of IBM Toolbox for Java "ProgramCall".
//
/////////////////////////////////////////////////////////////////////////
import java.io.*;
import java.util.*;
import java.math.*;
import java.lang.Thread.*;
import com.ibm.as400.access.*;
public class PCSystemStatusExample extends Object
{
public static void main(String[] parameters)
{
System.out.println( " " );
// if a system was not specified, display help text and exit.
if (parameters.length &gt;= 1)
{
try
{
// Create an AS400 object for the server that contains the
// program. Assume the first parameter is the system name.
AS400 as400 = new AS400(parameters[0]);
// Create the path to the program.
QSYSObjectPathName programName = new QSYSObjectPathName("QSYS", "QWCRSSTS", "PGM");
// Create the program call object. Assocate the object with the
// AS400 object that represents the server we get status from.
ProgramCall getSystemStatus = new ProgramCall(as400);
// Create the program parameter list. This program has five
// parameters that will be added to this list.
ProgramParameter[] parmlist = new ProgramParameter[5];
// The server program returns data in parameter 1. It is an output
// parameter. Allocate 64 bytes for this parameter.
parmlist[0] = new ProgramParameter( 64 );
// Parameter 2 is the buffer size of parm 1. It is a numeric input
// parameter. Sets its value to 64, convert it to the server format,
// then add the parm to the parm list.
AS400Bin4 bin4 = new AS400Bin4( );
Integer iStatusLength = new Integer( 64 );
byte[] statusLength = bin4.toBytes( iStatusLength );
parmlist[1] = new ProgramParameter( statusLength );
// Parameter 3 is the status-format parameter. It is a string input
// parameter. Set the string value, convert it to the server format,
// then add the parameter to the parm list.
AS400Text text1 = new AS400Text(8, as400);
byte[] statusFormat = text1.toBytes("SSTS0200");
parmlist[2] = new ProgramParameter( statusFormat );
// Parameter 4 is the reset-statistics parameter. It is a string input
// parameter. Set the string value, convert it to the server format,
// then add the parameter to the parm list.
AS400Text text3 = new AS400Text(10, as400);
byte[] resetStats = text3.toBytes("*NO ");
parmlist[3] = new ProgramParameter( resetStats );
// Parameter 5 is the error info parameter. It is an input/output
// parameter. Add it to the parm list.
byte[] errorInfo = new byte[32];
parmlist[4] = new ProgramParameter( errorInfo, 0 );
// Set the program to call and the parameter list to the program
// call object.
getSystemStatus.setProgram(programName.getPath(), parmlist );
// Run the program then sleep. We run the program twice because
// the first set of results are inflated. If we discard the first
// set of results and run the command again five seconds later the
// number will be more accurate.
getSystemStatus.run();
Thread.sleep(5000);
// Run the program
if (getSystemStatus.run()!=true)
{
// If the program did not run get the list of error messages
// from the program object and display the messages. The error
// would be something like program-not-found or not-authorized
// to the program.
AS400Message[] msgList = getSystemStatus.getMessageList();
System.out.println("The program did not run. Server messages:");
for (int i=0; i&lt;msgList.length; i++)
{
System.out.println(msgList[i].getText());
}
}
// Else the program did run.
else
{
// Create a server to Java numeric converter. This converter
// will be used in the following section to convert the numeric
// output from the server format to Java format.
AS400Bin4 as400Int = new AS400Bin4( );
// Get the results of the program. Output data is in
// a byte array in the first parameter.
byte[] as400Data = parmlist[0].getOutputData();
// CPU utilization is a numeric field starting at byte
// 32 of the output buffer. Convert this number from the
// server format to Java format and output the number.
Integer cpuUtil = (Integer)as400Int.toObject( as400Data, 32 );
cpuUtil = new Integer(cpuUtil.intValue()/10);
System.out.print("CPU Utilization: ");
System.out.print(cpuUtil);
System.out.println("%");
// DASD utilization is a numeric field starting at byte
// 52 of the output buffer. Convert this number from the
// server format to Java format and output the number.
Integer dasdUtil = (Integer)as400Int.toObject( as400Data, 52 );
dasdUtil = new Integer(dasdUtil.intValue()/10000);
System.out.print("Dasd Utilization: ");
System.out.print(dasdUtil);
System.out.println("%");
// Number of jobs is a numeric field starting at byte
// 36 of the output buffer. Convert this number from the
// server format to Java format and output the number.
Integer nj = (Integer)as400Int.toObject( as400Data, 36 );
System.out.print("Active jobs: ");
System.out.println(nj);
}
// This program is done running program so disconnect from
// the command server on the server. Program call and command
// call use the same server on the server.
as400.disconnectService(AS400.COMMAND);
}
catch (Exception e)
{
// If any of the above operations failed say the program failed
// and output the exception.
System.out.println("Program call failed");
System.out.println(e);
}
}
// Display help text when parameters are incorrect.
else
{
System.out.println("");
System.out.println("");
System.out.println("");
System.out.println("Parameters are not correct. Command syntax is:");
System.out.println("");
System.out.println(" PCSystemStatusExample myServer");
System.out.println("");
System.out.println("Where");
System.out.println("");
System.out.println(" myServer = get status of this server ");
System.out.println("");
System.out.println("For example:");
System.out.println("");
System.out.println(" PCSystemStatusExample mySystem");
System.out.println("");
System.out.println("");
}
System.exit(0);
}
}</pre>
</div>
</div>
</body>
</html>