Re: Free Format Equivalent of LR Processing

Bill,

> C            EXSR      DETAIL
> > CLR          EXSR      TOTAL
> >  /free
>
> Unless I'm missing something isn't this the same as my example except the
> different subroutine name?



No, it is different.  Barbara inserted two (fixed form) lines ahead of the
free form.  The first becomes the entire "mainline" of the detail time
calcs, and simply calls a subroutine DETAIL which contains all the detail
time processing.  The second line is the "total time" calcs and calls
subroutine TOTAL.  The difference here is that in Barbara's case, the TOTAL
subroutine is actually called during total time of the cycle, whereas your
example called it at the end of the detail time in the cycle.  The
difference can be important when using primary or secondary files but may be
academic if only using full-procedural file processing.

As an aside, I think Barbara's example should use either L1 or even L0 in
columns 7-8 instead of LR so that it is called every cycle.   That way if
additional Lx calcs are needed in the future they can be added inside TOTAL
with tests similar to her test for *inLR.  As coded, if other *INLx calcs
were added to TOTAL, they would only get processed at LR time.

Doug