PROC 1 DIRPARM /* THIS CLIST IS USED BY @DIR WHEN DOITMAC(NAME) IS INVOKED */ /* TSO VERSION SO CAN DO SAME AS @DIRPARM, WHEN IN BROWSE /* TO MAKE SURE THAT CONTINUATION OF THE CLIST PROCESS IS WANTED*/ /* DAVID MCRITCHIE, MAY 28, 1986, SET @DIRPARM = &STR(&DIRPARM) IF &STR(&@DIRPARM) = &STR() THEN DO ISPEXEC VPUT (@DIRPARM) SHARED EXIT CODE(12) END ISPEXEC VPUT (@DIRPARM) SHARED EXIT CODE(0)