RE: die() RE: rpg <-> ifs sample...

["Hatzenbeler, Tim" <thatzenbeler@xxxxxxxxxxxxx>]

Barbara & Scott, thank you, for your time, in answering these questions...  

It was very much appreciated..

tim

> -----Original Message-----
> From: Barbara Morris [SMTP:bmorris@xxxxxxxxxx]
> Sent: Monday, June 30, 2003 3:57 PM
> To:   rpg400-l@xxxxxxxxxxxx
> Subject:      Re: die() RE: rpg <-> ifs sample...
> 
> "Hatzenbeler, Tim" wrote:
> > 
> > ... And
> > would it be considered as a LR *ON or *OFF
> > 
> 
> Short answer: LR *ON.
> 
> Long answer: Depends what you mean.  For any RPG main procedures that
> are actually on the program stack at the time of the escape message,
> RPG's cancel handler would do LR *ON processing (close files etc).  If
> you had other RPG main procedures that had previously ended with LR off,
> but were currently not active, they would still "have LR off".
> 
> For example, say your program had modules MAIN, MOD1, MOD2, and MOD3,
> (all having RPG main procedures) and they open files FILE1 FILE2 and
> FILE3 respectively.  Procedure MAIN has called procedure MOD1 then MOD2,
> both returning with LR off.  Now MAIN calls MOD3 and MOD3 calls the exit
> function.  MOD3 will end LR ON and MOD1 and MOD2 will not end at all. 
> FILE3 will be closed but FILE1 and FILE2 will still be open, assuming
> the activation group didn't end.
> 
> _______________________________________________
> 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.
This e-mail message, including any attachments, is for the sole use of the
intended recipient(s) and may contain confidential or privileged
information.  Any unauthorized review, use, disclosure or distribution is
prohibited.  If you are not the intended recipient, please contact the
sender by reply e-mail and destroy the message.