RE: Bind by reference question

Tony,
RCLACTGRP *ELIGIBLE should work without signing off, unless you have debug
active. Make sure you first end debug, then issue the RCLACTGRP command. I
don't have to sign off if I use this routine.

-Bob Cozzi
www.RPGxTools.com
RPG xTools - Enjoy programming again.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Tony Carolla
Sent: Friday, December 30, 2005 11:57 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Bind by reference question

Yup.  That was the problem.  Even reclaiming the activation groups didn't
seem to change it, but if I signed off, and called the newly created test
program, it worked used the new service program.  Whew.  I thought for a
minute there that... well, I can sleep well tonight, knowing that I _do_
have a grasp on binding concepts (thanks to this list, and Susan's ILE
Static Binding Decisions class).

Happy New Year!

On 12/30/05, Bob Cozzi <cozzi@xxxxxxxxx> wrote:
>
> Probably still had the old copy loaded in the activation group.
> Even though Barbara doesn't like it, when developing/debugging, I tend to
> issue RCLACTGRP *ELIGIBLE between compiles like the one you described.
> Saves
> lots of headache time.
>
> -Bob Cozzi
> www.RPGxTools.com
> RPG xTools - Enjoy programming again.
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Tony Carolla
> Sent: Friday, December 30, 2005 11:27 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Bind by reference question
>
> First of all, if I don't see you until then, HAPPY NEW YEARS!!!!  I have
> learned volumes from this list in the past year, and I wanted to thank you
> all who have helped, especially Scott, Bob, Joe, Joel, Paul, Jon, Barbara,
> Birgitta, and anyone else I forgot to mention.  May the new year bring you
> prosperity and peace of mind.
>
> I have created a service program, whose purpose is to log program
> start/stop
> times.  The service program is called within several programs, and is fed
> an
> indicator (*ON = start, *OFF = stop).  The program gets the name of the
> caller (thanks Scott for August info on this), and writes or updates a log
> entry for this program in a log file.
>
> I took the following steps in creating the service program:
> - Created the module (CRTRPGMOD)
> - Created the binder source (1 export)
> - Created the service program (CRTSRVPGM)
> - Added the service program to a binding directory
>
> I wrote a test program to test the service program out.  In the test
> program, I added the binding directory to the H-spec, included the
> prototype
> for the service program in the D-spec, and simply called the service
> program
> in the C-spec.  I found a small quirk in the service program's actions, so
> I
> changed the source for the service program (the signature did not change),
> recompiled the module, and deleted and re-created the service program.
>
> So here's the problem.  After the service program re-compile, I re-ran the
> test program (without re-compiling it), and the service program still
> exhibited the same behavior.  Until I re-compiled the test program, which
> then caused the new service program to exhibit the new behavior.  Why did
> I
> have to re-compile the test program?  When you compile a program that
> calls
> a service program, is a copy of the service program included in the
> program
> object (bind by copy)?
>
> --
> "Enter any 11-digit prime number to continue..."
> "In Hebrew SQL, how do you use right() and left()?..." - Random Thought
> "If all you have is a hammer, all your problems begin to look like nails"
> --
> 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 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.
>
>


--
"Enter any 11-digit prime number to continue..."
"In Hebrew SQL, how do you use right() and left()?..." - Random Thought
"If all you have is a hammer, all your problems begin to look like nails"