View source for $TsoCmd

{{DISPLAYTITLE:$TsoCmd}}
<span class="pageSubtitle">Invoke command in user's TSO address space</span>

<p class="warn"><b>Note: </b>Many $functions have been deprecated in favor of Object Oriented methods. There is no OO equivalent for the $TsoCmd function.</p>

This function invokes a command in the user's TSO address space.
<p>
'''Note: ''' This function requires the special version of the TSO full screen interface to <var class="product">Model 204</var> that is distributed by Sirius Software. </p> 

The <var>$TsoCmd</var> function accepts two arguments and returns a numeric completion code. 

==Syntax==
<p class="syntax"><span class="term">%result</span> = <span class="literal">$TsoCmd</span>([<span class="term">clist</span>], [<span class="term">parms</span>])
</p>

<table class="syntaxTable">
<tr><th>%result</th>
<td>Either the completion code from the invoked command or an error code.</td></tr>

<tr><th>clist</th>
<td>A string containing the name of the command to be invoked in the TSO address space. This is an optional argument; and if it is null or missing, no processing is performed and a completion code of 0 is returned. </td></tr>

<tr><th>parms</th>
<td>A string containing the parameters to be passed to the invoked command. This is an optional argument.</td></tr>
</table>

===Error codes===
<var>$TsoCmd</var> normally returns the completion code from the invoked command. If there is some error that prevents the command from being invoked, however, an error code is returned to indicate the problem.

<p class="code">  0 - No command name specified
 -1 - Connection broken
 -4 - Not a TSO full screen IODEV (IODEV 11)
 -8 - Incorrect version of TSO interface
-20 - LOUTPB too small
-28 - Command name is too long
</p>

==Example==
The following program invokes a command called <code>ALLOCATE</code> in the user's TSO address space with a parameter of <code>DSN('M204.DATA') NEW TRACKS SPACE(15,10)</code>.

<p class="code">B
%RC = $TsoCmd( 'ALLOCATE', -
'DSN(&#39;'M204.DATA&#39;') NEW TRACKS SPACE(15,10)')
END
</p>

==Products authorizing {{PAGENAMEE}}== 
<ul class="smallAndTightList">
<li>Japanese $functions
</ul>

[[Category:$Functions|$TsoCmd]]