Routine: PSBOML

Package	Total	Call Graph
Barcode Medication Administration	5	$$GETINIT^PSBCSUTX ($$PRNEFF,$$WRAP)^PSBO ($$PTFTR,$$SRCHLIST,PT,WARD)^PSBOHDR $$FINDGIVE^PSBUTL (CLEAN,PSJ1)^PSBVT
VA FileMan	2	$$EXTERNAL^DILFD $$GET1^DIQ
Kernel	1	$$FMTE^XLFDT
MailMan	1	SENDMSG^XMXAPI
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Barcode Medication Administration	1	PSBOPM

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Begin printing
LINE(PSBIEN)	; Displays the med log entry in PSBIEN
WDHDR(PSBWARD)	;
PTHDR()	;
SUB()	; Med Log Sub Header
MME(PSBIEN)	; Administered via Manual Med Entry?

External References

Name	Field # of Occurrence
$$EXTERNAL^DILFD	LINE+66
$$GET1^DIQ	LINE+29, LINE+60, LINE+72, LINE+76, LINE+77, LINE+78, LINE+79, LINE+87, LINE+91, LINE+92 , LINE+93, LINE+94, LINE+95, LINE+98, LINE+112
$$GETINIT^PSBCSUTX	LINE+39
$$PRNEFF^PSBO	LINE+75
$$WRAP^PSBO	LINE+38, LINE+45, LINE+58, LINE+67, LINE+68, LINE+76, LINE+88, LINE+101, LINE+124, LINE+126
$$PTFTR^PSBOHDR	EN+23, EN+25
$$SRCHLIST^PSBOHDR	EN+9
PT^PSBOHDR	PTHDR+3
WARD^PSBOHDR	WDHDR+3
$$FINDGIVE^PSBUTL	LINE+50
CLEAN^PSBVT	LINE+5
PSJ1^PSBVT	LINE+6
$$FMTE^XLFDT	EN+6, LINE+62, LINE+98, LINE+103
SENDMSG^XMXAPI	LINE+18
$$GET^XPAR	LINE+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?10,"<<<< NO MEDICATIONS FOUND FOR THIS TIME FRAME >>>>",!! Line Location: EN+18
Function Call: WRITE	Prompt: $$PTFTR^PSBOHDR(),$$PTHDR() Line Location: EN+23
Function Call: WRITE	Prompt: $$WDHDR(PSBWRD) Line Location: EN+35
Function Call: WRITE	Prompt: !!?10,"<<<< NO MEDICATIONS FOUND FOR THIS TIME FRAME >>>>",!! Line Location: EN+39
Function Call: WRITE	Prompt: !,"Error: Med Log Entry ",PSBIEN," has no order reference number!" Line Location: LINE+3
Function Call: WRITE	Prompt: !,"Error: Inpatient Meds API Failure!" Line Location: LINE+21
Function Call: WRITE	Prompt: !,$E(Y,4,5),"/",$E(Y,6,7),"/",$E(Y,2,3) Line Location: LINE+27
Function Call: WRITE	Prompt: " ",$E(Y,9,10),":",$E(Y,11,12) Line Location: LINE+28
Function Call: WRITE	Prompt: $$WRAP^PSBO(16,32,Y) Line Location: LINE+38
Function Call: WRITE	Prompt: ?50,$$GETINIT^PSBCSUTX(PSBIEN,"I") Line Location: LINE+39
Function Call: WRITE	Prompt: $$WRAP^PSBO(57,15,Y) Line Location: LINE+45
Function Call: WRITE	Prompt: !,$TR($$FMTE^XLFDT($G(PSBOST),2),"@"," ")_">" Line Location: LINE+62
Function Call: WRITE	Prompt: ?105,$J($P(PSBX(PSBZ,PSBY,0),U,2),6,2),?113,$J($P(PSBX(PSBZ,PSBY,0),U,3),6,2) Line Location: LINE+68
Function Call: WRITE	Prompt: $$WRAP^PSBO(120,12,$P(PSBX(PSBZ,PSBY,0),U,4)) Line Location: LINE+68
Function Call: WRITE	Prompt: "<No PRN Effectiveness Entered>" Line Location: LINE+74
Function Call: WRITE	Prompt: "<No Comments>" Line Location: LINE+81
Function Call: WRITE	Prompt: "<No Audits>" Line Location: LINE+106
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","-") Line Location: LINE+127
Function Call: WRITE	Prompt: $$SUB() Line Location: WDHDR+4
Function Call: WRITE	Prompt: $$SUB() Line Location: PTHDR+4
Function Call: WRITE	Prompt: "Location",! Line Location: SUB+2
Function Call: WRITE	Prompt: "Activity Date",?16,"Orderable Item",?50,"Action",?57,"Action" Line Location: SUB+3
Function Call: WRITE	Prompt: !,"Start Date>",?16,"[Dose/Sched/Route/Body Site]",?50,"By" Line Location: SUB+4
Function Call: WRITE	Prompt: ?57,"Date/Time",?75,"Drug/Additive/Solution",?105," U/Ord" Line Location: SUB+5
Function Call: WRITE	Prompt: ?113," U/Gvn",?120,"Unit",!,"Stop Date<" Line Location: SUB+6
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","-") Line Location: SUB+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSB(53.79 - [#53.79]	GET1^DIQ
53.793	GET1^DIQ
53.799	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN+36, EN+37
^PSB(53.79 - [#53.79]	EN+17, EN+19, EN+21, EN+22, EN+38, EN+40, EN+42, LINE+2, LINE+4, LINE+22 , LINE+32, LINE+71, LINE+74, LINE+75, MME+2, MME+3
^TMP("PSBO"	EN+32
^XTMP("PSB DEBUG"	LINE+46

Label References

Name	Line Occurrences
$$LINE	EN+24, EN+44
$$MME	LINE+25
$$PTHDR	EN+16, EN+23
$$SUB	WDHDR+4, PTHDR+4
$$WDHDR	EN+31, EN+35, EN+43

Naked Globals

Name	Field # of Occurrence
^(	LINE+33, LINE+35
^(0	EN+36

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ALIN	LINE+117~, LINE+118*, LINE+122
CMMT	MME+1~, MME+2*, MME+3
CMMTND	MME+1~, MME+3*
DFN	EN+1~, EN+15, EN+17, EN+19, EN+20, EN+34, EN+36, EN+37, EN+38, EN+40 , EN+41, LINE+6, PTHDR+3
DUZ	LINE+11
INI	LINE+49~, LINE+52*, LINE+55
IOM	LINE+127, SUB+7
IOSL	EN+23, EN+35, EN+43
MME	MME+1~, MME+2, MME+3, MME+4
NXALIN	LINE+117~, LINE+119, LINE+120, LINE+122
PSBASTUS	LINE+1~, LINE+41, LINE+44, LINE+48, LINE+54, LINE+57
PSBAUDF	EN+1~, EN+5*, LINE+4, LINE+105
PSBCLINORD	WDHDR+1~, PTHDR+1~
PSBDD	LINE+49~, LINE+65*, LINE+66
>> PSBDFN	LINE+21
PSBDHIT	LINE+1~, LINE+63, LINE+68
>> PSBDOSE	LINE+30
PSBEIECMT	LINE+75~*, LINE+76
PSBERR	LINE+9~
PSBERR(1	LINE+15*
PSBERR(2	LINE+16*
PSBERR(3	LINE+17*
PSBEXIST	LINE+1~, LINE+6, LINE+8
PSBGBL	EN+1~, EN+19, EN+20, EN+21, EN+22, EN+40, EN+41, EN+42
PSBHDR	EN+1~, WDHDR+3, PTHDR+3
PSBHDR(0	EN+6*
PSBHDR(1	EN+7*
PSBHDR(2	EN+14, EN+30
PSBHDR(3	WDHDR+2, PTHDR+2
PSBHDR(4	WDHDR+2, PTHDR+2
PSBIEN	EN+21, EN+22, EN+24, EN+42, EN+44, LINE~, LINE+2, LINE+3, LINE+4, LINE+15 , LINE+22, LINE+25, LINE+29, LINE+32, LINE+39, LINE+46, LINE+50, LINE+60, LINE+71, LINE+72 , LINE+74, LINE+75, LINE+76, LINE+77, LINE+78, LINE+79, LINE+87, LINE+91, LINE+92, LINE+93 , LINE+94, LINE+95, LINE+98, LINE+112, MME~, MME+2, MME+3
>> PSBIFR	LINE+30
PSBMG	LINE+9~, LINE+13*, LINE+14
PSBMME	LINE+1~, LINE+25*
>> PSBMRAB	LINE+31
>> PSBOSP	LINE+103
>> PSBOST	LINE+62
PSBPARAM	LINE+9~
>> PSBRPT(	EN+2, EN+3, EN+4, EN+5, EN+15, LINE+75, LINE+80
>> PSBSCH	LINE+30
>> PSBSCRT	LINE+8
PSBSORT	EN+1~, EN+2*, EN+13, EN+29
PSBSRCHL	EN+1~, EN+9*, WDHDR+3, PTHDR+2, PTHDR+3
PSBSTOP	EN+1~, EN+4*, EN+6, EN+18, EN+20, EN+39, EN+41
PSBSTRT	EN+1~, EN+3*, EN+6, EN+17, EN+19, EN+38, EN+40
PSBTMPG	EN+1~, EN+32, EN+33, EN+34
PSBWARD	WDHDR~, WDHDR+3
>> PSBWRD	EN+31, EN+35, EN+43
PSBX	LINE+1~, LINE+22*
PSBX(	LINE+60, LINE+61, LINE+63, LINE+66, LINE+68, LINE+69, LINE+70, LINE+81, LINE+82, LINE+84 , LINE+88, LINE+106, LINE+107, LINE+109, LINE+118, LINE+119, LINE+120, LINE+123, LINE+126
PSBX(0	LINE+23, LINE+25*, LINE+26, LINE+40, LINE+42
PSBY	LINE+1~, LINE+63, LINE+66, LINE+68, LINE+69, LINE+70, LINE+82, LINE+84, LINE+87, LINE+88 , LINE+107*, LINE+109, LINE+112, LINE+118, LINE+119, LINE+123, LINE+126
PSBZ	LINE+1~, LINE+63*, LINE+65, LINE+66, LINE+68, LINE+69, LINE+70
RMEV	LINE+49~, LINE+50*, LINE+51, LINE+52, LINE+53
U	EN+2, EN+3, EN+4, EN+5, EN+15, EN+22, EN+36, EN+42, LINE+2, LINE+4 , LINE+23, LINE+25, LINE+26, LINE+32, LINE+33, LINE+35, LINE+40, LINE+42, LINE+51, LINE+52 , LINE+53, LINE+60, LINE+61, LINE+66, LINE+68, LINE+69, LINE+70, LINE+71, LINE+74, LINE+75 , LINE+80, LINE+84, LINE+88, LINE+109, LINE+118, LINE+120, LINE+123, LINE+126
WITBY	LINE+90~, LINE+91*, LINE+96, LINE+97, LINE+99
WITCM	LINE+90~, LINE+93*, LINE+101
WITDT	LINE+90~, LINE+92*
WITFL	LINE+90~, LINE+95*, LINE+99, LINE+100
WITHR	LINE+90~, LINE+94*
>> X	EN+17, EN+18, EN+38, EN+39, LINE+2, LINE+3, LINE+6, LINE+40, LINE+41, LINE+53* , LINE+54
XMDUZ	LINE+9~, LINE+11*, LINE+18
XMSUB	LINE+9~, LINE+10*, LINE+18
XMTEXT	LINE+9~, LINE+12*, LINE+18
XMY	LINE+9~, LINE+18
XMY(	LINE+14*
XX	LINE+117~, LINE+123*, LINE+124
>> Y	LINE+23, LINE+27, LINE+28, LINE+29, LINE+30, LINE+31, LINE+33, LINE+35, LINE+37, LINE+38 , LINE+42, LINE+43, LINE+44, LINE+45, LINE+51, LINE+56, LINE+57, LINE+58, LINE+66, LINE+67 , LINE+84, LINE+85, LINE+86, LINE+109, LINE+110, LINE+111

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBOML

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: