Could it be that George has mismatched versions of PEXL?
-Craig
Sent from my iPad
On Dec 30, 2012, at 8:28 AM, Paul Taffel <[log in to unmask]> wrote:
> Hello George,
>
> Something is missing. SETDATE uses MPE's Procedure Exit facility to "arm" traps on some MPE procedures. It uses procedures provided by HP inside PEXL.PUB.SYS to turn these traps on or off. The procedures that get called when the traps are hit must be located inside another NMXL file. The NMXL.PUB.SYS file should be present on every system, but the 'other' NMXL file would have been provided along with the SETDATE program file. The error you saw indicates that this other NMXL file is being used two different ways at the same time. Although an NMXL can be used to hold trap handler procedures that are called by MPE whenever the traps are hit, you can of course :RUN any program with its external references resolved inside an NMXL file, just by using the :RUN ;XL= parameter. The error you saw indicates that you're trying to do both of these things at the same time, using the same NMXL file, and MPE won't let you do this.
>
> You'll need to figure out what the missing NMXL file is called, find out who has caused the NMXL to be loaded by :RUNning a program with the library specified, and then stop that program from running. When you do that, the traps armed by SETDATE should start to work again. I'd use MPEX's %LISTF,ACCESS or MPE's :LISTF,9 to find out who is accessing the missing NMXL file, but you'll still need to figure out what it's called.
>
> Hope this helps,
>
> Paul
>
>
> by At 2012-12-30 07:27 AM, George Forsythe wrote:
>> Hi Gilles,
>>
>>
>>
>> SETDATE is a freeware utility I picked up some years ago.
>>
>> It allows you to change the date/time for your session only and then reset
>> it back to what the system date/time is.
>>
>>
>>
>> It is something similar to Hour Glass on the IBM Mainframe.
>>
>>
>>
>> Attached is a Reflections WRQ Labeled file which contains a store file that
>> has two files -
>>
>>
>>
>> :file vt=setdate;dev=disc
>>
>> :vstore *vt;@[log in to unmask]@;show
>>
>> >> TURBO-STORE/RESTORE/VSTORE VERSION C.65.27 B5152AA <<
>>
>> (C) 1986 HEWLETT-PACKARD CO.
>>
>>
>>
>> VSTORE *vt;@[log in to unmask]@;SHOW
>>
>>
>>
>> SUN, DEC 30, 2012, 10:19 AM
>>
>>
>>
>>
>>
>> WILL VERIFY 2 FILES ; NUMBER OF FILES ON MEDIA 2
>>
>>
>>
>> FILENAME GROUP ACCOUNT VOLUME RESTRICTIONS SECTORS CODE
>> MEDIA
>>
>> SETDATE .PUB .SYS DISC :C 400 NMPRG
>> 1
>>
>> PEXL .PUB .SYS DISC :C 5136 NMXL
>> 1
>>
>>
>>
>> FILES VERIFIED : 2
>>
>>
>>
>> :setdate
>>
>> SETDATE A.01.00 Copyright (C) Hewlett-Packard Response Center Austria
>>
>>
>>
>>
>>
>> SETDATE Utility:
>>
>>
>>
>>
>>
>> Alters the date in the current session
>>
>>
>>
>>
>>
>> Usage:
>>
>>
>>
>>
>>
>> SETDATE {MM/DD/YY }
>>
>>
>> {RESET }
>>
>>
>>
>>
>>
>> MM/DD/YY desired date
>>
>>
>> RESET reset to system date
>>
>>
>> (unbind procedure exit handler)
>>
>>
>> Comment:
>>
>>
>>
>>
>>
>> Certain CI commands (e.g. showtime, showme, ...) are not affected and
>>
>>
>> still show the sytem date.
>>
>>
>> Please report any problems to [log in to unmask]
>>
>>
>>
>>
>>
>> :
>>
>>
>>
>>
>>
>> -----Original Message-----
>> From: Gilles Schipper [mailto:[log in to unmask]]
>> Sent: Saturday, December 29, 2012 9:43 AM
>> To: George Forsythe; [log in to unmask]
>> Subject: Re: [HP3000-L] Mpe: SETDATE Utility
>>
>>
>>
>> Is SETDATE part of a 3rd-party software utility ?
>>
>>
>>
>> Because I don't believe it's a valid MPE command.
>>
>>
>>
>> If so, perhaps your license for it's use has expired or it's not licensed
>> for the N4000.
>>
>>
>>
>>
>>
>>
>>
>> At 08:54 PM 2012-12-28, George Forsythe wrote:
>>
>> >We are trying to test Year-End activities, so I tried using the
>>
>> >SETDATE utility.
>>
>> >
>>
>> >It worked fine on our small test system, 927LX running MPE/iX 6.5 -
>>
>> >
>>
>> >:setdate 01/01/13
>>
>> >CURRENT-DATE: 01/01/13
>>
>> >:
>>
>> >:setdate reset
>>
>> >CURRENT-DATE: 12/28/12
>>
>> >:
>>
>> >
>>
>> >However, on the Production system, a N-Class-4000-400-75 System
>>
>> >running MPE/iX 7.5, there is an issue -
>>
>> >
>>
>> >:setdate 01/01/13
>>
>> >CURRENT-DATE: 01/01/13
>>
>> >:
>>
>> >:setdate reset
>>
>> >An AIF:PE handler library can only be folloowed by either another
>>
>> >AIF:PE handler library or the system libraries. (LDRERR 678)
>>
>> >Native mode loader message 678
>>
>> >Unable to load program to be run (CIERR 625)
>>
>> >:
>>
>> >
>>
>> >Has anyone seen this issue before or know how to resolve it ?
>>
>> >
>>
>> >Any and all suggestions are greatly appreciated...
>>
>> >
>>
>> >* To join/leave the list, search archives, change list settings, *
>>
>> >* etc., please visit <http://raven.utc.edu/archives/hp3000-l.html>
>> http://raven.utc.edu/archives/hp3000-l.html *
>>
>>
>>
>> ----------------------------------------------------------------------------
>> ---------------------
>>
>> Gilles Schipper
>>
>> GSA Inc.
>>
>> HP System Administration Specialists
>>
>> 300 John Street, Box 87651 Thornhill, ON Canada L3T 7R4
>>
>> Tel: 416.702.7900
>>
>> email: <mailto:[log in to unmask]> [log in to unmask] web:
>> <http://www.gsainc.com> http://www.gsainc.com
>>
>> ----------------------------------------------------------------------------
>> ---------------------
>>
>>
>>
>>
>> * To join/leave the list, search archives, change list settings, *
>> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|
