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.