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: APSKAMN5

Package: IHS Changes To Pharmacy

Routine: APSKAMN5


Information

APSKAMN5 ;IHS/ANMC/SFB/MRS - CALC MIN & MAX SERUM CONC.,DOSING INTERVALS & RATE; [ 09/28/94 1:03 PM ]

Source Information

Source file <APSKAMN5.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
IHS Changes To Pharmacy 2 NOINFO^APSKAMN  EXP^APSKAMN6  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS Changes To Pharmacy 1 APSKAMN4  

Entry Points

Name Comments DBIA/ICR reference
REPEAT ;EP
HDR2
HDR
HDR1
APSKREM
SKIP2
EN2
QUE2
END
SB
REPEAT2 ;===>USER ENTERS RECOMMENDED DOSE AND INTERVAL
FINALR
LOOP ;EP

External References

Name Field # of Occurrence
^%ZIS FINALR
^%ZISC FINALR+2, QUE2+4, EN2+15
^%ZTLOAD QUE2+3
NOINFO^APSKAMN LOOP+5, REPEAT+1
EXP^APSKAMN6 LOOP+6, LOOP+8, LOOP+11
^DIR LOOP+23, SKIP2+2, SKIP2+7, REPEAT2+5, REPEAT2+8, REPEAT+4, REPEAT+7, HDR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,APSKK3," mg/hr given over ",APSKT0," hour every ",APSKT3," hours will produce:"
  • Line Location: LOOP+17
Function Call: WRITE
  • Prompt: !," ",$J(APSKC4,3,2)," mcg per ml MAXIMUM serum concentrations"
  • Line Location: LOOP+18
Function Call: WRITE
  • Prompt: !," ",$J(APSKC5,3,2)," mcg per ml MINIMUM serum concentrations"
  • Line Location: LOOP+19
Function Call: WRITE
  • Prompt: !!
  • Line Location: LOOP+20
Function Call: WRITE
  • Prompt: !!
  • Line Location: SKIP2+5
Function Call: WRITE
  • Prompt: !!
  • Line Location: REPEAT2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: REPEAT2+5
Function Call: WRITE
  • Prompt: !
  • Line Location: REPEAT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: "*"
  • Line Location: HDR2+2
Function Call: WRITE
  • Prompt: " CONFIDENTIAL PATIENT INFORMATION "
  • Line Location: HDR2+3
Function Call: WRITE
  • Prompt: "*"
  • Line Location: HDR2+4
Function Call: WRITE
  • Prompt: !,"Printed by: ",$P(^VA(200,DUZ,0),U),?(IOM-10),"PAGE: ",$J(APSKPAGE,3)
  • Line Location: HDR2+5
Function Call: WRITE
  • Prompt: !!!,"THIS IS INTENDED TO BE ONLY A WORKSHEET. IT SHOULD BE SHREDDED WHEN YOU ARE"
  • Line Location: HDR2+6
Function Call: WRITE
  • Prompt: !,"FINISHED."
  • Line Location: HDR2+7
Function Call: WRITE
  • Prompt: !!!,"NAME:",?6,APSKNAME,?34,"DOSING WT:",APSKWT," KG"
  • Line Location: HDR2+8
Function Call: WRITE
  • Prompt: !,"DATE OF ANALYSIS: ",APSKDATE,?34,"CHART NUMBER: ",APSKCHRT
  • Line Location: HDR2+9
Function Call: WRITE
  • Prompt: !!?15,"AMINOGLYCOSIDE KINETICS WORKSHEET"
  • Line Location: HDR2+10
Function Call: WRITE
  • Prompt: !?15,"---------------------------------"
  • Line Location: HDR2+11
Function Call: WRITE
  • Prompt: !!,"POSSIBLE OPTIONS"
  • Line Location: HDR2+12
Function Call: WRITE
  • Prompt: !,"----------------",!
  • Line Location: HDR2+13
Routine Call
  • DIR
  • Line Location:
    • LOOP+23
    • SKIP2+2
    • SKIP2+7
    • REPEAT2+5
    • REPEAT2+8
    • REPEAT+4
    • REPEAT+7
    • HDR
Routine Call
  • %ZIS
  • Line Location:
    • FINALR

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VA(200 - [#200] HDR2+5

Label References

Name Line Occurrences
@( EN2+1
APSKREM EN2+13
EN2 FINALR+1
END LOOP+23, SKIP2+2, SKIP2+7, REPEAT2+5, REPEAT2+8, REPEAT+4, REPEAT+7, FINALR, HDR
FINALR LOOP+16, SKIP2+10
HDR EN2+14, HDR2+1
HDR1 EN2+7
LOOP REPEAT2+10, REPEAT+10
QUE2 FINALR
REPEAT SKIP2+4
SB LOOP+16, LOOP+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % QUE2+1*
>> %ZIS FINALR*
>> APSK HDR2+2*, HDR2+4*
>> APSK( EN2+2, EN2+3, SB+1*, APSKREM!
>> APSKC4 LOOP+10*, LOOP+12, LOOP+13*, LOOP+14*, LOOP+18, EN2+5*, EN2+9, SB+1
>> APSKC4A LOOP+7*, LOOP+10
>> APSKC4B LOOP+9*, LOOP+10
>> APSKC5 LOOP+12*, LOOP+15*, LOOP+19, EN2+6*, EN2+10, SB+1
>> APSKCC SKIP2+7*, SKIP2+10
>> APSKCHRT HDR2+9
>> APSKCLR APSKREM*
>> APSKCNT EN2*, EN2+12*, EN2+14, HDR+1, APSKREM
>> APSKDATE HDR2+9
>> APSKEE LOOP+7, LOOP+9, LOOP+12
>> APSKFIN LOOP+16, REPEAT2+9*
>> APSKK1 LOOP+6, LOOP+8, LOOP+9, LOOP+11
>> APSKK3 LOOP+7, LOOP+17, REPEAT2+5*, REPEAT+4*, EN2+4*, EN2+8, SB+1
>> APSKN0 EN2*, EN2+2*, EN2+3
>> APSKNAME HDR2+8
>> APSKND EN2+3*, EN2+4, EN2+5, EN2+6
>> APSKNP EN2+13
>> APSKPAGE EN2*, HDR2*, HDR2+5
>> APSKPTIN LOOP+5, REPEAT+1
>> APSKQ SKIP2+2*, SKIP2+4
>> APSKSS HDR+1, SB*, SB+1
>> APSKT0 LOOP+6, LOOP+11, LOOP+17, EN2+4*, EN2+8, SB+1
>> APSKT3 LOOP+8, LOOP+11, LOOP+17, REPEAT2+8*, REPEAT+7*, EN2+5*, EN2+8, SB+1
>> APSKV1 LOOP+9
>> APSKWT HDR2+8
>> APSKXX LOOP+6*, LOOP+8*, LOOP+11*
DIR LOOP+21!, SKIP2!, SKIP2+5!, REPEAT2+3!, REPEAT2+6!, REPEAT+2!, REPEAT+5!, HDR!
DIR("A" LOOP+22*, SKIP2+1*, SKIP2+6*, REPEAT2+4*, REPEAT2+7*, REPEAT+3*, REPEAT+6*
DIR("B" LOOP+21*, SKIP2*
DIR(0 LOOP+21*, SKIP2*, SKIP2+5*, REPEAT2+3*, REPEAT2+6*, REPEAT+2*, REPEAT+5*, HDR*
>> DIRUT LOOP+23, SKIP2+2, SKIP2+7, REPEAT2+5, REPEAT2+8, REPEAT+4, REPEAT+7, HDR
DUZ HDR2+5
IO EN2+1
IO("Q" FINALR, QUE2!
IOF HDR1
IOM HDR2+5
IOSL EN2+7, EN2+14, HDR2+1
IOST EN2+1, HDR, HDR2+1
>> POP FINALR
U HDR2+5
>> Y LOOP+24, SKIP2+2, SKIP2+7, REPEAT2+5, REPEAT2+8, REPEAT+4, REPEAT+7
>> ZTDESC QUE2+2*
>> ZTRTN QUE2+2*
ZTSAVE QUE2!
ZTSAVE( QUE2+1*
ZTSK QUE2+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All