Re: NOMAIN in Inquiry Module Question

["Brad Stone" <brad@xxxxxxxxxxxx>]

They are open until the activation group is reclaimed.
Proper use of activation groups is a small part of any ILE
strategy.

Brad

On Tue, 8 Jan 2002 07:43:00 -0500
 "Andy Hautamaki" <ahautamaki@tstoverland.com> wrote:
> Brad;
>
> If I don't close the files in the NOMAIN subprocedures
> are they not still
> open when I exit the program entry module and it sets on
> *LR?
>
> Doesn't that mean that those files including display
> files are open until
> the User signs off?
>
> Andy
> ----- Original Message -----
> From: "Brad Stone" <brad@bvstools.com>
> To: <rpg400-l@midrange.com>
> Sent: Monday, January 07, 2002 3:51 PM
> Subject: Re: NOMAIN in Inquiry Module Question
>
>
> > You have it.  Use NOMAIN when you don't want the "main"
> > procedure to run.  ie the logic cycle, etc.
> >
> > I would suggest against putting any "runtime logic" in
> > subprocedures.  Keep them seperate as your own BIFs.
> Don't
> > code subprocedures into programs.
> >
> > As far as opening and closing files, even with NOMAIN
> files
> > will be opened at first call.  When you compile, you'll
> see
> > the warning that you should close the file implicitly.
> I've
> > ignored that for years now.  Why?  Even if you do close
> > them, you'll need to open them again, and the flags and
> BIFs
> > to check if the file is open don't recognize that, at
> least
> > they didn't in the past.
> >
> > I still always let the system open my files that are
> defined
> > in subprocedures and do not close them.  Faster access
> for
> > future calls since it's already open.
> >
> > Brad
> > www.bvstools.com
> >
> > On Mon, 7 Jan 2002 15:41:55 -0500
> >  "Andy Hautamaki" <ahautamaki@tstoverland.com> wrote:
> > > I'm a little uncertain on when to use 'NOMAIN' in a
> > > module.
> > >
> > > I've got a group of inquiry modules where the User
> > > selects a record from a
> > > SFL and depending on the option it executes different
> > > modules.
> > >
> > > Then from these modules the User can go down more
> levels.
> > > At each level a
> > > different module is executed.
> > >
> > > I realize by using a 'NOMAIN' module I should be
> doing
> > > the opening and
> > > closing of the files including the display files, so
> I
> > > created exit routines
> > > to close all the open files from the modules.
> > >
> > > Now I'm looking at all this and wondering when your
> > > working with interactive
> > > modules should I even be using 'NOMAIN'???
> > >
> > > Thanks
> > > Andy
> > >
> > > _______________________________________________
> > > This is the RPG programming on the AS400 / iSeries
> > > (RPG400-L) mailing list
> > > To post a message email: RPG400-L@midrange.com
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > > or email: RPG400-L-request@midrange.com
> > > Before posting, please take a moment to review the
> > > archives
> > > at http://archive.midrange.com/rpg400-l.
> > >
> >
> > Bradley V. Stone
> > BVS.Tools
> > www.bvstools.com
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> > To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > Before posting, please take a moment to review the
> archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
> >
> >
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/rpg400-l.
>

Bradley V. Stone
BVS.Tools
www.bvstools.com