Hi

I`m trying to create a file to one of the application directory with following code, my requirement is to create the file with date as extension, but I`m getting error if I leave a space between file name and the date, if I give a space then job is finishing but file was not creating at the target location.

Any help on this appreciated.

 
-SET &TS=HHMMSS('A8');
-SET &&DATE = &DATE;

FILEDEF SAVEOUT DISK FTP/CAR_FILE_FTP-&DATE.xls

TABLE FILE CAR
PRINT CAR
BY COUNTRY

ON TABLE SAVE AS SAVEOUT FORMAT EXL2K
ON TABLE SET EMPTYREPORT ON
ON TABLE SET STYLE *
     PAGESIZE='Letter',
     ORIENTATION=LANDSCAPE,
$
TYPE=REPORT, TITLETEXT='CAR FILE DAILY FTP', $
TYPE=REPORT,FONT='ARIAL',SIZE=8,COLOR='BLACK',GRID=OFF,BORDER-COLOR='GRAY',$
TYPE=TITLE, STYLE=BOLD,BACKCOLOR=RGB(86 160 211),COLOR='WHITE', JUSTIFY=CENTER,BORDER=LIGHT,BORDER-COLOR='GRAY',$
TYPE=DATA,BACKCOLOR=('WHITE' RGB(240 240 240)), BORDER=LIGHT,BORDER-COLOR='GRAY',$
TYPE=ACROSSVALUE,JUSTIFY=CENTER,STYLE=BOLD,BACKCOLOR=RGB(86 160 211),COLOR='WHITE',BORDER=LIGHT, BORDER-COLOR='GRAY',$
TYPE=GRANDTOTAL, BACKCOLOR=RGB(215 215 215), STYLE=BOLD,BORDER-TOP=HEAVY,BORDER-TOP-STYLE=DOUBLE, BORDER=LIGHT, BORDER-COLOR='GRAY',$
ENDSTYLE
END
-EXIT
 

This message has been edited. Last edited by: FP Mod Chuck,

And something such as this ?

TABLE FILE CAR
PRINT CAR
BY COUNTRY

ON TABLE HOLD AS FTP/CAR_FILE_FTP_&YYMD FORMAT XLSX
ON TABLE SET EMPTYREPORT ON
ON TABLE SET STYLE *
     PAGESIZE='Letter',
     ORIENTATION=LANDSCAPE,
$
TYPE=REPORT, TITLETEXT='CAR FILE DAILY FTP', $
TYPE=REPORT,FONT='ARIAL',SIZE=8,COLOR='BLACK',GRID=OFF,BORDER-COLOR='GRAY',$
TYPE=TITLE, STYLE=BOLD,BACKCOLOR=RGB(86 160 211),COLOR='WHITE', JUSTIFY=CENTER,BORDER=LIGHT,BORDER-COLOR='GRAY',$
TYPE=DATA,BACKCOLOR=('WHITE' RGB(240 240 240)), BORDER=LIGHT,BORDER-COLOR='GRAY',$
TYPE=ACROSSVALUE,JUSTIFY=CENTER,STYLE=BOLD,BACKCOLOR=RGB(86 160 211),COLOR='WHITE',BORDER=LIGHT, BORDER-COLOR='GRAY',$
TYPE=GRANDTOTAL, BACKCOLOR=RGB(215 215 215), STYLE=BOLD,BORDER-TOP=HEAVY,BORDER-TOP-STYLE=DOUBLE, BORDER=LIGHT, BORDER-COLOR='GRAY',$
ENDSTYLE
END
-EXIT

Hi Martin,

Thank you, that worked but the format we are looking for is "jan-19", how can I get that?

Thanks,
Krishna

This could be one option.

DEFINE FILE CAR
DTE    /YYMD = &YYMD;
DTEMTH /Mt   = DTE;
DTEYR  /Y    = DTE;
DTEMY  /A6V  = FPRINT(DTEMTH, 'Mt', 'A3') || '-' || EDIT(DTEYR);
END
TABLE FILE CAR
PRINT DTEMY
BY COUNTRY NOPRINT
WHERE READLIMIT EQ 1;
ON TABLE HOLD AS DTESAV
END
-RUN
-READFILE DTESAV
-RUN
-DEFAULTH &DTEMY = ''

TABLE FILE CAR
PRINT CAR
DTEMTH
DTEYR
DTEMY
BY COUNTRY

ON TABLE HOLD AS FTP/CAR_FILE_FTP_&DTEMY FORMAT XLSX
ON TABLE SET EMPTYREPORT ON
ON TABLE SET STYLE *
     PAGESIZE='Letter',
     ORIENTATION=LANDSCAPE,
$
TYPE=REPORT, TITLETEXT='CAR FILE DAILY FTP', $
TYPE=REPORT,FONT='ARIAL',SIZE=8,COLOR='BLACK',GRID=OFF,BORDER-COLOR='GRAY',$
TYPE=TITLE, STYLE=BOLD,BACKCOLOR=RGB(86 160 211),COLOR='WHITE', JUSTIFY=CENTER,BORDER=LIGHT,BORDER-COLOR='GRAY',$
TYPE=DATA,BACKCOLOR=('WHITE' RGB(240 240 240)), BORDER=LIGHT,BORDER-COLOR='GRAY',$
TYPE=ACROSSVALUE,JUSTIFY=CENTER,STYLE=BOLD,BACKCOLOR=RGB(86 160 211),COLOR='WHITE',BORDER=LIGHT, BORDER-COLOR='GRAY',$
TYPE=GRANDTOTAL, BACKCOLOR=RGB(215 215 215), STYLE=BOLD,BORDER-TOP=HEAVY,BORDER-TOP-STYLE=DOUBLE, BORDER=LIGHT, BORDER-COLOR='GRAY',$
ENDSTYLE
END
-EXIT

 
This could be another option.

-SET &MonthYear = &DATEMt || '-' || &DATEY ;

before the TABLE FILE... to get "Jan-19" as in

ON TABLE HOLD AS FTP/CAR_FILE_FTP_&MonthYear.EVAL FORMAT XLSX

Awesome! that worked, thank you Martin and Doug.

Thanks,
Krishna.

From the original post, this FILEDEF will work

FILEDEF SAVEOUT DISK FTP/CAR_FILE_FTP-&DATE...xls

As a side note when mixing amper variables with text string it is a good idea to always test with:

-SET &ECHO=ALL;
-SET &STACK=OFF;

This way you can see the resulting code without running the TABLE request.

This message has been edited. Last edited by: jgelona,