■  データセット プリントサンプル


全件プリント

//*全件プリント
//STEP1EXECPGM=IDCAMS 
//SYSPRINTDDSYSOUT=* 
//INDATADDDSN=TST.VSAM.FILE01,DISP=SHR 
//SYSINDD* 
 PRINT INFILE(INDATA)
/*   
//*  この場合は、"DUMP"を指定したのと同じです 
//*    
//*全件プリント(キャラクター形式)
//STEP2EXECPGM=IDCAMS 
//SYSPRINTDDSYSOUT=* 
//INDATADDDSN=TST.VSAM.FILE01,DISP=SHR 
//SYSINDD* 
 PRINT INFILE(INDATACHAR
/*   
//*  漢字が混在している場合は、"CHAR  DBCS"と指定します 
//*    


KEY指定でプリント(KSDSだけです)

//STEP1EXECPGM=IDCAMS 
//SYSPRINTDDSYSOUT=* 
//INDATADDDSN=TST.VSAM.FILE01,DISP=SHR 
//SYSINDD* 
 PRINT INFILE(INDATAFROMKEY(0000200000) TOKEY(0000700000)
/*    


件数指定でプリント

//SYSPRINT DD SYSOUT=*  
//INDATA DD DSN=TST.VSAM.FILE01,DISP=SHR  
//SYSIN DD *  
  PRINT INFILE(INDATACOUNT(5) ←最初の5件
/*        

※上記のサンプルはVSAMでも非VSAMでも出力可能です。

※可変長ファイルの場合の、先頭4バイト(レングス+リザーブ)は表示されません。

※DBCS(漢字)を指定する場合は、CHAR以外(=DUMP・HEX)は指定できません。



BEFORE PAGE

TOP PAGE