SDES2PRIVUSERS ;ALB/MCB - SDES2 ADD,DELETE, DELETE ALL, GET PRIVILEGED USERS ; July 13,2026
Source file <SDES2PRIVUSERS.m>
| Package | Total | Call Graph |
|---|---|---|
| Scheduling | 4 | BLDCLNREC^SDES2CLININFO BUILDJSON^SDES2JSON VALCONTEXT^SDES2VALCONTEXT ERRLOG^SDESJSON |
| VA FileMan | 3 | (FILE,UPDATE)^DIE ^DIK $$GET1^DIQ |
| Kernel | 1 | DUZ^XUP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ADDPRIV(JSON,SDCONTEXT,SDINPUT) | ; SDES2 ADD PRIV USER
|
|
| DELPRIV(JSON,SDCONTEXT,SDINPUT) | ; SDES2 DELETE PRIV USER
|
|
| DELALLPRIV(JSON,SDCONTEXT,SDINPUT) | ; SDES2 DELETE(DEL) ALL PRIV USERS
; Input: ; S SDINPUT("Clinic IEN")-[required]-The Hopspital Location IEN ; Leaking Variables |
|
| GETPRIV(JSON,SDCONTEXT,SDINPUT) | ;SDES2 GET PRIV USERS
; Input: ; S SDINPUT("Clinic IEN")-[required]-The Hopspital Location IEN |
|
| VALIDATE(ERRORS,SDINPUT) | ; Validate Clinic IEN, Privileged DUZ
|
|
| VALIDATER(ERRORS,SDINPUT) | ; Validate Clinic IEN
|
|
| ADDUSER(ERRORS,CLINIEN,PRIVDUZ) | ; Add User
|
|
| DELUSER(ERRORS,CLINIEN,PRIVDUZ) | ; Delete User
|
|
| DELALUSERS(ERRORS,CLINIEN) | ; Delete All Users
|
|
| GETUSRLIST(ELGARRAY,SDINPUT) | ; Return all Users
|
|
| EASAUDIT(ERRORS,CLINIEN,SDCONTEXT) | ; Update EAS Audit Fields
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | EASAUDIT+5 |
| UPDATE^DIE | ADDUSER+4 |
| ^DIK | DELUSER+5, DELALUSERS+4 |
| $$GET1^DIQ | GETUSRLIST+8 |
| BLDCLNREC^SDES2CLININFO | ADDPRIV+16, DELPRIV+16, DELALLPRIV+18 |
| BUILDJSON^SDES2JSON | ADDPRIV+6, ADDPRIV+10, ADDPRIV+13, ADDPRIV+17, DELPRIV+6, DELPRIV+10, DELPRIV+13, DELPRIV+17, DELALLPRIV+8, DELALLPRIV+12 , DELALLPRIV+15, DELALLPRIV+19, GETPRIV+7, GETPRIV+11, GETPRIV+15 |
| VALCONTEXT^SDES2VALCONTEXT | ADDPRIV+5, DELPRIV+5, DELALLPRIV+7, GETPRIV+6 |
| ERRLOG^SDESJSON | VALIDATE+4, VALIDATE+5, VALIDATE+8, VALIDATE+9, VALIDATER+5, VALIDATER+6 |
| DUZ^XUP | ADDPRIV+7, DELPRIV+7, DELALLPRIV+9, GETPRIV+8 |
| RPC Name | Call Tags |
|---|---|
| SDES2 ADD PRIV USER | ADDPRIV |
| SDES2 GET PRIV USERS | GETPRIV |
| SDES2 DELETE PRIV USER | DELPRIV |
| SDES2 DEL ALL PRIV USERS | DELALLPRIV |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SC - [#44] | VALIDATE+5, VALIDATER+6, DELALUSERS+4, GETUSRLIST+5 |
| ^VA(200 - [#200] | VALIDATE+9 |
| Name | Line Occurrences |
|---|---|
| ADDUSER | ADDPRIV+12 |
| DELALUSERS | DELALLPRIV+14 |
| DELUSER | DELPRIV+12 |
| EASAUDIT | ADDPRIV+14, DELPRIV+14, DELALLPRIV+16 |
| GETUSRLIST | GETPRIV+13 |
| VALIDATE | ADDPRIV+9, DELPRIV+9 |
| VALIDATER | DELALLPRIV+11, GETPRIV+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CLINDATA | ADDPRIV+1~, ADDPRIV+16, ADDPRIV+17, DELPRIV+1~, DELPRIV+16, DELPRIV+17, DELALLPRIV+5~, DELALLPRIV+18, DELALLPRIV+19, GETPRIV+4~ , GETPRIV+13, GETPRIV+15 |
| CLINDATA("Success" | ADDPRIV+14*, DELPRIV+14*, DELALLPRIV+16* |
| CLINIEN | VALIDATE+3*, VALIDATE+4, VALIDATE+5, VALIDATER+1~, VALIDATER+4*, VALIDATER+5, VALIDATER+6, ADDUSER~, ADDUSER+3, DELUSER~ , DELUSER+2, DELUSER+3, DELALUSERS~, DELALUSERS+2, DELALUSERS+3, DELALUSERS+4, GETUSRLIST+1~, GETUSRLIST+2*, GETUSRLIST+5, GETUSRLIST+8 , EASAUDIT~, EASAUDIT+2, EASAUDIT+3, EASAUDIT+4 |
| CLININE | VALIDATE+1~ |
| DA | DELUSER+1~, DELUSER+4*, DELALUSERS+1~, DELALUSERS+4* |
| DA(1 | DELUSER+3*, DELALUSERS+3* |
| DIK | DELUSER+1~, DELUSER+2*, DELALUSERS+1~, DELALUSERS+2* |
| DUZ | ADDPRIV+7~, DELPRIV+7~, DELALLPRIV+9~, GETPRIV+8~ |
| ELGARRAY | GETUSRLIST~ |
| ELGARRAY("Error" | GETUSRLIST+9* |
| ELGARRAY("Pri | vileged User" , GETUSRLIST+7*, GETUSRLIST+8* |
| ERR | ADDUSER+1~, ADDUSER+5, EASAUDIT+1~, EASAUDIT+6 |
| ERR("DIERR" | ADDUSER+6, EASAUDIT+6 |
| ERRORFLAG | VALIDATE+1~, VALIDATE+4*, VALIDATE+5*, VALIDATE+8*, VALIDATE+9*, VALIDATE+10, VALIDATER+1~, VALIDATER+5*, VALIDATER+6*, VALIDATER+7 |
| ERRORS | ADDPRIV+1~, ADDPRIV+5, ADDPRIV+6, ADDPRIV+9, ADDPRIV+10, ADDPRIV+12, ADDPRIV+13, ADDPRIV+14, DELPRIV+1~, DELPRIV+5 , DELPRIV+6, DELPRIV+9, DELPRIV+10, DELPRIV+12, DELPRIV+13, DELPRIV+14, DELALLPRIV+5~, DELALLPRIV+7, DELALLPRIV+8, DELALLPRIV+11 , DELALLPRIV+12, DELALLPRIV+14, DELALLPRIV+15, DELALLPRIV+16, GETPRIV+4~, GETPRIV+6, GETPRIV+7, GETPRIV+10, GETPRIV+11, VALIDATE~ , VALIDATE+4, VALIDATE+5, VALIDATE+8, VALIDATE+9, VALIDATER~, VALIDATER+5, VALIDATER+6, ADDUSER~, DELUSER~, DELUSER+1~ , DELALUSERS~, DELALUSERS+1~, EASAUDIT~ |
| ERRORS("Clini | c IEN" , ADDPRIV+6*, ADDPRIV+10*, ADDPRIV+13*, DELPRIV+6*, DELPRIV+10*, DELPRIV+13*, DELALLPRIV+8*, DELALLPRIV+12*, DELALLPRIV+15* , GETPRIV+7*, GETPRIV+11* |
| ERRORS("Error" | ADDUSER+6*, EASAUDIT+6* |
| FDA | ADDUSER+1~, EASAUDIT+1~ |
| FDA( | ADDUSER+3* |
| FDA(44 | EASAUDIT+2*, EASAUDIT+3*, EASAUDIT+4* |
| IENS | ADDUSER+1~ |
| IENS(1 | ADDUSER+2* |
| JSON | ADDPRIV~, ADDPRIV+6, ADDPRIV+10, ADDPRIV+13, ADDPRIV+17, DELPRIV~, DELPRIV+6, DELPRIV+10, DELPRIV+17, DELALLPRIV~ , DELALLPRIV+8, DELALLPRIV+12, DELALLPRIV+19, GETPRIV~, GETPRIV+7, GETPRIV+11, GETPRIV+15 |
| PRIVDUZ | VALIDATE+1~, VALIDATE+7*, VALIDATE+8, VALIDATE+9, ADDUSER~, ADDUSER+2, ADDUSER+3, DELUSER~, DELUSER+4, GETUSRLIST+1~ , GETUSRLIST+3*, GETUSRLIST+4*, GETUSRLIST+5*, GETUSRLIST+7, GETUSRLIST+8 |
| RETURN | ADDPRIV+1~, DELPRIV+1~, DELPRIV+13, DELALLPRIV+5~, DELALLPRIV+15 |
| SDCONTEXT | ADDPRIV~, ADDPRIV+5, ADDPRIV+14, DELPRIV~, DELPRIV+5, DELPRIV+14, DELALLPRIV~, DELALLPRIV+7, DELALLPRIV+16, GETPRIV~ , GETPRIV+6, EASAUDIT~ |
| SDCONTEXT("AC | HERON AUDIT ID" , EASAUDIT+2 |
| SDCONTEXT("APPID" | EASAUDIT+3 |
| SDCONTEXT("US | ER DUZ" , ADDPRIV+7, DELPRIV+7, DELALLPRIV+9, GETPRIV+8 |
| SDECI | ADDPRIV+3~, DELPRIV+3~, DELALLPRIV+4~ |
| SDINPUT | ADDPRIV~, ADDPRIV+9, DELPRIV~, DELPRIV+9, DELALLPRIV~, DELALLPRIV+11, GETPRIV~, GETPRIV+10, GETPRIV+13, VALIDATE~ , VALIDATER~, GETUSRLIST~ |
| SDINPUT("Clin | ic IEN" , ADDPRIV+12, ADDPRIV+14, ADDPRIV+16, DELPRIV+12, DELPRIV+14, DELPRIV+16, DELALLPRIV+14, DELALLPRIV+16, DELALLPRIV+18 , VALIDATE+3, VALIDATER+4, GETUSRLIST+2 |
| SDINPUT("PRIV | DUZ" , ADDPRIV+12, DELPRIV+12, VALIDATE+7, GETUSRLIST+3 |
| TYPE | ADDPRIV+3~ |
| USRCNT | GETUSRLIST+1~, GETUSRLIST+4*, GETUSRLIST+6*, GETUSRLIST+7, GETUSRLIST+8, GETUSRLIST+9 |
| USRNAME | GETUSRLIST+1~ |
| X | DELPRIV+3~, DELALLPRIV+4~ |
| >> XWB(2 | EASAUDIT+4 |
| Y | DELPRIV+3~, DELALLPRIV+4~ |