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