RE: conditioning indicator on an ENDDO

 |  
 |  > Given the following code,
 |  > 
 |  >  C           MASTS     DOWNE'A'                      =
 |  >  C           TKMANO    READEMAFILEL6                 40
 |  >  C  N40                ENDDO
 |  > 


Personally I would code it as:

C           MASTS     DOWNE'A'  
C           TKMANO    READEMAFILEL6                 40
C   40                LEAVE     
C                     ENDDO
  

rather than something along these lines:

      DOW MASTS <> 'A';
          READE TKMANO MAFILEL6
          IF %EOF(MAFILEL6);
              LEAVE;
          ENDIF;
      ENDDO;


The  IF %EOF(MAFILEL6)/LEAVE/ENDIF  is just too verbose for my tastes.  It's
not visually clear.

Then again I think the "count += 1" style shorthand is an unfortunate
borrowing from C, so their goes my verbosity argument....  

It's all about clarity and I think a conditioned LEAVE is the clearest.  (I
know, fixed format and (horrors) an indicator!

My 2 cents


Tom Daly


This communication is confidential, intended only for the named recipient(s)
above and for the purposes stated herein. It may contain trade secrets or
other information that is exempt from disclosure under applicable law.
Except as otherwise authorized in writing, any use, dissemination,
distribution, or copying of this communication by or to anyone other than
the named recipient(s) or for any purpose other than the purpose as stated
or intended herein is strictly prohibited. If you have received this
communication in error, please immediately notify SDD by calling us at (561)
276-7004.