$Web_Sub

From m204wiki
Jump to navigation Jump to search

Set delimiter for procedure text substitution

$Web_Sub sets the delimiter for designating text to be symbolically substituted when text is sent to the client from within Model 204 procedures.

$Web_Sub is a callable $function, and it takes a single string argument and returns a status code.

Syntax

%rc = $Web_Sub( delimiter )

%rc A numeric status code.
delimiter A 1- to 3-character string, or a null string.

Status codes

Code Meaning
0 Substitution delimiter successfully set.
-1 Invalid call, not a Web thread
-4 Invalid argument (more than 3 characters long)

Usage notes

  • If not null, delimiter is used to identify the text strings in a Model 204 procedure that should be symbolically substituted before presentation to the client. Strings that begin with the given delimiter and end with an exclamation mark ( ! ) will be matched against the Global Variable Table (GTBL), and the value of any such global variables will be substituted for the string.
  • Symbolic substitution performed by the $Web_Sub setting only affects lines sent to the client by $Web_ProcSend or by the SEND subcommand in the ON rule chosen for the URL.
  • Until $Web_Sub is called, Janus Web Server does not perform any substitution of strings into procedures sent to the client. Setting $Web_Sub to null also turns off substitution.
  • As with all $WEB_ functions, $Web_Sub can be invoked by CMD processing, which is specified either in the ON rule for the URL or in the JANUS DEFINE ... WEB command for the port. Note that $Web_Sub can only affect procedures referenced in SEND rules if $Web_Sub is called due to the JANUS DEFINE ... WEB command.

Examples

<HTML>

Greetings from @LOCATION!.

Having a @QUALITY! time.

Wish you were @WISHLOC!. </HTML> . . . %X = $SETG('LOCATION','Springfield') %X = $SETG('QUALITY','nice') %X = $SETG('WISHLOC','rich') %X = $Web_Sub('@') %X = $Web_ProcSend( 'HTMLFILE', 'GREETING' )

In the example above, an at sign (@) is used as the substitution indicator for global names in procedure text. The client would see:

Greetings from Springfield. Having a nice time. Wish you were rich.