TS/MP Management Programming Manual (G06.24+, H06.03+)

Server Class DEFINE Examples
NonStop TS/MP Management Programming Manual—540082-001
16-5
Obtaining Server Class DEFINE Information
== Set the serverclass and definename in the selector token.
#SET zpwy^ddl^sel^scdefine:zname:zserverclass <serverclassname>
#SET zpwy^ddl^sel^scdefine:zname:zdefine <definename>
== Load the selector token and DEFINE information into the SPI request
== buffer.
#SSPUTV spi^request^buf zpwy^map^sel^scdefine zpwy^ddl^sel^scdefine
== Open PATHMON and send the request.
[#PUSH
reply^var == holds the reply from PATHMON
io^err == holds I/O error returned during I/O with PATHMON
prompt^var == holds the input to PATHMON
] == end push
#REQUESTER /WAIT [zpwy^val^buflen]/ READ $<pathmonname>.#ZSPI io^err &
{ }reply^var prompt^var
== Send the request buffer.
#APPENDV prompt^var spi^request^buf
== Receive the reply buffer.
#EXTRACTV reply^var spi^reply^buf
== Close PATHMON.
SINK [#REQUESTER CLOSE reply^var]
== Get the DEFINE information from the reply buffer.
#SET define^buf
#SSGETV/ INDEX 1/ spi^reply^buf zpwy^map^sel^scdefine zpwy^ddl^sel^scdefine
#OUTPUTV zpwy^ddl^sel^scdefine
#SSGETV/ INDEX 1/ spi^reply^buf zpwy^tkn^def^scdefine define^buf
== Move the returned DEFINE information to the saved DEFINE buffer and
== then restore the DEFINE information to the working set.
#SETBYTES saved^define:s^define(0:475) define^buf:s^define(0:475)
#PUSH restored^def^name == stores definename returned from #definerestore
#SETMANY _ restored^def^name, [#DEFINERESTORE saved^define]
#OUTPUT Restored Define name is [restored^def^name] with the
#OUTPUT following attribute info; [#DEFINEINFO [restored^def^name]].
#UNFRAME
== DEFINE information has been displayed.
Example 16-2. INFO SCDEFINE Programming Example (page 2 of 2)