Routine: PSBOML

Package	Total	Call Graph
Barcode Medication Administration	3	($$PRNEFF,$$WRAP)^PSBO ($$PTFTR,PT,WARD)^PSBOHDR (CLEAN,PSJ1)^PSBVT
VA Fileman	2	$$EXTERNAL^DILFD $$GET1^DIQ
Kernel	1	$$FMTE^XLFDT
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Barcode Medication Administration	2	PSBOMM PSBOWA

Entry Points

Name	Comments	DBIA/ICR reference
SUB()	; Med Log Sub Header
EN	; Begin printing
WDHDR(PSBWARD)	;
PTHDR()	;
PTID(DFN,TYP)	;
LINE(PSBIEN)	; Displays the med log entry in PSBIEN

External References

Name	Field # of Occurrence
$$EXTERNAL^DILFD	LINE+31
$$GET1^DIQ	LINE+12, LINE+18, LINE+25, LINE+37, LINE+41, LINE+42, LINE+43, LINE+44, LINE+52, LINE+62
$$PRNEFF^PSBO	LINE+40
$$WRAP^PSBO	LINE+17, LINE+24, LINE+32, LINE+33, LINE+41, LINE+53, LINE+63
$$PTFTR^PSBOHDR	EN+22, EN+24
PT^PSBOHDR	PTHDR+1
WARD^PSBOHDR	WDHDR+1
CLEAN^PSBVT	LINE+5
PSJ1^PSBVT	LINE+6
DEM^VADPT	PTID+2
$$FMTE^XLFDT	LINE+27, LINE+54

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?10,"<<<< NO MEDICATIONS FOUND FOR THIS TIME FRAME >>>>",!! Line Location: EN+17
Function Call: WRITE	Prompt: $$PTFTR^PSBOHDR(),$$PTHDR() Line Location: EN+22
Function Call: WRITE	Prompt: $$WDHDR(PSBWRD) Line Location: EN+34
Function Call: WRITE	Prompt: !!?10,"<<<< NO MEDICATIONS FOUND FOR THIS TIME FRAME >>>>",!! Line Location: EN+40
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+7
Function Call: WRITE	Prompt: !,$E(Y,4,5),"/",$E(Y,6,7),"/",$E(Y,2,3) Line Location: LINE+10
Function Call: WRITE	Prompt: " ",$E(Y,9,10),":",$E(Y,11,12) Line Location: LINE+11
Function Call: WRITE	Prompt: $$WRAP^PSBO(16,32,Y) Line Location: LINE+17
Function Call: WRITE	Prompt: ?50,$$GET1^DIQ(53.79,PSBIEN_",","ACTION BY:INITIAL") Line Location: LINE+18
Function Call: WRITE	Prompt: $$WRAP^PSBO(57,15,Y) Line Location: LINE+24
Function Call: WRITE	Prompt: !,$TR($$FMTE^XLFDT(PSBOST,2),"@"," ")_">" Line Location: LINE+27
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+33
Function Call: WRITE	Prompt: $$WRAP^PSBO(120,12,$P(PSBX(PSBZ,PSBY,0),U,4)) Line Location: LINE+33
Function Call: WRITE	Prompt: "<No PRN Effectiveness Entered>" Line Location: LINE+39
Function Call: WRITE	Prompt: "<No Comments>" Line Location: LINE+46
Function Call: WRITE	Prompt: !,$TR($$FMTE^XLFDT(PSBOSP,2),"@"," ")_"<" Line Location: LINE+54
Function Call: WRITE	Prompt: "<No Audits>" Line Location: LINE+56
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","-") Line Location: LINE+64
Function Call: WRITE	Prompt: $$SUB() Line Location: WDHDR+2
Function Call: WRITE	Prompt: $$SUB() Line Location: PTHDR+2
Function Call: WRITE	Prompt: "Activity Date",?16,"Orderable Item",?50,"Action",?57,"Action" Line Location: SUB+2
Function Call: WRITE	Prompt: !,"Start Date>",?16,"[Dose/Sched/Route/Inj Site]",?50,"By" Line Location: SUB+3
Function Call: WRITE	Prompt: ?57,"Date/Time",?75,"Drug/Additive/Solution",?105," U/Ord" Line Location: SUB+4
Function Call: WRITE	Prompt: ?113," U/Gvn",?120,"Unit",!,"Stop Date<" Line Location: SUB+5
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","-") Line Location: SUB+6

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+37, EN+38
^PSB(53.79 - [#53.79]	EN+16, EN+18, EN+20, EN+21, EN+39, EN+41, EN+43, LINE+2, LINE+4, LINE+8 , LINE+15, LINE+36, LINE+39, LINE+40
^TMP("PSBO"	EN+31

Label References

Name	Line Occurrences
$$LINE	EN+23, EN+45
$$PTHDR	EN+15, EN+22
$$PTID	EN+37
$$SUB	WDHDR+2, PTHDR+2
$$WDHDR	EN+30, EN+34, EN+44

Naked Globals

Name	Field # of Occurrence
^(	LINE+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	EN+1~, EN+14, EN+16, EN+18, EN+19, EN+33, EN+37, EN+38, EN+39, EN+41 , EN+42, LINE+6, PTHDR+1, PTID~
IOM	LINE+64, SUB+6
IOSL	EN+22, EN+34, EN+44
PSBASTUS	LINE+1~, LINE+20*, LINE+23
>> PSBAUDF	EN+4*, LINE+4, LINE+55
>> PSBDD	LINE+30*, LINE+31
>> PSBDFN	LINE+7
>> PSBDHIT	LINE+28, LINE+33
>> PSBDOSE	LINE+13
PSBEIECMT	LINE+40~*, LINE+41
>> PSBGBL	EN+18, EN+19, EN+20, EN+21, EN+41, EN+42, EN+43
PSBHDR	EN+1~, WDHDR+1, PTHDR+1
PSBHDR(0	EN+5*
PSBHDR(1	EN+8*
PSBHDR(2	EN+13, EN+29
PSBIEN	EN+20, EN+21, EN+23, EN+43, EN+45, LINE~, LINE+2, LINE+3, LINE+4, LINE+8 , LINE+12, LINE+15, LINE+18, LINE+25, LINE+36, LINE+37, LINE+39, LINE+40, LINE+41, LINE+42 , LINE+43, LINE+44, LINE+52, LINE+62
>> PSBIFR	LINE+13
>> PSBMRAB	LINE+14
>> PSBOSP	LINE+54
>> PSBOST	LINE+27
>> PSBRPT(	EN+2, EN+3, EN+4, EN+12, EN+14, EN+28, LINE+40, LINE+45
>> PSBSCH	LINE+13
PSBSTOP	EN+1~, EN+3*, EN+17, EN+19, EN+40, EN+42
PSBSTRT	EN+1~, EN+2*, EN+16, EN+18, EN+39, EN+41
>> PSBTMPG	EN+31, EN+32, EN+33
PSBWARD	WDHDR~, WDHDR+1
>> PSBWRD	EN+30, EN+34, EN+44
PSBX	LINE+1~, LINE+8*
PSBX(	LINE+25, LINE+26, LINE+28, LINE+31, LINE+33, LINE+34, LINE+35, LINE+46, LINE+47, LINE+49 , LINE+53, LINE+56, LINE+57, LINE+59, LINE+63
PSBX(0	LINE+9, LINE+19, LINE+21
>> PSBY	LINE+28, LINE+31, LINE+33, LINE+34, LINE+35, LINE+47, LINE+49, LINE+52, LINE+53, LINE+57* , LINE+59, LINE+62, LINE+63
>> PSBZ	LINE+28*, LINE+30, LINE+31, LINE+33, LINE+34, LINE+35
TYP	PTID~, PTID+3
U	EN+2, EN+3, EN+4, EN+12, EN+14, EN+21, EN+28, EN+37, EN+43, LINE+2 , LINE+4, LINE+9, LINE+15, LINE+19, LINE+21, LINE+25, LINE+26, LINE+31, LINE+33, LINE+34 , LINE+35, LINE+36, LINE+39, LINE+40, LINE+45, LINE+49, LINE+53, LINE+59, LINE+63
VA	PTID+1~
VA("BID"	PTID+3
VA("PID"	PTID+3
VADM	PTID+1~
VAERR	PTID+1~
>> X	EN+16, EN+17, EN+39, EN+40, LINE+2, LINE+3, LINE+6, LINE+19, LINE+20
>> Y	LINE+9, LINE+10, LINE+11, LINE+12, LINE+13, LINE+14, LINE+15, LINE+16, LINE+17, LINE+21* , LINE+22, LINE+23, LINE+24, LINE+31, LINE+32, LINE+49, LINE+50, LINE+51, LINE+59*, LINE+60 , LINE+61

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBOML

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: