次の JCL を使用して、IGYTSALE プログラムをコンパイル、リンク・エディット、および実行します。プログラムのコンパイルだけ、 またはコンパイルとリンク・エディットだけを行う場合は、IGYWCLG カタログ式プロシージャーを変更します。
小文字で示されているフィールド (会計情報) には、システムおよびインストール先固有の情報を挿入しなければなりません。
//IGYTSALE JOB (acct-info),'IGYTSALE',MSGLEVEL=(1,1),TIME=(0,29) //TEST EXEC IGYWCLG //COBOL.SYSLIB DD DSN=IGY.V4R1M0.SIGYSAMP,DISP=SHR //COBOL.SYSIN DD DSN=IGY.V4R1M0.SIGYSAMP(IGYTSALE),DISP=SHR //GO.SYSOUT DD SYSOUT=A //GO.IGYTABLE DD DSN=IGY.V4R1M0.SIGYSAMP(IGYTABLE),DISP=SHR //GO.IGYTRANS DD DSN=IGY.V4R1M0.SIGYSAMP(IGYTRANA),DISP=SHR //GO.IGYPRINT DD SYSOUT=A,DCB=BLKSIZE=133 //GO.IGYPRT2 DD SYSOUT=A,DCB=BLKSIZE=133 //