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  |