Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSJH1

Package: Inpatient Medications

Routine: PSJH1


Information

PSJH1 ;BIR/CML3,PR-GET UNIT DOSE/IV ORDERS FOR INPATIENT ; 11/15/07 4:21pm

Source Information

Source file <PSJH1.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Inpatient Medications 3 ($$ENDTC,$$ENPDN)^PSGMI  GTOT^PSIVUTL  $$ONE^PSJBCMA  
Kernel 2 (T0,T1)^%ZOSV  $$DT^XLFDT  
VA Fileman 1 (C,NOW)^%DTC  

Entry Points

Name Comments DBIA/ICR reference
NVSET ; Set up orders from 53.1.
SET ;
IVSET1 ;
ECHK ;
ENUNM ;
EN ; enter here
KILL ;
ENU ; update status field to reflect expired orders, if necessary
IVSET ; Set IV data in ^TMP("PSJ",$J,.

External References

Name Field # of Occurrence
C^%DTC EN+7
NOW^%DTC EN+2, EN+7
T0^%ZOSV EN+1
T1^%ZOSV EN+13
$$ENDTC^PSGMI EN+7
$$ENPDN^PSGMI IVSET+8
GTOT^PSIVUTL IVSET+7
$$ONE^PSJBCMA IVSET1+1
$$DT^XLFDT EN+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"...a few moments, I have some updating to do..."
  • Line Location: ENU+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(50.7 - [#50.7] SET+1
^PS(53.1 - [#53.1] IVSET+4!, IVSET+5, IVSET+8, EN+10, EN+12, NVSET+1, NVSET+2!, NVSET+3, NVSET+4
^PS(55 - [#55] ECHK+1, ECHK+3, IVSET+3, IVSET+8, ENUNM+1, EN+3, EN+4, EN+8
^TMP("PSJ" SET+2*, IVSET1+2*, EN+2!

Label References

Name Line Occurrences
@( IVSET+7, EN+12
ECHK EN+8
IVSET EN+6
IVSET1 IVSET+6, IVSET+7
NVSET EN+10
SET ECHK+3, NVSET+4

Naked Globals

Name Field # of Occurrence
^( NVSET+3
^(0 SET+1, ENUNM+1*
^(2 ECHK+1, NVSET+3
^(4 ECHK+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+2, EN+7
>> C ECHK+1*, ECHK+5*, SET+2, NVSET+3*
>> DFN IVSET+3, IVSET+8, IVSET1+1, EN+3, EN+4
>> DN SET+1*, SET+2
DRG ECHK+1*, SET+1, IVSET+1~, NVSET+3*
DRG( IVSET+7
DRG(0 IVSET+7
DRGT IVSET+1~, IVSET+7*
DT EN+2*
>> HDT EN+7*
JJ KILL+1!
N KILL+1!
ND ECHK+3*, ECHK+4, IVSET+1~, IVSET+4*, IVSET+5, NVSET+1~*
>> ND4 ECHK+3*, ECHK+4
>> NF SET+1*, SET+2
>> O ECHK+1, ECHK+2*, ECHK+3, SET+2, EN+8*, EN+10*, EN+12*, NVSET+1, NVSET+2, NVSET+3
, NVSET+4*
>> ON IVSET+3, IVSET+4, IVSET+5, IVSET+7, IVSET+8, IVSET1+1, IVSET1+2, EN+6*, EN+12*
ON55 IVSET+1~, IVSET+3*
ORTX IVSET+1~, IVSET+6*, IVSET+7*, IVSET+8*, IVSET1+2, KILL+1!
OSAVE NVSET+1~, NVSET+4*
P IVSET+1~, KILL+1!
P( IVSET+3*
P("OT" IVSET+7
P(17 IVSET+5*, IVSET1+2
P(2 IVSET+5*, IVSET1+1, IVSET1+2
P(3 IVSET+5*, IVSET1+1
P(4 IVSET+5*, IVSET+6, IVSET+7
P(9 IVSET+5*, IVSET1+1
PORD NVSET+1~, NVSET+4*
>> PSGDT ECHK+3, ENUNM+1, EN+2*, EN+7*
>> PSGODT ECHK+3, ECHK+4, EN+7*
>> PSGONNV EN+9
>> PSGP ECHK+1, ECHK+3, IVSET+4, ENUNM+1, EN+8, EN+10, EN+12, NVSET+2
>> PSJHDATE IVSET+3, EN+2*, EN+8
>> PSJIVOF EN+7*
>> PSJOCNT SET+2*, IVSET1+2*, EN+3*, EN+7
>> PSJOL ECHK+5, EN+1, EN+13
>> PSJORD EN+3*, EN+4, EN+6
>> PSJOS ECHK+1, SET+1, SET+2, IVSET+6, IVSET1+2, EN+2*
>> PSJPAD ENUNM+1
>> PSJSYSP0 EN+2
>> PSJSYSU EN+2
>> Q ENUNM+1*
>> QQ ENUNM+1*
>> SD ECHK+3, ECHK+4, IVSET+4, EN+8*, EN+10*, EN+12*, NVSET+2, NVSET+3
>> ST ECHK+3, ECHK+4, SET+2, EN+8*, NVSET+3*
>> START ECHK+1*, SET+1, NVSET+3*
STAT IVSET+1~, IVSET1+2*, KILL+1!
>> SUB SET+1*, SET+2
TYP IVSET+1~, IVSET1+1*, IVSET1+2, KILL+1!
U IVSET+3, IVSET+5, IVSET+7, EN+5, EN+12, NVSET+3, NVSET+4
>> UDU ECHK+4, EN+2*
UPD ENUNM+1*, ENUNM+2!
X IVSET+1~, IVSET+3*, EN+4*, EN+5, EN+7
>> X1 EN+7*
>> X2 EN+7*
>> XRT0 EN+13
>> XRTL EN+1
>> XRTN EN+13*
Y IVSET+1~, IVSET+3*, IVSET+5*, IVSET+7*, EN+5*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All