| ## COBOL and Language Environment Routines

Use the intrinsic functions available with year 2000 ready compilers and the callable services of Language Environment to get 4-digit-year dates and to convert dates between formats.

The intrinsic functions are available in

COBOL for MVS & VM Release 2 COBOL for OS/390 & VM COBOL/370 Release 1 COBOL for VSE/ESA | VisualAge COBOL COBOL Set for AIX ILE COBOL for AS/400

The date/time intrinsics include

CURRENT-DATE DATE-OF-INTEGER (gives YYYYMMDD) DAY-OF-INTEGER (gives YYYYDDD) | INTEGER-OF-DAY WHEN-COMPILED

©1997 IBM Corporation