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 next