$Web Put Text: Difference between revisions
(Created page with "{{DISPLAYTITLE:$Web_Put_Text}} <span class="pageSubtitle"><section begin="desc" />Add text string to response buffer<section end="desc" /></span> $Web_Put_Text sends a text st...") |
m (1 revision) |
(No difference)
| |
Revision as of 21:38, 21 February 2011
<section begin="desc" />Add text string to response buffer<section end="desc" />
$Web_Put_Text sends a text string to the client buffer.
Syntax
<section begin="syntax" /> %RC = $Web_Put_Text( string ) <section end="syntax" />
$Web_Put_Text is a callable $function (see Calling Sirius Mods $functions), and it takes a single required string argument and returns a status code.
| string | A text string that is translated from EBCDIC to ASCII and added to the client buffer.
|
|---|
| Code | Meaning |
|---|---|
| 0 | String sent to the client buffer. |
| -1 | Invalid call, not a Web thread |
| -4 | Missing argument |
$WEB_PUT_TEXT return codes
Sample code follows:
%X = $Web_Type('text/HTML') %X = $Web_Put_Text( '<HTML>' ) %X = $Web_Put_Text( '
' ) %X = $Web_Put_Text( '
' ) %X = $Web_Put_Text( 'Hello World' ) %X = $Web_Put_Text( '
' ) %X = $Web_Put_Text( '
' )
%X = $Web_Put_Text( '</HTML>' ) STOP
The above example shows an entire HTML document being sent to the client, a line at a time. Note that you could also direct HTML to the client by sending a procedure that contains HTML (using $Web_ProcSend) or simply with PRINT statements (unless $Web_Off has been issued).
The two primary uses for $Web_Put_Text are
- To send text to a browser when $Web_Off is set: it might be easier to do a $Web_Put_Text than a $WEB_ON, PRINT, $Web_Off sequence.
- To have text that is to be sent to a browser embedded in code that is also used in non-browser (for example, 3270 or BATCH2) mode. $Web_Put_Text acts as a no-op when executed on a non-web thread so can be used instead of an IF test (to determine if running on a web thread) followed by a PRINT statement.