SYSUT1のファイルをSYSUT2にコピーします。 //*** FILE COPY FROM infile TO outfile //A0001A JOB ‘A’,A,CLASS=A,MSGCLASS=H //COPY EXEC PGM=JSDGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD DSN=infile,UNIT=SYSDA,DISP=OLD,VOL=SER=aaaaaa //SYSUT2 DD DSN=outfile,UNIT=SYSDA,DISP=(NEW,KEEP), // VOL=SER=bbbbbb //SYSIN DD DUMMY 返信
//***** ファイルAAAAの印刷 //A0002B JOB A,CLASS=A,MSGCLASS=H //GENER EXEC PGM=JSDGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD UNIT=TAPE,DSN=AAAA,VOL=SER=AAAAAA,DISP=OLD, // LABEL=(3,BLP),DCB=(RECFM=F,LRECL=80,BLKSIZE=80) //SYSUT2 DD SYSOUT=*,DCB=(RECFM=F,LRECL=80,BLKSIZE=80) //SYSIN DD DUMMY 返信
SYSUT1のファイルをSYSUT2にコピーします。
//*** FILE COPY FROM infile TO outfile
//A0001A JOB ‘A’,A,CLASS=A,MSGCLASS=H
//COPY EXEC PGM=JSDGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=infile,UNIT=SYSDA,DISP=OLD,VOL=SER=aaaaaa
//SYSUT2 DD DSN=outfile,UNIT=SYSDA,DISP=(NEW,KEEP),
// VOL=SER=bbbbbb
//SYSIN DD DUMMY
無料のロゴ作成サービスで作って付けてみましたが、うーん🙄
ロゴはインパクトがありますね
すばらしい
私もどんどん使います
//***** ファイルAAAAの印刷
//A0002B JOB A,CLASS=A,MSGCLASS=H
//GENER EXEC PGM=JSDGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD UNIT=TAPE,DSN=AAAA,VOL=SER=AAAAAA,DISP=OLD,
// LABEL=(3,BLP),DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SYSUT2 DD SYSOUT=*,DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SYSIN DD DUMMY