I may be being ignorant of the old MPE machines (it's been a long time),
but why does it need to be an SPL routine?
Surely you could write a COBOL routine, call it CALENDAR and stick it in
a group or pub SL. Then as you said RUN the programs with LIB=G or P.
Many thanks
David
-----Original Message-----
From: Rob Marsicek [SMTP:[log in to unmask]]
Sent: 25 September 1998 15:54
To: [log in to unmask]
Subject: Wanted: SPL calendar routine
* Please Note : This message was received from the Internet *
_____________________________________________________________
MPE V, Release 30 changed the CALENDAR intrinsic to return the
number of
years since 1900 instead of the 2 digit year of the century, so
in 2000
it returns 100 instead of 0. (See COMMUNICATOR 3000, MPE V
Release 3P,
Version G.3P.00 for details.)
I need a version of CALENDAR which follows the old convention of
returning only a 0 through 99 year of century. I'd put this
routine in
an SL to be accessed with the LIB=G parameter on the RUN
commands for a
flock of programs that abort when years since 1900 rolls over to
100.
This will save me a bunch of unnecessary recompiles. (All
programs
compiled with my version of REX/3000 abort in 2000.)
This should be a simple SPL routine, but I'd rather buy it than
learn
the SPL required for this one task. This is the old "classic"
MPE, NOT
MPE/iX.
------------
Rob Marsicek, 1-425-251-6703, Tally Company, Kent, Washington,
USA
__________________________________________________________________
Confidentiality Notice
This message may contain privileged and confidential information. If you think, for any reason, that this message may have been addressed to you in error, you must not disseminate, copy or take any action in reliance on it, and we would ask you to notify us immediately by return email to "[log in to unmask]".
|
