[HECnet] Sample DCL code for simple client-server task-to-task comms

[sampsa at mac.com]

Basically I just want some code that I can use to wrap some python code around, I was using this:

$@python_vms:setup
$Open/Read/Write net Sys$Net
$DEFINE/NOLOG SYS$OUTPUT net
$DEFINE/NOLOG SYS$COMMAND net
$DEFINE/NOLOG SYS$INPUT net
$python himproto.py
$close net

And it was working all day - suddenly I got Link aborted errors and now nothing. Any ideas?

sampsa






On 17 Jan 2013, at 15:50, sampsa at mac.com wrote:

Strangely enough, the procedures were working fine for almost the whole day but now I am getting nothing - no errors, just no connections. 

What could cause this?


sampsa






On 17 Jan 2013, at 09:12, Sampsa Laine <sampsa at mac.com> wrote:

Thanks for all the help guys - I think I'm pretty close to having all the stuff I need for my little client server project.

Sampsa


On 17 Jan 2013, at 08:57, G. wrote:

On Thu, 17 Jan 2013 02:52:59 +0200, you wrote:

OK, figured that out, I have to use an open to access it first.

IIRC, your procedure must open SYS$NET, no matter what it will possibly send
through it, even if it will not send anything back, because it is the opening
of SYS$NET that triggers the dispatching of the DECnet connect-confirm message
back from the target node to the originating one.

Just try a procedure that does a five minutes wait, but does not open SYS$NET,
and you'll see that the network will time out with an error way before five
minutes (and your procedure will be stopped). Then simply add the open of
SYS$NET before the wait command and you will see that it will work whatever
time you chose for the wait, i.e. it will not time out, because the connection
will be opened and confirmed both sides and both ways.

IIRC it's not even necessary to explicitly send something thru SYS$NET to
confirm the connection, just open it.

HTH, :)
G.