In <20130511.154412.1327...@webmail03.dca.untd.com>, on 05/11/2013
at 07:44 PM, "esst...@juno.com" <esst...@juno.com> said:
>My question is How Do I properly Test and SET the Return Code in the
>EDIT MACRO
&LASTCC and &MAXCC to test.
EXIT CODE(foo) to set.
>Any examples would be appreciated.
ISREDIT MACRO
SET LROW = 00
SET LCOL = 00
SET LNUM = 00
ISPEXEC VGET (V0) SHARED
ISREDIT FIND XXXXXXX
ISREDIT CHANGE 'XXXXXXX' '&V0' ALL
ISREDIT SUB
IF &LASTCC > 0 THEN EXIT CODE(4)
ISREDIT CAN
EXIT CODE(0)
--
Shmuel (Seymour J.) Metz, SysProg and JOAT
Atid/2 <http://patriot.net/~shmuel>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
