 |
» |
|
 |
|
 |

Copyright (c) Digital Equipment Corporation 1988, 1989. All rights reserved
LAYERED PRODUCT: PLI, V3.3 OP/SYS: VMS, V5.2
SOURCE: Digital Customer Support Center
OVERVIEW:
The following program demonstrates how to use a message file in PLI.
*** CAUTION ***
This sample program has been tested using PLI, Version 3.3 on VMS, V5.2.
However, we cannot guarantee its effectiveness because of the possibility
of errors in transmitting or implementing it. It is meant to be used as
a template for writing your own program, and it may require modification
for use on your system.
PROGRAM NOTES:
To run the program, extract the following code into a command procedure,
for example, MSG.COM. The command procedure will compile, link, and run
the necessary procedures.
When message files are used in PLI, the "OPTIONS(MAIN)" phrase
should not be used in the PLI program. In addition, the
PLI$STARLET include for LIB$SIGNAL should not be used. Instead,
declare LIB$SIGNAL as an entry point.
PROGRAM SAMPLE:
$ create MSG.PLI
msg3: proc;
dcl MSG3_NOTDEC globalref fixed bin(31);
dcl lib$signal entry(fixed bin(31));
call lib$signal (MSG3_NOTDEC);
end msg3;
$ say := write sys$output
$ say "compiling MSG.PLI"
$ pli MSG.PLI
$ create msg3.msg
.TITLE MSG3_NOTDEC
.FACILITY MSG3,1
.SEVERITY INFO
NOTDEC < Terminal is not DEC compatible>/FAO=0
.end
$ say "compiling MSG3.MSG"
$ message msg3.msg
$ say "linking MSG, MSG3"
$ link msg,msg3
$ say "beginning execution"
$ run msg
|
buy online or call 1.800.AT.COMPAQ
|
|