home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS - Coast to Coast
/
simteldosarchivecoasttocoast2.iso
/
pibterm
/
pibt41e3.zip
/
SHOWEXE1.SCR
< prev
next >
Wrap
Text File
|
1988-02-26
|
967b
|
24 lines
***************************************************************************
* S H O W E X E 1 . S C R --- Show script execution facility *
***************************************************************************
* *
* Script: ShowExe1.Scr *
* *
* Purpose: Invoked by SHOWEXEC.SCR. *
* *
***************************************************************************
*
Import MyA String
Import MyB Integer
*
Declare MyC String
*
Message "Entered script ShowExe1"
Set MyC = CONCAT( CONCAT( 'Value of A = <', MyA ), '>' )
Message MyC
Set MyC = CONCAT( 'Value of B = ', String( MyB ) )
Message MyC
*
Set MyA = 'BOGUS A!!!!!'
*