PARM FILE_NAME

# CREDAYS.XEQ - DISPLAYS THE NUMBER OF DAYS SINCE FILE WAS CREATED.
# 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

ECHO
ECHO "!FILE_NAME" WAS CREATED ![TODAY_DAYS - CREATED_DAYS] DAYS AGO.
ECHO

DELETEVAR TODAY_DAYS, CREATED_DAYS, RETURN_DAYS