Martin Gilliam <[log in to unmask]> wrote in article
<[log in to unmask]>...
> Can anyone tell me how or if HP is going to modify the 'CURRENT-DATE'
> register and the 'DATE' function in COBOL II/iX to address the Year 2000
> issue on the HP 3000?  If so, is there any documentation available on the
> proposed changes?
>
> Martin Gilliam
> Data Processing Supervisor
> County of Wise, VA
>

Already done. See the chapter in the manual on Functions (chapter 10, I
think). The compiler has a $CONTROL option called POST85, which enables
these functions. One of them is a new CURRENT-DATE function. In the code
say.

$CONTROL POST85
.....
 01  FULL-DATE.
      05 FD-YYYY     PIC 9(4).
      05 FD-MM         PIC 9(2).
      05 FD-DD         PIC 9(2).
      05 FD-HOURS   PIC 9(2).
      05 FD-MIN        PIC 9(2).
      05 FD-SECS     PIC 9(2)V9(2).
      05 FD-GMT-INFO X(5).
.....
     MOVE FUNCTION CURRENT-DATE TO FULL-DATE.
.....

David B Copeland.
JSI Data Systems Ltd.
Nepean ON Canada
613-727-9353
[log in to unmask]