[Info-vax] How to detect ^Y from an inner command procedure

[alanfe...@gmail.com]

On Thursday, May 18, 2023 at 8:41:34 PM UTC-4, Craig A. Berry wrote:
> On 5/18/23 7:28 PM, Dave Froble wrote: 
> > On 5/18/2023 8:15 PM, alanfe... at gmail.com wrote: 
> >> Suppose you're running a command procedure from a command procedure. 
> >> 
> >> $ TYPE 1.COM 
> >> $ @2.COM 
> >> $ EXIT 
> >> 
> >> $ TYPE 2.COM 
> >> $ WAIT 0:00:04 
> >> $ EXIT 
> >> 
> >> So 1.com runs 2.com. 
> >> 
> >> Suppose you run 1.com and press ^ Y while 2.com is running. The 
> >> command interpreter then exits 2.com and resumes running 1.com. Is 
> >> there any way to tell from 1.com if 2.com was aborted via ^Y or just 
> >> finished normally? 
> >> 
> >> I thought $STATUS might help, but sometimes I get 
> >> $STATUS == "%X10000001" 
> >> and sometimes I get 
> >> $STATUS == "%X10010001" 
> >> So I guess that's not the way to go. 
> >> Is there a way to do this? 
> >> TIA. 
> >> 
> > 
> > I would start with "on error ..." 
> >
> You might benefit from the following in 2.com: 
> 
> $ On Control_Y Then Goto Control_Y_exit 
> . . . 
> $ Control_Y_exit: 
> $ $status = 1552 ! %SYSTEM-W-CONTROLY

Sorry, I forgot one very important thing. I am writing a DCL command procedure that will run _others'_ procedures, but on multiple files. So I have no control over the user's file, save to copy it and add statements top and bottom.

I apologize for not being as specific as I should have been. :-|  (v_v)  :-(