Routine: PSBODO

Package	Total	Call Graph
Barcode Medication Administration	4	$$WRAP^PSBO PT^PSBOHDR $$REMSTR^PSBUTL (CLEAN,PSJ1)^PSBVT
Inpatient Medications	3	(GETPROVL,INTRDIC)^PSGSICH1 EN^PSJBCMA2 GETSIOPI^PSJBCMA5
VA FileMan	2	$$GET1^DIQ ^DIWP
Kernel	1	$$FMTE^XLFDT
Order Entry Results Reporting	1	$$OCAPI^ORCHECK
Pharmacy Data Management	1	(PSS431,PSS436)^PSS55

Name	Comments	DBIA/ICR reference
EN	;
DISPORD	;
DSPPRV(ARR,LN,IND,ALGN,NONE)	; Display Provider (CPRS) override reasons ; ARR = array with provider override text. ; LN = total width of report writable area. (opt, 132 default) ; IND = indent for both left and right margins. (opt,0 default) ; ALGN = align colon on this column. (opt, 25 default) ; NONE = display empty Provider override msg. (opt, 0 default)
DSPRPH(ARR,LN,IND,ALGN,NONE)	; Display Pharmacist Interventions ; ARR = array with Pharmacist intervention text. (opt) ; LN = total width of report writable area. (opt,132 default) ; IND = indent for both left and right margins. (opt, 0 default) ; ALGN = align colon on this column. (opt. 25 default) ; NONE = display empty Pharmacist intervention msg. (opt, 0 default)
DSPORCK(LN,IND,ALGN,NONE)	; Display Order Check(CPRS) #93 NEW TAG ; LN = total width of report writable area. (opt, 132 default) ; IND = indent for both left and right margins. (opt,0 default) ; ALGN = align colon on this column. (opt, 25 default) ; NONE = display empty order check msg. (opt, 0 default)
ORCHECK	; recreate CPRS Order Check - copied from ORQ2 #93
ALLERGY
CDL(X)	; -- Returns Clinical Danger Level X #93 NEW TAG
XTRA	; #93 NEW TAG
USER(X)

Name	Field # of Occurrence
$$GET1^DIQ	DISPORD+3, ALLERGY+15, ALLERGY+25, USER+2
^DIWP	ORCHECK+15, ORCHECK+22, ALLERGY+11, ALLERGY+21, XTRA+4
$$OCAPI^ORCHECK	ORCHECK+2
$$WRAP^PSBO	DSPPRV+31
PT^PSBOHDR	DISPORD+8
$$REMSTR^PSBUTL	DISPORD+24
CLEAN^PSBVT	EN+10, DISPORD+6, DISPORD+91
PSJ1^PSBVT	DISPORD+7
GETPROVL^PSGSICH1	DISPORD+38
INTRDIC^PSGSICH1	DISPORD+39
EN^PSJBCMA2	DISPORD+4
GETSIOPI^PSJBCMA5	DISPORD+30
PSS431^PSS55	DISPORD+84
PSS436^PSS55	DISPORD+85
$$FMTE^XLFDT	DISPORD+72, DISPORD+76, ORCHECK+20, ALLERGY+19

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DISPORD+8
Function Call: WRITE	Prompt: !,"Invalid Order" Line Location: DISPORD+9
Function Call: WRITE	Prompt: !,"Infusion Rate: ",PSBIFR Line Location: DISPORD+14
Function Call: WRITE	Prompt: !,"Dosage Ordered: ",PSBDOSE Line Location: DISPORD+15
Function Call: WRITE	Prompt: ?40,"Self Med: ",PSBSMX Line Location: DISPORD+20
Function Call: WRITE	Prompt: !,"Admin Times: ",PSBADST Line Location: DISPORD+23
Function Call: WRITE	Prompt: !,"Removal Times: ",$$REMSTR^PSBUTL(PSBADST,PSBDOA,PSBSCHT,PSBOSP,PSBOPRSP) Line Location: DISPORD+24
Function Call: WRITE	Prompt: !,"Admin Times: ",PSBADST Line Location: DISPORD+25
Function Call: WRITE	Prompt: !,$TR($J("",75)," ","-") Line Location: DISPORD+46
Function Call: WRITE	Prompt: !?7,"Reason: ",@(PSJGLO_","_I_","_3_")") Line Location: DISPORD+77
Function Call: WRITE	Prompt: !! Line Location: DISPORD+90
Function Call: WRITE	Prompt: !!?IND,$TR($J("",LN)," ","=") Line Location: DSPPRV+11
Function Call: WRITE	Prompt: !?CTRTAB,HDG Line Location: DSPPRV+14
Function Call: WRITE	Prompt: !?IND,$TR($J("",LN)," ","="),! Line Location: DSPPRV+15
Function Call: WRITE	Prompt: !?IND,"No Provider Overrides to display.",! Line Location: DSPPRV+18
Function Call: WRITE	Prompt: !?IND,$TR($J("",LN)," ","=") Line Location: DSPRPH+12
Function Call: WRITE	Prompt: !?CTRTAB,HDG Line Location: DSPRPH+15
Function Call: WRITE	Prompt: !?IND,$TR($J("",LN)," ","="),! Line Location: DSPRPH+16
Function Call: WRITE	Prompt: !?IND,"No Pharmacist Interventions to display.",! Line Location: DSPRPH+19
Function Call: WRITE	Prompt: !?IND,LINE Line Location: DSPRPH+33
Function Call: WRITE	Prompt: ! Line Location: DSPRPH+35
Function Call: WRITE	Prompt: ! Line Location: DSPRPH+39
Function Call: WRITE	Prompt: !!?IND,$TR($J("",LN)," ","=") Line Location: DSPORCK+10
Function Call: WRITE	Prompt: !?CTRTAB,HDG Line Location: DSPORCK+13
Function Call: WRITE	Prompt: !?IND,$TR($J("",LN)," ","="),! Line Location: DSPORCK+14
Function Call: WRITE	Prompt: !?IND,"No Order Check to display.",! Line Location: DSPORCK+17
Function Call: WRITE	Prompt: ?IND,$G(^TMP("PSBORTXT",$J,QQ)),! Line Location: DSPORCK+20

FileNo	Call Tags
100.517	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^PSB(53.69 - [#53.69]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PS(55 - [#55]	DISPORD+34
^TMP("PSBO"	EN+6
^TMP("PSBORTXT"	DISPORD+82!, DISPORD+86, DISPORD+88!, DSPORCK+20
^TMP("PSJBCMA5"	DISPORD+29!, DISPORD+31, DISPORD+32, DISPORD+33!
^TMP($J	DISPORD+84, DISPORD+85, ORCHECK+1!, ORCHECK+8, ORCHECK+11, ORCHECK+12, ORCHECK+18!, ALLERGY+3, ALLERGY+4, ALLERGY+7 , ALLERGY+8, ALLERGY+13, XTRA+1, XTRA+2, XTRA+6
^UTILITY($J	ORCHECK+15!, ORCHECK+16, ORCHECK+22!, ORCHECK+23, ORCHECK+25!, ALLERGY+11!, ALLERGY+12, ALLERGY+21!, ALLERGY+22, XTRA+4! , XTRA+5
^XTMP("PSB DEBUG"	DISPORD+16

Name	Line Occurrences
$$CDL	ORCHECK+13, ALLERGY+9
$$USER	ORCHECK+20, ALLERGY+19
ALLERGY	ORCHECK+6
DISPORD	EN+9
DSPORCK	ORCHECK+2, ORCHECK+24
DSPPRV	DISPORD+42, DISPORD+43
DSPRPH	DISPORD+44, DISPORD+45
ORCHECK	DISPORD+87
XTRA	ORCHECK+14, ORCHECK+17, ALLERGY+10, ALLERGY+17

Name	Field # of Occurrence
^(	ORCHECK+16, ORCHECK+23, ALLERGY+12, ALLERGY+22, XTRA+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACK	ORCHECK+4~, ORCHECK+5, ALLERGY+2, ALLERGY+6*, ALLERGY+18
ALGN	DSPPRV~, DSPPRV+8, DSPPRV+24, DSPPRV+30, DSPRPH~, DSPRPH+8, DSPRPH+26, DSPRPH+33, DSPRPH+36, DSPORCK~ , DSPORCK+7*
ALLGYDRG	ORCHECK+4~, ORCHECK+25!
ALLGYDRG(	ORCHECK+9, ALLERGY+5*
ARR	DSPPRV~, DSPRPH~
ARR(	DSPRPH+22, DSPRPH+23, DSPRPH+25, DSPRPH+30, DSPRPH+31
ARR("PROV"	DSPPRV+21, DSPPRV+22, DSPPRV+23
ARR("PROVR"	DSPPRV+27, DSPPRV+28, DSPPRV+29
CAT	DSPPRV+7~, DSPPRV+27*, DSPPRV+28, DSPPRV+29, DSPORCK+6~
CDL	ORCHECK+4~, ORCHECK+13, ORCHECK+14, ORCHECK+16, ALLERGY+9, ALLERGY+10, ALLERGY+12, XTRA+2, XTRA+3, XTRA+5
CK	ORCHECK+4~, ORCHECK+8, ORCHECK+9, ORCHECK+11, ORCHECK+12, ALLERGY+2, ALLERGY+3*, ALLERGY+4, ALLERGY+5, ALLERGY+7 , ALLERGY+8, ALLERGY+13, XTRA+1, XTRA+2, XTRA+6
CNT	DISPORD+2~, DISPORD+80, ORCHECK+10, ORCHECK+14, ORCHECK+16, ORCHECK+20, ORCHECK+21, ORCHECK+23, ALLERGY+2, ALLERGY+6* , ALLERGY+10, ALLERGY+12, ALLERGY+19, ALLERGY+20, ALLERGY+22, ALLERGY+24, ALLERGY+25, XTRA+3, XTRA+5, XTRA+6
CTRTAB	DSPPRV+7~, DSPPRV+13, DSPPRV+14, DSPRPH+7~, DSPRPH+14, DSPRPH+15, DSPORCK+6~, DSPORCK+12*, DSPORCK+13
DFN	EN+5~, EN+8*, DISPORD+4, DISPORD+7, DISPORD+8, DISPORD+30, DISPORD+31, DISPORD+32, DISPORD+34, DISPORD+38 , DISPORD+39, DISPORD+84, DISPORD+85, DSPPRV+21, DSPPRV+22, DSPPRV+23, DSPPRV+27, DSPPRV+28, DSPPRV+29, DSPRPH+22 , DSPRPH+23, DSPRPH+25, DSPRPH+30, DSPRPH+31
DIWF	DISPORD+2~, ORCHECK+15, ORCHECK+22, ALLERGY+11, ALLERGY+21, XTRA+4*
DIWL	DISPORD+2~, ORCHECK+15, ORCHECK+16, ORCHECK+22, ORCHECK+23, ALLERGY+11, ALLERGY+12, ALLERGY+21, ALLERGY+22, XTRA+4* , XTRA+5
DIWR	DISPORD+2~, ORCHECK+15, ORCHECK+22, ALLERGY+11, ALLERGY+21, XTRA+4*
FLD	DSPRPH+7~, DSPRPH+23*, DSPRPH+24, DSPRPH+25, DSPRPH+28, DSPRPH+30, DSPRPH+31
HDG	DSPPRV+7~, DSPPRV+12, DSPPRV+13, DSPPRV+14, DSPRPH+7~, DSPRPH+13, DSPRPH+14, DSPRPH+15, DSPORCK+6~, DSPORCK+11* , DSPORCK+12, DSPORCK+13
HDR	ORCHECK+4~, ORCHECK+10, ORCHECK+19
I	DISPORD+1~, DISPORD+71, DISPORD+72, DISPORD+73, DISPORD+74, DISPORD+75, DISPORD+76, DISPORD+77, ORCHECK+4~, ORCHECK+16 , ORCHECK+23, ALLERGY+12, ALLERGY+22, XTRA+5
IND	DSPPRV~, DSPPRV+8, DSPPRV+9, DSPPRV+11, DSPPRV+15, DSPPRV+18, DSPPRV+25, DSPPRV+31, DSPRPH~, DSPRPH+8 , DSPRPH+9, DSPRPH+12, DSPRPH+16, DSPRPH+19, DSPRPH+27, DSPRPH+33, DSPRPH+36, DSPORCK~, DSPORCK+7*, DSPORCK+8 , DSPORCK+10, DSPORCK+14, DSPORCK+17, DSPORCK+20
INSTANCE	ALLERGY+1~, ALLERGY+13*, ALLERGY+14, ALLERGY+15, ALLERGY+16
INSTASAV	ALLERGY+1~, ALLERGY+16*, ALLERGY+23, ALLERGY+25
INT	DSPRPH+7~, DSPRPH+22*, DSPRPH+23, DSPRPH+25, DSPRPH+30, DSPRPH+31
L1	DSPPRV+7~, DSPPRV+24, DSPPRV+25, DSPPRV+30, DSPRPH+7~, DSPRPH+26*, DSPRPH+27
L2	DSPPRV+7~, DSPPRV+24, DSPPRV+25, DSPPRV+30, DSPRPH+7~, DSPRPH+26*, DSPRPH+27
>> LIN1	DSPRPH+29, DSPRPH+35, DSPRPH+37
LINE	DISPORD+1~, DSPPRV+7~, DSPPRV+23, DSPPRV+24, DSPPRV+29, DSPPRV+30, DSPPRV+31, DSPRPH+7~, DSPRPH+25, DSPRPH+26 , DSPRPH+31, DSPRPH+33*, DSPRPH+36
LN	DSPPRV~, DSPPRV+8, DSPPRV+9, DSPPRV+11, DSPPRV+13, DSPPRV+15, DSPPRV+31, DSPRPH~, DSPRPH+8, DSPRPH+9 , DSPRPH+12, DSPRPH+14, DSPRPH+16, DSPORCK~, DSPORCK+7, DSPORCK+8, DSPORCK+10, DSPORCK+12, DSPORCK+14
LST	DISPORD+81~
NONE	DSPPRV~, DSPPRV+8, DSPPRV+18, DSPRPH~, DSPRPH+8, DSPRPH+19, DSPORCK~, DSPORCK+7*, DSPORCK+17
OC	DSPPRV+7~, DSPPRV+28*, DSPPRV+29, DSPORCK+6~
OK	ORCHECK+4~, ORCHECK+7, ORCHECK+13, ORCHECK+20, ORCHECK+21, ORCHECK+22, ALLERGY+9*, ALLERGY+19, ALLERGY+20, ALLERGY+21
ORCPRS	DISPORD+81~, DISPORD+83, DISPORD+84, DISPORD+85*, DISPORD+86
ORIFN	DISPORD+81~, DISPORD+86*, ORCHECK+2
ORXT	XTRA+1~*, XTRA+2
ORY	DISPORD+81~, DISPORD+86*, ORCHECK+10, ORCHECK+14, ORCHECK+16, ORCHECK+20, ORCHECK+21, ORCHECK+23, ALLERGY+6, ALLERGY+10 , ALLERGY+12, ALLERGY+19, ALLERGY+20, ALLERGY+22, ALLERGY+24, ALLERGY+25, XTRA+3, XTRA+5, XTRA+6
>> PSBADA(	DISPORD+61, DISPORD+62
>> PSBADA(1	DISPORD+58
>> PSBADST	DISPORD+23, DISPORD+24, DISPORD+25
>> PSBCLORD	DISPORD+11
>> PSBDDA(	DISPORD+53, DISPORD+54, DISPORD+55, DISPORD+56
>> PSBDDA(1	DISPORD+50
>> PSBDOA	DISPORD+24
>> PSBDOSE	DISPORD+15
PSBGBL	EN+5~, EN+6, EN+7, EN+8, DISPORD+1~
>> PSBHAZDS	DISPORD+13
>> PSBHAZHN	DISPORD+13
PSBHDR	DISPORD+1~, DISPORD+8
PSBHDR(1	DISPORD+8*
>> PSBIFR	DISPORD+14
>> PSBISYR	DISPORD+25
>> PSBIVT	DISPORD+25
>> PSBMDX	DISPORD+26
>> PSBMR	DISPORD+18
>> PSBMRRFL	DISPORD+24
PSBOI	DISPORD+1~, DISPORD+3*, DISPORD+4, DISPORD+7
>> PSBOITX	DISPORD+12
>> PSBONX	DISPORD+9, DISPORD+10, DISPORD+14, DISPORD+15, DISPORD+16, DISPORD+20, DISPORD+23, DISPORD+24, DISPORD+25, DISPORD+30 , DISPORD+31, DISPORD+32, DISPORD+34, DISPORD+38, DISPORD+39, DISPORD+84, DISPORD+85, DSPRPH+22, DSPRPH+23, DSPRPH+25 , DSPRPH+30, DSPRPH+31
>> PSBOPRSP	DISPORD+24
>> PSBOSP	DISPORD+24
>> PSBOSPX	DISPORD+17
>> PSBOSTSX	DISPORD+17
>> PSBOSTX	DISPORD+16
PSBOVR	DISPORD+1~, DISPORD+37, DISPORD+42, DISPORD+43, DISPORD+44, DISPORD+45*, DISPORD+46
PSBPRV	DISPORD+1~, DISPORD+38, DISPORD+40, DISPORD+42, DISPORD+43
PSBPV	DISPORD+1~, DISPORD+40*, DISPORD+42, DISPORD+43, DISPORD+44
PSBRH	DISPORD+1~, DISPORD+41*, DISPORD+42, DISPORD+44, DISPORD+45
PSBRPH	DISPORD+1~, DISPORD+39, DISPORD+41, DISPORD+44, DISPORD+45
>> PSBRPT	DISPORD+3
>> PSBSCH	DISPORD+22
>> PSBSCHT	DISPORD+24
>> PSBSCHTX	DISPORD+19
>> PSBSM	DISPORD+21
>> PSBSMX	DISPORD+20, DISPORD+21
>> PSBSOLA(	DISPORD+66, DISPORD+67
>> PSBSOLA(1	DISPORD+63
PSJGLO	DISPORD+1~, DISPORD+5*, DISPORD+68, DISPORD+71, DISPORD+72, DISPORD+73, DISPORD+74, DISPORD+75, DISPORD+76, DISPORD+77 , DISPORD+91
QQ	DISPORD+31, DISPORD+32, DSPPRV+7~, DSPPRV+22, DSPPRV+23, DSPORCK+6~, DSPORCK+20*
RET	ALLERGY+1~, ALLERGY+2*, ALLERGY+15, ALLERGY+25
TMPONX	DSPPRV+7~, DSPPRV+21*, DSPPRV+22, DSPPRV+23, DSPPRV+27, DSPPRV+28, DSPPRV+29
U	DISPORD+34, DISPORD+54, DISPORD+55, DISPORD+56, DISPORD+62, DISPORD+67, DISPORD+68, DISPORD+71, DISPORD+72, DISPORD+73 , DISPORD+75, DISPORD+76, ORCHECK+11, ORCHECK+13, ORCHECK+20, ORCHECK+21, ORCHECK+22, ALLERGY+7, ALLERGY+9, ALLERGY+19 , ALLERGY+20, ALLERGY+21
WP	DSPRPH+7~, DSPRPH+29, DSPRPH+30, DSPRPH+31, DSPRPH+32
WPLIN	DSPRPH+7~, DSPRPH+29*
WPTAG	DSPRPH+7~, DSPRPH+29*
X	DISPORD+1~, DISPORD+54, DISPORD+55, DISPORD+56, DISPORD+57, ORCHECK+4~, ORCHECK+12, ORCHECK+14, ORCHECK+22, ALLERGY+8* , ALLERGY+10, ALLERGY+21, CDL~, CDL+1, XTRA+2, XTRA+3, XTRA+6*, USER~, USER+2
X0	ORCHECK+4~, ORCHECK+11, ORCHECK+13, ALLERGY+7, ALLERGY+9
XX	DSPPRV+7~, DSPPRV+23, DSPPRV+24, DSPPRV+29, DSPPRV+30, DSPRPH+7~, DSPRPH+25*, DSPRPH+26
Y	DISPORD+1~, DISPORD+53, DISPORD+54, DISPORD+55, DISPORD+56, DISPORD+61, DISPORD+62, DISPORD+66, DISPORD+67, CDL+1~ , CDL+2, CDL+3, USER+1~, USER+2, USER+3*, USER+4
Z	USER+1~, USER+2*, USER+3

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBODO

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: