Visara Master Console Center Scripting Guide User Manual
Page 165
Chapter 5 Script Commands
Scripting Guide
165
commands does not function with an OS that uses an RS232 or
Telnet connection with the no_printer flag defined.
8. The maximum number of QOPEN commands that can be included
in one script is 256.
Example:
//===================================================
//EXAMPLE 1: One input
//===================================================
//Read msgs from the OS the script is running on
%QID := QOPEN( )
IF %QID == ERROR
//if error
LOG( LOG_EXEC, “ERROR: can’t open Queue”,
STATUS_ERROR)
ELSE
//continue code here
ENDIF
RETURN
//===================================================
//EXAMPLE 2: Multiple inputs
//===================================================
//Read msgs from the Beta1 and AIX OSs
%OSArray[ 1] := OBJID( OS, ”3090:Beta1”)
%OSArray[ 2] := OBJID( OS, ”RS6000:AIX”)
//This queue will have msgs from Beta1 & AIX OS
%QueueID:= QOPEN( %OSArray)
IF %QID == ERROR
//if error
LOG( LOG_EXEC, “ERROR: can’t open Queue”,
STATUS_ERROR)
ELSE
//continue code here
ENDIF
RETURN
//===================================================
//EXAMPLE 3: Multiple inputs
//===================================================
// Using the OSIDArray, from the OBJID examples:
%QueueID := QOPEN( %OSIDArray)
IF %QID == ERROR
//if error
LOG( LOG_EXEC, “ERROR: can’t open Queue”,
STATUS_ERROR)
ELSE
//continue code here
ENDIF
RETURN
See Also: