Jump to page titleUNITED STATES
hp.com home products and services support and drivers solutions how to buy
» contact hp

:

more options
 

hp.com home
End of Jump to page title
Example-PLI How To Use Message Files
Jump to content



» 

business support center

Home & Home Office Support:
» HP branded products
» Presario branded products
» Services & Warranties
Small & Medium Business Support:
» Small & Medium Business products
» Small & Medium Business services
Support for IT Professionals:
» Enterprise products (IT Resource Center)
» NonStop enterprise products
» Business & IT Services
Content starts here
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
privacy statementusing this site means you accept its terms