|
Murali,
I don't understand your problem. It seems as if you have a program that is
supposed to be never ending that is crashing with a CPF5140 message.
My first step would be to get rid of the RCLACTGRP command that seems to be in
your CLLE program..
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.
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 murali dhar
> Sent: Thursday, May 19, 2005 12:56 PM
> To: Midrange Systems Technical Discussion
> Subject: Re: Program never ending
>
>
>
> Charles,
>
> I have nt written any ACTIVATION GROUP either in my CLLE /RPGLE...
>
> Why is it taking RCLACTGRP(*ELIGIBLE),where should I change?
>
> Charles Wilt wrote:
>
> >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.
>
>
> Muralidhar Narayana <Muralidhar_Narayana@xxxxxxxxxxx> wrote:
> 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.
>
>
>
>
> ---------------------------------
> Yahoo! Mail Mobile
> Take Yahoo! Mail with you! Check email on your mobile phone.
> --
> 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.
>
>
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.