z/OS ISPF Services Guide
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


APL2 examples

z/OS ISPF Services Guide
SC19-3626-00

This APL program has six lines in a block, the line 15. Line 1 is (finger)SET THE TABLE VARIABLE. Line 2 is TABLE(backarrow)'XTABLE'. Line 3 is (finger)OPEN THE TABLE. Line 4 is LASTCC(backarrow)ISPEXEC 'TBOPEN &TABLE NOWRITE'. Line 5 is (forwardarrow)(LASTCC = 0)/NORMALCONT. Line 6 is (finger)PROCESS ERRORS HERE Line 15 is NORMALCONT:........
This example uses the LMOPEN service and checks the return code that is placed in variable LASTCC. 
LASTCC <- ISPEXEC 'LMOPEN DATAID INPUT'
-> (LASTCC = 0) / NORMALCONT
⋮
Parent topic: APL2

Go to the previous page Go to the next page

Notices | Terms of use | Support | Contact z/OS | zFavorites



Copyright IBM Corporation 1990, 2014