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 ;03/06/16 3:06pm

Source Information

Source file <PSBOMM.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Barcode Medication Administration 6 ($$WRAP,FILTERCO)^PSBO  ($$PTFTR,$$SRCHLIST,CLINIC,PT,WARD)^PSBOHDR  ($$DTFMT,DEFLT,LN1,MISSED,PARTG1,UDONE)^PSBOMM2  REMOVES^PSBUTL  ($$GETADMIN,$$GETFREQ,INCLUDCO,REMOVECO)^PSBVDLU1  (CLEAN,PSJ,PSJ1)^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
EN ;
CLNHDR() ;
PTHDR() ;
EN1 ;
PRINT ;
WRDHDR() ;

External References

Name Field # of Occurrence
H^%DTC EN1+45, EN1+46
NOW^%DTC EN1+14, EN1+86
$$WRAP^PSBO PRINT+49, PRINT+59, PRINT+108, PRINT+114, PRINT+162, PRINT+170
FILTERCO^PSBO EN1+6
$$PTFTR^PSBOHDR PRINT+23, PRINT+34, PRINT+60
$$SRCHLIST^PSBOHDR PRINT+11
CLINIC^PSBOHDR CLNHDR+1
PT^PSBOHDR PTHDR+1
WARD^PSBOHDR WRDHDR+1
$$DTFMT^PSBOMM2 EN1+42, EN1+79, EN1+94, EN1+95, PRINT+42, PRINT+55, PRINT+95, PRINT+100, PRINT+147, PRINT+153
DEFLT^PSBOMM2 EN+3
LN1^PSBOMM2 WRDHDR+3, CLNHDR+3, PTHDR+4
MISSED^PSBOMM2 EN1+64, EN1+68
PARTG1^PSBOMM2 EN1+85
UDONE^PSBOMM2 EN1+93
REMOVES^PSBUTL EN+14
$$GETADMIN^PSBVDLU1 EN1+51
$$GETFREQ^PSBVDLU1 EN1+32
INCLUDCO^PSBVDLU1 EN1+7
REMOVECO^PSBVDLU1 EN1+8
CLEAN^PSBVT EN1+15
PSJ^PSBVT EN1+16
PSJ1^PSBVT PRINT+38, PRINT+89, PRINT+141
EN^PSJBCMA EN1+3
EN^PSJBCMA2 EN1+59, EN1+91
$$FMADD^XLFDT EN1+47, EN1+54
$$FMTE^XLFDT PRINT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?7,"*Administration Times have been edited*"
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: !,"No Missed Medications Found",$$PTFTR^PSBOHDR()
  • Line Location: PRINT+23
Function Call: WRITE
  • Prompt: $$PTFTR^PSBOHDR(),$$PTHDR()
  • Line Location: PRINT+34
Function Call: WRITE
  • Prompt: ?41,VAR1
  • Line Location: PRINT+47
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+48
Function Call: WRITE
  • Prompt: ?41,VAR2
  • Line Location: PRINT+48
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(41,79,VAR3)
  • Line Location: PRINT+49
Function Call: WRITE
  • Prompt: ?41,VAR1
  • Line Location: PRINT+57
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+58
Function Call: WRITE
  • Prompt: ?41,VAR2
  • Line Location: PRINT+58
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(41,79,VAR3)
  • Line Location: PRINT+59
Function Call: WRITE
  • Prompt: !,"No Missed Medications Found"
  • Line Location: PRINT+67
Function Call: WRITE
  • Prompt: $$WRDHDR()
  • Line Location: PRINT+88
Function Call: WRITE
  • Prompt: !,?37,$P(VAR1,U,1)
  • Line Location: PRINT+106
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+107
Function Call: WRITE
  • Prompt: ?37,VAR2
  • Line Location: PRINT+107
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(37,102,VAR3)
  • Line Location: PRINT+108
Function Call: WRITE
  • Prompt: !,?57,VAR1
  • Line Location: PRINT+112
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+113
Function Call: WRITE
  • Prompt: ?57,VAR2
  • Line Location: PRINT+113
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(57,82,VAR3)
  • Line Location: PRINT+114
Function Call: WRITE
  • Prompt: !,"No Missed Medications Found"
  • Line Location: PRINT+119
Function Call: WRITE
  • Prompt: $$CLNHDR()
  • Line Location: PRINT+140
Function Call: WRITE
  • Prompt: !,?37,$P(VAR1,U,1)
  • Line Location: PRINT+160
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+161
Function Call: WRITE
  • Prompt: ?37,VAR2
  • Line Location: PRINT+161
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(37,102,VAR3)
  • Line Location: PRINT+162
Function Call: WRITE
  • Prompt: !,?57,VAR1
  • Line Location: PRINT+168
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(SP)
  • Line Location: PRINT+169
Function Call: WRITE
  • Prompt: ?57,VAR2
  • Line Location: PRINT+169
Function Call: WRITE
  • Prompt: !,$$WRAP^PSBO(57,82,VAR3)
  • Line Location: PRINT+170
Function Call: WRITE
  • Prompt: !,"Order Status",?15,"Ver",?22,"Room-Bed",?42,"Patient",?74,"Missed Date/Time",?92,"Medication"
  • Line Location: WRDHDR+2
Function Call: WRITE
  • Prompt: !,"Order Sts",?11,"Ver",?17,"Patient",?49,"Missed Date/Time",?66,"Medication",?103,"Location"
  • Line Location: CLNHDR+2
Function Call: WRITE
  • Prompt: !,"Order Status",?15,"Ver",?21,"Missed Date/Time",?38,"Medication",?85,"Order Stop Date"
  • Line Location: PTHDR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PRINT+70, PRINT+71, PRINT+94, PRINT+99, PRINT+122, PRINT+123, PRINT+146, PRINT+152
^PSB(53.79 - [#53.79] EN1+81, EN1+82, EN1+83, EN1+84
^TMP("PSB" EN+10!, EN+16!, EN1+56!*, EN1+63, EN1+96*, EN1+98, PRINT+23, PRINT+25, PRINT+28, PRINT+30
, PRINT+35, PRINT+36, PRINT+37, PRINT+41, PRINT+54, PRINT+67, PRINT+69, PRINT+72*, PRINT+74, PRINT+75
, PRINT+78, PRINT+83, PRINT+85, PRINT+93, PRINT+98, PRINT+101, PRINT+102, PRINT+103, PRINT+119, PRINT+121
, PRINT+124*, PRINT+126, PRINT+127, PRINT+130, PRINT+135, PRINT+137, PRINT+145, PRINT+151, PRINT+155, PRINT+156
, PRINT+157
^TMP("PSB1" EN+10!, EN1+59!, EN1+71!, EN1+91!, EN1+99!
^TMP("PSBO" EN+14, EN+16!
^TMP("PSJ" EN+10!, EN+16!, EN1+2!, EN1+10, EN1+12, EN1+13, EN1+50
^TMP("PSJ2" EN1+59!, EN1+91!, EN1+92

Label References

Name Line Occurrences
$$CLNHDR PRINT+118, PRINT+140
$$PTHDR PRINT+21, PRINT+34
$$WRDHDR PRINT+66, PRINT+88
EN1 EN+14
PRINT EN+15

Naked Globals

Name Field # of Occurrence
^( PRINT+70, PRINT+122
^(0 PRINT+94, PRINT+99

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+24
>> %H EN1+45, EN1+46
>> %T EN1+45, EN1+46
DFN EN+1~, EN+14*, EN1+3, EN1+32, EN1+41, EN1+42, EN1+51, EN1+59, EN1+79, EN1+81
, EN1+82, EN1+84, EN1+85, EN1+88, EN1+91, EN1+96, EN1+98, PRINT+1~, PRINT+19*, PRINT+23
, PRINT+25, PRINT+28, PRINT+30, PRINT+35, PRINT+36, PRINT+37, PRINT+38, PRINT+41, PRINT+42, PRINT+46
, PRINT+50, PRINT+51, PRINT+54, PRINT+55, PRINT+69*, PRINT+70, PRINT+71, PRINT+72, PRINT+75*, PRINT+78
, PRINT+83, PRINT+85, PRINT+89, PRINT+93, PRINT+94, PRINT+98, PRINT+99, PRINT+101, PRINT+102, PRINT+103
, PRINT+109, PRINT+110, PRINT+121*, PRINT+122, PRINT+123, PRINT+124, PRINT+127*, PRINT+130, PRINT+135, PRINT+137
, PRINT+141, PRINT+145, PRINT+146, PRINT+151, PRINT+152, PRINT+155, PRINT+156, PRINT+157, PRINT+163, PRINT+164
, PTHDR+1
FLG EN1+55!*
>> I EN1+29*, EN1+31*
IOSL PRINT+34, PRINT+88, PRINT+140
>> J EN1+53*
PSBACRIT EN+4!, EN+7*, EN+8*, EN1+89
PSBADST EN1+30, EN1+34, EN1+36, EN1+44, EN1+48!, EN1+52*, EN1+56, EN1+63*, EN1+67*
PSBADST( EN1+51*, EN1+52, EN1+53, EN1+67
>> PSBCADM EN1+43*, EN1+44*
>> PSBCHEMT EN1+20, EN1+21
>> PSBCLINORD EN1+5, EN1+8, PRINT+159, PTHDR+3
>> PSBCLORD PRINT+42, PRINT+46, PRINT+56, PRINT+148, PRINT+154, PRINT+159
PSBCNT EN+1~, EN1+99!
PSBDFN EN1+1~
>> PSBDOW EN1+29*
PSBDT EN1+1~, EN1+78*, PRINT+1~, PRINT+24*, PRINT+25*, PRINT+28, PRINT+30, PRINT+35, PRINT+36, PRINT+37
, PRINT+41, PRINT+42, PRINT+44, PRINT+46, PRINT+54, PRINT+55, PRINT+77*, PRINT+78*, PRINT+81, PRINT+83
, PRINT+85, PRINT+93, PRINT+95, PRINT+98, PRINT+100, PRINT+101, PRINT+102, PRINT+103, PRINT+104, PRINT+105
, PRINT+129*, PRINT+130*, PRINT+133, PRINT+135, PRINT+137, PRINT+145, PRINT+147, PRINT+151, PRINT+153, PRINT+154
, PRINT+155, PRINT+156, PRINT+157, PRINT+158, PRINT+159
>> PSBDT2 EN1+48*, EN1+50*, EN1+51, EN1+52, EN1+53, EN1+54*, EN1+55*
>> PSBDX PRINT+70*, PRINT+71*, PRINT+72, PRINT+73*, PRINT+74*, PRINT+75, PRINT+122*, PRINT+123*, PRINT+124, PRINT+125*
, PRINT+126*, PRINT+127
PSBEDIT EN+1~, EN1+64, EN1+68, PRINT+22
PSBEVDT EN1+1~, EN1+2*
PSBEXST EN1+80!, EN1+96, EN1+97
PSBFLAG EN+1~, EN1+94, EN1+95
>> PSBFREQ EN1+32*, EN1+33*, EN1+34, EN1+35, EN1+47, EN1+51
PSBFUTR EN+1~, EN+6, EN+8, PRINT+6, PRINT+8
>> PSBG EN1+80*, EN1+84*, EN1+85, EN1+89
>> PSBG( EN1+84*, EN1+85
PSBGBL EN1+1~
PSBH EN1+1~
PSBHDDT EN1+71!, EN1+94, EN1+95, EN1+99!
PSBHDR EN1+1~, PRINT+1~, WRDHDR+1, CLNHDR+1, PTHDR+1
PSBHDR(1 PRINT+4*
PSBHDR(2 PRINT+5*, PRINT+6*
PSBHDR(3 PRINT+7*, PRINT+8*
PSBHDR(4 PRINT+9*
PSBHDR(5 PRINT+13*
PSBHDR(6 PRINT+14*, PRINT+15*
>> PSBINCC EN+9*, PRINT+9
>> PSBISYR EN1+19, EN1+20
>> PSBIVT EN1+17, EN1+18, EN1+19, EN1+20, EN1+21
>> PSBNGF EN1+38, EN1+74
PSBNPG PRINT+2!
PSBOACTL EN1+59!*, EN1+91!, EN1+92*, EN1+100!
PSBOCRIT EN+4!, EN+5*, EN+6*, EN1+37, EN1+76, EN1+87
PSBODATE EN+1~
>> PSBODD EN1+28*, EN1+35*, EN1+36, EN1+62, EN1+67
>> PSBOIT EN1+81, EN1+82
PSBOITX EN1+96, EN1+98, PRINT+1~, PRINT+27*, PRINT+28*, PRINT+30, PRINT+35, PRINT+36, PRINT+37, PRINT+41
, PRINT+42, PRINT+46, PRINT+54, PRINT+55, PRINT+82*, PRINT+83*, PRINT+85, PRINT+93, PRINT+95, PRINT+98
, PRINT+100, PRINT+101, PRINT+102, PRINT+103, PRINT+105, PRINT+134*, PRINT+135*, PRINT+137, PRINT+145, PRINT+147
, PRINT+151, PRINT+153, PRINT+155, PRINT+156, PRINT+157, PRINT+159
PSBONX EN1+22, EN1+32, EN1+41, EN1+42, EN1+51, EN1+59, EN1+79, EN1+84, EN1+85, EN1+88
, EN1+91, EN1+96, EN1+98, PRINT+1~, PRINT+29*, PRINT+30*, PRINT+35, PRINT+36, PRINT+37, PRINT+38
, PRINT+41, PRINT+42, PRINT+46, PRINT+50, PRINT+51, PRINT+54, PRINT+55, PRINT+84*, PRINT+85*, PRINT+89
, PRINT+93, PRINT+94, PRINT+98, PRINT+99, PRINT+101, PRINT+102, PRINT+103, PRINT+109, PRINT+110, PRINT+136*
, PRINT+137*, PRINT+141, PRINT+145, PRINT+146, PRINT+151, PRINT+152, PRINT+155, PRINT+156, PRINT+157, PRINT+163
, PRINT+164
>> PSBOSP EN1+23, EN1+24, EN1+42, EN1+55, EN1+76, EN1+79
>> PSBOST EN1+45, EN1+47*, EN1+48, EN1+76, EN1+77, EN1+79
>> PSBOST2 EN1+48*, EN1+51, EN1+53*
>> PSBOSTS EN1+24*, EN1+37, EN1+39, EN1+41, EN1+73, EN1+87, EN1+88
>> PSBRPT CLNHDR+1
>> PSBRPT( EN+2, EN+9, EN+11, EN+12, PRINT+3, PRINT+4, PRINT+19, PRINT+65, PRINT+68, PRINT+120
>> PSBRPT(2 EN1+6
>> PSBRPT(4 PRINT+14, PRINT+15
PSBS EN+1~, EN+4!, EN+16!
PSBS( EN1+41*, EN1+88*, PRINT+42, PRINT+46, PRINT+55, PRINT+94, PRINT+99, PRINT+146, PRINT+152
>> PSBSCH EN1+29, EN1+31
>> PSBSCHT EN1+27, EN1+72
>> PSBSM EN1+40, EN1+75
PSBSORT PRINT+1~, PRINT+68*, PRINT+70, PRINT+120*, PRINT+122
PSBSRCHL PRINT+1~, PRINT+11*, PRINT+12, WRDHDR+1, CLNHDR+1, PTHDR+1
PSBSRT EN+1~, EN+12*, EN+14, PRINT+18, PRINT+64, PRINT+117
PSBSTART EN+1~, EN+2*, EN1+23
PSBSTOP EN+1~, EN+2*, EN1+51, EN1+55, EN1+77
PSBSTRT EN+1~, EN+11*, EN1+2, EN1+3, EN1+46, EN1+47, EN1+48, EN1+64
PSBSTXP EN+1~
PSBSTXP( EN1+42*, EN1+79*, PRINT+42, PRINT+51, PRINT+55, PRINT+110, PRINT+164
>> PSBSTXT( EN1+79*, PRINT+50, PRINT+109, PRINT+163
PSBUNHD EN1+71!, EN1+95, EN1+99!
PSBVNI PRINT+1~, PRINT+38*, PRINT+42, PRINT+46, PRINT+55, PRINT+90*, PRINT+94, PRINT+99, PRINT+142*, PRINT+146
, PRINT+152
>> PSBWARD PRINT+65*
>> PSBWRD WRDHDR+1
PSBX EN1+1~, EN1+11*, EN1+12*, EN1+13, EN1+16, EN1+50
>> PSBXSTS EN1+80*, EN1+83*, EN1+84, EN1+89, EN1+96
>> PSBYES EN1+28*, EN1+29*, EN1+30, EN1+31*, EN1+33*, EN1+34
RMV EN+1~, PRINT+33!, PRINT+40*, PRINT+43*, PRINT+54, PRINT+87!, PRINT+92*, PRINT+96*, PRINT+98, PRINT+139!
, PRINT+144*, PRINT+149*, PRINT+151
SP PRINT+34!, PRINT+47*, PRINT+48, PRINT+57*, PRINT+58, PRINT+88!, PRINT+95*, PRINT+100*, PRINT+105*, PRINT+106*
, PRINT+107, PRINT+112*, PRINT+113, PRINT+140!, PRINT+159*, PRINT+160*, PRINT+161, PRINT+167*, PRINT+168*, PRINT+169
U EN+2, EN+6, EN+8, EN+9, EN+11, EN+12, EN1+83, EN1+84, EN1+96, EN1+98
, PRINT+3, PRINT+4, PRINT+6, PRINT+8, PRINT+14, PRINT+15, PRINT+19, PRINT+65, PRINT+68, PRINT+70
, PRINT+71, PRINT+94, PRINT+99, PRINT+106, PRINT+120, PRINT+122, PRINT+123, PRINT+146, PRINT+152, PRINT+160
>> VAR EN1+90*, EN1+94*, EN1+95*, EN1+96, EN1+98
VAR1 EN1+98*, PRINT+33, PRINT+34!, PRINT+35*, PRINT+47, PRINT+57, PRINT+80!, PRINT+87, PRINT+88!, PRINT+101*
, PRINT+106, PRINT+112, PRINT+132!, PRINT+139, PRINT+140!, PRINT+155*, PRINT+160, PRINT+168
VAR2 PRINT+33, PRINT+34!, PRINT+36*, PRINT+48, PRINT+58, PRINT+80!, PRINT+87, PRINT+88!, PRINT+102*, PRINT+107
, PRINT+113, PRINT+132!, PRINT+139, PRINT+140!, PRINT+156*, PRINT+161, PRINT+169
VAR3 PRINT+33, PRINT+34!, PRINT+37*, PRINT+49, PRINT+59, PRINT+80!, PRINT+87, PRINT+88!, PRINT+103*, PRINT+108
, PRINT+114, PRINT+132!, PRINT+139, PRINT+140!, PRINT+157*, PRINT+162, PRINT+170
>> X EN1+45*, EN1+46*, EN1+80*, EN1+81*, EN1+82, EN1+84*
>> X1 EN1+45*, EN1+47
>> X2 EN1+46*, EN1+47
>> X3 EN1+46*, EN1+47*
>> XX EN1+63*, EN1+67*
>> XXX EN1+67*, EN1+68
>> XZ EN1+51*, EN1+52, EN1+53
>> Y EN1+57*, EN1+58, EN1+80*, EN1+82*, EN1+83, EN1+84*, PRINT+3*, PRINT+4, PRINT+6*, PRINT+8*
>> Z EN1+53*, EN1+54, EN1+56*, EN1+57, EN1+58, EN1+63*, EN1+64, EN1+67*, EN1+68
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All