//JCLNNDCL JOB (ACCT1,ACCT2,ACCT3,ACCT4),TIME=1440, // CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1) //*================================================================ //*- 1. Replace //* _BCDS: with your BCDS dataset name //* _MCDS: with your MCDS dataset name //* _OCDS: with your OCDS dataset name //* //*- 2. Replace _DCOL DDname "D" by a valid dataset name //* //*- 3. Do a ftp in "BINARY" format (NOT ASCII) and compressed to the following site //* //* ftp://sinapbit.serveftp.com (user/pswd: it will be sent by mail) //* //*=============================================================== //STEP01 EXEC PGM=IDCAMS,REGION=4500K,TIME=NOLIMIT //BCDS DD DSN=_BCDS,DISP=SHR //MCDS DD DSN=_MCDS,DISP=SHR //OCDS DD DSN=_OCDS,DISP=SHR //D DD DSN=_DCOL,DISP=(,KEEP), // SPACE=(1,(999,90),RLSE),AVGREC=M,DSORG=PS,RECFM=VB,LRECL=2048 //SYSPRINT DD SYSOUT=* //SYSIN DD * DCOLLECT - OFILE(D) - MIGD - BACD - SMSDATA(ACTIVE) /*