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 |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: GMRYED4

Package: General Medical Record - IO

Routine: GMRYED4


Information

GMRYED4 ;HIRMFO/YH - INTRAVENOUS INFUSION PROTOCOL ;10/16/96

Source Information

Source file <GMRYED4.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
General Medical Record - IO 5 DC^GMRYED6  ^GMRYSTCA  (DC,WAIT)^GMRYUT0  SEL^GMRYUT13  IVINTK^GMRYUT8  
VA FileMan 2 FILE^DICN  ^DIE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
General Medical Record - IO 2 GMRYED3  GMRYINFS  

Entry Points

Name Comments DBIA/ICR reference
HANG ;DC CURRENT SOLUTION/ADD THE SAME SOLUTION - CONTINUED
ADD
RATE
RATE1
QUICK
SELSITE ;SELECT IV SITE TO EDIT
SEL
CHCKDC
LISTQUES ;
HELP
LISTOP ;
QUES ;

External References

Name Field # of Occurrence
FILE^DICN QUICK
^DIE QUICK+2
DC^GMRYED6 HANG+1
^GMRYSTCA ADD+1
DC^GMRYUT0 HANG+2, HANG+3, HANG+4, HANG+8
WAIT^GMRYUT0 QUICK, QUICK+2
SEL^GMRYUT13 SEL+1
IVINTK^GMRYUT8 HANG+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Last reading for AMOUNT LEFT is "_$P(^GMR(126,DA(1),"IV",DA,"IN",GGDA,0),"^",2)_" mls"
  • Line Location: HANG+5
Function Call: WRITE
  • Prompt: !,"Total solution absorbed for this bottle: "_$S($P(^GMR(126,DA(1),"IV",DA,"IN",GGDA,0),"^",2)["*":"UNKNOWN",1:($P(GDATA,"^",5)-GTOTAL)_" mls"),!
  • Line Location: HANG+11
Function Call: WRITE
  • Prompt: !,"DC canceled!!!",!
  • Line Location: ADD+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: RATE+0
Function Call: WRITE
  • Prompt: !,"Infusion rate(ml/hr)"_$S(GMRZ(3)'="":" "_GMRZ(3)_" //",1:": ") S X="" R X:DTIME Q:'$T!(X["^")
  • Line Location: RATE+0
Function Call: WRITE
  • Prompt: !,"IV is defined as IV line/port/lock",!
  • Line Location: LISTQUES+1
Function Call: WRITE
  • Prompt: !,$P(GMRW,"^"),!,?5,$P(GMRW,"^",3)
  • Line Location: LISTQUES+1
Function Call: WRITE
  • Prompt: !!,"Enter a number between 0 and 999 at which the infusion takes place",!,"0 means that the rate is UNKNOWN",!
  • Line Location: HELP+0
Function Call: WRITE
  • Prompt: !,$P(GMRW,"^")
  • Line Location: LISTOP+1
Routine Call
  • DIE
  • Line Location:
    • QUICK+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(126 - [#126] HANG+1, HANG+2, HANG+3, HANG+4, HANG+5, HANG+7, HANG+8, HANG+11, ADD*, QUICK
, QUICK+2, SELSITE+1, CHCKDC

Label References

Name Line Occurrences
ADD HANG+2, HANG+3, HANG+4
CHCKDC SELSITE+1
HELP RATE, RATE+1
RATE RATE, RATE+1

Naked Globals

Name Field # of Occurrence
^( SELSITE+1
^(0 HANG+1, ADD*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA HANG+1, HANG+2, HANG+3, HANG+4, HANG+5, HANG+7, HANG+8, HANG+11, QUICK*
>> DA(1 HANG+1, HANG+2, HANG+3, HANG+4, HANG+5, HANG+7, HANG+8, HANG+11, ADD, QUICK*
, QUICK+1
DD QUICK!
>> DFN ADD, QUICK, QUICK+2, SELSITE+1, CHCKDC
DIC QUICK*!
DIC(0 QUICK*
DIE QUICK+1*, QUICK+3!
DLAYGO QUICK*!
DR QUICK+1*, QUICK+3!
DTIME RATE
>> GDA SELSITE+1*, CHCKDC
>> GDATA HANG+11
>> GDCDT HANG+1*, HANG+2, QUICK
>> GDT HANG+4*, HANG+5, SELSITE+1*
>> GGDA HANG+5*, HANG+7, HANG+8*, HANG+11
>> GHLOC HANG+2*, HANG+3*, HANG+4*, HANG+6*, HANG+8*
>> GLABEL HANG+2*, HANG+3*, HANG+4*, HANG+6*, HANG+8*
GMRDATA SEL!
>> GMRDEL HANG+2*
>> GMRHLOC HANG+2, HANG+3, HANG+4, HANG+6, HANG+8
>> GMROUT HANG+1, HANG+10, ADD, ADD+1, QUICK, QUICK+2, SEL*
>> GMRVTYP HANG+1*, ADD+2, QUICK*
>> GMRW LISTQUES+1*, LISTOP+1*
>> GMRX SELSITE+1*, CHCKDC*
>> GMRX( CHCKDC*
>> GMRY SELSITE+1*, CHCKDC*
>> GMRZ ADD+3
>> GMRZ(1 HANG+1, ADD+3
>> GMRZ(2 ADD+2*, ADD+3
>> GMRZ(3 ADD+2*, ADD+3*, RATE, RATE+1
GN SEL!
>> GNN LISTQUES+1*, LISTOP+1*
>> GNN( LISTOP+1*
>> GSAVE QUICK*
>> GSITE SELSITE+1*, SEL*, CHCKDC
>> GTOTAL HANG+11
>> GX HANG+2*, QUICK*
>> I LISTQUES+1*, LISTOP+1*
>> X RATE*, RATE+1*, RATE1, QUICK*, LISTQUES+1*, LISTOP+1*
>> Y QUICK

Marked Items

Name Field # of Occurrence
$T(QUES+I LISTQUES+1, LISTOP+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All