How to export generic (.txt file) with date and time stamp?

ASSIGN/DATE = SYSTEMDATE("MM_dd_yyyy")
ASSIGN/TIME = SYSTEMTIME("HH_mm")
ASSIGN/FILENAME = "P:\Reports\Customer\PartNumber\_"+DATE+"_"+TIME+" .rtf"
PRINT_IN =COMMENT/INPUT,YES,''Select a print option:
,
,1 .... Print the report
,2 .... Skip the printed report'
IF_GOTO/PRINT_IN.INPUT=="1",GOTO = YESPRINT
IF_GOTO/PRINT_IN.INPUT=="2",GOTO = NOPRINT
GOTO/PRINT_IN
YESPRINT =LABEL/
PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=FILENAME,$
TO_PRINTER=ON,DRAFTMODE=OFF,$
TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
PREVIOUS_RUNS=DELETE_INSTANCES
GOTO/END_PROGRAM
NOPRINT =LABEL/
PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=FILENAME,$
TO_PRINTER=OFF,DRAFTMODE=OFF,$
TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
PREVIOUS_RUNS=DELETE_INSTANCES

ASSIGN/DATE = SYSTEMDATE("MM_dd_yyyy")
ASSIGN/TIME = SYSTEMTIME("HH_mm")
ASSIGN/FILENAME = "P:\Reports\Customer\PartNumber\_"+DATE+"_"+TIME+" .rtf"
PRINT_IN =COMMENT/INPUT,YES,''Select a print option:
,
,1 .... Print the report
,2 .... Skip the printed report'
IF_GOTO/PRINT_IN.INPUT=="1",GOTO = YESPRINT
IF_GOTO/PRINT_IN.INPUT=="2",GOTO = NOPRINT
GOTO/PRINT_IN
YESPRINT =LABEL/
PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=FILENAME,$
TO_PRINTER=ON,DRAFTMODE=OFF,$
TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
PREVIOUS_RUNS=DELETE_INSTANCES
GOTO/END_PROGRAM
NOPRINT =LABEL/
PRINT/REPORT,EXEC MODE=END,$
TO_FILE=ON,OVERWRITE=FILENAME,$
TO_PRINTER=OFF,DRAFTMODE=OFF,$
TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME=,$
REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMEN SIONS=NO,$
PREVIOUS_RUNS=DELETE_INSTANCES