× 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 am having to modify a program written in RPG III,  this program uses a 
multi-format logical.  I need to put in select statments in the logical and 
have done it as shown below.  The program will print from my first logical but 
when it does not find a record in the first it never looks at the second.  If I 
remove the Select statment it works fine.  Can anyone help on this.  I know 
that I could use various other methods to do this, but my time is limited.  I 
would like to stay with changing just the logical becuase there is 7 programs 
that will need to be modified if attaching a select statement will not work.  I 
have looked in some manuals and cannot find it stating this cannot be done. 
Thanks in advance for your help. 

  A***************************************************************
  A          R IPB500BL                  PFILE(BBL)               
  A          K BLDOCR                                             
  A          K BORD                                               
  A          K BLINE                                              
  A          S BLINE                     COMP(LT 900)             
  A*                                                              
  A          R IPS100IL                  PFILE(SIL)               
  A          K ILDOCR                                             
  A          K ILORD                                              
  A          K ILSEQ                                              
  A          S ILSEQ                     COMP(LT 900)             
  A*                                                              


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.