Write a simple tester subroutine that passes the name of the
original/standard program.

This subroutine reads a control record that uses your
user_id:"*CODETESTING" as the key (thus unique to each user).  If not
found (which would be the case for most users), return the original
program name.  If found, do a LOCATE in F1 for the original program
name.  If not found, return the original program name.  If the original
program name IS found in F1, return the optional program name from the
associated position in F2 (if F2 is missing, return the original pgm
just in case).

F1 = multi-valued list of original pgms
F2 = multi-valued list of test pgms

Use the @ logic for doing a dynamic call to the returned pgm name.

Granted, this is a bit of work up front, but once you have this tester
subroutine written and the coded added to your program(s), you could
leave this test in place anywhere you want.  Add this logic as you need
it.  You just disable it by removing the program names from F1/F2.  If
this control record ever becomes empty, you could even delete it.

Optionally, you could do this test at login time and save the info in
some common named variable(s).  You just need to log out/in to reset
this stuff.

I have used something like this in the past and it worked VERY well.  By
using these control records, you can even give selected other users
access to this program for testing before rolling it out to the rest of
the world.  Just remember to delete the stuff from the control record(s)
once you switch it over.




John Israel
Sr. Programmer/Analyst
Dayton Superior Corporation
721 Richard St.
Dayton, OH  45342
937-866-0711 x44380

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Doug Chanco
Sent: Thursday, May 22, 2008 11:36 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] execute code/proc question HELP!!!!!!!!

Yeah we discussed the separate account idea 9we did that at my last job)
but here its more difficult and for ,whatever> reason people are against
it <sigh>

Your other idea is not bad, but then we would have to change it in any
calling programs BUT I suppose that may be the best I can get out of
universe.

Hopefully there is some super genius lurking around that might have some
additional thoughts (I hope)

Thanks for the response

Dougc

-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Kritan
Sent: Thursday, May 22, 2008 10:14 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] execute code/proc question HELP!!!!!!!!

The best would be to have a development account to separate the code. 
Without that option, the easiest would be to rename the program in
DOUG.BP 
to something a bit different (I.e. DOUG.DEV).  compile and catalog the 
original DOUG in EURO.BP and DOUG.DEV in DOUG.BP.  Users could run the 
original DOUG.  When you are done fixing DOUG.DEV, copy it over DOUG in 
DOUG.BP and recompile.

Steve

--------------------------------------------------
From: "doug chanco" <[EMAIL PROTECTED]>
Sent: Thursday, May 22, 2008 6:20 AM
To: <u2-users@listserver.u2ug.org>
Subject: [U2] execute code/proc question HELP!!!!!!!!

> is there any way in Universe 10.x (running on AIX) to "path" how
universe 
> finds code to execute?  For example I have a program called
>
> "DOUG" in EURO.BP and copy it to DOUG.BP and compile/catalog it there,
so 
> that now the VOC entry points to DOUG.BP but I would like other users
to 
> be able to run the original version while I fix my version.
>
> For those familiar with jBASE this is easily solved by modifying each 
> users path to that they "search" for the object code in a specific
order.
> for example
>
> PATH=$PATH:/usr2/zircon/DOUG.O:/usr2/zirocn/EURO.BP.O
>
> this way it looks in DOUG.BP.O and if the object code is found
executes it 
> otherwise look in EURO.BP.O and if found there execute it.  Now all I
have 
> to do is modify other users PATH to NOT search DOUG.BP.O or move
EURO.BP.O 
> in front of DOUG.BP.O and it will find EURO.BP.O first (and stop
looking)
>
> I am hoping that there is something equivalent in universe or some way

> that I can duplicate this (I am even willing to look at doing it "with

> basic code"  if possible)
>
> ANY and ALL suggestions are welcomed!
>
> thanks
>
> dougc
> -------
> u2-users mailing list
> u2-users@listserver.u2ug.org
> To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

-- 
This message has been scanned for viruses and
dangerous content by SecureMail, and is
believed to be clean.
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to