Re: Subject: rpg free and input primary

Lance Gillespie wrote:
> 
> That works fine.  Can I assume that
> you can't do last record processing
> in free?  I tried using %eof, but that
> did not work either.
> 

Right, the only way to say that you have total-calculations is by using
the Level entry of the C spec.  You could code your cycle programs like
this:

C              exsr        detail
CL0            exsr        total
 /free
      begsr detail;
        ...
      endsr;               

      begsr total;
        if *inlr;  // if you aren't using other levels L1 L2 etc, you
wouldn't need this test
          ...
        endif;
      endsr;               

You could even put the two C specs in a /copy file:

 /free
    /copy useCycle
    begsr detail;
    endsr;