home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 31
/
CDASC_31_1996_juillet_aout.iso
/
internet
/
rgiserv.zip
/
RGI_T5.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1996-05-16
|
2KB
|
43 lines
/* Test the HTML Subcommand */
Call RGIUtils '-ct text/html'
Address HTML
'<html><head><title>' /* Introduce the document */
'RGI Installation Test' /* as part of the RGI */
'</head></title>' /* Installation Test */
'<body>'
'<em>This screen is brought to you by RGI_T5.CMD</em>'
'<p>This document tests the HTML Subcommand environment Handler.'
'<p>First we issue the Rexx Statement:'
'<p><ce>'
'<tt>Address HTML'
'</tt></ce>'
'<p>From this point on, till we want to request services from another subcommand'
'handler such as OS/2, we do not need to use the Say statement or the LineOut'
'function to send text to the browser.'
'<p>All statements that cannot be handled by Rexx are passed to the HTML Subcommand'
'Handler which sends the entire string to the web browser through STDOUT.'
'<p>Rexx statements may be interspersed. For example, the lines:'
'<p><tt>'
"<br>timenow=left(time(),5)"
"<br>'Today is' date() and the time is' timenow'.'"
"<br>'We are running now in the' address() 'environment.'"
"<br>Address CMD"
"<br>Say 'After issuing the Address CMD command, we are routing literals again to OS/2'"
"<br>Say 'through the' Address() 'Environment Handler.'"
'</tt><p>will display as:'
'<p><tt>'
timenow=left(time(),5)
'<br>Today is' date() 'and the time is' timenow'.'
'<br>We are running now in the' address() 'environment.'
Address CMD
Say '<br>After issuing the "Address CMD" command, we are routing literals again to OS/2'
Say '<br>through the' Address() 'Environment Handler and we must use Say to send to the browser.'
Address HTML
'</tt>'
'<p>Well... If you have come this far, RGI is working as advertized.'
'<p>If you have any problems or suggestions, send a message to me at'
'<address>mdd01@ibm.net</address>'
'<p><strong>Good luck!</strong> Albert'
'</body>'
'</html>'