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 |  All
Print Page as PDF
Routine: PSBOST

Package: Barcode Medication Administration

Routine: PSBOST


Information

PSBOST ;BIRMINGHAM/TEJ-UNABLE TO SCAN SUMMARY REPORT;Mar 2004 ; 29 Aug 2008 3:29 PM

Source Information

Source file <PSBOST.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 DD^%DT  NOW^%DTC  $$GET1^DIQ  
Barcode Medication Administration 1 LISTWD^PSBOSF  
Kernel 1 $$FMADD^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSBOSF  

Entry Points

Name Comments DBIA/ICR reference
PGTOT(X) ;Keep track of lines and PAGE Number...
EN ;BCMA UNABLE TO SCAN (Summary) REPORT
HDR ;Create Report Header
FACILITY ;Entire Facility Option
WRTRPT ;Actually "WRITE" the report to output device
NURLOC(X) ;Nursing Location Name
FTR ;Create Report Footer
WARDDIV(RESULTS,PSBINST) ; wards filtered by institution
NURSE ;Nurse Unit Option
WARD ;Ward Option
BLDRPT ;Assemble report body from accumilated totals

External References

Name Field # of Occurrence
DD^%DT EN+5, EN+6
NOW^%DTC EN+6
$$GET1^DIQ WARDDIV+6
LISTWD^PSBOSF WARD+2
$$FMADD^XLFDT FACILITY+2, NURSE+2, WARD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"BCMA UNABLE TO SCAN (Summary)"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?PSBPGRM,PSBPG
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !!,"Date/Time: "_PSBDTTM,!,"Report Date Range: Start Date: "_Y1_" Stop Date: "_Y2
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,"Division: ",$P($G(^DIC(4,DUZ("2"),0)),U,1)
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: " Nurse Location: "
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: $$NURLOC(PSBNULO)
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: $$NURLOC(PSBSTWD)
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: !!,?5,"This is a summary report of BCMA Unable to Scan Events that have occurred within the given date range."
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: !!,"Note: * Access to BCMA Unable to Scan Reports is RESTRICTED. *"
  • Line Location: HDR+14
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","="),!!
  • Line Location: HDR+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: FTR+1
Function Call: WRITE
  • Prompt: !!,$TR($J("",IOM)," ","="),!
  • Line Location: FTR+2
Function Call: WRITE
  • Prompt: !,PSBDTTM,!,"BCMA UNABLE TO SCAN (Summary)"
  • Line Location: FTR+3
Function Call: WRITE
  • Prompt: ?PSBPGRM,PSBPG,!
  • Line Location: FTR+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42 - [#42] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] HDR+8
^NURSF(211.4 - [#211.4] NURLOC+3, WARDDIV+2, WARDDIV+3, WARDDIV+4, WARDDIV+5
^PSB(53.77 - [#53.77] FACILITY+2, FACILITY+3, FACILITY+4, FACILITY+6, NURSE+2, NURSE+3, NURSE+4, NURSE+6, WARD+3, WARD+4
, WARD+5, WARD+7
^SC - [#44] NURLOC+5, WARDDIV+3
^XUSEC("PSB UNABLE TO SCAN" BLDRPT+1

Label References

Name Line Occurrences
$$NURLOC HDR+10, HDR+11
$$PGTOT BLDRPT+8, BLDRPT+9, BLDRPT+10, BLDRPT+11, BLDRPT+12, BLDRPT+13, BLDRPT+14, BLDRPT+15, BLDRPT+16, BLDRPT+17
, BLDRPT+18, BLDRPT+19, BLDRPT+20, BLDRPT+21, BLDRPT+22, BLDRPT+23, BLDRPT+24, BLDRPT+25
BLDRPT FACILITY+21, NURSE+39, NURSE+40, WARD+22
FACILITY EN+9
FTR WRTRPT+4, WRTRPT+9, WRTRPT+12
HDR WRTRPT+2, WRTRPT+7, WRTRPT+9
NURSE EN+10
WARD EN+11
WARDDIV FACILITY+1, NURSE+1
WRTRPT FACILITY+22, NURSE+41, WARD+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+6, EN+12!
DUZ BLDRPT+1
DUZ("2" HDR+8
DUZ(2 FACILITY+1, NURSE+1, HDR+5
IOF HDR+1
IOM HDR+4, HDR+15, FTR+2
IOSL FTR+1, PGTOT+5
NEWPAGE EN+8*, EN+12!, BLDRPT+7*, PGTOT+5*
PSB05 EN+1~, FACILITY+6*, FACILITY+7, FACILITY+8, FACILITY+9, FACILITY+10, FACILITY+11, FACILITY+12, FACILITY+13, NURSE+6*
, NURSE+10, NURSE+11, NURSE+12, NURSE+13, NURSE+14, NURSE+15, NURSE+16, WARD+7*, WARD+8, WARD+9
, WARD+10, WARD+11, WARD+12, WARD+13, WARD+14
PSBDTSP EN+4*, EN+5, EN+12!, FACILITY+2, NURSE+2, WARD+3
PSBDTST EN+3*, EN+5, EN+12!, FACILITY+2, NURSE+2, WARD+3
PSBDTTM EN+6*, EN+12!, HDR+7, FTR+3
PSBIEN WARDDIV+1~, WARDDIV+2*, WARDDIV+3, WARDDIV+4, WARDDIV+5, WARDDIV+6
PSBINST WARDDIV~, WARDDIV+3
PSBLIST EN+7*, EN+12!
PSBLNTOT EN+8*, EN+12!, BLDRPT+8, BLDRPT+9, BLDRPT+10, BLDRPT+11, BLDRPT+12, BLDRPT+13, BLDRPT+14, BLDRPT+15
, BLDRPT+16, BLDRPT+17, BLDRPT+18, BLDRPT+19, BLDRPT+20, BLDRPT+21, BLDRPT+22, BLDRPT+23, BLDRPT+24, BLDRPT+25
, PGTOT+1*, PGTOT+2*, PGTOT+3*, PGTOT+4, PGTOT+5*
PSBMBYPS EN+12!, FACILITY+19*, NURSE+38*, WARD+20*, BLDRPT+20
PSBMORE EN+8*, EN+12!, PGTOT+3*, PGTOT+4*, PGTOT+5*
PSBNU EN+1~
PSBNU( NURSE+10*, NURSE+11*, NURSE+12*, NURSE+13*, NURSE+14*, NURSE+15*, NURSE+16*, NURSE+17, NURSE+18*, NURSE+19*
, NURSE+20*, NURSE+21*, NURSE+22*, NURSE+23*, NURSE+24*, NURSE+25, NURSE+26, NURSE+27, NURSE+28, NURSE+29
, NURSE+30, NURSE+31, NURSE+32, NURSE+33, NURSE+34, NURSE+35, NURSE+36, NURSE+37, NURSE+38
PSBNULO EN+1~, NURSE+8*, NURSE+9*, NURSE+10, NURSE+11, NURSE+12, NURSE+13, NURSE+14, NURSE+15, NURSE+16
, NURSE+17*, NURSE+18, NURSE+19, NURSE+20, NURSE+21, NURSE+22, NURSE+23, NURSE+24, NURSE+25, NURSE+26
, NURSE+27, NURSE+28, NURSE+29, NURSE+30, NURSE+31, NURSE+32, NURSE+33, NURSE+34, NURSE+35, NURSE+36
, NURSE+37, NURSE+38, BLDRPT+26, WRTRPT+6*, WRTRPT+9*, HDR+10
PSBNURLC NURLOC+2~, NURLOC+3*, NURLOC+4, NURLOC+5*, NURLOC+6
PSBOUTP EN+2!, EN+13!
PSBOUTP( BLDRPT+8*, BLDRPT+9*, BLDRPT+10*, BLDRPT+11*, BLDRPT+12*, BLDRPT+13*, BLDRPT+14*, BLDRPT+15*, BLDRPT+16*, BLDRPT+17*
, BLDRPT+18*, BLDRPT+19*, BLDRPT+20*, BLDRPT+21*, BLDRPT+22*, BLDRPT+23*, BLDRPT+24*, BLDRPT+25*, BLDRPT+26*, WRTRPT+3
, WRTRPT+6, WRTRPT+8, WRTRPT+9, WRTRPT+10, WRTRPT+11
PSBOUTP("" WRTRPT+1, WRTRPT+3, HDR+3
PSBOUTP(0 BLDRPT+3*, BLDRPT+6*
PSBPG EN+12!, HDR+3*, HDR+4, HDR+6, FTR+4
PSBPGNUM EN+8*, EN+12!, BLDRPT+2*, BLDRPT+5*, BLDRPT+26, WRTRPT+5*, WRTRPT+6, WRTRPT+9*, HDR+3, PGTOT+3
, PGTOT+5*, PGTOT+6
PSBPGRM EN+12!, HDR+4*, HDR+6, FTR+4
PSBRPT EN+12!
PSBRPT( EN+3, EN+4, WARD+1
PSBRPT(0 HDR+5*
PSBRPT(3 EN+9, EN+10, EN+11, BLDRPT+26, WRTRPT+6
PSBSEL EN+1~
PSBSTWD EN+12!, WARD+1*, WARD+2, WARD+6, HDR+11
PSBTM EN+8*, EN+12!, FACILITY+10*, FACILITY+16, NURSE+28*, WARD+11*, WARD+17, BLDRPT+19
PSBTMEVT EN+8*, EN+13!, FACILITY+16*, FACILITY+18, NURSE+34*, WARD+17*, WARD+19, BLDRPT+19, BLDRPT+20, BLDRPT+21
, BLDRPT+22, BLDRPT+23, BLDRPT+25
PSBTMKEY EN+8*, EN+13!, FACILITY+8*, FACILITY+14, FACILITY+19, NURSE+26*, WARD+9*, WARD+15, WARD+20, BLDRPT+21
PSBTMMME EN+8*, EN+13!, FACILITY+9*, FACILITY+14, FACILITY+19, NURSE+27*, WARD+10*, WARD+15, WARD+20, BLDRPT+23
PSBTMSF EN+8*, EN+13!, FACILITY+14*, FACILITY+16, NURSE+33*, WARD+15*, WARD+17
PSBTMUAS EN+8*, EN+13!, FACILITY+7*, FACILITY+14, FACILITY+19, NURSE+25*, WARD+8*, WARD+15, WARD+20, BLDRPT+22
PSBTSCAN EN+13!, FACILITY+18*, NURSE+36*, NURSE+40, WARD+19*, BLDRPT+4
PSBTW EN+8*, EN+13!, FACILITY+13*, FACILITY+17, NURSE+31*, WARD+14*, WARD+18, BLDRPT+10
PSBTWEVT EN+8*, EN+13!, FACILITY+17*, FACILITY+18, NURSE+35*, WARD+18*, WARD+19, BLDRPT+10, BLDRPT+11, BLDRPT+12
, BLDRPT+13, BLDRPT+15
PSBTWKEY EN+8*, EN+13!, FACILITY+12*, FACILITY+15, FACILITY+20, NURSE+30*, WARD+13*, WARD+16, WARD+21, BLDRPT+12
PSBTWSF EN+8*, EN+13!, FACILITY+15*, FACILITY+17, NURSE+32*, WARD+16*, WARD+18
PSBTWUAS EN+8*, EN+13!, FACILITY+11*, FACILITY+15, FACILITY+20, NURSE+29*, WARD+12*, WARD+16, WARD+21, BLDRPT+13
PSBWARD FACILITY+1, NURSE+1!
PSBWARD( FACILITY+5, NURSE+5, NURSE+9, WARD+6
PSBWBYPS EN+13!, FACILITY+20*, NURSE+37*, WARD+21*, BLDRPT+11
PSBWIEN WARDDIV+1~, WARDDIV+5*, WARDDIV+6
PSBWRD EN+14!, FACILITY+4*, FACILITY+5, NURSE+4*, NURSE+5, NURSE+8, NURSE+9, WARD+5*, WARD+6
PSBX WARDDIV+1~, WARDDIV+4*, WARDDIV+5
PSBX1 EN+14!, FACILITY+2*, FACILITY+3, NURSE+2*, NURSE+3, WARD+3*, WARD+4, WRTRPT+8*, WRTRPT+9, WRTRPT+10
, WRTRPT+11
PSBX2 EN+14!, FACILITY+3*, FACILITY+4, FACILITY+6, NURSE+3*, NURSE+4, NURSE+6, WARD+4*, WARD+5, WARD+7
, WRTRPT+10*, WRTRPT+11
RESULTS WARDDIV~
RESULTS( WARDDIV+6*
U EN+3, EN+4, FACILITY+4, FACILITY+6, NURSE+4, NURSE+6, WARD+1, WARD+5, WARD+7, HDR+5
, HDR+8, WARDDIV+3
X PGTOT~, PGTOT+1, PGTOT+2, NURLOC~, NURLOC+1, NURLOC+3
Y EN+5*, EN+6*, EN+14!
Y1 EN+5*, EN+14!, HDR+7
Y2 EN+5*, EN+14!, HDR+7
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 |  All