RE: DOW vs DOU

[boothm@xxxxxxxxxxxxxxxxx]

I wonder, Charlie, if the problem nagging at you is that there may be two
errors, and the second error will not be found til the next cycle?

In <199705302046.QAA21400@vixa.voyager.net>, on 05/30/97 
   at 04:41 PM, cmassoglia@voyager.net (Charlie Massoglia) said:

#Rick Baird wrote:
#>

#>C       F1EDIT     BEGSR
#>
#>C                  MOVE  *OFF      $ERROR
#>
#>C                  IF (some error condition)
#>C                  MOVE  *ON       $ERROR
#>C                  ENDIF
#>
#>C       $ERROR     IFEQ  *OFF
#>C                  IF (some error condition)
#>C                  MOVE  *ON       $ERROR
#>C                  ENDIF
#>C                  ENDIF
#>
#>
#>C       $ERROR     IFEQ  *OFF
#>C                  IF (some error condition)
#>C                  MOVE  *ON       $ERROR
#>C                  ENDIF
#>C                  ENDIF
#>
#>etc....
#>
#>C                  ENDSR
#>
#I have a real problem retesting the field $ERROR once for each test.  To
#be honest though, when I try to look at this intellectually and not
#emotionally, I am not exactly sure why I don't like it.


#Charlie Massoglia, Massoglia Technical Consulting, Inc.
#PO Box 1065, Okemos, MI 48854, USA
#517-676-9700  Fax: 517-676-1006  EMAIL: cmassoglia@voyager.net


#* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
#* This is the Midrange System Mailing List!  To submit a new message,   *
#* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
#* this list send email to MAJORDOMO@midrange.com and specify            *
#* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
#* should be directed to the list owner / operator: david@midrange.com   *
#* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
#umidr

-- 
-----------------------------------------------------------
boothm@earth.goddard.edu
-----------------------------------------------------------

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *