Hi,
What you could do is rename your file between each directory listing. Something like this :-
CD DIR1
DIR (DISK
SYSCMD RNMOBJ OBJ(*CURLIB/DIROUTPUT) OBJTYPE(*FILE) NEWOBJ(DIR1)
CD DIR2
DIR (DISK
SYSCMD RNMOBJ OBJ(*CURLIB/DIROUTPUT) OBJTYPE(*FILE) NEWOBJ(DIR2)
CD DIR3
DIR (DISK
SYSCMD RNMOBJ OBJ(*CURLIB/DIROUTPUT) OBJTYPE(*FILE) NEWOBJ(DIR3)
Then after your FTP session copy all the files into one total file :-
CPYF FROMFILE(*CURLIB/DIR1) TOFILE(*CURLIB/TOTDIR) MBROPT(*REPLACE) CRTFILE(*YES)
CPYF FROMFILE(*CURLIB/DIR2) TOFILE(*CURLIB/TOTDIR) MBROPT(*ADD)
CPYF FROMFILE(*CURLIB/DIR3) TOFILE(*CURLIB/TOTDIR) MBROPT(*ADD)
Regards,
Martin Gilbert.
Discuss This Question: 1  Reply