Communicator 3000 MPE/iX Release 6.0 (Platform Software Release C.60.00) (30216-90269)

120 Chapter 9
Year 2000 Enhancements
Year 2000 Enhancements for MPE/iX
CALENDAR Intrinsic
The CALENDAR intrinsic returns the CALENDAR date, including the day
of year and the year of century. The existing CALENDAR intrinsic
documentation refers to the year as "year of century." This should be
interpreted as "year since 1900."
The new definition of the CALENDAR intrinsic is as follows:
Syntax
U16
date:=CALENDAR;
where date is a 16-bit unsigned integer (assigned functional return).
This returns the CALENDAR date in the following format:
Table 9-1 CALENDAR Date Formats
Description
For the year 2000, the CALENDAR intrinsic will return the year as 100,
for 2001 as 101, and so on. With this current interpretation, CALENDAR
format can handle years through 2027.
All intrinsics accepting or returning dates in CALENDAR format will
behave the same way as the CALENDAR intrinsic.
NOTE If your application uses the CALENDAR intrinsic or CALENDAR format, it
may be required to verify the source for conformance to the above
interpretation.
HPFOPEN/FOPEN Intrinsic
HPFOPEN item 31 (labeled tape expiration parameter) and FOPEN
(formmsg label tape parameter) will accept both two- and four-digit
years as the labeled tape expiration date. This is the same as the FILE
command expiration date parameter. For an interpretation of two-digit
years, refer to the section, "Two-Digit Years Interpretation," in this
article.
New Date Intrinsics
This version of MPE/iX has new intrinsics added to manipulate dates in
various formats. For more information, refer to the article, "New Date
Intrinsics for MPE/iX," in this Communicator.
Bits Value/Meaning
7:9 day of year
0:7 year since 1900