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

Chapter 9 133
Year 2000 Enhancements
New Date Intrinsics for MPE/iX
The number of days to be added to the input date. A
negative value will result in a subtraction.
outputdate is the output date. The result of the date offset
operation. The interpretation depends upon the value
of datecode. See the table, “Supported Date Formats,” for
the supported datecodes and their layouts.
status is the HPE_STATUS parameter through which the error
codes are returned. A value of 0 indicates no error and
no warnings.
cutoff is a 32-bit signed integer by value (optional).
This is used in validating and converting the two-digit
years to four digit ones before computing the difference.
(See HPDATECONVERT documentation for more
information.)
HPDATEVALIDATE
This intrinsic checks the validity of the given date with respect to the
supported formats given in the table, “Supported Date Formats.”
Syntax
I32 I32V * I32V
result := HPDATEVALIDATE(datecode,inputdate,cutoff)
Parameters
datecode is a 32-bit signed integer by value.
This value should be one of the date type codes listed in
the table, “Supported Date Formats.”
inputdate is the input date.
The interpretation depends upon the value of datecode.
See the table, “Supported Date Formats,” for the
supported datecodes and their layouts.
cutoff is a 32-bit signed integer by value (optional).
This is used in validating dates with two digit years.
(See HPDATECONVERT documentation for more
information on cutoff parameter).
result is a 32-bit signed integer (assigned functional return).
This value will be 0 if the inputdate conforms to the date
format represented by datecode. If it is not so, its value
will be positive. If an error has occurred in evaluating
the conformance, its value will be negative. This return
value ranges from -999 to 1.