Are you at EOF? The field will not be cleared if that's what you're
expecting? How about adding  if %EOF(CAFPMAST);
 leave;
Endif;

To the loop.

Oh, and stop using the free-form stuff... You'll go blind!  :)

Bob Cozzi

-----Original Message-----
From: web400-bounces@xxxxxxxxxxxx [mailto:web400-bounces@xxxxxxxxxxxx] On
Behalf Of jrc@xxxxxxxxxx
Sent: Monday, March 24, 2003 1:19 PM
To: web400@xxxxxxxxxxxx
Subject: [WEB400] Re: HTTP Jobs hanging up


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.
>
_______________________________________________
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 thread ...

Replies:

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

This mailing list archive is Copyright 1997-2019 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].