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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ALPBBK

Package: Barcode Medication Administration

Routine: ALPBBK


Information

ALPBBK ;OIFO-DALLAS MW,SED,KC,KCF PRINT BLANK MAR BCMA FOR SELECTED PATIENT ;04/25/03

Source Information

Source file <ALPBBK.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$DT^XLFDT  
Barcode Medication Administration 3 HDR^ALPBFRMU  ($$DEFDAYS,$$DEFPRT)^ALPBUTL  (ARRAY,MON,START)^ALPBUTL3  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSB BCBU PRINT BLK MAR  

Entry Points

Name Comments DBIA/ICR reference
FOOT ;FOOTER TO FROMS
STOP
DQ ; output entry point...

External References

Name Field # of Occurrence
^%ZIS ALPBBK+26
HOME^%ZIS ALPBBK+46
^%ZISC ALPBBK+34
^%ZTLOAD ALPBBK+45
HDR^ALPBFRMU DQ+8
$$DEFDAYS^ALPBUTL ALPBBK+20
$$DEFPRT^ALPBUTL ALPBBK+15
ARRAY^ALPBUTL3 DQ+15
MON^ALPBUTL3 DQ+15
START^ALPBUTL3 DQ+16
^DIR ALPBBK+10, ALPBBK+22
$$DT^XLFDT DQ+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,ALPBHDR(I)
  • Line Location: DQ+9
Function Call: WRITE
  • Prompt: !?61,"Admin"
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: ?74,MON
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: !,?2,"Order",?13,"Start",?35,"Stop",?61,"Times"
  • Line Location: DQ+16
Function Call: WRITE
  • Prompt: ?NST,"Notes"
  • Line Location: DQ+16
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+17
Function Call: WRITE
  • Prompt: "-"
  • Line Location: DQ+17
Function Call: WRITE
  • Prompt: ?J,"_____|"
  • Line Location: DQ+20
Function Call: WRITE
  • Prompt: ?J,"_____|"
  • Line Location: DQ+21
Function Call: WRITE
  • Prompt: ?J,"_____|"
  • Line Location: DQ+22
Function Call: WRITE
  • Prompt: ?J,"_____|"
  • Line Location: DQ+23
Function Call: WRITE
  • Prompt: ?J,"_____|"
  • Line Location: DQ+24
Function Call: WRITE
  • Prompt: ?J,"_____|"
  • Line Location: DQ+25
Function Call: WRITE
  • Prompt: "-"
  • Line Location: DQ+27
Function Call: WRITE
  • Prompt: !,"|",?13,"SIGNATURE/TITLE",?40,"| INIT",?48,"|",?60,"INJECTION SITES",?87,"|",?92,"MED/DOSE OMITTED",?115,"|",?120,"REASON",?132,"|",?135,"INIT",?140,"|"
  • Line Location: FOOT+1
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+2
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+3
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+4
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+5
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+6
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+7
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+7
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+8
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+9
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+9
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+10
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+10
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+11
Function Call: WRITE
  • Prompt: ?52,"Indicate RIGHT (R) or LEFT (L)"
  • Line Location: FOOT+12
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+13
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+13
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+14
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+14
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+15
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+15
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+16
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+17
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+17
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+18
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+18
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+19
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+20
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+20
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+21
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+21
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+22
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+22
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+23
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+24
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+24
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+25
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+25
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+26
Function Call: WRITE
  • Prompt: ?53,"(IM)",?75,"(SUB Q)"
  • Line Location: FOOT+27
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+28
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+28
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+29
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+29
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+30
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+30
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+31
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+32
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+32
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+33
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+33
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+34
Function Call: WRITE
  • Prompt: ?49,"1. DELTOID",?73,"6. UPPER ARM"
  • Line Location: FOOT+35
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+36
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+36
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+37
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+37
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+38
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+38
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+39
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+40
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+40
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+41
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+41
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+42
Function Call: WRITE
  • Prompt: ?49,"2. VENTRAL GLUTEAL",?73,"7. ABDOMEN"
  • Line Location: FOOT+43
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+44
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+44
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+45
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+45
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+46
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+46
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+47
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+48
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+48
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+49
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+49
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+50
Function Call: WRITE
  • Prompt: ?49,"3. GLUTEUS MEDIUS",?73,"8. THIGH"
  • Line Location: FOOT+51
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+52
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+52
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+53
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+53
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+54
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+54
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+55
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+56
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+56
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+57
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+57
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+58
Function Call: WRITE
  • Prompt: ?49,"4. MED (ANTERIOR) THIGH",?73,"9. BUTTOCK"
  • Line Location: FOOT+59
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+60
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+60
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+61
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+61
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+62
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+62
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+63
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+64
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+64
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+65
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+65
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+66
Function Call: WRITE
  • Prompt: ?49,"5. VASTUS LATERALIS",?73,"10. UPPER BACK"
  • Line Location: FOOT+67
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+68
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+68
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+69
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+69
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+70
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+70
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+71
Function Call: WRITE
  • Prompt: !,"|"
  • Line Location: FOOT+72
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+72
Function Call: WRITE
  • Prompt: ?40,"|"
  • Line Location: FOOT+73
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+73
Function Call: WRITE
  • Prompt: ?48,"|"
  • Line Location: FOOT+74
Function Call: WRITE
  • Prompt: ?50," PRN: E=Effective N=Not Effective"
  • Line Location: FOOT+75
Function Call: WRITE
  • Prompt: ?87,"|"
  • Line Location: FOOT+76
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+76
Function Call: WRITE
  • Prompt: ?115,"|"
  • Line Location: FOOT+77
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+77
Function Call: WRITE
  • Prompt: ?132,"|"
  • Line Location: FOOT+78
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+78
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+79
Function Call: WRITE
  • Prompt: !
  • Line Location: FOOT+80
Function Call: WRITE
  • Prompt: "-"
  • Line Location: FOOT+80
Function Call: WRITE
  • Prompt: ?140,"|"
  • Line Location: FOOT+81
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FOOT+86
Routine Call
  • %ZIS
  • Line Location:
    • ALPBBK+46
Routine Call
  • DIR
  • Line Location:
    • ALPBBK+10
    • ALPBBK+22
Routine Call
  • %ZIS
  • Line Location:
    • ALPBBK+26

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ALPB(53.7 - [#53.7] DQ+5, DQ+6
^TMP($J DQ+1!, FOOT+82!

Label References

Name Line Occurrences
DQ ALPBBK+33
FOOT STOP
STOP DQ+29

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ALPBBK+14*, ALPBBK+26!
%ZIS("B" ALPBBK+15*, ALPBBK+16!
>> ADM(7 DQ+18*, DQ+20, DQ+21, DQ+22, DQ+23, DQ+24, DQ+25
>> ADMIN(7 STOP+1!
ALPBDAYS ALPBBK+24*, ALPBBK+50!, DQ+12, FOOT+82!
ALPBHDR DQ+8, DQ+10!
ALPBHDR( DQ+9
ALPBHDR(0 DQ+9
ALPBIEN ALPBBK+12*, ALPBBK+28!, ALPBBK+50!, DQ+5, DQ+6
ALPBMLOG ALPBBK+50!
ALPBOIEN FOOT+82!
ALPBORDN FOOT+82!
ALPBOST FOOT+82!
ALPBOTYP ALPBBK+23!, ALPBBK+50!, FOOT+82!
ALPBPG DQ+7*, DQ+8, FOOT+82!
ALPBPT DQ+8, FOOT+82!
ALPBPT(0 DQ+5*
ALPBPT(1 DQ+6*
ALPBPTN ALPBBK+13*, ALPBBK+28!, ALPBBK+40, ALPBBK+50!
ALPBRDAT DQ+4*, FOOT+82!
ANS STOP+1!
BED STOP+1!
CURRENT STOP+1!
DAY DQ+12*, DQ+13, DQ+14, DQ+15, DQ+16, FOOT+82!
DFN STOP+1!
DIR ALPBBK+10!, ALPBBK+22!
DIR("?" ALPBBK+21*
DIR("A" ALPBBK+9*, ALPBBK+19*
DIR("B" ALPBBK+20*
DIR(0 ALPBBK+8*, ALPBBK+18*
DIRUT ALPBBK+6, ALPBBK+11, ALPBBK+23!, ALPBBK+51!
DOB STOP+1!
DTOUT ALPBBK+23!, ALPBBK+51!
FOOT DQ+11*, DQ+13*, STOP+1!
>> I DQ+9*
IENM STOP+1!
IO ALPBBK+32, ALPBBK+34
IO("Q" ALPBBK+31, ALPBBK+37, ALPBBK+48!
IO(0 ALPBBK+34
IOF FOOT+86
ION ALPBBK+39
IOST FOOT+86
J DQ+17*, DQ+20*, DQ+21*, DQ+22*, DQ+23*, DQ+24*, DQ+25*, DQ+27*, STOP+1!, FOOT+2*
, FOOT+3*, FOOT+4*, FOOT+5*, FOOT+6*, FOOT+7*, FOOT+9*, FOOT+10*, FOOT+13*, FOOT+14*, FOOT+15*
, FOOT+17*, FOOT+18*, FOOT+20*, FOOT+21*, FOOT+22*, FOOT+24*, FOOT+25*, FOOT+28*, FOOT+29*, FOOT+30*
, FOOT+32*, FOOT+33*, FOOT+36*, FOOT+37*, FOOT+38*, FOOT+40*, FOOT+41*, FOOT+44*, FOOT+45*, FOOT+46*
, FOOT+48*, FOOT+49*, FOOT+52*, FOOT+53*, FOOT+54*, FOOT+56*, FOOT+57*, FOOT+60*, FOOT+61*, FOOT+62*
, FOOT+64*, FOOT+65*, FOOT+68*, FOOT+69*, FOOT+70*, FOOT+72*, FOOT+73*, FOOT+76*, FOOT+77*, FOOT+78*
, FOOT+80*
>> JY DQ+19*, DQ+28*
>> MON DQ+15
MST DQ+13*, DQ+20, DQ+21, DQ+22, DQ+23, DQ+24, DQ+25, STOP+1!
NST DQ+14*, DQ+16, STOP+1!
PCOUNT STOP+1!
POP ALPBBK+27, ALPBBK+28!
PTNAME STOP+1!
ROOM STOP+1!
SEX STOP+1!
SSN STOP+1!
ST STOP+1!
WARD STOP+1!
X ALPBBK+11!, ALPBBK+23!, ALPBBK+50!, ALPBBK+51!
Y ALPBBK+11!, ALPBBK+12, ALPBBK+23!, ALPBBK+24, ALPBBK+50!, ALPBBK+51!, STOP+1!
Y(0 ALPBBK+13
>> ZTDESC ALPBBK+40*
>> ZTIO ALPBBK+39*
>> ZTQUEUED FOOT+83
>> ZTREQ FOOT+83*
>> ZTRTN ALPBBK+38*
>> ZTSAVE("ALPBDAYS" ALPBBK+41*
>> ZTSAVE("ALPBIEN" ALPBBK+42*
>> ZTSAVE("ALPBMLOG" ALPBBK+43*
>> ZTSAVE("ALPBOTYP" ALPBBK+44*
ZTSK ALPBBK+47, ALPBBK+48!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All