MAGJPRF1 ;WIRMFO/JHC - VistARad RPCs-User Prefs ; 10/17/2022
Source file <MAGJPRF1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ERR | ;
|
|
| RPCIN(MAGGRY,PARAMS,DATA) | ; RPC: MAGJ USER DATA
|
|
| RPCINZ | ;
|
|
| GETPRIEN(DUZ,READONLY) | ; Lookup/create User Pref entry for input DUZ
; READONLY: True for lookup-only (no create) |
|
| SAVE | ; Save User Pref data by Label
|
|
| TAGINIT(TAG) | ; Init storage space for a tag; inits some vars for SAVE
|
|
| TAGS | ; return list of tags stored
; don't report *DUM tags |
|
| SYSUSER(X) | ; get System user DUZ value
|
|
| USER(DUZ) | ; get user name, initials & vrad user type
|
|
| USERS | ;
|
|
| PRFDATA | ; RETURN data stored for input Labels
|
|
| TAGDEL | ; Delete tags and assoc data. RPCIN calls only if 'READONLY.
|
|
| TAGDEL2 | ;
|
|
| ZRUACTIV(CHKDUZ) | ;
|
|
| ZRUDFALT(CHKIEN) | ;
|
|
| END | ;
|
| RPC Name | Call Tags |
|---|---|
| MAGJ USER DATA | RPCIN |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^MAG(2006.68 - [#2006.68] | FIND1^DIC |
