[Info-vax] /END=label

[Dave Froble]

On 8/31/2018 11:35 AM, Marc Van Dyck wrote:
> 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 ?
>

No, it is not simple.  You're asking for the language that you're using 
to know about DCL, and you're asking for DCL to know about the language, 
or, languages ....

KISS