Mlarocca: Mlarocca moved page $SUBSYS to $Subsys: Lower case change

2014-07-29T19:26:46Z

Mlarocca moved page $SUBSYS to $Subsys: Lower case change

← Older revision	Revision as of 19:26, 29 July 2014
(No difference)

Alex: Automatically generated page update

2013-04-20T13:18:25Z

Automatically generated page update

New page

Function
The $SUBSYS function determines the status of a subsystem. This function typically is used when designing applications through the Subsystem Management facility. You can use $SUBSYS to determine whether a subsystem is active before transferring control from one subsystem to another.
Syntax
$SUBSYS(subsystemname)

$SUBSYS takes a subsystem name as an argument and returns a value indicating the status of that subsystem
<table>
<tr class="head">
<th>Value</th>
<th>The subsystem is...</th>
</tr>
<tr>
<td align="right">0</td>
<td>Not active (not started)</td>
</tr>
<tr>
<td align="right">1</td>
<td>Active (started)</td>
</tr>
<tr>
<td align="right">2</td>
<td>Draining (the STOP command has been issued and users are in the subsystem).</td>
</tr>
<tr>
<td align="right">3</td>
<td>In test mode. </td>
</tr>
<tr>
<td align="right">4</td>
<td>Draining (because a SUSPEND command was issued)</td>
</tr>
<tr>
<td align="right">5</td>
<td>Suspended</td>
</tr>
</table>
The $SUBSYS function without an argument returns the name of the subsystem you are currently in. For example, the User Language statement:
%CURSYS = $SUBSYS

assigns the name of the current subsystem to %CURSYS, if executed within a subsystem, or returns null if at command level.
Example
 .
.
.
TRANSFER: IF $SUBSYS('AUTOS') = 1 THEN
.
*
* TRANSFER TO INSURANCE SUBSYSTEM
*
.
.
.

[[Category:SOUL $functions]]

$Subsys - Revision history

Mlarocca: Mlarocca moved page $SUBSYS to $Subsys: Lower case change

Alex: Automatically generated page update