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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSBORT

Package: Barcode Medication Administration

Routine: PSBORT


Information

PSBORT ;AITC/CR - REPORT FOR RESPIRATORY THERAPY MEDS ;11/29/18 5:54am

Source Information

Source file <PSBORT.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Barcode Medication Administration 3 WARD^PSBOHDR1  ($$GETADMIN,$$GETFREQ,$$OKAY)^PSBVDLU1  (CLEAN,PSJ)^PSBVT  
Inpatient Medications 2 EN^PSJBCMA  EN^PSJBCMA2  
VA FileMan 2 NOW^%DTC  $$GET1^DIQ  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSBMMRB  

Entry Points

Name Comments DBIA/ICR reference
EN ; called from DQ^PSBO
UDONE ;
EN1 ; expects DFN,PSBSTRT,PSBSTOP from EN
PRINT ; print meds stored in ^TMP("PSB",$J,DFN,....
WRDHDR() ; ward header
UDCONT ;

External References

Name Field # of Occurrence
NOW^%DTC EN1+68
$$GET1^DIQ EN1+11
WARD^PSBOHDR1 WRDHDR+1
$$GETADMIN^PSBVDLU1 EN1+33
$$GETFREQ^PSBVDLU1 EN1+23
$$OKAY^PSBVDLU1 EN1+39
CLEAN^PSBVT EN1+8
PSJ^PSBVT EN1+9
EN^PSJBCMA EN1+3
EN^PSJBCMA2 EN1+40, EN1+73
$$FMTE^XLFDT EN1+52, EN1+53, EN1+76, EN1+77, EN1+78, EN1+79, PRINT+4, PRINT+34

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Medications Found"
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: $$WRDHDR()
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: !,"Ord Num",?10,"Room-Bed",?30,"Patient",?74,"Admin Date/Time",?90,"Medication"
  • Line Location: WRDHDR+2
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: WRDHDR+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PS(50.7 - [#50.7] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PRINT+11, PRINT+12, PRINT+27, PRINT+28
^PSB(53.79 - [#53.79] EN1+48, EN1+49, EN1+64, EN1+65, EN1+66
^TMP("PSB" EN+2!, EN+8!, EN1+34!*, EN1+41, EN1+50*, EN1+52*, EN1+53*, EN1+80*, PRINT+8, PRINT+10
, PRINT+13*, PRINT+15, PRINT+16, PRINT+19, PRINT+22, PRINT+24, PRINT+30, PRINT+31, PRINT+32
^TMP("PSB1" EN+2!, EN1+54!, EN1+73!, EN1+81!, UDCONT+2!, UDCONT+4*, UDCONT+5*, UDCONT+6, UDCONT+7, UDCONT+8
, UDCONT+9, UDCONT+10, UDCONT+11, UDONE+3*, UDONE+4*, UDONE+5, UDONE+6, UDONE+7, UDONE+8, UDONE+9
, UDONE+10, UDONE+11, UDONE+13, UDONE+14!
^TMP("PSBO" EN+6, EN+8!
^TMP("PSJ" EN+2!, EN+8!, EN1+2!, EN1+4, EN1+6, EN1+7, EN1+39
^TMP("PSJ2" EN1+40!, EN1+73!, EN1+74

Label References

Name Line Occurrences
$$WRDHDR PRINT+7
EN1 EN+6
PRINT EN+7
UDCONT EN1+51
UDONE EN1+75

Naked Globals

Name Field # of Occurrence
^( PRINT+11
^(0 PRINT+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+70
DFN EN+1~, EN+6*, EN1+3, EN1+23, EN1+33, EN1+40, EN1+48, EN1+49, EN1+50, EN1+52
, EN1+53, EN1+64, EN1+65, EN1+73, EN1+80, PRINT+1~, PRINT+10*, PRINT+11, PRINT+12, PRINT+13
, PRINT+16*, PRINT+19, PRINT+22, PRINT+24, PRINT+27, PRINT+28, PRINT+30, PRINT+31, PRINT+32, UDCONT+4
, UDCONT+5, UDCONT+6, UDCONT+7, UDCONT+8, UDCONT+9, UDCONT+10, UDCONT+11, UDONE+3, UDONE+4, UDONE+5
, UDONE+6, UDONE+7, UDONE+8, UDONE+9, UDONE+10, UDONE+11, UDONE+13
>> FLAGPRT( PRINT+6, PRINT+35*
>> I EN1+20*, EN1+22*, UDCONT+3*, UDCONT+4, UDCONT+5, UDONE+2*, UDONE+3, UDONE+4
IOM WRDHDR+3
IOST PRINT+36
>> J UDCONT+1*, UDCONT+4, UDCONT+5*, UDCONT+7*, UDCONT+8, UDCONT+9, UDCONT+10, UDCONT+11, UDONE+1*, UDONE+3
, UDONE+4*, UDONE+6*, UDONE+7, UDONE+8, UDONE+9, UDONE+10, UDONE+11, UDONE+13
>> PSBADST EN1+21, EN1+25, EN1+27, EN1+33*, EN1+34, EN1+36, EN1+37, EN1+41*, EN1+42, EN1+43
>> PSBCADM EN1+32*, EN1+33*
>> PSBCHEMT EN1+15, EN1+16
PSBCNT EN+1~, EN1+81!, UDCONT+14!, UDONE+14!
PSBDFN EN1+1~
>> PSBDOW EN1+20*
PSBDT EN1+1~, EN1+43*, EN1+44, EN1+45, EN1+46, EN1+47, EN1+48, EN1+49, EN1+50, EN1+52
, EN1+53, PRINT+1~, PRINT+18*, PRINT+19*, PRINT+22, PRINT+24, PRINT+29, PRINT+30, PRINT+31, PRINT+32
, PRINT+34, UDCONT+12, UDCONT+13
PSBEVDT EN1+1~, EN1+2*, EN1+33
PSBFLAG EN+1~, EN1+52, EN1+53, EN1+76, EN1+77, UDCONT+1*, UDCONT+7, UDCONT+12*, UDCONT+13*, UDONE+1*
, UDONE+6, UDONE+11*, UDONE+12*, UDONE+13*
>> PSBFREQ EN1+23*, EN1+24, EN1+25, EN1+26, EN1+33, EN1+39
PSBGBL EN1+1~
>> PSBGVN EN1+63*, EN1+66*, EN1+71
PSBHDDT EN1+52, EN1+53, EN1+54!, EN1+76, EN1+77, EN1+81!, UDCONT+8*, UDCONT+12, UDCONT+13, UDONE+7*
PSBHDR EN1+1~, PRINT+1~, WRDHDR+1
PSBHDR(1 PRINT+4*
>> PSBHDST UDCONT+9*, UDCONT+12, UDCONT+13, UDONE+8*, UDONE+11, UDONE+12, UDONE+13
PSBHOUR EN1+1~
>> PSBINDX EN1+49*, PRINT+11*, PRINT+12*, PRINT+13, PRINT+14*, PRINT+15*, PRINT+16
>> PSBISYR EN1+14, EN1+15
>> PSBIVT EN1+12, EN1+13, EN1+14, EN1+15, EN1+16
>> PSBNGF EN1+29, EN1+57
PSBOACTL EN1+40!*, EN1+73!, EN1+74*, EN1+82!
PSBOACTL( UDCONT+4, UDCONT+5, UDONE+3, UDONE+4
PSBOACTL(0 UDCONT+3, UDCONT+6, UDONE+2, UDONE+5
PSBODATE EN+1~, EN+5*, EN1+39
>> PSBODD EN1+19*, EN1+26*, EN1+27
>> PSBOFDT UDCONT+10*, UDCONT+12, UDONE+9*, UDONE+11, UDONE+12
>> PSBOFST UDCONT+11*, UDCONT+12, UDCONT+13, UDONE+10*, UDONE+11, UDONE+12
>> PSBOIT EN1+11, EN1+64, EN1+65
PSBOITX EN1+50, EN1+52, EN1+53, EN1+80, PRINT+1~, PRINT+21*, PRINT+22*, PRINT+24, PRINT+30, PRINT+31
, PRINT+32, PRINT+34
PSBONX EN1+17, EN1+23, EN1+33, EN1+39, EN1+40, EN1+48, EN1+49, EN1+50, EN1+52, EN1+53
, EN1+66, EN1+73, EN1+80, PRINT+1~, PRINT+23*, PRINT+24*, PRINT+26, PRINT+30, PRINT+31, PRINT+32
>> PSBOSP EN1+45, EN1+60, EN1+62, EN1+70, EN1+79
>> PSBOST EN1+33, EN1+39, EN1+44, EN1+60, EN1+61, EN1+70, EN1+78
>> PSBOSTS EN1+28, EN1+30, EN1+39, EN1+56, UDONE+11, UDONE+12, UDONE+13
>> PSBRMN EN1+69*, EN1+70*, EN1+71
>> PSBRPT( EN+3, EN+4, EN+5, PRINT+3, PRINT+4, PRINT+5, PRINT+9
>> PSBSCH EN1+20, EN1+22, EN1+39
>> PSBSCHT EN1+18, EN1+55, EN1+70
>> PSBSM EN1+31, EN1+58
>> PSBSORT PRINT+9*, PRINT+11
PSBSTOP EN+1~, EN+4*, EN1+47, EN1+61, UDONE+11, UDONE+12
PSBSTRT EN+1~, EN+3*, EN1+2, EN1+3, EN1+43, EN1+46, EN1+62
>> PSBSTUS EN1+48, EN1+49*
PSBUNHD EN1+53, EN1+54!, EN1+77, EN1+81!, UDCONT+12*, UDONE+11*
>> PSBWRD WRDHDR+1
PSBX EN1+1~, EN1+5*, EN1+6*, EN1+7, EN1+9, EN1+39
>> PSBXX EN1+41*
>> PSBYES EN1+19*, EN1+20*, EN1+21, EN1+22*, EN1+24*, EN1+25
>> TMP("PSB1" EN1+40!, UDCONT+14!
U EN+3, EN+4, EN+5, EN1+39, EN1+49, EN1+66, EN1+78, EN1+79, EN1+80, PRINT+3
, PRINT+4, PRINT+5, PRINT+9, PRINT+11, PRINT+12, PRINT+28, PRINT+30, PRINT+31, PRINT+32, UDCONT+3
, UDCONT+4, UDCONT+5, UDCONT+6, UDCONT+8, UDCONT+9, UDCONT+10, UDCONT+11, UDONE+2, UDONE+3, UDONE+4
, UDONE+5, UDONE+7, UDONE+8, UDONE+9, UDONE+10
>> VAR EN1+72*, EN1+76*, EN1+77*, EN1+78*, EN1+79*, EN1+80
WARDIEN PRINT+1~, PRINT+5*, PRINT+6, PRINT+35
>> X EN1+63*, EN1+64*, EN1+65, EN1+66*
>> Y EN1+36*, EN1+37, EN1+42*, EN1+43, EN1+63*, EN1+65*, EN1+66*
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 |  Naked Globals |  Local Variables |  All