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

Package: Barcode Medication Administration

Routine: PSBODL


Information

PSBODL ;BIRMINGHAM/EFC-DUE LIST ;03/06/16 3:06pm

Source Information

Source file <PSBODL.m>

Call Graph

Call Graph

Call Graph Total: 17

Package Total Call Graph
Barcode Medication Administration 10 ERROR^PSBMLU  VAL^PSBMLVAL  FILTERCO^PSBO  GETREMOV^PSBO1  ($$FTR,CHKREM,EN,WRAPPUP)^PSBODL1  ($$EMPTYHDR,$$SRCHLIST,PT)^PSBOHDR  ($$GETADMIN,$$OKAY,INCLUDCO,REMOVECO)^PSBVDLU1  $$IVPTAB^PSBVDLU3  
(CLEAN,PSJ1)^PSBVT  $$PSBDCHK1^PSBVT1  
Inpatient Medications 2 EN^PSJBCMA  GETSIOPI^PSJBCMA5  
Kernel 2 ENDR^%ZISS  $$FMADD^XLFDT  
VA FileMan 2 NOW^%DTC  D^DIQ  
Toolkit 1 $$GET^XPAR  

Entry Points

Name Comments DBIA/ICR reference
EN ; Prt DL
PRINT(DFN) ;^TMP($J.
HDR() ;
BLANKS() ;

External References

Name Field # of Occurrence
NOW^%DTC PRINT+54
ENDR^%ZISS EN+2
D^DIQ EN+13, PRINT+17
ERROR^PSBMLU PRINT+62, PRINT+73, PRINT+75, PRINT+77, PRINT+81
VAL^PSBMLVAL PRINT+128
FILTERCO^PSBO PRINT+11
GETREMOV^PSBO1 PRINT+8
$$FTR^PSBODL1 PRINT+14, PRINT+40, PRINT+139, PRINT+149, PRINT+152, BLANKS+5
CHKREM^PSBODL1 PRINT+147
EN^PSBODL1 PRINT+151
WRAPPUP^PSBODL1 PRINT+145
$$EMPTYHDR^PSBOHDR EN+25
$$SRCHLIST^PSBOHDR EN+7
PT^PSBOHDR HDR+1
$$GETADMIN^PSBVDLU1 PRINT+121
$$OKAY^PSBVDLU1 PRINT+82, PRINT+83
INCLUDCO^PSBVDLU1 PRINT+12
REMOVECO^PSBVDLU1 PRINT+13
$$IVPTAB^PSBVDLU3 PRINT+74, PRINT+83
CLEAN^PSBVT PRINT+48
PSJ1^PSBVT PRINT+49
$$PSBDCHK1^PSBVT1 PRINT+59
EN^PSJBCMA PRINT+9
GETSIOPI^PSJBCMA5 PRINT+52
$$FMADD^XLFDT PRINT+15, PRINT+98, PRINT+131
$$GET^XPAR PRINT+98, PRINT+99, PRINT+131

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$HDR()
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: !!?10,"** NO SPECIFIED MEDICATIONS TO PRINT **",!,$$BLANKS(),$$FTR^PSBODL1()
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !!?10,"** NO SPECIFIED MEDICATIONS TO PRINT **",!,$$BLANKS(),$$FTR^PSBODL1()
  • Line Location: PRINT+40
Function Call: WRITE
  • Prompt: !?(IOM-36\2),"(Medications Continued on Next Page)",$$FTR^PSBODL1(),$$HDR()
  • Line Location: PRINT+139
Function Call: WRITE
  • Prompt: !!,?10,"** NO SPECIFIED MEDICATIONS TO PRINT **"
  • Line Location: PRINT+148
Function Call: WRITE
  • Prompt: !!,?10,"** NO SPECIFIED MEDICATIONS TO PRINT **",$$BLANKS(),$$FTR^PSBODL1()
  • Line Location: PRINT+152
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?100,"Start",?110,"Stop"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"Self",?85,"Last",?100,"Date",?110,"Date",?120,"Verifying"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,"Med",?6,"Sched",?14,"Medication",?50,"Dose",?78,"Route",?85,"Given",?100,"@Time",?110,"@Time",?120,"Rph/Rn"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !
  • Line Location: BLANKS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: BLANKS+6
Function Call: WRITE
  • Prompt: ?(IOM-28\2),"Changes/Addendums to orders"
  • Line Location: BLANKS+7
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","-")
  • Line Location: BLANKS+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSB(53.79 - [#53.79] PRINT+86, PRINT+87, PRINT+88, PRINT+101, PRINT+102, PRINT+103, PRINT+105, PRINT+107, PRINT+108
^TMP("PSB" EN+30!, PRINT+7!, PRINT+38*, PRINT+39*, PRINT+40, PRINT+41, PRINT+96, PRINT+109!, PRINT+122*, PRINT+124
^TMP("PSBO" EN+3*, EN+30!, PRINT+97*, PRINT+98*, PRINT+129*, PRINT+132*, PRINT+150, PRINT+151
^TMP("PSJ" EN+30!, PRINT+7!, PRINT+14, PRINT+20, PRINT+21, PRINT+22, PRINT+24, PRINT+36, PRINT+37
^TMP("PSJBCMA5" PRINT+51!, PRINT+154!

Label References

Name Line Occurrences
$$BLANKS PRINT+14, PRINT+40, PRINT+149, PRINT+152
$$HDR PRINT+4, PRINT+139, BLANKS+5
PRINT EN+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PRINT+54, PRINT+93
DFN EN+1~, EN+10*, EN+28, PRINT~, PRINT+8, PRINT+9, PRINT+39, PRINT+49, PRINT+51, PRINT+52
, PRINT+62, PRINT+73, PRINT+75, PRINT+77, PRINT+81, PRINT+86, PRINT+87, PRINT+96, PRINT+97, PRINT+98
, PRINT+101, PRINT+102, PRINT+105, PRINT+107, PRINT+121, PRINT+128, PRINT+129, PRINT+132, PRINT+150, PRINT+151
, HDR+1
>> I PRINT+60*
IOINHI EN+1~
IOINORM EN+1~
IOM PRINT+139, HDR+7, BLANKS+4, BLANKS+7, BLANKS+9, BLANKS+19
IOSL PRINT+139, BLANKS+3, BLANKS+6
PSB PRINT+2~
PSBADM PRINT+3~
PSBADMIN PRINT+3~, PRINT+109*, PRINT+110, PRINT+136*, PRINT+137*, PRINT+138*, PRINT+139
>> PSBADST PRINT+61, PRINT+75, PRINT+77, PRINT+78, PRINT+79, PRINT+80, PRINT+111
PSBAT PRINT+2~, PRINT+126*, PRINT+127, PRINT+128, PRINT+129, PRINT+130, PRINT+132, PRINT+134, PRINT+135, PRINT+137
>> PSBCHEMT PRINT+67, PRINT+68, PRINT+74, PRINT+83, PRINT+113, PRINT+118
PSBCLINIC PRINT+3~, PRINT+21*, PRINT+39, PRINT+96*, PRINT+97, PRINT+98, PRINT+131, PRINT+132, PRINT+142
>> PSBCLINORD EN+26, PRINT+10, PRINT+13, HDR+3
PSBCLNMB PRINT+3~, PRINT+21*, PRINT+39
>> PSBCNT PRINT+129
>> PSBDAYB PRINT+58*, PRINT+59*, PRINT+75
PSBEVDT EN+1~, EN+13*, PRINT+15
>> PSBEVDT2 EN+14*, PRINT+15
PSBFLAG EN+1~, PRINT+111*, PRINT+113*, PRINT+114*, PRINT+115*, PRINT+116*, PRINT+127
>> PSBFREQ PRINT+69*, PRINT+70*, PRINT+71*, PRINT+72*, PRINT+73, PRINT+75, PRINT+76, PRINT+82, PRINT+83, PRINT+121
, PRINT+138
PSBFUTRO PRINT+43!
PSBGBL EN+1~, EN+4*, EN+9*, EN+10, EN+24, PRINT+1~, PRINT+41*, PRINT+42*, PRINT+44, PRINT+45
, PRINT+46, PRINT+47
PSBGIVEN EN+1~
>> PSBGVN PRINT+84, PRINT+85*, PRINT+88*, PRINT+99, PRINT+100*, PRINT+103*
PSBHDR EN+1~, EN+11!, HDR+1
PSBHDR(1 EN+12*, EN+13*, EN+14*
PSBHDR(2 EN+15*, EN+16*
PSBHDR(3 EN+17*, EN+18*
PSBHDR(4 EN+20*
PSBHDR(5 EN+21*, EN+22*
>> PSBI1 PRINT+15*, PRINT+16*
PSBIEN EN+1~, PRINT+106*, PRINT+107*, PRINT+108
PSBINDX PRINT+1~, PRINT+19*, PRINT+20*, PRINT+21, PRINT+22, PRINT+24, PRINT+36, PRINT+37
>> PSBISYR PRINT+66, PRINT+67, PRINT+74, PRINT+83, PRINT+114, PRINT+115, PRINT+117
>> PSBIVPSH PRINT+74, PRINT+83
>> PSBIVT PRINT+65, PRINT+66, PRINT+67, PRINT+68, PRINT+74, PRINT+83, PRINT+113, PRINT+114, PRINT+115, PRINT+116
, PRINT+117, PRINT+118, PRINT+120
PSBLGDT EN+1~, PRINT+104*, PRINT+105, PRINT+107, PRINT+108*
PSBMED PRINT+2~, PRINT+36*, PRINT+38, PRINT+46*
>> PSBNOW PRINT+54*, PRINT+57, PRINT+97, PRINT+98, PRINT+131, PRINT+132
PSBNUM PRINT+2~
PSBODATE PRINT+3~, PRINT+15*, PRINT+17, PRINT+82, PRINT+83, PRINT+121, PRINT+126, PRINT+152
>> PSBODD PRINT+58*, PRINT+76*, PRINT+77
>> PSBOIT PRINT+86, PRINT+87, PRINT+101, PRINT+102, PRINT+105, PRINT+107
>> PSBOITX PRINT+62, PRINT+73, PRINT+75, PRINT+77, PRINT+81, PRINT+82, PRINT+83
>> PSBON PRINT+128
>> PSBONX PRINT+51, PRINT+52, PRINT+62, PRINT+73, PRINT+75, PRINT+77, PRINT+81, PRINT+82, PRINT+83, PRINT+88
, PRINT+103, PRINT+121
PSBORD PRINT+2~, PRINT+37*, PRINT+38, PRINT+39, PRINT+43!, PRINT+47*, PRINT+49, PRINT+96, PRINT+97, PRINT+98
, PRINT+129, PRINT+130, PRINT+132, PRINT+150*, PRINT+151
>> PSBOSP PRINT+55, PRINT+56, PRINT+57, PRINT+91, PRINT+92, PRINT+135
>> PSBOST PRINT+82, PRINT+83, PRINT+91, PRINT+93, PRINT+97, PRINT+98, PRINT+121, PRINT+130, PRINT+131, PRINT+132
, PRINT+134, PRINT+137
PSBOSTOP PRINT+1~, PRINT+6*, PRINT+127, PRINT+130
PSBOSTRT PRINT+1~, PRINT+5*, PRINT+9, PRINT+55, PRINT+56, PRINT+82, PRINT+92, PRINT+127
>> PSBOTYP PRINT+74, PRINT+82, PRINT+83, PRINT+119, PRINT+128
>> PSBRMN PRINT+89*, PRINT+94*, PRINT+95
>> PSBRPT( EN+5*, EN+13, EN+14, EN+16, EN+18, PRINT+5, PRINT+6, PRINT+26, PRINT+27, PRINT+30
, PRINT+31, PRINT+32, PRINT+33, PRINT+151, BLANKS+1
>> PSBRPT(2 PRINT+11
>> PSBRPT(4 EN+21, EN+22
>> PSBSCBR PRINT+58*, PRINT+60*, PRINT+75
PSBSCH PRINT+1~, PRINT+59, PRINT+60, PRINT+62, PRINT+73, PRINT+75, PRINT+77, PRINT+81, PRINT+82, PRINT+83
PSBSCHT PRINT+1~, PRINT+34*, PRINT+35*, PRINT+38, PRINT+45*, PRINT+56, PRINT+61, PRINT+63, PRINT+64, PRINT+71
, PRINT+72, PRINT+75, PRINT+82, PRINT+83, PRINT+84, PRINT+90, PRINT+99, PRINT+110, PRINT+143
PSBSM PRINT+2~, PRINT+140*, PRINT+141*, PRINT+143
>> PSBSMX PRINT+140
PSBSRCHL EN+1~, EN+7*, EN+19, EN+25, HDR+1
PSBSTAT PRINT+3~, PRINT+24*, PRINT+25, PRINT+29
PSBSTOP PRINT+2~
PSBSTRT PRINT+2~
PSBSTTMP PRINT+3~, PRINT+130!, PRINT+131*, PRINT+132*
PSBTMPSD PRINT+3~
PSBTYPE PRINT+1~, PRINT+22*, PRINT+23, PRINT+26, PRINT+27, PRINT+28*, PRINT+38, PRINT+44*, PRINT+97, PRINT+98
, PRINT+129, PRINT+132, PRINT+143
>> PSBVALB PRINT+74*, PRINT+75
PSBWFLAG PRINT+3~, PRINT+41*, PRINT+143*, PRINT+148
PSBX PRINT+2~, PRINT+111*, PRINT+112, PRINT+113*, PRINT+114*, PRINT+115*, PRINT+116*, PRINT+117*, PRINT+118*, PRINT+119*
, PRINT+120*, PRINT+121*, PRINT+122, PRINT+123, PRINT+124*, PRINT+125, PRINT+126, PRINT+136, PRINT+137
>> PSBXX PRINT+124*
PSBY PRINT+2~, PRINT+79*, PRINT+80, PRINT+125*, PRINT+126, PRINT+136, PRINT+137
>> PSBYES PRINT+58*, PRINT+59*, PRINT+60*, PRINT+61, PRINT+63*, PRINT+64*, PRINT+65*, PRINT+66*, PRINT+67*, PRINT+68*
, PRINT+73
PSBZ PRINT+2~, PRINT+128
PSBZ(0 PRINT+129, PRINT+133
U EN+5, EN+13, EN+14, EN+16, EN+18, EN+21, EN+22, PRINT+5, PRINT+6, PRINT+21
, PRINT+22, PRINT+25, PRINT+26, PRINT+27, PRINT+29, PRINT+30, PRINT+31, PRINT+32, PRINT+33, PRINT+36
, PRINT+37, PRINT+88, PRINT+103, PRINT+108, PRINT+151, BLANKS+1
>> X EN+2*, PRINT+85*, PRINT+86*, PRINT+87, PRINT+88*, PRINT+100*, PRINT+101*, PRINT+102, PRINT+103*, PRINT+104*
, PRINT+105*, PRINT+107, PRINT+108, PRINT+144*, BLANKS+8*
>> Y EN+13*, EN+14*, EN+16*, EN+18*, PRINT+17*, PRINT+18, PRINT+29*, PRINT+30, PRINT+31, PRINT+32
, PRINT+33, PRINT+34, PRINT+85*, PRINT+87*, PRINT+88*, PRINT+100*, PRINT+102*, PRINT+103*, PRINT+144*
>> Z EN+13*, EN+14
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All