Subject: | |
From: | |
Reply To: | |
Date: | Thu, 16 Apr 1998 18:17:23 -0500 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Paul, I've been using a command file I wrote years ago to issue R1
commands from the 3000.
USER DEFINED COMMAND FILE: R1.PUB.SYS
ANYPARM R1CMD=' '
IF "!R1CMD" = "' '" THEN
ECHO Invalid command format. Must be a Reflection command.
RETURN
ELSE
SETVAR R1COMMAND "!R1CMD"
ENDIF
ECHO <esc>&oC!R1COMMAND <-- Careful here, this isn't how esc looks
SET ECHO=OFF on a 3000 -- I had to improvise for
INPUT R1STATUS this email.
IF R1STATUS <> "S" THEN
ECHO R1 Command failed!
ENDIF
SET ECHO=ON
DELETEVAR R1STATUS
DELETEVAR R1COMMAND
--
You can then issue (from another command file if you like):
:R1 HARDEXIT
And Reflection automagically goes away! If you have a network (NS/VT or
Telnet) connection you can set Disconnect on Exit and it will not be a
problem. If you have a serial connection you might have to invoke a
command file (RCL) that does a DISCONNECT and then a HARDEXIT:
:R1 LOGMEOFF
Where LOGMEOFF.RCL does:
Set LITERAL-ESCAPE "\\"
Set CAPS-LOCK YES
;Need the following to get out of the command
;file and return to the CI
Wait 00:00:03
Transmit "S^M"
Hold For "^Q"
Transmit "BYE^M"
Hold For "^JCPU="
DISCONNECT
HARDEXIT
;Next line is unnecessary, but I always end my RCL's properly:
RETURN
Hope this helps.
Patrick
--
Patrick Santucci
Technical Services Systems Programmer
Kirke-Van Orsdel, Inc.
mailto:[log in to unmask]
Visit our site! http://www.kvi-ins.com
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
"Why was it that when I was young life was complex because
I lacked experience and now that I'm experienced life is
complex because I'm not young?" - James Trudeau
----------
Paul H. Christidis wrote:
>
> Fellow Listers,
>
> I send the following message to WRQ a few days ago. The recommended
> solution is not general enough since it assumes that all the Reflection
> connections will be established using the 'Visual Basic' form of the
> emulator.
>
> Does anyone have such a 'goodie' in their back of tricks?
>
> Regards
> Paul H. Christidis
> *******************************************
> To [log in to unmask]
>
> Is there some type of setting within Reflection that would automatically
> exit Reflection once the connection was dropped? (I do NOT mean 'disconnect
> on exit').
>
> If such a setting is not available, is it possible for the host to send an
> 'EXIT' command to Reflection and thus remotely terminate the connection AND
> also shut down the application?
>
> If the answer is yes to either one or both, could you please provide the
> correct syntax.
>
> Regards
> Paul H. Christidis
|
|
|