× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I have started using the following method for renaming any indicators I use
(which are VERY few).  

     D IndicatorPtr    S               *   Inz(%Addr(*In))
     D                 DS                  Based(IndicatorPtr)
     D PrtOverflow            99     99

As you probably already know, this allows me to use the PrtOverflow in my
code instead of the vague *In99.  Beautiful.  But now, in my calc specs, in
testing the indicator for 'on'-ness, I can't do the following:

   If PrtOverflow;
      Write Header;
      PrtOverflow=*Off;  
   EndIf;

This works if I use *In99 instead of PrtOverflow.  The first line of that
statement brings up the following error:

*RNF7423 30  000133  A relational expression or indicator is expected for
logical operations

I have to change the first line to 

   If PrtOverflow=*On;

I have been told by a good friend of mine that the statement is basically
asking, 'If it's true that it's true'.  Is there a way I can change the
technique to allow the first 'if' statement?  

Tony Carolla
MedAmerica Billing Services, Inc.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.