[Info-vax] RECALL command

Arne Vajhøj arne at vajhoej.dk
Wed Jul 5 15:11:48 EDT 2023


On 7/4/2023 11:14 AM, Brian Schenkenberger wrote:
> On 2023-06-22 17:35:28 +0000, Chris Townley said:
>> Just being playing with a routine to squirrel away the command buffer 
>> on logout, which be quite useful after a system maintenance session.
>>
>> However when run in a command procedure, it just doesn't produce 
>> anything.

> Set the procedure level to 0 in your command procedure before executing 
> the RECALL commands.
> 
> File PROCLVL0.MAR is:
> 
>      .TITLE    PROCLVL0
>      .IDENT    "V01.0 %2023.185"
> 
>      $SSDEF
> 
>      .ENTRY    GO,0
>      $CMEXEC_S    routin    = PROCLVL0
>      RET
> 
>      .ENTRY    PROCLVL0,0
> 
>      MOVAB    @#CTL$AG_CLIDATA,R0        ; get the base of CLI data region
>      MOVL    PPD$L_PRC(R0),R0        ; add address of CLI own storage
>      CLRW    PRC_W_PROCLEVEL(R0)    ; zap current DCL procedure level
>      MOVL    #SS$_NORMAL,R0
>      RET
> 
>      .END    GO

Brilliant.

But note that privs are required.

Arne





More information about the Info-vax mailing list