PPT Slide

OPEN FILE(SYSUT1) COPYBOOK(MXS.P390.COPYLIB(CBHDR)) SEQUPD

RC=00000000 RXV0004I SUCCESSFUL COMPLETION

READNEXT FILE(SYSUT1) WHERE(10,EQ,'Y')

RC=00000000 RXV0004I SUCCESSFUL COMPLETION

REWRITE FILE(SYSUT1)

RC=00000000 RXV0004I SUCCESSFUL COMPLETION

READNEXT FILE(SYSUT1) WHERE(10,EQ,'Y')

RC=00000000 RXV0004I SUCCESSFUL COMPLETION

REWRITE FILE(SYSUT1)

RC=00000000 RXV0004I SUCCESSFUL COMPLETION

. . .

READNEXT FILE(SYSUT1) WHERE(10,EQ,'Y')

RC=00000008 RXV0046I VSAM OPERATION FAILED OPER=NXT RC=EOF

CLOSE FILE(SYSUT1)

RC=00000000 RXV0004I SUCCESSFUL COMPLETION

. . .

* of 42

All MAX/REXX components optionally provide trace feedback.

Previous slide

Next slide

Back to first slide

View graphic version