On Saturday 17 June 2006 19:11, Ron and Jenny Hawkins wrote: > 1) Pre-allocate the receiving file as RECFM=U; > 2) FTP it; > 3) then read it as RECFM=VBS. > > Do that pretty often as well. > I'm not sure there would be any perceived data loss.
See my test job below. I'm getting this in the RELOAD step: IEB1157W DIRECTORY ENTRY FOR IEHMOVE CONTAINS AN INVALID UTTR X'04DD1E' - UTTR DATA UNCHANGED IEB188I MEMBER IEBCOPY IN DATA SET REFERENCED BY SYSUT1 HAS RECORDS GREATER THAN BLKSIZE. LENGTH=37423 BLKSIZE=6144 TTR=X'203A02' MBBCCHHR=X'F140010503322F02' The remote FTP system (Linux) does not support type E or mode B. Any suggestion how to fix the errors ? -- Gilbert Saint-Flour GSF Software http://gsf-soft.com/ mailto:[EMAIL PROTECTED] //CLEANUP EXEC PGM=IEFBR14 //DD1 DD DSN=GILBERT.IEBCOPY.UNLOAD,DISP=(MOD,DELETE) //DD2 DD DSN=GILBERT.IEBCOPY.UNLOAD2,DISP=(MOD,DELETE) //* //UNLOAD EXEC PGM=IEBCOPY //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=SYS1.LINKLIB,DISP=SHR //SYSUT2 DD DSN=GILBERT.IEBCOPY.UNLOAD,DISP=(,CATLG), // SPACE=(TRK,(1,1)) C I=SYSUT1,O=SYSUT2 S M=IEBCOPY S M=IEHMOVE /* //FTP EXEC PGM=IKJEFT01,PARM='FTP (EXIT' //DD1 DD DSN=GILBERT.IEBCOPY.UNLOAD,DISP=SHR,RECFM=U //DD2 DD DSN=GILBERT.IEBCOPY.UNLOAD2,DISP=(,CATLG), // SPACE=(TRK,(1,1)),RECFM=U,LRECL=32760,BLKSIZE=32760 //SYSTSPRT DD SYSOUT=* //OUTPUT DD SYSOUT=* //SYSTSIN DD * /* //INPUT DD * 192.168.0.17 gilbert ******** bin put //dd:dd1 iebcopy.unload dir iebcopy.unload get iebcopy.unload //dd:dd2 quit //* //RELOAD EXEC PGM=IEBCOPY //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=GILBERT.IEBCOPY.UNLOAD2,DISP=SHR,RECFM=VS //SYSUT2 DD DSN=&&SYSUT2,LIKE=SYS1.LINKLIB //SYSIN DD DUMMY ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
