$TsoAtt: Difference between revisions
m (1 revision) |
mNo edit summary |
||
Line 2: | Line 2: | ||
<span class="pageSubtitle"><section begin="desc" />Attach program in user's TSO address space<section end="desc" /></span> | <span class="pageSubtitle"><section begin="desc" />Attach program in user's TSO address space<section end="desc" /></span> | ||
<p class="warning">Most Sirius $functions have been deprecated in favor of Object Oriented methods. | <p class="warning">Most Sirius $functions have been deprecated in favor of Object Oriented methods. There is no OO equivalent for the $TsoAtt function.</p> | ||
This function invokes a program in the user's TSO address space. $TsoAtt performs an "asynchronous" call to the program. That is, control is returned from $TsoAtt as soon as the program is invoked in the TSO address space. The program continues to run while other processing can take place in the online address space.<blockquote> This function requires the special version of the TSO full screen interface to ''Model 204'' that is distributed by Sirius Software. </blockquote> | This function invokes a program in the user's TSO address space. $TsoAtt performs an "asynchronous" call to the program. That is, control is returned from $TsoAtt as soon as the program is invoked in the TSO address space. The program continues to run while other processing can take place in the online address space.<blockquote> This function requires the special version of the TSO full screen interface to ''Model 204'' that is distributed by Sirius Software. </blockquote> | ||
Line 17: | Line 17: | ||
The fifth argument is string containing the name of an image to receive output data from the invoked CLIST. This is an optional argument. | The fifth argument is string containing the name of an image to receive output data from the invoked CLIST. This is an optional argument. | ||
==Syntax== | ==Syntax== | ||
<p class="syntax"><section begin="syntax" /> %RESULT = $TsoAtt(clist, path, parms, in_image, out_image ) | <p class="syntax"><section begin="syntax" /> %RESULT = $TsoAtt(clist, path, parms, in_image, out_image ) | ||
Line 24: | Line 25: | ||
<p class="caption">%RESULT is set either to the created task ID or to an error code.</p> | <p class="caption">%RESULT is set either to the created task ID or to an error code.</p> | ||
$TsoAtt normally returns a positive task id from the invoked program. If there is some error that prevents the program from being invoked, however, a negative error code is returned to indicate the problem. | |||
<p class="code"> | |||
-1 - Connection broken | |||
-4 - Not a TSO full screen IODEV (IODEV 11) | |||
-8 - Incorrect version of TSO interface | |||
-16 - Image not found | -16 - Image not found | ||
-20 - LOUTPB too small | -20 - LOUTPB too small | ||
Line 36: | Line 38: | ||
</p> | </p> | ||
The following program invokes a program called 'COMPRESS' in the user's TSO address space with a parameter of 'DSN(JUNK.CNTL)'. | |||
<p class="code"> B | <p class="code"> B | ||
%RC = $TsoAtt( 'COMPRESS', , 'DSN(JUNK.CNTL)') | %RC = $TsoAtt( 'COMPRESS', , 'DSN(JUNK.CNTL)') | ||
END | END | ||
</p> | </p> | ||
<ul> | <ul> | ||
<li>[[Japanese $Functions]] | |||
<li> | |||
</ul> | </ul> | ||
<p class="caption">Products authorizing $TsoAtt | <p class="caption">Products authorizing $TsoAtt | ||
</p> | </p> | ||
[[Category:$Functions|$TsoAtt]] | [[Category:$Functions|$TsoAtt]] |
Revision as of 20:49, 8 February 2011
<section begin="desc" />Attach program in user's TSO address space<section end="desc" />
Most Sirius $functions have been deprecated in favor of Object Oriented methods. There is no OO equivalent for the $TsoAtt function.
This function invokes a program in the user's TSO address space. $TsoAtt performs an "asynchronous" call to the program. That is, control is returned from $TsoAtt as soon as the program is invoked in the TSO address space. The program continues to run while other processing can take place in the online address space.
This function requires the special version of the TSO full screen interface to Model 204 that is distributed by Sirius Software.
The $TsoAtt function accepts five arguments and returns a numeric completion code or task id.
The first argument is a string containing the name of the program 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.
The second argument is a string containing the path name for the program to be invoked in the TSO address space. This is an optional argument.
The third argument is a string containing the parameters to be passed to the invoked CLIST. This is an optional argument.
The fourth argument is a string containing the name of an image containing input data for the invoked CLIST. This is an optional argument.
The fifth argument is string containing the name of an image to receive output data from the invoked CLIST. This is an optional argument.
Syntax
<section begin="syntax" /> %RESULT = $TsoAtt(clist, path, parms, in_image, out_image ) <section end="syntax" />
$TsoAtt normally returns a positive task id from the invoked program. If there is some error that prevents the program from being invoked, however, a negative error code is returned to indicate the problem.
-1 - Connection broken -4 - Not a TSO full screen IODEV (IODEV 11) -8 - Incorrect version of TSO interface -16 - Image not found -20 - LOUTPB too small -28 - Program name is too long
The following program invokes a program called 'COMPRESS' in the user's TSO address space with a parameter of 'DSN(JUNK.CNTL)'.
B %RC = $TsoAtt( 'COMPRESS', , 'DSN(JUNK.CNTL)') END