Thanks, Joep

The program was compiled in a named activation group. I was looking at the call list (dspjob, option 11) and I was wrongly assuming that the ACTGRP had ended. Found option 18. Works fine now.

-----Message d'origine-----
De : rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de J.Beckeringh@xxxxxxxxxxxxxxxxxxxxxxxxxx
Envoyé : lundi 16 février 2009 12:39
À : RPG programming on the IBM i / System i
Objet : Re: PF member staying locked

David,

What makes you think MyRPGLE's activation group has disappeared? An activation group ends if

a) the program that started it with ACTGRP(*NEW) ends;
b) it is reclaimed with RCLACTGRP;
c) the job ends.

It appears that RCLRSC is meant to close MyRPGLE's files. If that is the case, you should replace it with RCLACTGRP. In this particular case it probably makes more sense to create MyRPGLE with ACTGRP(*NEW).

Joep Beckeringh



From:
David FOXWELL <David.FOXWELL@xxxxxxxxx>
To:
RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Date:
16-02-2009 12:33
Subject:
PF member staying locked



Hi all,

Can you help me understand this scenario?

MyCLP :
CALL MyRPGLE
CALL CLP2 creates adds file member = job number and logs a message from RPGLE. Returns with the file open.
RCLRSC
CALL CLP3
Lists messages from the log file then deletes the member created by CLP2.

Here everything runs in the DFTACTGRP without problems.

Now if MyRPGLE is recreated to run outside the DFTACTGRP, CLP3 will crash with CPF7310 because the member added by CLP2 is locked.
The ACTGRP initialized when MyRPGLE is called has disappeared at this stage. Why is the member still locked?

CLP2 is a CLLE compiled with ACTGRP(*CALLER)
CLP3 is an OPM.


Thanks
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.



--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at http://archive.midrange.com/rpg400-l.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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

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.