Begin case
            Case code will never run on any machine ever again  ;  not worth 
rewriting
           Case 1                                                               
                              ;  someone will probably look at the code
                                                                That someone 
will probably be me                        
                                                                yes, rewrite it 
and give it a rev number.
End   case

Begin case
           case PARMS(7)<102,CM>='' ;    CUMO(M) += PARMS(12)<134,CM>
          case 1                                             ;     CUMO(M) += 
PARMS(7)<102,CM>
END  case

Infinitely more legible.

--Bill
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to