Thanks to everyone who has responded to this: with Scott's help I was able to 
break into the running job in debug and find where the endless loop is 
occuring, but it makes no sense to me.

Here is the loop:

dow MLNAM = NAMEIN; 
  if MMAP = LASTMAP;
    read cafpmast;  
    leave;          
  endif;            
  read cafpmast;    
enddo;              

MLNAM is the field from the file and there is only one record in the file with 
this name.  In debug I can see the read statement processing, but it never 
moves to the next record, so the field value cannot change.

After EVERY read I get the same MLNAM and MMAP (both fields from cafpmast), so 
I never get out of the loop.  How can this be???  

Thanks,

Joel

>jrc@xxxxxxxxxx wrote:
>> I'm experiencing a frustrating problem on our
>web server (running Apache on V5R1). 
>> 
>> Recently, the server started hanging jobs for no
>apparent reason.  By hanging jobs, I mean that I
>get several HTTP jobs that never stop running and
>devouring CPU -like a program stuck in an endless
>loop.
>> 
>> I can end the jobs to recover.  Sometimes I
>won't see it for days and sometimes it will happen
>five or six times a day.  I can work with the job
>before I end it and I have retrieved the program
>and statement number (this appears to be the only
>consistency), but according to the compile listing
>the statement is an ENDSR and I don't see how a
>program could get endlessly stuck on an ENDSR.
>> 
>> Most frustrating of all is that I cannot
>reproduce the problem and I cannot seem to isolate
>a set of like circumstances.  Is their a way I can
>get a program dump from a program that is running?
>> 
>> Thanks,
>> 
>> Joel
>> _______________________________________________
>> This is the Web Enabling the AS400 / iSeries
>(WEB400) mailing list
>> To post a message email: WEB400@xxxxxxxxxxxx
>> To subscribe, unsubscribe, or change list
>options,
>> visit:
>http://lists.midrange.com/mailman/listinfo/web400
>> or email: WEB400-request@xxxxxxxxxxxx
>> Before posting, please take a moment to review
>the archives
>> at http://archive.midrange.com/web400.
>> 
>> 
>
>
>
>_______________________________________________
>This is the Web Enabling the AS400 / iSeries
>(WEB400) mailing list
>To post a message email: WEB400@xxxxxxxxxxxx
>To subscribe, unsubscribe, or change list options,
>visit:
>http://lists.midrange.com/mailman/listinfo/web400
>or email: WEB400-request@xxxxxxxxxxxx
>Before posting, please take a moment to review the
>archives
>at http://archive.midrange.com/web400.
>

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