In my latest phantom program I used the PAUSE/WAKE commands as one poster
suggested. It was a little bit tricky but this is what I came up with:
The driver program has this logic:
...
UTP.ID = GETENV("UD_TELNET_PID")
CMD = "PHANTOM UPDATE.RECORD.PH ":REC.KEY:" ":UTP.ID
PRINT "START: ":TIMEDATE()
PRINT CMD
PERFORM CMD
*
PAUSE 60
PRINT "FINISH: ":TIMEDATE()
...
While the Phantomed program has the following:
PARAMS = FIELD(TRIM(@SENTENCE), " ", 2, 9999)
REC.KEY = FIELD(PARAMS, " ", 1)
UTP.ID = FIELD(PARAMS, " ", 2)
PRINT "Start UPDATE.REC.PH for ":REC.KEY
GOSUB UPDATE.REC
PRINT "Wake up process ":UTP.ID
WAKE UTP.ID
David A. Green
(480) 813-1725
DAG Consulting
-----Original Message-----
From: [email protected]
[mailto:[email protected]] On Behalf Of Gregor Scott
Sent: Wednesday, January 16, 2013 9:41 PM
To: U2 Users List
Subject: Re: [U2] Sleeping in Basic
This might be a bit late, but just be careful about using "openSocket()" in
a phantom.
On UV (and I suspect on UD) this will change the phantom to an iPHANTOM
because it will consume a license.
If you have multiple phantoms running this concurrently you will start to
see a licensing impact you were not expecting.
Regards,
Gregor
-----Original Message-----
...
Doug this works for me in UniData:
SLEEP.TIME = 500 ;* .5 Second
ERR = openSocket("loopback", 25, 1, SLEEP.TIME, hBUFF)
David A. Green
(480) 813-1725
DAG Consulting
...
This email and any attachments to it are confidential.
You must not use, disclose or act on the email if you are not the intended
recipient. Liability limited by a scheme approved under Professional
Standards Legislation.
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users
