PSIVXU ;BIR/PR-SET MEDICATION SITES IN ^TMP("PSJUSER" ;15 May 98 / 9:27 AM
Source file <PSIVXU.m>
Package | Total | Call Graph |
---|---|---|
Inpatient Medications | 2 | (ENCV,ENIVKV)^PSGSETU ^PSIVSET |
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 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |