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

Package: Consult Request Tracking

Routine: GMRCT


Information

GMRCT ; SLC/DLT\JFR - Get DUZ's of users for notification to service ; 11/25/2000

Source Information

Source file <GMRCT.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Consult Request Tracking 1 (FINDPAR,TESTHELP)^GMRCAU  
Order Entry Results Reporting 1 TEAMPROV^ORQPTQ1  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Consult Request Tracking 7 GMRC USER NOTIFICATION  GMRCAU  GMRCCC  GMRCCP  GMRCEDT2  GMRCNOTF  GMRCP  
Electronic Health Modernization 1 EHM-00054  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
EN(GMRCSRV,USER,TEST) ;Get who is to be notified for alert action
; return them in array GMRCADUZ(DUZ)=""
RECIP(GMRCSS,NOTNULL) ;gather recipients for GMRCSS
LOC ;Find the patients location and match to location assignments
LOC1 ;Get user and/or team assigned to location
ADMU ;Get notification recips from admin users field (123.33)
ADMT ;Get notification recips from admin teams field (123.34)
TEAM ;Loop through Teams to send all users notifications
TEAM1 ;Get user DUZ's from Team pointed to in File
NOTSERV(RECIP) ;set GMRCADUZ(RECIP)=all services they receive for
TEST ; called from GMRC NOTIF RECIPIENTS
HIER(SERV) ;ask to see the hierarchy
TSTINTRO ; entry action for GMRC USER NOTIFICATION

External References

Name Field # of Occurrence
^DIR TEST+5, TEST+10, HIER+5
FINDPAR^GMRCAU EN+6, EN+17
TESTHELP^GMRCAU HIER+6
TEAMPROV^ORQPTQ1 TEAM1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This user is a notification recipients for "_GMRCADUZ(GMRCUSR),!
  • Line Location: TEST+14
Function Call: WRITE
  • Prompt: !!
  • Line Location: TEST+17
Function Call: WRITE
  • Prompt: !!,"This user is not a notification recipient.",!!
  • Line Location: TEST+18
Function Call: WRITE
  • Prompt: !,"This option will list how a given user became a notification recipient"
  • Line Location: TSTINTRO+1
Function Call: WRITE
  • Prompt: !,"for a selected consult service. If the PROCESS PARENTS FOR NOTIFS field is"
  • Line Location: TSTINTRO+2
Function Call: WRITE
  • Prompt: !,"set to YES, all the parents of the service will also be processed to"
  • Line Location: TSTINTRO+3
Function Call: WRITE
  • Prompt: !,"determine if the user is a recipient via that service.",!!
  • Line Location: TSTINTRO+4
Routine Call
  • DIR
  • Line Location:
    • TEST+5
    • TEST+10
    • HIER+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(123 - [#123] LOC+2
^GMR(123.5 - [#123.5] EN+4, EN+16, RECIP+3, RECIP+4, RECIP+5, RECIP+6, RECIP+7, LOC+4, LOC+5, LOC1+2
, LOC1+5, ADMU+4, ADMT+4, TEAM+1, NOTSERV+1, NOTSERV+2, TEST+15
^SC - [#44] LOC+2

Label References

Name Line Occurrences
$$NOTSERV RECIP+3, LOC1+4, ADMU+6, TEAM1+7
ADMT RECIP+7
ADMU RECIP+6
EN TEST+12
HIER TEST+16
LOC RECIP+5
LOC1 LOC+4, LOC+5
RECIP EN+3, EN+12
TEAM RECIP+4
TEAM1 LOC1+5, ADMT+5, TEAM+1
TEST TEST+19

Naked Globals

Name Field # of Occurrence
^(0 LOC1+5
^(123 RECIP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR TEST+2~, TEST+8~, HIER+1~
DIR("?" TEST+4*
DIR("??" TEST+5*
DIR("A" TEST+3*, TEST+9*, HIER+3*
DIR("B" HIER+4*
DIR(0 TEST+3*, TEST+9*, HIER+2*
DIROUT TEST+2~
DIRUT TEST+2~, TEST+6, TEST+10, HIER+1~
DTOUT TEST+2~, HIER+1~
DUOUT TEST+2~, HIER+1~
DUZ RECIP+3, LOC1+4, ADMU+5, TEAM1+4, TEAM1+5
GMRCADUZ TEST+1~
GMRCADUZ( EN+3, EN+12, RECIP+3*, LOC1+4*, ADMU+6*, TEAM1+6*, TEAM1+7*, NOTSERV+1, NOTSERV+2, TEST+13
, TEST+14, TEST+15, TEST+16, TEST+18
GMRCER RECIP+1~
GMRCHKD EN+2~
GMRCHKD( EN+5*, EN+10, EN+14*
GMRCHL RECIP+1~, LOC+1*, LOC+2*, LOC+3*, LOC+5
>> GMRCHLI LOC+3
GMRCLIS EN+2~, EN+6
GMRCLIS( EN+8, EN+9!, EN+10, EN+12, EN+14, EN+15*, EN+16, EN+17
GMRCLP EN+2~, EN+7*, EN+8*, EN+9, EN+10, EN+12, EN+14, EN+15, EN+16, EN+17
, EN+18*
GMRCLST RECIP+1~, TEAM1+1*, TEAM1+8!
GMRCLST( TEAM1+3, TEAM1+4, TEAM1+5, TEAM1+6, TEAM1+7
GMRCLST(0 TEAM1+2
GMRCLST(1 TEAM1+2
GMRCNT EN+2~, EN+5*, EN+6, EN+17
>> GMRCO RECIP+5, LOC+2
GMRCQUIT EN+2~, EN+8, EN+13*
GMRCSRV EN~, EN+3, EN+4, EN+5, EN+6, TEST+1~, TEST+7*, TEST+12, TEST+15
GMRCSS RECIP~, RECIP+3, RECIP+4, RECIP+5, RECIP+6, RECIP+7, LOC+4, LOC+5, LOC1+2, LOC1+5
, ADMU+4, ADMT+4, TEAM+1, NOTSERV+1, NOTSERV+2
GMRCSSI RECIP+1~, LOC+4*, LOC+5*, LOC1+2, LOC1+5
GMRCTM RECIP+1~, TEAM+1*
GMRCTMI RECIP+1~, LOC1+5*, ADMT+3~*, ADMT+4*, TEAM+1*, TEAM1+1, TEAM1+6
GMRCU RECIP+1~, TEAM1+3*, TEAM1+4, TEAM1+5, TEAM1+6, TEAM1+7
GMRCUSER LOC1+1~, LOC1+2*, LOC1+4
GMRCUSR TEST+1~, TEST+11*, TEST+12, TEST+13, TEST+14, TEST+15, TEST+16, TEST+18
GMRCWL RECIP+1~, LOC+1*, LOC+2*, LOC+3*, LOC+4
>> GMRCWLI LOC+3
NOTNULL RECIP~, RECIP+3, LOC1+4, ADMU+5, ADMU+6, TEAM1+5, TEAM1+7
RECIP ADMU+2~, ADMU+3*, ADMU+4*, ADMU+5, ADMU+6, NOTSERV~, NOTSERV+1, NOTSERV+2
SERV HIER~, HIER+6
TEST EN~, EN+3, EN+12
U EN+4, EN+9, EN+15, EN+16, TEAM1+6, NOTSERV+1, NOTSERV+2, TEST+15
USER EN~, EN+3, EN+12
X TEST+2~
Y TEST+2~, TEST+7, TEST+11, HIER+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All