分类:
2008-04-25 17:08:18
//TSOIDVM JOB (ACCT),TSOID,CLASS=A,MSGCLASS=X,
// NOTIFY=&SYSUID
//*********************************************************************/
//* REPRO DATA
//*********************************************************************/
//REPRO EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INPUT DD DSN=TSOID.TEXT.DATA,DISP=SHR
//SYSIN DD *
REPRO INFILE(INPUT) ODS(TSOID.TEST.VSAM)
/*
//
注:向VSAM文件写入信息,使用IDCAMS来实现。写入的内容保存在SDS,其DS名称是:TSOID.TEST.DATA.
具体的写入信息语句是: REPRO INFILE(INPUT) ODS(TSOID.TEST.VSAM)
信息会被写入VSAM文件TSOID.TEST.VSAM中
其中的TSOID需替换成登陆mainframe的ID.