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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSBOSF

Package: Barcode Medication Administration

Routine: PSBOSF


Information

PSBOSF ;BIRMINGHAM/EFC-UNABLE TO SCAN DETAIL REPORT ;26-Feb-2013 11:22;PLS

Source Information

Source file <PSBOSF.m>

Call Graph

Call Graph Total: 7

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  

Caller Graph

Caller Graph Total: 1

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

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All