2011年9月2日 星期五

Using IKJEFT01 to Copy HFS directory to SYSOUT

//PRINT EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSUT1 DD PATH='/tmp/file.out',PATHOPTS=ORDONLY
//SYSUT2 DD SYSOUT=*,DCB=(LRECL=121,RECFM=FBA,BLKSIZE=1210)
//SYSTSIN DD DATA
OCOPY INDD(SYSUT1) OUTDD(SYSUT2)
//*

沒有留言:

張貼留言