>  LISTCAT ENTRY(USTS.U0Z72B6.????.????????)
>  IF LASTCC=0 THEN DELETE USTS.U0Z72B6.????.????????
>  SET MAXCC=0

Simpler/shorter:

 DELETE USTS.U0Z72B6.????.????????
 IF LASTCC<9 THEN  SET MAXCC=0

-
Too busy driving to stop for gas!

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to