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

Package: Consult Request Tracking

Routine: GMRCADC


Information

GMRCADC ;SLC/DLT/DCM - DC taken from List Manager ; 7/11/05 1:40pm

Source Information

Source file <GMRCADC.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Consult Request Tracking 6 ($$LOCK,UNLOCK)^GMRCA1  SELECT^GMRCA2  ($$ORTX,$$VALID,GETPROV)^GMRCAU  EN^GMRCHL7  (AUDIT,MSG,STATUS)^GMRCP  ($$DCPRNT,$$GETDT,PRNT)^GMRCUTL1  
Kernel 1 $$PROVIDER^XUSER  
List Manager 1 FULL^VALM1  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 27

Package Total Caller Graph
Consult Request Tracking 27 GMRC101C  GMRCA1  GMRCAAC  GMRCACMT  GMRCAFRD  GMRCAR  GMRCART  GMRCASF  
GMRCASV  GMRCDIS  GMRCEDT2  GMRCEDT4  GMRCGUIA  GMRCHL7B  GMRCIACT  GMRCMCP  
GMRCMED  GMRCP5  GMRCPR0  GMRCR  GMRCSLM2  GMRCSSP  GMRCSTS  GMRCSTU  
GMRCTIUA  GMRCTIUE  GMRCTIUL  

Entry Points

Name Comments DBIA/ICR reference
EXAC(MSG) ;Exit message asking for user to press <ENTER> EXAC=Exit Action
DC(GMRCO,GMRCA) ;Discontinue a consult logic from DC^GMRCA1
PROC ;Check validity of action and if valid process the discontinue action
DCNOTE(IEN,USER) ;determine if service users receive alerts based on 1.04
FRGTPRV

External References

Name Field # of Occurrence
^DIR DC+10
$$LOCK^GMRCA1 DC+12
UNLOCK^GMRCA1 DC+18, DC+24
SELECT^GMRCA2 DC+4
$$ORTX^GMRCAU FRGTPRV+10
$$VALID^GMRCAU DCNOTE+6
GETPROV^GMRCAU FRGTPRV
EN^GMRCHL7 DC+23
AUDIT^GMRCP FRGTPRV+8
MSG^GMRCP FRGTPRV+18
STATUS^GMRCP FRGTPRV+7
$$DCPRNT^GMRCUTL1 DC+20
$$GETDT^GMRCUTL1 FRGTPRV+3
PRNT^GMRCUTL1 DC+21
FULL^VALM1 DC+1
$$PROVIDER^XUSER FRGTPRV+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,MSG
  • Line Location: EXAC+2
Function Call: WRITE
  • Prompt: !,MSG(ND)
  • Line Location: EXAC+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EXAC+4
Function Call: WRITE
  • Prompt: !,"Press <RETURN> to continue: "
  • Line Location: EXAC+4
Function Call: WRITE
  • Prompt: !!
  • Line Location: EXAC+4
Function Call: WRITE
  • Prompt: !,"The requesting facility may not take this action on an "
  • Line Location: DC+8
Function Call: WRITE
  • Prompt: "inter-facility consult."
  • Line Location: DC+9
Routine Call
  • DIR
  • Line Location:
    • DC+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123 - [#123] DC+6, DC+14, FRGTPRV+12, DCNOTE+2
^GMR(123.1 - [#123.1] DC+16, FRGTPRV+10
^GMR(123.5 - [#123.5] DCNOTE+3

Label References

Name Line Occurrences
$$DCNOTE FRGTPRV+14
EXAC PROC+2, PROC+3, PROC+4, PROC+5
FRGTPRV FRGTPRV+1
PROC DC+18

Naked Globals

Name Field # of Occurrence
^(0 FRGTPRV+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DCFLG DCNOTE+1~, DCNOTE+3*, DCNOTE+4, DCNOTE+5, DCNOTE+6
>> DFN DC+15*, DC+23
DIR DC+7~
DIR(0 DC+10*
DIROUT PROC+1~, FRGTPRV
DTIME EXAC+4
DTOUT PROC+1~, FRGTPRV
DUOUT PROC+1~, FRGTPRV
DUZ DC+20, FRGTPRV+12, FRGTPRV+14
GETPROV PROC+8~
GMRC DC+2~
GMRC(0 DC+14*, DC+15, DC+21, PROC+2, PROC+3, PROC+4, PROC+5, FRGTPRV+5*
GMRCA DC~, DC+16, DC+20, DC+22, FRGTPRV+5, FRGTPRV+10, FRGTPRV+14, FRGTPRV+17
GMRCACT PROC+1~, FRGTPRV+1*
GMRCACTM DC+2~, DC+16*, FRGTPRV+10
GMRCAD DC+2~, DC+23, FRGTPRV+3*, FRGTPRV+4
GMRCADUZ DC+2~, FRGTPRV+11*, FRGTPRV+18
GMRCADUZ( FRGTPRV+12*
GMRCDA DC+2~, DC+14*
>> GMRCDFN DC+15*, PROC+7, FRGTPRV+18
GMRCFL PROC+1~, FRGTPRV+11*, FRGTPRV+14*, FRGTPRV+18
GMRCMSG PROC+1~, PROC+2*, PROC+3*, PROC+4*, PROC+5*
GMRCMSG(1 PROC+4*
GMRCO DC~, DC+4, DC+5, DC+6, DC+12, DC+14, DC+18, DC+20, DC+21, DC+23
, DC+24, FRGTPRV+10, FRGTPRV+12, FRGTPRV+14, FRGTPRV+18
>> GMRCOM DC+23, FRGTPRV+6*
>> GMRCORNP DC+23, FRGTPRV+1
>> GMRCORTX FRGTPRV+10*, FRGTPRV+18
>> GMRCORVP PROC+7*
GMRCQIT DC+3!
GMRCQUT DC+3!, DC+4, DC+5*, DC+11*, DC+12*, DC+18*, PROC+2*, PROC+3*, PROC+4*, PROC+5*
, FRGTPRV*, FRGTPRV+4*
>> GMRCRB DC+23
GMRCSERV DC+2~
>> GMRCSTS FRGTPRV+5*
>> GMRCTRLC DC+22*, DC+23
>> GMRCTYPE DC+23
>> GMRCVSIT DC+23
IEN DCNOTE~, DCNOTE+2, DCNOTE+6
>> IOBM DC+1
>> IOSTBM DC+1
>> IOTM DC+1
MSG EXAC~, EXAC+2
MSG( EXAC+2, EXAC+3
MSG(0 EXAC+2
ND EXAC+1~, EXAC+2*, EXAC+3
NOTYPE FRGTPRV+17~*, FRGTPRV+18
SERV DCNOTE+1~, DCNOTE+2*, DCNOTE+3, DCNOTE+6
U DC+6, DC+21, FRGTPRV+1, FRGTPRV+10, DCNOTE+2, DCNOTE+3
USER DCNOTE~, DCNOTE+6
X EXAC+1~, EXAC+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All