Re: More cycle, yes, more cycle

Well, 1P was finally fixed with *INZSR, but before that it was the code:

    C      10N11                 SETON                         11
    C                               SETON                         10
......
    OPRINT      H            10N11
    O            OR            OF


And pretend 1P was someone's idea of a cruel joke.



In <3.0.2.32.19990405215823.00978908@praxis.net>, on 04/05/99 
   at 09:58 PM, Wynn Osborne <wynn@praxis.net> said:


>Well the problem was (if I can remember...help if you will) the dang 1P
>headings occurred prior to reading any records from the file...and since
>the company was a column in the file, the company name in the heading was
>blank at 1P time.

>...Hmmm...

>By the time I got through, it was a sight...seton this indicator after
>the first record is read so the headings will come out right...setof
>another indicator for this...be sure not to forget "blank after"...L1,
>L2, L3, ... YIKES!

-- 
-----------------------------------------------------------
boothm@ibm.net
Booth Martin
-----------------------------------------------------------

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---