AW: Activation Groups (was: ILE Recursivity RNX8888)

Hi Arco,

>>How do you go with input file opening and closing in method 4 ?

I always use user opened (input) files in my procedures.
In each module where I use an (input) file, I always have an exported Open
and Close procedure.
In all read procedures the open procedure is called in the first step.
In the open procedure, I check if a file is already opened (using the %OPEN-
Built-in-Function).
If not yet opened the file gets opened otherwhise the procedure is left
immediately.

Because the Open and Close procedures are exported, I can open or close them
whenever I want.
Normally I let them open (I'd rather end the activation group), but there
may be some exceptions.

But to be honnest, in most cases (with the exception of Chain-Operations)
I prefere using embedded SQL instead of native I/0.

Birgitta

-----Ursprungliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von Simonse, Arco (CMK)
Gesendet: Montag, 19. Dezember 2005 14:44
An: RPG programming on the AS400 / iSeries
Betreff: Activation Groups (was: ILE Recursivity RNX8888)


Hi Birgitta,

> 3. service programs containing insert, update or delete procedures
>    are generated with activation group *CALLER.
>    This allows us to start commitement control with commitment scope
>    *ACTGRP.
>
> 4. All other service programs are generated with a named activation
>    group. (activation group = service program name)
>

If I may ask:
How do you go with input file opening and closing in method 4 ?
Are you using a kind of OpenFiles / CloseFiles routines to open and
close these files per calling program, or do you leave the files open as
long as the activation group of the service program exists ?
I'm still trying to figure out what will be the best way to handle whith
File opening and closing in serviceprograms in named AG's.

Thanks,
Arco Simonse
DISCLAIMER:
This message contains information that may be privileged or confidential and
is the property of the sender.
It is intended only for the person to whom it is addressed. If you are not
the intended recipient, you are not
authorized to read, print, retain, copy,disseminate, distribute, or use this
message or any part thereof. If you
receive this message in error, please notify the sender immediately and
delete all copies of this message.

This footnote also confirms that this email message has been swept for the
presence of computer viruses


--
This is the RPG programming on the AS400 / iSeries (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.