# DATE4

Portability Subroutine: Returns the current system date.

## Module

USE IFPORT

CALL DATE4 (datestr)

datestr | (Output) CHARACTER. Is a variable or array containing at least eleven bytes of storage.

This subroutine returns datestr in the form dd-mmm-yyyy, where dd is a two-digit representation of the current day of the month, mmm is a three-character abbreviation for the current month (for example, Jan) and yyyy are the four digits of the current year.

Parent topic: C to D