[Info-vax] /END=label
Marc Van Dyck
marc.gr.vandyck at invalid.skynet.be
Fri Aug 31 11:35:37 EDT 2018
Phillip Helbigundress to reply pretended :
> In article <pm1abq$r09$1 at dont-email.me>, Dave Froble
> <davef at tsoft-inc.com> writes:
>
>> What you're doing, as I understand it, is invoking a program from DCL,
>> and then exiting the program.
>
> $ RUN PROGRAM
> $ IF $STATUS .EQS. END THEN GOTO END_HANDLING
>
>> Personally, I find testing the result of
>> the program exit, and taking appropriate action, rather elegant.
>
> My impression is that he is not calling the program from a DCL
> procedure, but rather from the DCL command line, as a DCL verb. So
> there is no fallback to a DCL GOTO after the program exits.
Yes it is implemented as a DCL command. And yes, if embedded in a
command procedure, I can test $STATUS and take action from that.
I would just be able to do
$ <my dcl command with parameters> /END=label
.
.
.
$label:
Rather than
$ <my dcl command with parameters>
$ IF $STATUS .EQ. end THEN GOTO label
.
.
.
$label:
Just like the DCL READ command does.
Simple, eh ?
--
Marc Van Dyck
More information about the Info-vax
mailing list