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 |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSJHL4

Package: Inpatient Medications

Routine: PSJHL4


Information

PSJHL4 ;BIR/RLW-DECODE HL7 /MESSSAGE FROM OE/RR ;16 Mar 99 / 4:55 PM

Source Information

Source file <PSJHL4.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Inpatient Medications 7 NOCLDEF^PSJBCMA6  EN1^PSJHL2  ($$SNDTSTA,$$SNDTSTP,$$SNDTSTW,$$TMPAT,NTE,OBX,RXC,RXO,XMD,ZRX)^PSJHL4A  (ASSIGN,FLAG,NURSEACK,STATUS)^PSJHL5  (CANCEL,HOLD,UNHOLD)^PSJHL6  ERROR^PSJHL9  $$DATE2^PSJUTL2  
VA FileMan 3 ^DIC  EN1^DIK  $$GET1^DIQ  
Kernel 1 $$HL7TFM^XLFDT  
Order Entry Results Reporting 1 $$UNESC^ORHLESC  
Outpatient Pharmacy 1 EN^PSOHLNEW  
Registration 1 DEM^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Inpatient Medications 2 PSGOEV  PSJLIACT  
Order Entry Results Reporting 1 ORCFLAG  

Entry Points

Name Comments DBIA/ICR reference
EN(PSJMSG) ; Start
END ;
DECODE ; Parse into fields
NOTIFY(ORDER,PSJHLDFN,PRIO,PSJSCHED) ; Send msg
PND ; Pending
UD ; UD
IV ; IV
MSH ; Header
PID ; ID
PV1 ; Visit
ORC ; Order
OBR ; Flagging from CPRS.
RXC ; IV
RXO ; OP
RXR ; Route
OBX ; Obs.
NTE ; Note
ZRX ; Custom
ZSC ;Service Connected - Not Used
ZRN ;Non-VA Med (Herbal/OTC)
DG1 ;Billing Awareness - Not used

External References

Name Field # of Occurrence
^DIC PND+5
EN1^DIK EN+8
$$GET1^DIQ PND+9, UD+8, IV+8, ORC+10
$$UNESC^ORHLESC PID+1, ORC+22, ORC+23, ORC+26, OBR+7
NOCLDEF^PSJBCMA6 END+5
EN1^PSJHL2 EN+9
$$SNDTSTA^PSJHL4A UD+9, IV+9
$$SNDTSTP^PSJHL4A PND+10
$$SNDTSTW^PSJHL4A PND+7, UD+6, IV+6
$$TMPAT^PSJHL4A ORC+27
NTE^PSJHL4A NTE+1
OBX^PSJHL4A OBX+1
RXC^PSJHL4A RXC+1
RXO^PSJHL4A RXO+1
XMD^PSJHL4A NOTIFY+10
ZRX^PSJHL4A ZRX+1
ASSIGN^PSJHL5 ORC+17
FLAG^PSJHL5 OBR+8
NURSEACK^PSJHL5 ORC+42
STATUS^PSJHL5 ORC+43
CANCEL^PSJHL6 ORC+39
HOLD^PSJHL6 ORC+40
UNHOLD^PSJHL6 ORC+41
ERROR^PSJHL9 ORC+4, ORC+20, ORC+21, ORC+31
$$DATE2^PSJUTL2 ORC+29, ORC+36, ORC+38, OBR+4
EN^PSOHLNEW PV1+6, PV1+17, ZRN+1
DEM^VADPT NOTIFY+3
$$HL7TFM^XLFDT PV1+2, ORC+29, ORC+36, ORC+38, OBR+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XMB(3.8 - [#3.8] GET1^DIQ
^DIC(42 - [#42] Classic Fileman Calls
^PS(53.1 - [#53.1] Classic Fileman Calls
55.01 GET1^DIQ
55.06 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PND+4
^PS(50.7 - [#50.7] PV1+16
^PS(53.1 - [#53.1] EN+8, END+5, PND+2, PND+3, PND+12, PND+14
^PS(55 - [#55] UD+2, UD+3, UD+4, UD+11, IV+2, IV+3, IV+4, IV+11, IV+12, ORC+12
ORC+13*, ORC+14*, ORC+15*
^PS(59.6 - [#59.6] PND+6, PND+8, UD+5, UD+7, IV+5, IV+7
^TMP("PSJNVO" EN+1!, END+1!
^VA(200 - [#200] ORC+21
^XMB("NETNAME" PND+9, PND+10, UD+8, UD+9, IV+8, IV+9

Label References

Name Line Occurrences
@( EN+6
DECODE EN+6
END EN+7
IV NOTIFY+8
NOTIFY END+3, END+4
PND NOTIFY+6
UD NOTIFY+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A PV1+1~
ACKDATE EN+3~, ORC+37*
ADCNT EN+2~, EN+6*
ADDITIVE EN+3~
>> ADMINS ORC+25*, ORC+28*
ADMINSTR EN+3~
APPL EN+3~
APPT EN+5~, PV1+2*
CHK PV1+12~, PV1+13*, PV1+14, PV1+15, PV1+16
CLASS EN+4~, EN+6, EN+7, PV1+2*, PV1+3, PV1+6*, PV1+8, PV1+9*, PV1+10, PV1+11*
PV1+12, PV1+14*, PV1+15*, PV1+16*, PV1+17, ZRN+1*
CLERK EN+4~, ORC+18*, OBR+5*
CLINIC NOTIFY+1~, PND+3*, UD+3*, IV+3*
COMMENT EN+3~
DA EN+8~*
>> DFN NOTIFY+3*
DIC PND+5~*
DIC(0 PND+5*
DIK EN+8~*
DISPENSE EN+3~
DO NOTIFY+1~, PND+13*, UD+12*, IV+13*
DOSE EN+3~, ORC+23*
DRIEN NOTIFY+1~, PND+13*, UD+12*, IV+13*
DRUG NOTIFY+1~
DT ORC+21
DURATION EN+3~, ORC+29*
FIELD DECODE+1!
FIELD( DECODE+10*, DECODE+11*
FIELD(0 EN+6
FIELD(1 ORC+2, RXR+1
FIELD(10 ORC+18
FIELD(11 ORC+35
FIELD(12 ORC+19
FIELD(13 OBR+7
FIELD(15 ORC+36
FIELD(16 ORC+38, OBR+5
FIELD(2 PV1+2, ORC+3, ORC+5, OBR+1, OBR+2
FIELD(24 OBR+6
FIELD(3 PID+1, PV1+2, ORC+5, OBR+2
FIELD(4 OBR+3
FIELD(44 PV1+2
FIELD(7 ORC+22, ORC+24, ORC+29, ORC+32, OBR+4
FIELD(8 MSH+1, ORC+34
FIELD(9 ORC+38
FLCMNT EN+5~, OBR+7*
FLDATE EN+5~, OBR+4*
FREQ EN+4~
II EN+3~, EN+6*, DECODE+3, DECODE+4, DECODE+5, DECODE+6, DECODE+7, PV1+4, PV1+8, PV1+10
PV1+12
INFRT EN+4~
INSTR EN+3~, ORC+22*
INTRMT EN+5~
IVCAT EN+5~
IVLIMIT EN+5~
IVTYP EN+4~
J EN+3~, DECODE+8*, DECODE+10*, DECODE+11
JJ EN+3~
JJJ EN+3~
K EN+3~
LASTFOUR NOTIFY+1~, NOTIFY+3*
LOC EN+4~, PV1+2*
LOGIN EN+3~, ORC+36*, ORC+37
MGROUP NOTIFY+1~, PND+10*, UD+9*, IV+9*
MGRP PND+1~, PND+8*, PND+9*, UD+1~, UD+7*, UD+8*, IV+1~, IV+7*, IV+8*
ND0 PND+12~*, PND+13, UD+11~*, UD+12, IV+11~*, IV+14
ND2 UD+11~*, UD+13, IV+11~*, IV+14
NDP2 PND+12~*, PND+13, UD+11*, UD+12, IV+11~, IV+12*, IV+13
NEWORDER EN+3~, EN+8, EN+9, END+4, END+5
NOO EN+4~
NTFSTAT NOTIFY+1~, PND+11*, UD+10*, IV+10*
NTFYREAS NOTIFY+1~, NOTIFY+4*
NURSEACK EN+3~, ORC+35*, ORC+37
OBXFL EN+3~, EN+6*
OCCNT EN+2~, EN+6*
OCNARR EN+3~
OCPROV EN+3~
OCRSN EN+3~
ORDATE NOTIFY+1~, PND+13*, UD+12*, IV+14*
ORDCON EN+3~, ORC+38*
ORDER EN+3~, NOTIFY~, NOTIFY+6, NOTIFY+7, NOTIFY+8, PND+2, PND+3, PND+12, PND+14, UD+2
UD+3, UD+4, UD+11, IV+2, IV+3, IV+4, IV+11, IV+12, ORC+3*, OBR+1*
PNAME NOTIFY+1~
PREON EN+4~
PRIO NOTIFY~, NOTIFY+2, NOTIFY+4, PND+7, PND+10, UD+6, UD+9, IV+6, IV+9
PRIORITY EN+3~, END+2, END+3, END+4, ORC+24*, ORC+30*
PRNTON EN+5~, ORC+34*
PROCOM EN+3~
PROVIDER EN+4~, ORC+19*, ORC+20, ORC+21
PSG NOTIFY+1~
>> PSGORD END+3
PSGP EN+4~
PSITEM EN+3~
PSJASTP EN+5~, ORC+38*
PSJCTR1 DECODE+2~*, DECODE+4*, DECODE+5, DECODE+6*, DECODE+7, DECODE+12!
PSJFLAG EN+5~, OBR+3*
PSJHLDFN EN+3~, EN+9, END+3, END+4, END+5, NOTIFY~, NOTIFY+3, PND+4, UD+2, UD+3
UD+4, UD+11, IV+2, IV+3, IV+4, IV+11, IV+12, PID+1*, ORC+5, ORC+8
ORC+10, ORC+12, ORC+13, ORC+14, ORC+15, OBR+2
PSJHLMTN EN+4~, EN+6*
PSJMSG EN~, PV1+6, PV1+17, ZRN+1
PSJMSG( EN+6, DECODE+3, DECODE+4, DECODE+5, DECODE+6, DECODE+7, PV1+4, PV1+5, PV1+8, PV1+9
PV1+10, PV1+11, PV1+12, PV1+13
PSJNVA PV1+4!, PV1+6*, PV1+7!
PSJORDER EN+3~, ORC+5*, OBR+2*
PSJORSTS ORC+9~, ORC+10*, ORC+11
PSJSCHED NOTIFY~, NOTIFY+2, NOTIFY+4, PND+7, PND+10, UD+6, UD+9, IV+6, IV+9
PSJSOK NOTIFY+1~, NOTIFY+5*, NOTIFY+9, PND+9*, PND+10*, UD+8*, UD+9*, IV+8*, IV+9*
PSJYN EN+5~, OBR+6*
PSOC EN+4~, EN+8, EN+9, MSH+1*, ORC+2*, ORC+8, ORC+17, ORC+19, ORC+39, ORC+40
ORC+41, ORC+42, ORC+43, ORC+46, OBR+8
PSPR EN+4~, ORC+21*
PSREASON EN+3~, PV1+3*, PV1+15*, ORC+4, ORC+20*, ORC+21*, ORC+31*
PTR EN+4~
QFLG EN+4~, EN+6*, EN+7, ORC+46*
QQ EN+4~, PV1+4~*, PV1+5, PV1+8~*, PV1+9, PV1+10~*, PV1+11, PV1+12~*, PV1+13
REQST EN+4~, ORC+29*
ROC EN+4~
ROUTE EN+4~, RXR+1*
>> RTE PND+13*, UD+12*, IV+13*
RXON EN+4~, PV1+9*, PV1+11*, ORC+5*, ORC+8, ORC+10, ORC+12, ORC+13, ORC+14, ORC+15
OBR+2*
RXORDER EN+4~, ORC+5*, OBR+2*
>> SCHED PND+14*, UD+13*, IV+14*
SCHEDULE EN+4~, END+2, END+3, END+4, ORC+24*, ORC+25*, ORC+26*, ORC+27, ORC+28*, ORC+31*
SCHTYP EN+4~, ORC+24*, ORC+32*, ORC+33*
SEGMENT EN+4~, DECODE+3*, DECODE+4, DECODE+5*, DECODE+6, DECODE+7*, DECODE+9, DECODE+10*, DECODE+11*
SOLCNT EN+2~, EN+6*
SOLUTION EN+4~
STPDT EN+4~
STRENGTH EN+4~
TEXT EN+4~
>> TMPAT ORC+1*, ORC+27*, ORC+28
TVOLUME EN+4~, EN+6*
U ORC+38
UNIT EN+4~, ORC+23*
UNITS EN+4~, ORC+22*, ORC+23*
>> VADM(2 NOTIFY+3
VADPT NOTIFY+1~
VOLUME EN+4~
WARD NOTIFY+1~, PND+1~, PND+4*, PND+5*, PND+6*, PND+7, PND+8, UD+1~, UD+4*, UD+5*
UD+6, UD+7, IV+1~, IV+4*, IV+5*, IV+6, IV+7
WDPARM PND+1~, PND+8*, UD+1~, UD+7*, IV+1~, IV+7*
X PND+5~*, PV1+5*, PV1+6
XMY NOTIFY+1~
XMY( PND+10*, UD+9*, IV+9*
XMY("G." PND+9*, UD+8*, IV+8*
Y PND+5~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All