RE: Empty Primary file processing.

Thanks Buck,

What I decided to do was:
1.      Add an INFDS for the UC spool file
2.      Use LR level indicator to check the INFDS file open field.
3.      If open, set on an indicator
4.      Conditioned the Total record O-specs with the specified indicator


It's funny how we regress in order to move forward, (indicator, level
conditioning and all).

Regards,
~~~~~~~~~~~~~~~~~~~~~
Jon A. Erickson
Viking Industries, Inc.
 <http://www.vikingindustries.com> http://www.vikingindustries.com
~~~~~~~~~~~~~~~~~~~~~
 <<Jon Erickson.vcf>> 


                -----Original Message-----
                From:   Buck Calabro/commsoft [mailto:mcalabro@commsoft.net]
                Sent:   Thursday, January 28, 1999 6:39 AM
                To:     MIDRANGE-L@midrange.com
                Subject:        Re: Empty Primary file processing.

                On 01/27/99 11:09:50 AM "Erickson, Jon"  wrote:

                >1.     No records to process
                >2.     One of the spool files is UC, and of course it's not
open because 
                no
                >records for that department where found.

                There's no detail cycle if there's no input record.
                In your detail, do something like
                OPEN PRINTER
                MOVE *ON     PRTOPN 1 

                This'll tell you if you opened your printer file or not.  At
LR time:
                LR  PRTOPN  IFEQ *ON
                LR                  EXCPT printline
                LR                  ENDIF

                Buck Calabro
                CommSoft, Albany, NY
                mailto:mcalabro@commsoft.net
                +---
                | 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
                +---

Jon Erickson.vcf