×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




Background:
===========

*** Physical file
contains record with different status (e.g. OS, ER, SD...).

*** Logical file
selects only records which status='OS' from the physical file.

*** RPG program
monitors logical file for records status='OS' continuously.  I am
using EOFW for this purpose.

Code:
=====
C*  Read the logical file GWRQCTL1
C                   READ      GWRQCTL1                      
C                   DOW       NOT %EOF(GWRQCTL1)            
C*
C*  Handle special record used to terminate the program
C                   IF        GCWFRF = *ALL'Z'              
C                   DELETE    GWRQCTL1 
C                   FEOD      GWRQCTL1 
C*
C*  Handle record which status='OS'
C                   ELSE                                    
C*  do something ...
C                   ENDIF
C*
C                   READ      GWRQCTL1  
C                   ENDDO               

Question:
=========
The RPG program resume from EOFW when I insert a new record into the
physical file which status='OS'.  But the problem is that, the
program does not resume when I change the status of an existing
record from other values to 'OS'.

In the view of the logical file, there is a new record if a message's
status is changed from other values to 'OS' in the physical file.

Any mistake in my method?  Any method to fix it?  Thank you!



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-2026 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.