RE: Program never ending

Well first thing...

you should _never_, _ever_, use RCLACTGRP ACTGRP(*ELIGIBLE) particularly in 
production.  (per recommendations from Barbara Morris w/IBM)

Second, if the program is never ending, you probably shouldn't be trying to do 
a RCLACTGRP anyway.

Your best performance you be with the CLLE and RPGLE program using the same 
activation group and having the RPGLE program return with *INLR = *OFF.


HTH,

Charles Wilt
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx
> [mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of 
> Muralidhar Narayana
> Sent: Tuesday, May 17, 2005 11:49 AM
> To: midrange-l@xxxxxxxxxxxx
> Subject: Program never ending
> 
> 
>  
>              Iam calling CLLE program    which inturn calls 
> an RPGLE program
>  
> The program is never ending, Can some one show pointers whats 
> the problem.
>  
> >From the log, the below is happening 
> 2800 - OVRDBF FILE(YIPXMNYF1) TOFILE(QTEMP/ACMNYF1)           
>             
>    2900 - OVRDBF FILE(YIPXMYLF1) TOFILE(QS36XMUR/GFEMYLF1)    
>                
>    3000 - CALL PGM(YACTBAR)                                   
>              
>    4900 - OVRDBF FILE(YIPXPAM) TOFILE(YIPX.PAM)               
>               
>    5400 - DLTOVR FILE(YIPXPAM)                                
>               
>    5500 - CVTDAT DATE('20041129') TOVAR(&DATE) FROMFMT(*YYMD) 
> TOFMT(*YYMD)  
>    TOSEP(*NONE)                                               
>               
>    6000 - RCLACTGRP ACTGRP(*ELIGIBLE)                         
>               
>  Activation group QLGLOCAL deleted.                           
>               
>  1 activation groups deleted.                                 
>               
>         - RETURN        /* RETURN due to end of CL program */ 
>               
>  Session stopped by a request from device QPADEV000Q.         
>               
>  Input or Output request failed.  See message CPF5140.        
>  
> How can I prevent this and make my program run smooth.
>  
> 
> -- 
> This is the Midrange Systems Technical Discussion 
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
> 
>