Bill,
Here's another idea:
We often run a program that needs some information passed to it, so we run
it from a proc and preload the buffer in the proc with the information
needed by the program.
Inside the program, we read the proc buffer and extract the information we
need.
Perhaps you could pass a flag into your program that would tell it how it
was initiated - ie. in the foreground or in the background - so it could
then act accordingly.
hth,
Dave
Dave Taylor
Sysmark Information Systems, Inc.
Authorized IBM Business Partner
49 Aspen Way
Rolling Hills Estates, CA 90274
(O) 800-SYSMARK (800-797-6275)
(F) 310-377-3550
(C) 310-561-5200
www.sysmarkinfo.com
----- Original Message -----
From: "Bill Haskett" <[EMAIL PROTECTED]>
To: <u2-users@listserver.u2ug.org>
Sent: Tuesday, September 16, 2008 3:09 PM
Subject: RE: [U2] [UD] Determining if program running as a phantom
Dave:
We're upgrading our application to DesignBais. It is an excellent tool to
move our character based application to a web environment and we're happy
with its capabilities.
We modify a process of ours (say writing checks) to run as a phantom
instead
of as a response to a [R]un option from our character-based application.
We
used to display the progress of the process to the telnet user who
initiated
it. Now, we "EXECUTE \PHANTOM CHECKRUN\" from a DesignBais [Proceed]
button
which uses UO to initiate the process. When we phantom off the process,
variables have to be accounted for and the appropriate ones need to be
passed into the phantom program. In addition, some additional variables
need to be initialized within the phantom.
When all initialization code is in an INCLUDE, then it's important to
know,
from inside a running program, whether the program itself is running as a
phantom. If it is then more variables are either initialized or set.
This
becomes more important as we access current code from the DesignBais
framework. Often there are only minor changes that need be made to our
current code, so where we're running what is becoming more important every
day.
The technique you described to manage a running phantom, from outside, is
a
fine one we can all employ. But, that isn't the question I was trying to
ask.
Thanks,
Bill
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Dave Taylor
Sent: Tuesday, September 16, 2008 2:13 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] [UD] Determining if program running as a phantom
Bill,
Are you asking two questions: Is the program running and is the program
running as a phantom?
Or only one question : Is the program running as a phantom?
I don't fully understand your application environment, but we use the
following technique to determine if a program, that normally only runs as
a
phantom, is running or not:
We start the program as a phantom and, from within the phantom program, we
write a record (eg STARTED) to the dict of a file and then read that
record
with a READU command.
This leaves the dict record STARTED locked until the phantom program stops
running.
By reading the dict record STARTED from another status reporting program
and
checking if it is locked or not, we can determine if the phantom program
is
running or not.
Don't know if you can use this technique or not.
hth,
Dave
Dave Taylor
Sysmark Information Systems, Inc.
Authorized IBM Business Partner
49 Aspen Way
Rolling Hills Estates, CA 90274
(O) 800-SYSMARK (800-797-6275)
(F) 310-377-3550
(C) 310-561-5200
www.sysmarkinfo.com
----- Original Message -----
From: "Bill Haskett" <[EMAIL PROTECTED]>
To: <u2-users@listserver.u2ug.org>
Sent: Monday, September 15, 2008 7:54 PM
Subject: [U2] [UD] Determining if program running as a phantom
Im having a bit of a problem figuring out how to tell, within a program,
if
it is running as a phantom. It was my impression that @USER.TYPE would
be
set to 1 if the program was running as a phantom. However, if I run a
program from a UniObjects connection @USER.TYPE is always set to 1. It
doesnt matter I test this within the main program that EXECUTEs a
phantom
or within the phantomed program. If I test @TTY then it returns udcs
from within the main program or Console from within the phantomed
program
(I hate to think this is how I determine if a program is running as a
phantom ).
If I execute the LISTUSER() function then the line properly shows the
user
type as a phantom.
The phantomed process.
*--: p
001: @USER.TYPE-: 1
002: @TTY-------: Console
003: PORT.NO----: 6
004: LISTUSER()-: 12251621976152myuser2phantom2pts/12Console210:33:322Sep
15
2008
005: 2263221976152myuser2udt2pts/22192.168.1.51216:41:202Sep 15 2008
006: 32383621976152myuser2udt2pts/32192.168.1.51215:11:522Sep 15 2008
007: 42358421976402designbai2udt2pts/42udcs219:30:062Sep 15 2008
008: 52337621976152myuser2udt2pts/52192.168.1.51215:31:312Sep 15 2008
009: 62238821976402designbai2phantom2pts/62Console219:30:532Sep 15 2008
010: ...Entry DEV_DESIGNBAIS_6_1486970254.txt
011: ...Entry DEV_DESIGNBAIS_6_1486970255.txt
013: PHANTOM process 2388 has completed.
Bottom.
The process executing the above phantomed job
*--: p
001: E:\DataTrust\Dev\_PH_\O_designbais established
002: @USER.TYPE-: 1
003: @TTY-------: udcs
004: PORT.NO----: 4
005: LISTUSER()-: 12251621976152myuser2phantom2pts/12Console210:33:322Sep
15
2008
006: 2263221976152myuser2udt2pts/22192.168.1.51216:41:202Sep 15 2008
007: 32383621976152myuser2udt2pts/32192.168.1.51215:11:522Sep 15 2008
008: 42358421976402designbai2udt2pts/42udcs219:30:062Sep 15 2008
009: 52337621976152myuser2udt2pts/52192.168.1.51215:31:312Sep 15 2008
Ive resorted to parsing the results of LISTUSER() to get what appears to
be
the correct information. Does anyone know of an easier alternative.
Thanks,
Bill Haskett
Advantos Systems, Inc.
4370 La Jolla Village Drive, Suite 400
San Diego, CA 92122
( 760-944-5570 x3000 (CA)
( 360-923-4838 (WA)
-------
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/
-------
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/
