Keven,
   This is a "feature" several people asked for in the early days of MPE/XL.
They were tired of getting a message like "XL SPECIFIED, BUT NOT REFERENCED"
(can't remember the specifics, but it generated a lot of calls).   Might
even be a reference in an old COMMUNICATOR telling when they dropped this
loader message.

   What about adding ;XL="*LIBNAME" forcing it to look for a file equation?
This would at least give you a clue if the file equation wasn't set.

:run cobol.pub.sys;xl="*X"
Missing file equation. (LDRERR 55)
Native mode loader message 55
Unable to load program to be run. (CIERR 625)



RAT

_______________________________________________________________________
 Rich Trapp "RAT"
 Managed Business Solutions   [log in to unmask]   http://www.mbsnav.com
 Assigned to Design Automation Support at Agilent Technologies
 (Telnet) or (970) 679-2221  [log in to unmask]  Loveland, Colorado, USA

_______________________________________________________________________


-----Original Message-----
From: Keven Miller [mailto:[log in to unmask]]
Sent: Wednesday, February 23, 2000 4:34 PM
To: [log in to unmask]
Subject: FYI: NM Loader and HPSWTONMNAME


When specifying an XL file in my ;XL="..." list or used as the libname in
the
intrinsic HPSWTONMNAME,

if the XL file does not exist and the system resolves all externals, the
program
loads and runs with no warning that your XL was not referenced or does not
exist.

Example:
  RUN QUERY.PUB.SYS;XL="TRYTHIS"

When writting intrinsic replacements, this could happen. And you wonder why
your code isn't working.
If you build the file TRYTHIS as in above, and test the run, you get, I mean
I get
WARNING ** Message set 104, Error number 412 was not found in the system
catalog
.
Unable to load program to be run. (CIERR 625)

For my HPSWTONMNAME code, currently I call FLABELINFO on the file, looking
for FCODE=NMXL. If not exist
or not NMXL, I issue a warning.


I would like to get at least a warning of
WARNING ** XL xxxxxx.xxxxx.xxxx does not exist
or
WARNING ** XL xxxxxx.xxxxx.xxxx not referenced

Something similar to the CM warning
PROGRAM LOADED WITH LIB = S   (LOAD WARN 89)

+=====================================
 Keven Miller   KC7LYD
 [log in to unmask]   (Salt Lake City, Utah, USA)
+=====================================