; makefile.scr


; Gets two digit year from 8 digit date field


$Y=SUBSTR(@DATE,LEN(@DATE)-7,2) 


; Var set for month number macro


$M=@MONTHNO


; Var set for day number macro


$D=@MDAYNO 


; Creates place holder for months less than 10


IF @MONTHNO<10


$M="0"+@MONTHNO


ELSE


$M=@MONTHNO


ENDIF


; Creates place holder for days less than 10


IF @MDAYNO<10 


$D="0"+@MDAYNO


ELSE


$D=@MDAYNO


ENDIF


; Pipes text and vars to ftp script file


IF REDIRECTOUTPUT ("ftpscr.txt",1)=0


; "?" adds new line


"logonname"


? "password"


? "lcd \\SRV01\shared\reports"


? "prompt"


; Combines strings and vars to create ftp MGET command


? "mget *""$Y""$M""$D""*" 


ENDIF


RUN "ftp -s:\\SRV01\shared\batch\ftpscr.txt 146.173.14.11"