//TSOIDVM JOB (ACCT),TSOID,CLASS=A,MSGCLASS=X,
// NOTIFY=&SYSUID
//*********************************************************************/
//* VASM PRINT
//*********************************************************************/
//PRINT EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INPUT DD DSN=TSOID.TEST.VSAM,DISP=SHR
//SYSIN DD *
PRINT INFILE(INPUT) CHAR
/*
//
注：其中TSOID是用户登陆mainframe的TSO ID，需要进行替换。
输出信息使用的是IDCAMS utility
被输出信息的VSAM是：TSOID.TEST.VSAM
输出的语句是： PRINT INFILE(INPUT) CHAR
