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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSBOMM

Package: Barcode Medication Administration

Routine: PSBOMM


Information

PSBOMM ;BIRMINGHAM/EFC-MISSED MEDS ;07-Feb-2013 10:04;PLS

Source Information

Source file <PSBOMM.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Barcode Medication Administration 6 $$WRAP^PSBO  ($$PTFTR,PT,WARD)^PSBOHDR  $$PTID^PSBOML  ($$DTFMT,DEFLT,LN1,MISSED,PARTG1,UDONE)^PSBOMM2  ($$GETADMIN,$$GETFREQ)^PSBVDLU1  (CLEAN,PSJ)^PSBVT  
Inpatient Medications 2 EN^PSJBCMA  EN^PSJBCMA2  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
VA Fileman 1 (H,NOW)^%DTC  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;
EN1 ;
EN ;
WRDHDR() ;
PTHDR() ;

External References

Name Field # of Occurrence
H^%DTC EN1+37, EN1+38
NOW^%DTC EN1+8, EN1+69
$$WRAP^PSBO PRINT+31, PRINT+37, PRINT+78, PRINT+85
$$PTFTR^PSBOHDR PRINT+14, PRINT+22, PRINT+38
PT^PSBOHDR PTHDR+1
WARD^PSBOHDR WRDHDR+1
$$PTID^PSBOML PRINT+70
$$DTFMT^PSBOMM2 EN1+34, EN1+62, EN1+77, EN1+78, PRINT+34, PRINT+82
DEFLT^PSBOMM2 EN+3
LN1^PSBOMM2 WRDHDR+3, PTHDR+3
MISSED^PSBOMM2 EN1+51, EN1+53
PARTG1^PSBOMM2 EN1+68
UDONE^PSBOMM2 EN1+76
$$GETADMIN^PSBVDLU1 EN1+41
$$GETFREQ^PSBVDLU1 EN1+24
CLEAN^PSBVT EN1+9
PSJ^PSBVT EN1+10
EN^PSJBCMA EN1+3
EN^PSJBCMA2 EN1+49, EN1+74
$$FMADD^XLFDT EN1+39, EN1+44
$$FMTE^XLFDT PRINT+5, PRINT+41

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?7,"*Administration Times have been edited*"
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,"No Missed Medications Found",$$PTFTR^PSBOHDR()
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: $$PTFTR^PSBOHDR(),$$PTHDR()
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: ?43,VAR1
  • Line Location: PRINT+29
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+30
Function Call: WRITE
  • Prompt: ?43,VAR2
  • Line Location: PRINT+30
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(43,80,VAR3)
  • Line Location: PRINT+31
Function Call: WRITE
  • Prompt: ?43,VAR1
  • Line Location: PRINT+35
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+36
Function Call: WRITE
  • Prompt: ?43,VAR2
  • Line Location: PRINT+36
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(43,80,VAR3)
  • Line Location: PRINT+37
Function Call: WRITE
  • Prompt: !,"No Missed Medications Found"
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: $$WRDHDR()
  • Line Location: PRINT+67
Function Call: WRITE
  • Prompt: !,?30,$P(VAR1,U,1)
  • Line Location: PRINT+76
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+77
Function Call: WRITE
  • Prompt: ?30,VAR2
  • Line Location: PRINT+77
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(30,95,VAR3)
  • Line Location: PRINT+78
Function Call: WRITE
  • Prompt: !,?50,VAR1
  • Line Location: PRINT+83
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+84
Function Call: WRITE
  • Prompt: ?50,VAR2
  • Line Location: PRINT+84
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(50,75,VAR3)
  • Line Location: PRINT+85
Function Call: WRITE
  • Prompt: !,"Order Status",?15,"Room-Bed",?35,"Patient",?67,"Admin Date/Time",?85,"Medication"
  • Line Location: WRDHDR+2
Function Call: WRITE
  • Prompt: !,"Order Status",?15,"Administration Date/Time",?43,"Medication",?95,"Order Stop Date"
  • Line Location: PTHDR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PRINT+52, PRINT+53, PRINT+68, PRINT+70
^PSB(53.79 - [#53.79] EN1+64, EN1+65, EN1+66, EN1+67
^TMP("PSB" EN+10!, EN+14!, EN1+46!*, EN1+50, EN1+79*, EN1+81, PRINT+14, PRINT+16, PRINT+19, PRINT+21
, PRINT+23, PRINT+24, PRINT+25, PRINT+49, PRINT+51, PRINT+54*, PRINT+56, PRINT+57, PRINT+60, PRINT+64
, PRINT+66, PRINT+71, PRINT+72, PRINT+73
^TMP("PSB1" EN+10!, EN1+49!, EN1+54!, EN1+74!, EN1+82!
^TMP("PSBO" EN+12, EN+14!
^TMP("PSJ" EN+10!, EN+14!, EN1+2!, EN1+4, EN1+6, EN1+7
^TMP("PSJ2" EN1+49!, EN1+74!, EN1+75

Label References

Name Line Occurrences
$$PTHDR PRINT+12, PRINT+22
$$WRDHDR PRINT+48, PRINT+67
EN1 EN+12
PRINT EN+13

Naked Globals

Name Field # of Occurrence
^( PRINT+52

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+18
>> %H EN1+37, EN1+38
>> %T EN1+37, EN1+38
DFN EN+1~, EN+12*, EN1+3, EN1+24, EN1+33, EN1+41, EN1+49, EN1+64, EN1+65, EN1+71
, EN1+74, EN1+79, EN1+81, PRINT+1~, PRINT+11*, PRINT+14, PRINT+16, PRINT+19, PRINT+21, PRINT+23
, PRINT+24, PRINT+25, PRINT+28, PRINT+34, PRINT+51*, PRINT+52, PRINT+53, PRINT+54, PRINT+57*, PRINT+60
, PRINT+64, PRINT+66, PRINT+68, PRINT+70, PRINT+71, PRINT+72, PRINT+73, PTHDR+1
FLG EN1+45!*
>> I EN1+21*, EN1+23*
IOSL PRINT+22, PRINT+67
>> J EN1+43*
PSBACRIT EN+4!, EN+7*, EN+8*, EN1+72
PSBADST EN1+22, EN1+26, EN1+28, EN1+36, EN1+40!, EN1+42*, EN1+46, EN1+50*, EN1+52*
PSBADST( EN1+41*, EN1+42, EN1+43, EN1+52
>> PSBCADM EN1+35*, EN1+36*
>> PSBCHEMT EN1+14, EN1+15
PSBCNT EN+1~, EN1+82!
PSBDFN EN1+1~
>> PSBDOW EN1+21*
PSBDT EN1+1~, EN1+61*, PRINT+1~, PRINT+15*, PRINT+16*, PRINT+19, PRINT+21, PRINT+23, PRINT+24, PRINT+25
, PRINT+26, PRINT+28, PRINT+34, PRINT+59*, PRINT+60*, PRINT+62, PRINT+64, PRINT+66, PRINT+71, PRINT+72
, PRINT+73, PRINT+74, PRINT+75, PRINT+82
>> PSBDT2 EN1+40*, EN1+41, EN1+42, EN1+43, EN1+44*, EN1+45*
>> PSBDX PRINT+52*, PRINT+53*, PRINT+54, PRINT+55*, PRINT+56*, PRINT+57
PSBEDIT EN+1~, EN1+51, EN1+53, PRINT+13
PSBEVDT EN1+1~, EN1+2*
PSBEXST EN1+63!, EN1+79, EN1+80
PSBFLAG EN+1~, EN1+77, EN1+78
>> PSBFREQ EN1+24*, EN1+25*, EN1+26, EN1+27, EN1+39, EN1+41
PSBFUTR EN+1~, EN+6, EN+8, PRINT+7, PRINT+9, PRINT+43, PRINT+45
>> PSBG EN1+63*, EN1+67*, EN1+68, EN1+72
>> PSBG( EN1+67*, EN1+68
PSBGBL EN1+1~
PSBH EN1+1~
PSBHDDT EN1+54!, EN1+77, EN1+78, EN1+82!
PSBHDR EN1+1~, PRINT+1~, WRDHDR+1, PTHDR+1
PSBHDR(1 PRINT+5*, PRINT+41*
PSBHDR(2 PRINT+6*, PRINT+7*, PRINT+42*, PRINT+43*
PSBHDR(3 PRINT+8*, PRINT+9*, PRINT+44*, PRINT+45*
PSBHDR(4 PRINT+10*, PRINT+46*
>> PSBINCC EN+9*, PRINT+10, PRINT+46
>> PSBISYR EN1+13, EN1+14
>> PSBIVT EN1+11, EN1+12, EN1+13, EN1+14, EN1+15
>> PSBNGF EN1+30, EN1+57
PSBNPG PRINT+2!
PSBOACTL EN1+49!*, EN1+74!, EN1+75*, EN1+83!
PSBOCRIT EN+4!, EN+5*, EN+6*, EN1+29, EN1+59, EN1+70
PSBODATE EN+1~
>> PSBODD EN1+20*, EN1+27*, EN1+28, EN1+50, EN1+52
>> PSBOIT EN1+64, EN1+65
PSBOITX EN1+79, EN1+81, PRINT+1~, PRINT+18*, PRINT+19*, PRINT+21, PRINT+23, PRINT+24, PRINT+25, PRINT+28
, PRINT+34, PRINT+63*, PRINT+64*, PRINT+66, PRINT+71, PRINT+72, PRINT+73, PRINT+75, PRINT+82
PSBONX EN1+16, EN1+24, EN1+33, EN1+34, EN1+41, EN1+49, EN1+62, EN1+67, EN1+68, EN1+71
, EN1+74, EN1+79, EN1+81, PRINT+1~, PRINT+20*, PRINT+21*, PRINT+23, PRINT+24, PRINT+25, PRINT+28
, PRINT+32, PRINT+33, PRINT+34, PRINT+65*, PRINT+66*, PRINT+68, PRINT+71, PRINT+72, PRINT+73, PRINT+79
, PRINT+80
>> PSBOSP EN1+17, EN1+18, EN1+34, EN1+45, EN1+59, EN1+62
>> PSBOST EN1+37, EN1+39*, EN1+40, EN1+59, EN1+60, EN1+62
>> PSBOST2 EN1+40*, EN1+41, EN1+43*
>> PSBOSTS EN1+18*, EN1+29, EN1+31, EN1+33, EN1+56, EN1+70, EN1+71
>> PSBRPT( EN+2, EN+9, EN+11, PRINT+3, PRINT+4, PRINT+5, PRINT+11, PRINT+40, PRINT+41, PRINT+47
, PRINT+50
PSBS EN+4!, EN+14!
PSBS( EN1+33*, EN1+71*, PRINT+28, PRINT+34, PRINT+68
>> PSBSCH EN1+21, EN1+23
>> PSBSCHT EN1+19, EN1+55
>> PSBSM EN1+32, EN1+58
>> PSBSORT PRINT+50*, PRINT+52
>> PSBSTART EN+2*, EN1+17
PSBSTOP EN+1~, EN+2*, EN1+41, EN1+45, EN1+60
PSBSTRT EN+1~, EN+11*, EN1+2, EN1+3, EN1+38, EN1+39, EN1+40, EN1+51
>> PSBSTXP( EN1+34*, EN1+62*, PRINT+33, PRINT+34, PRINT+80
>> PSBSTXT( EN1+62*, PRINT+32, PRINT+79
PSBUNHD EN1+54!, EN1+78, EN1+82!
>> PSBWARD PRINT+47*
>> PSBWRD WRDHDR+1
PSBX EN1+1~, EN1+5*, EN1+6*, EN1+7, EN1+10
>> PSBXSTS EN1+63*, EN1+66*, EN1+67, EN1+72, EN1+79
>> PSBYES EN1+20*, EN1+21*, EN1+22, EN1+23*, EN1+25*, EN1+26
SP PRINT+22!, PRINT+29*, PRINT+30, PRINT+35*, PRINT+36, PRINT+67!, PRINT+75*, PRINT+76*, PRINT+77, PRINT+82*
, PRINT+83*, PRINT+84
U EN+2, EN+6, EN+8, EN+9, EN+11, EN1+66, EN1+67, EN1+79, EN1+81, PRINT+3
, PRINT+4, PRINT+5, PRINT+7, PRINT+9, PRINT+11, PRINT+40, PRINT+41, PRINT+43, PRINT+45, PRINT+47
, PRINT+50, PRINT+52, PRINT+53, PRINT+70, PRINT+76
>> VAR EN1+73*, EN1+77*, EN1+78*, EN1+79, EN1+81
VAR1 EN1+81*, PRINT+22!, PRINT+23*, PRINT+29, PRINT+35, PRINT+67!, PRINT+71*, PRINT+76, PRINT+83
VAR2 PRINT+22!, PRINT+24*, PRINT+30, PRINT+36, PRINT+67!, PRINT+72*, PRINT+77, PRINT+84
VAR3 PRINT+22!, PRINT+25*, PRINT+31, PRINT+37, PRINT+67!, PRINT+73*, PRINT+78, PRINT+85
>> X EN1+37*, EN1+38*, EN1+63*, EN1+64*, EN1+65, EN1+67*
>> X1 EN1+37*, EN1+39
>> X2 EN1+38*, EN1+39
>> X3 EN1+38*, EN1+39*
>> XX EN1+50*, EN1+52*
>> XXX EN1+52*, EN1+53
>> XZ EN1+41*, EN1+42, EN1+43
>> Y EN1+47*, EN1+48, EN1+63*, EN1+65*, EN1+66, EN1+67*, PRINT+3*, PRINT+5, PRINT+7*, PRINT+9*
, PRINT+41, PRINT+43*, PRINT+45*
>> Z EN1+43*, EN1+44, EN1+46*, EN1+47, EN1+48, EN1+50*, EN1+51, EN1+52*, EN1+53
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All