| Name | Value |
|---|---|
| NAME | DSM for OpenVMS |
| BREAK LOGIC | U @("$I:"_$P("NO",1,'X)_"CENABLE") |
| ROUTINE EXISTENCE TEST | I $T(^@X)]"" |
| WRITE FROM SDP | O DIO U DIO:DISCONNECT F %=0:0 U DIO R % Q:%="#$#" U IO W:$A(%)'=12 ! W % |
| FIND SDP END | W !,"#$#",! C IO |
| GLOBAL LENGTH (MAX) | 108 |
| SET $X & $Y FROM 'IOX' & 'IOY' | S $X=IOX,$Y=IOY |
| ZSAVE CODE | ZR X "S %Y=0 F S %Y=$O(^UTILITY($J,0,%Y)) Q:%Y="""" Q:'$D(^(%Y)) ZI ^(%Y)" ZS @X |
| ROUTINE SIZE (MAX) | 5000 |
| NEW COMMAND | SUPPORTED |
| INDIVIDUAL SUBSCRIPT LENGTH | 63 |
| SAVE SYMBOL TABLE | D DOLRO^%ZOSV |