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  | All
Print Page as PDF
Routine: GMRYMNT

Package: General Medical Record - IO

Routine: GMRYMNT


Information

GMRYMNT ;HIRMFO/YH-SITE CARE/MAINTENANCE/FLUSH ;8/13/96

Source Information

Source file <GMRYMNT.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
General Medical Record - IO 3 FINDCA^GMRYCATH  (DCDATE,EN1)^GMRYMNT1  $$ADM^GMRYUT12  
VA FileMan 3 ^%DT  (C,NOW)^%DTC  ^DIWP  

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

Package Total Caller Graph
General Medical Record - IO 4 GMRYDCIV  GMRYED3  GMRYED6  GMRYFLSH  
Nursing Service 1 NURCES2  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;IV SITE MAINTENANCE FOR OPEN SITE AND SITE CHECK FOR ALL IV SITES
DT
Q1
SEL1 ;SELECT IV SITE FOR SITE CHECK OR MAINTENANCE
NXT
SELSITE ;SELECT ALL CURRENT AND DISCONTINUED SITES WITHIN THE LAST 24 HR
WRITE ;
WRITE1 ;
SCREEN ;SCREEN IV SITES DISCONTINUED WITHIN THE LAST 24 HRS
SET ;

External References

Name Field # of Occurrence
^%DT DT
C^%DTC SELSITE+1
NOW^%DTC SELSITE+1
^DIWP WRITE+4
FINDCA^GMRYCATH NXT+1, SET+1
DCDATE^GMRYMNT1 SELSITE+3
EN1^GMRYMNT1 DT+3
$$ADM^GMRYUT12 DT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The date/time can not come before the time IV started"_$S(GOPT="MAINTN":" for the site.",1:"."),!
  • Line Location: DT+1
Function Call: WRITE
  • Prompt: !!,"There are no IV sites with IV(s) running.",!
  • Line Location: SEL1+1
Function Call: WRITE
  • Prompt: !,GSITE_":",!
  • Line Location: SEL1+2
Function Call: WRITE
  • Prompt: !,I_". "
  • Line Location: SEL1+3
Function Call: WRITE
  • Prompt:
  • Condition for execution: GDA'="BLANK" !,?3,GDA S GDA(1)=0 F S GDA(1)=$O(GST(GSITE,GDA,GDA(1))) Q:GDA(1)'>0
  • Line Location: SEL1+3
Function Call: WRITE
  • Prompt: !!,"Select an IV site to add additional solutions: "
  • Line Location: SEL1+5
Function Call: WRITE
  • Prompt: !!,"Select an IV site to discontinue: "
  • Line Location: SEL1+6
Function Call: WRITE
  • Prompt: !!,"Select IV site for care/maintenance/flush: "
  • Line Location: SEL1+7
Function Call: WRITE
  • Prompt: !!,"Select IV site to flush: "
  • Line Location: SEL1+8
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: SEL1+9
Function Call: WRITE
  • Prompt: !,?4,^UTILITY($J,"W",0,I,0)
  • Line Location: WRITE+5
Function Call: WRITE
  • Prompt: GSITE_$S(GCT(GSITE)=0:" - IV discontinued on "_GMRXY(GSITE),1:" - "_GSITE(GSITE))
  • Line Location: WRITE1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(126 - [#126] DT, NXT, SELSITE+2, SCREEN+1, SET+2
^GMRD(126.74 - [#126.74] NXT+1
^UTILITY($J WRITE+4!, WRITE+5, WRITE+6!

Label References

Name Line Occurrences
DT DT+1
Q1 EN1+1, DT, DT+2
SCREEN SELSITE+2
SEL1 EN1+1, NXT+2, NXT+3
SET SCREEN+1
WRITE SEL1+4
WRITE1 SEL1+3

Naked Globals

Name Field # of Occurrence
^(3 SET+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % SELSITE+1
%DT DT*!
%DT("A" DT*
%DT("B" DT*
ADD Q1!
>> DA NXT*
>> DA(1 NXT*
>> DFN DT, DT+2, NXT, SELSITE+2, SCREEN+1, SET+2
>> DIWF WRITE+4*
>> DIWL WRITE+4*
>> DIWR WRITE+4*
DTIME SEL1+9
>> GADD EN1+1*
>> GCATH NXT+1*
>> GCATH(2 NXT+1*
GCT SELSITE+1!
GCT( WRITE1+1, SET+1*, SET+2*
>> GDA SEL1+3*, SEL1+4, WRITE+3, SCREEN+1*, SET+2
>> GDA(1 SEL1+3*, SEL1+4, WRITE+3
GDATA Q1!, SEL1+4*, WRITE+1, WRITE+2, SCREEN+1*, SET+2
>> GDCDT DT+3*
GDCIV EN1+1*, Q1!, NXT+2
>> GDT SELSITE+2*, SCREEN+1
>> GGNN SCREEN+1
>> GIVDT SELSITE+1*, SCREEN+1
>> GMROUT EN1+1, DT+2, SEL1+9*, SEL1+10*
>> GMROUT(1 DT+2*
GMRXY SEL1+1, SEL1+3, SELSITE+1!, SELSITE+2*, SELSITE+4*
GMRXY( SEL1+3, NXT, SELSITE+4*, WRITE1+1, SET+1*
>> GOPT DT+1, SEL1+5, SEL1+6, SEL1+7, SEL1+8
>> GSITE DT, SEL1+3*, SEL1+4, NXT*, NXT+1, SELSITE+2*, SELSITE+4*, WRITE+3, WRITE1+1, SCREEN+1
, SET+1, SET+2
>> GSITE( NXT+1*, WRITE1+1, SET+1*
GST DT*, DT+1*, SELSITE+1!, SET+2*
GST( SEL1+3, SEL1+4, WRITE+3*, SET+2*
GST(1 DT*
>> GX DT+2*
I SEL1+3*, WRITE+1~, WRITE+5*
X EN1+1, DT+2*, SEL1+9*, SEL1+10, NXT, NXT+2, SELSITE+1, WRITE+1~*, WRITE+2*, WRITE+3
>> X1 SELSITE+1*
>> X2 SELSITE+1*
>> Y DT, DT+1, DT+2, WRITE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All