BindObject

Question

Hi everybody,
**Object of problem**
Binding an object that are not yet registered in the name service.
**Context**
30's Forté connected environments geografically dispersed in Belgium.
**Explanation**
Brussels has our Forté super-environment.
A Forté listener object runs there and capts or receives a lot of messages
from our Unisys Mainframe.
When parsing these messages, the Listener_SO has to run, somewhere in
Belgium, an explicit method on a distributed binded object..
The BindObject method works very well when the local objects are referenced
in the name-service, or in another words, when the local partition is
ONLINE.
Early in the morning, I start the multiple local SO's with a script.
But sometimes, we have problem with our local servers. Something appears
that the parttion doesn't start. This is a normal system fault, bad boot of
server, disk fault, etc.
My problem is here:
Naturally, when it's append, the name service doesn't know this SO reference
because the concerned partition is OffLine.
When the listener tries to bind an unknowed object, I get a normal
DistAccessException with a ReasonCode SP_ER_OBJECTNOTFOUND.
ok... that's normal !
**BUT** when I start the local partion (then is OnLine), and I try a new
Bind, I have the same error ...
I have to shutdown the listener and the bind works properly.
In my context, I must not shutdown the listener and re-start it because many
people are connected with.
Is there a solution to my problem ? - I hope so, because I'm working in
production now, and the deadline for this solution is very very short ...
Thanks very much to help me,

Answer 1

Forte has a build in name service where it registers all of the service objects. (And more.) If you use something before UDS 5.0 you can see the name service in E-console under the application view. UDS 5.0 even allows you to drill down into the name service as part of Econsole.
You dynamicly bind with this code if you do a little research on bindobject:
bindName : textdata = new();
myName.replaceParameters('site/%1/%1-%2', SampleProjectName_cl0, SOSampleName);
myServer = (TUBaseService)(task.Part.ObjectLocationMgr.BindObject
                    (name = bindName, classType = serverClass));
This would bind to the SOSampleName service object in the project SampleProject. Notice that the compatibility level is important.
Hope this helps.
--Scott Bechtel
[email protected]