PARM FILE_NAME

# CMADAYS.XEQ - DISPLAYS THE NUMBER OF DAYS SINCE FILE WAS
#               CREATED, MODIFIED, AND ACCESSED.
# TIM ERICSON  07/14/1998

DAYS !HPYYYY![RHT("0"+"!HPMONTH",2)]![RHT("0"+"!HPDATE",2)]
SETVAR TODAY_DAYS, RETURN_DAYS

DAYS ![FINFO ( "!FILE_NAME", "INTCREATED" )]
SETVAR CREATED_DAYS, RETURN_DAYS

DAYS ![FINFO ( "!FILE_NAME", "INTMODDATE" )]
SETVAR MODIFIED_DAYS, RETURN_DAYS

DAYS ![FINFO ( "!FILE_NAME", "INTACCESSED" )]
SETVAR ACCESSED_DAYS, RETURN_DAYS

ECHO
ECHO "!FILE_NAME" WAS CREATED ![TODAY_DAYS - CREATED_DAYS] DAYS AGO,
ECHO MODIFIED ![TODAY_DAYS - MODIFIED_DAYS] DAYS AGO, AND &
  ACCESSED ![TODAY_DAYS - ACCESSED_DAYS] DAYS AGO.
ECHO

DELETEVAR TODAY_DAYS, MODIFIED_DAYS, RETURN_DAYS
DELETEVAR CREATED_DAYS, ACCESSED_DAYS