REXX プロシージャを実行するには、任意の REXX プロシージャを実行するために使用されているのと同じ JCL を使用します。MVS をエミュレートする場合は、IKJEFT01 または IRXJCL を実行します。TSO をエミュレートする場合は、IKJEFT01 を実行します。
//REXTEST JOB 'TEST DSNREXX SUPPORT',CLASS=A,MSGCLASS=A //* //* Test the REXX engine using IKJEFT01 //* //STEP10 EXEC PGM=IKJEFT01 //SYSEXEC DD DSN=USER.TEST.EXEC,DISP=SHR //SYSTSIN DD * rextest1 //SYSPRINT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSOUT DD SYSOUT=* //* //* Test the REXX engine using IRXJCL //* //STEP30 EXEC PGM=IRXJCL,PARM='rextest1' //SYSEXEC DD DSN=USER.TEST.EXEC,DISP=SHR //SYSTSPRT DD SYSOUT=* //SYSTSIN DD DUMMY
rextest1.rex ファイルに REXX プロシージャが含まれています。
DSNREXX サポートの完全なサンプルについては、メインフレーム チュートリアルの下の「チュートリアル:DSNREXX」を参照してください。