Simon:

I tried the following:

Top of "TEST" in "BP"...
001: CRT "This test program is now running. Press [Enter] to abort " :
002: INPUT ZZ,1
003: ABORT
004: *
005: END
Bottom.

< 1 > Top of "SORRY" in "VOC", 3 lines, 32 characters.
001: PA
002: DISPLAY ...running SORRY
003: TEST.RUN
Bottom.

< 2 > Top of "TEST.RUN" in "VOC", 4 lines, 54 characters.
001: PA
002: DISPLAY ...running TEST.RUN
003: ON.ABORT SORRY
004: TEST
Bottom.

When I log on and execute the locally cataloged TEST program I get:

:TEST
This test program is now running.  Press [Enter] to abort ?
...running SORRY
...running TEST.RUN
This test program is now running.  Press [Enter] to abort ?
:

I don't get it.  What am I doing wrong?

Bill
 

> -----Original Message-----
> From: [EMAIL PROTECTED] 
> [mailto:[EMAIL PROTECTED] On Behalf Of 
> Simon Lewington
> Sent: Monday, May 22, 2006 10:10 AM
> To: [email protected]
> Subject: Re: [U2] [UD] ON.ABORT
> 
> "Bill Haskett"...
> > Hmmm.  I've set UDT.OPTIONS 14 ON and UTD.OPTIONS 105 ON.
> > It seems that if ON.ABORT defines a BASIC program to run
> > (the same program that executed an ABORT, like a TCL.SHELL
> > program), this whole process works only once.  It then
> > fails and returns me to ECL.
> 
> You need a paragraph which runs ON.ABORT and your BASIC program...
> 
>     TCL.SHELL.RUN
> 001 PA
> 002 ON.ABORT SORRY
> 003 TCL.SHELL
> 
> CHAIN this at the end of SORRY instead of TCL.SHELL
> 
> Simon
> -------
> u2-users mailing list
> [email protected]
> To unsubscribe please visit http://listserver.u2ug.org/
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to