Routine: PSBOSF

Package	Total	Call Graph
VA Fileman	3	DD^%DT NOW^%DTC $$GET1^DIQ
Barcode Medication Administration	2	$$WRAP^PSBO WARDDIV^PSBOST
Kernel	1	$$FMADD^XLFDT
Registration	1	(DEM,PID)^VADPT

Package	Total	Caller Graph
Barcode Medication Administration	1	PSBOST

Entry Points

Name	Comments	DBIA/ICR reference
SORT
PGTOT(X)	; Track PAGE Number.
LISTWD	; List wards & nursing locations.
EN	; UTS Report Entry Point - Report OPTION used by PSB UNABLE TO SCAN (UTS) key holders.
SFHD80B	;;\|NAME (PID)\| of UTS \| WARD/RmBd\| TYPE \| (ID#) \| NAME \| UTS \|
HDR	; Write the report header.
SFHD80A	;;\|PATIENT'S \|DATE/TIME\| LOCATION \| \| DRUG \| USER'S \| REASON \|
FORMDAT(FLD)	; Format the data.
WRTRPT	; Write the report.
SF132BLK	;; \| \| \| \| \| \| \|
NURLOC(X)	; Nursing Location Name.
CREATHDR	; Create report header.
SFHD132A	;;\| PATIENT'S NAME \| DATE/TIME \| LOCATION \| \| DRUG \| \| REASON \|
FTR	; Write the report footer.
CONSTR
WRAPPER(X,Y,Z)	; Wrap text line.
SFHD132B	;;\| (PID) \| of UTS \| WARD/RmBd \| TYPE \| (ID#) \| USER'S NAME \| UTS \|
BUILDLN	; Construct records
BLDRPT	; Compile the report.
SF80BLK	;; \| \| \| \| \| \| \|

External References

Name	Field # of Occurrence
DD^%DT	EN+13, EN+32, BLDRPT+22
NOW^%DTC	EN+13
$$GET1^DIQ	BLDRPT+22, BLDRPT+26, BLDRPT+29, BLDRPT+36, BLDRPT+37, BLDRPT+38, BLDRPT+42, BLDRPT+45, CONSTR+2
$$WRAP^PSBO	HDR+23, FTR+3
WARDDIV^PSBOST	EN+6
DEM^VADPT	BLDRPT+16
PID^VADPT	BLDRPT+16
$$FMADD^XLFDT	EN+17

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"BCMA UNABLE TO SCAN (Detailed)" Line Location: HDR+7
Function Call: WRITE	Prompt: ?PSBPGRM,PSBPG Line Location: HDR+7
Function Call: WRITE	Prompt: !!,"Date/Time: "_PSBDTTM,!,"Report Date Range: Start Date: "_Y1_" Stop Date: "_Y2 Line Location: HDR+8
Function Call: WRITE	Prompt: !,"Type of Scanning Failure: ",$S(+$P($G(PSBRPT(3)),",",1)=0:"All",+$P($G(PSBRPT(3)),",",1)=1:"Medication",1:"Wristband") Line Location: HDR+9
Function Call: WRITE	Prompt: !,"Reason: " Line Location: HDR+10
Function Call: WRITE	Prompt: "All Reasons" Line Location: HDR+11
Function Call: WRITE	Prompt: "Damaged Medication Label" Line Location: HDR+12
Function Call: WRITE	Prompt: "Damaged Wristband" Line Location: HDR+13
Function Call: WRITE	Prompt: "No Bar Code" Line Location: HDR+14
Function Call: WRITE	Prompt: "Scanning Equipment Failure" Line Location: HDR+15
Function Call: WRITE	Prompt: "Unable to Determine" Line Location: HDR+16
Function Call: WRITE	Prompt: "Dose Discrepancy" Line Location: HDR+17
Function Call: WRITE	Prompt: !,"Division: ",$P($G(^DIC(4,DUZ("2"),0)),U,1) Line Location: HDR+18
Function Call: WRITE	Prompt: " Nurse Location: " Line Location: HDR+19
Function Call: WRITE	Prompt: $$NURLOC(PSBSTWD) Line Location: HDR+20
Function Call: WRITE	Prompt: !,"Sorted By: "_PSBHDR,?(PSBTAB7-($L("Total BCMA Unable to Scan events: "_+PSBTOT))),"Total BCMA Unable to Scan events: "_+PSBTOT Line Location: HDR+22
Function Call: WRITE	Prompt: !!,$$WRAP^PSBO(5,PSBTAB7-5,"This is a report of documented BCMA ""Unable to Scan"" events within the given date range.") Line Location: HDR+23
Function Call: WRITE	Prompt: !!,$TR($J("",PSBTAB7)," ","_") Line Location: HDR+24
Function Call: WRITE	Prompt: !,PSBSFHD1 Line Location: HDR+25
Function Call: WRITE	Prompt: !,PSBSFHD2 Line Location: HDR+26
Function Call: WRITE	Prompt: !,$TR($J("",PSBTAB7)," ","="),! Line Location: HDR+27
Function Call: WRITE	Prompt: ! Line Location: FTR+1
Function Call: WRITE	Prompt: !,$TR($J("",PSBTAB7)," ","=") Line Location: FTR+2
Function Call: WRITE	Prompt: $$WRAP^PSBO(5,PSBTAB7-5,"Note: IV orders will display the orderable item associated with that IV Order in the Drug column."),! Line Location: FTR+3
Function Call: WRITE	Prompt: !,PSBDTTM,!,"BCMA UNABLE TO SCAN (Detailed)" Line Location: FTR+4
Function Call: WRITE	Prompt: ?PSBPGRM,PSBPG,! Line Location: FTR+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PSB(53.77 - [#53.77]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	HDR+18
^DIC(42 - [#42]	LISTWD+4, LISTWD+5
^NURSF(211.4 - [#211.4]	LISTWD+3, LISTWD+4, LISTWD+5, NURLOC+1
^PSB(53.77 - [#53.77]	EN+19, EN+20, EN+22, EN+25, EN+26, EN+31, BLDRPT+14, BLDRPT+15, BLDRPT+35, BLDRPT+36 , SORT+35
^SC - [#44]	NURLOC+2
^XTMP("PSBO"	EN+15!, SORT+25!, WRTRPT+13!
^XUSEC("PSB UNABLE TO SCAN"	BLDRPT+3

Label References

Name	Line Occurrences
$$NURLOC	HDR+20
$$PGTOT	CONSTR+6, CONSTR+9, CONSTR+13, CONSTR+14, CONSTR+15, CONSTR+16, CONSTR+17
$$WRAPPER	FORMDAT+3
BLDRPT	EN+41
BUILDLN	CONSTR+5
CONSTR	SORT+37
CREATHDR	BLDRPT+1, HDR+6
FORMDAT	BUILDLN+1
FTR	WRTRPT+5, WRTRPT+9, WRTRPT+12
HDR	WRTRPT+3, WRTRPT+7, WRTRPT+9
LISTWD	EN+5
SF132BLK	CREATHDR+2
SF80BLK	CREATHDR+3
SFHD132A	CREATHDR+2
SFHD132B	CREATHDR+2
SFHD80A	CREATHDR+3
SFHD80B	CREATHDR+3
WRTRPT	EN+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+13, EN+46!
DFN	BLDRPT+15~*
DUZ	BLDRPT+3
DUZ("2"	HDR+18
DUZ("AG"	BLDRPT+19
DUZ(2	EN+6, HDR+5
FLD	FORMDAT~, FORMDAT+1, FORMDAT+2, FORMDAT+4, FORMDAT+5, FORMDAT+6, FORMDAT+7, FORMDAT+8, FORMDAT+9, FORMDAT+12 , FORMDAT+13, FORMDAT+15, FORMDAT+16, FORMDAT+17, FORMDAT+18, FORMDAT+19, FORMDAT+20, FORMDAT+21, FORMDAT+22, FORMDAT+24 , FORMDAT+25
I	EN+2~, CONSTR+7*, CONSTR+8, CONSTR+9
IOF	HDR+2
IOM	FORMDAT+2, CREATHDR+2, CREATHDR+3
IOSL	FTR+1, PGTOT+5
J	EN+2~, CONSTR+8, BUILDLN+1!, FORMDAT+1, WRAPPER+1, WRAPPER+3, WRAPPER+5, WRAPPER+6
LN	BUILDLN+1!
LN(	BUILDLN+1*
O	EN+46!, FORMDAT+3*
PSB	WRAPPER+1~, WRAPPER+4, WRAPPER+5, WRAPPER+6
PSBBLANK	EN+46!, CONSTR+1, CREATHDR+2, CREATHDR+3
PSBCMNT0	EN+2~, EN+49!, SORT+36*, CONSTR+13
PSBCMNT1	SORT+32!, SORT+37, SORT+50, SORT+53, SORT+55, SORT+56, SORT+57, CONSTR+10, CONSTR+14, CONSTR+22!
PSBCMNT2	SORT+32!, SORT+54, SORT+56, CONSTR+11*, CONSTR+15, CONSTR+22!
PSBCMNT3	SORT+32!, CONSTR+12*, CONSTR+16, CONSTR+22!
PSBCMNTX	EN+2~, SORT+35, SORT+37, SORT+40, SORT+43, SORT+49, SORT+50, SORT+62, SORT+65, SORT+67
PSBCMTLN	EN+2~, SORT+43*
PSBCRLF	EN+2~, SORT+49, SORT+53, SORT+58, SORT+65, SORT+66
PSBDATA	BLDRPT+11!, SORT+24, CONSTR+4!*
PSBDATA(	BLDRPT+39*, SORT+22, FORMDAT+1
PSBDATA(0	BLDRPT+54*
PSBDATA(1	BLDRPT+19*
PSBDATA(2	BLDRPT+23*
PSBDATA(3	BLDRPT+26*
PSBDATA(4	BLDRPT+29, BLDRPT+30, BLDRPT+31, BLDRPT+36, BLDRPT+38*
PSBDATA(5	BLDRPT+34, BLDRPT+35, BLDRPT+36, BLDRPT+38, BLDRPT+39*
PSBDATA(6	BLDRPT+42*
PSBDATA(7	BLDRPT+45*, BLDRPT+46, BLDRPT+47, BLDRPT+48, BLDRPT+49, BLDRPT+50, BLDRPT+51
PSBDSCN	EN+1~, SORT+18, SORT+19, SORT+21
PSBDTSP	EN+9*, EN+19, EN+32, EN+46!
PSBDTST	EN+8*, EN+17, EN+32, EN+46!
PSBDTTM	EN+13*, EN+46!, HDR+8, FTR+4
PSBFLD	EN+47!, BUILDLN+1*
PSBHDR	EN+1~, EN+35, EN+36, EN+37, EN+39, HDR+1*, HDR+22
PSBI	EN+2~, BLDRPT+35, SORT+55, SORT+56, SORT+57, SORT+65, SORT+67, FORMDAT+5, FORMDAT+7, FORMDAT+12 , FORMDAT+15, FORMDAT+21, FORMDAT+24, CREATHDR+6
PSBIEN	EN+1~, BLDRPT+54*, SORT+24
PSBINDAT	EN+2~, BLDRPT+22*, SORT+19, SORT+20
PSBLIST	EN+15!, BLDRPT+7, SORT+25!
PSBLIST(	EN+25, EN+31*, BLDRPT+11
PSBLNO	EN+47!, SORT+65, SORT+66, SORT+69, SORT+70
PSBLNTOT	EN+16, EN+47!, CONSTR+6, CONSTR+9, CONSTR+13, CONSTR+14, CONSTR+15, CONSTR+16, CONSTR+17, PGTOT+1 , PGTOT+2, PGTOT+3, PGTOT+4, PGTOT+5
PSBLOOP	LISTWD+2~, LISTWD+3, LISTWD+4, LISTWD+5
PSBMORE	EN+47!, PGTOT+2, PGTOT+3, PGTOT+4, PGTOT+5*
PSBMRG	EN+2~, SORT+17, SORT+23, SORT+24, SORT+28, SORT+31, SORT+32, CONSTR+4, CONSTR+20
PSBMRGST	EN+1~
PSBNDENT	EN+2~, SORT+35*, SORT+54, SORT+66, SORT+70
PSBNULC	NURLOC+1~, NURLOC+2, NURLOC+3
PSBOUTP	BLDRPT+1!, WRTRPT+13!
PSBOUTP(	CONSTR+6, CONSTR+9, CONSTR+13, CONSTR+14, CONSTR+15, CONSTR+16, CONSTR+17*, WRTRPT+4, WRTRPT+8, WRTRPT+10 , WRTRPT+11
PSBOUTP(""	WRTRPT+1, WRTRPT+4, HDR+3
PSBOUTP(0	EN+42, BLDRPT+4, BLDRPT+6, BLDRPT+8, WRTRPT+2*
PSBPG	EN+48!, HDR+3*, HDR+4, HDR+7, FTR+5
PSBPGNUM	EN+16, EN+48!, BLDRPT+1, BLDRPT+2, WRTRPT+6, WRTRPT+9, HDR+3, PGTOT+2, PGTOT+5, PGTOT+6
PSBPGRM	EN+48!, HDR+4*, HDR+7, FTR+5
PSBRPLN	SORT+32!, CONSTR+22!
PSBRPLN(	CONSTR+7, CONSTR+8, CONSTR+9, WRAPPER+3, WRAPPER+5*
PSBRPLN(1	FORMDAT+6, FORMDAT+20
PSBRPLN(2	FORMDAT+8, FORMDAT+22
PSBRPLN(3	FORMDAT+16, FORMDAT+25
PSBRPT	EN+48!
PSBRPT(	EN+5, EN+8, EN+9, EN+12
PSBRPT(0	HDR+5*
PSBRPT(3	BLDRPT+30, BLDRPT+31, BLDRPT+46, BLDRPT+47, BLDRPT+48, BLDRPT+49, BLDRPT+50, BLDRPT+51, HDR+9, HDR+11 , HDR+12, HDR+13, HDR+14, HDR+15, HDR+16, HDR+17
PSBSCTYP	EN+22~*, EN+24
PSBSFCMT	EN+48!, SORT+35*
PSBSFHD1	BLDRPT+5, HDR+25, CREATHDR+1!, CREATHDR+2, CREATHDR+3, CREATHDR+4, CREATHDR+6
PSBSFHD2	EN+48!, HDR+26, CREATHDR+2, CREATHDR+3
PSBSRTBY	EN+3!, EN+12*, EN+35, EN+36, EN+37, EN+48!, SORT+12, SORT+18
PSBSRTNM	EN+48!, SORT+12*, SORT+18, SORT+20, SORT+32, CONSTR+4, CONSTR+20
PSBSTWD	EN+3!, EN+5*, EN+29, EN+30, EN+49!, HDR+20, LISTWD+1, LISTWD+3, LISTWD+4, LISTWD+5
PSBTAB0	EN+49!, CREATHDR+6*
PSBTAB4	EN+49!, CONSTR+3
PSBTAB7	EN+49!, SORT+36, SORT+43, SORT+53, SORT+55, SORT+62, SORT+69, CONSTR+10, CONSTR+11, CONSTR+12 , HDR+4, HDR+22, HDR+23, HDR+24, HDR+27, FTR+2, FTR+3, CREATHDR+4*
PSBTOT	EN+1~, EN+16, EN+42, SORT+25, HDR+22
PSBTOT1	EN+49!, BLDRPT+2, CONSTR+1
PSBTOTX	EN+49!, CONSTR+1, CONSTR+3, CONSTR+6
PSBVAL	EN+49!, FORMDAT+1, FORMDAT+2, FORMDAT+4, FORMDAT+5, FORMDAT+6, FORMDAT+9, FORMDAT+10, FORMDAT+11
PSBVAL(0	FORMDAT+1, FORMDAT+2, FORMDAT+7, FORMDAT+8, FORMDAT+23, FORMDAT+24*, FORMDAT+25
PSBVAL1	EN+50!, FORMDAT+10, FORMDAT+11, FORMDAT+12, FORMDAT+17, FORMDAT+18, FORMDAT+19, FORMDAT+20
PSBVAL2	EN+50!, FORMDAT+10, FORMDAT+11, FORMDAT+13, FORMDAT+14, FORMDAT+18, FORMDAT+21*, FORMDAT+22
PSBVAL3	EN+50!, FORMDAT+14, FORMDAT+15, FORMDAT+16
PSBWARD	EN+5!, EN+50!, LISTWD+1!
PSBWARD(	EN+29, EN+30, LISTWD+4, LISTWD+5
PSBWDDV	EN+6!
PSBWDDV(	EN+28
PSBWRD	EN+26*, EN+28, EN+30, EN+50!
PSBX	EN+2~, SORT+49, SORT+50, SORT+67, SORT+69, SORT+70
PSBX1	EN+1~, EN+16, EN+17, EN+19, EN+20, SORT+17, SORT+18, SORT+19, SORT+22, SORT+32 , SORT+35, CONSTR+2, WRTRPT+8*, WRTRPT+9, WRTRPT+10, WRTRPT+11
PSBX2	EN+1~, EN+20, EN+22, EN+25, EN+26, EN+31, SORT+17, SORT+19, SORT+20, SORT+21* , SORT+22, SORT+23, WRTRPT+10, WRTRPT+11
PSBX3	EN+1~, BLDRPT+1, BLDRPT+11, BLDRPT+14, BLDRPT+15, BLDRPT+22, BLDRPT+26, BLDRPT+29, BLDRPT+35, BLDRPT+36 , BLDRPT+37, BLDRPT+38, BLDRPT+42, BLDRPT+45, BLDRPT+54
PSBXORX	EN+50!, CONSTR+2, CONSTR+3
U	EN+5, EN+8, EN+9, EN+22, EN+26, BLDRPT+14, BLDRPT+15, BLDRPT+35, BLDRPT+36, HDR+5 , HDR+18, LISTWD+4, LISTWD+5, NURLOC+2
VA	BLDRPT+15~
VA("PID"	BLDRPT+19
VADM	BLDRPT+15~
VADM(1	BLDRPT+19
X	EN+34, EN+35, EN+36, EN+37, SORT+12, SORT+18*, SORT+20, PGTOT~, PGTOT+1, WRAPPER~ , WRAPPER+3, WRAPPER+5, NURLOC~, NURLOC+1
XX	EN+50!, FORMDAT+2*, FORMDAT+3
Y	EN+13, EN+32, BLDRPT+22*, BLDRPT+23, WRAPPER~, WRAPPER+3, WRAPPER+4, WRAPPER+5
Y1	EN+32*, EN+50!, HDR+8
Y2	EN+32*, EN+50!, HDR+8
YY	EN+50!, FORMDAT+2*, FORMDAT+3
Z	WRAPPER~, WRAPPER+2, WRAPPER+3, WRAPPER+4, WRAPPER+5, WRAPPER+6
ZZ	EN+50!, FORMDAT+2*, FORMDAT+3

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBOSF

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(SF132BLK	CREATHDR+2
$T(SF80BLK	CREATHDR+3
$T(SFHD132A	CREATHDR+2
$T(SFHD132B	CREATHDR+2
$T(SFHD80A	CREATHDR+3
$T(SFHD80B	CREATHDR+3