PSIVXU ;BIR/PR-SET MEDICATION SITES IN ^TMP("PSJUSER" ;15 May 98 / 9:27 AM
Source file <PSIVXU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SET | ;Set TMP("PSJUSER" global
|
|
CHA | ;Change site
; PSJ*407/RJH - Added KILL of TMP global node to line below in order for the ; Change to Another IV Room functionality to work properly with ; changes for PSJ*407 ; K XQUIT D ^PSIVSET D:'$D(XQUIT) SET K %DT,XQUIT D ENIVKV^PSGSETU |