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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: RGHLLOG

Package: Clinical Information Resource Network

Routine: RGHLLOG


Information

RGHLLOG ;CAIRO/DKM-LOG MESSAGE PROCESSING INFO ;09/04/98

Source Information

Source file <RGHLLOG.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  ($$GET1,GETS)^DIQ  
Clinical Information Resource Network 2 SENDMPI^RGHLLOG1  (ALERT,MAIL)^RGRSUTL2  
Kernel 1 $$NOW^XLFDT  

Caller Graph

Caller Graph Total: 55

Package Total Caller Graph
Master Patient Index VistA 28 MPIF001  MPIF002  MPIFA24  MPIFA24B  MPIFA31B  MPIFA37  MPIFA40  MPIFA43  
MPIFACHK  MPIFAPI1  MPIFBT1  MPIFBT2  MPIFBT3  MPIFCMOR  MPIFDEL  MPIFDNL  
MPIFEDIT  MPIFQ0  MPIFQ3  MPIFQUE3  MPIFQUE4  MPIFQUE5  MPIFREQ  MPIFRES  
MPIFRESS  MPIFREV  MPIFRPC2  MPIFVTQ  
Clinical Information Resource Network 16 RGADTP  RGADTUT  RGDRM02  RGDRM03  RGEQSUB  RGFIACK  RGFIPM1  RGFIU  
RGHLLOG1  RGJCREC  RGJCSUB  RGJCTS01  RGMTUT02  RGRSDYN  RGRSDYN1  RGRSPT  
Registration 10 DG712PST  DG876PST  DGROMAIL  VAFCOFIN  VAFCOTFU  VAFCTF  VAFCTFIN  VAFCTFMF  
VAFCTFPR  VAFCTFU  
Toolkit 1 XDRMERG0  

Entry Points

Name Comments DBIA/ICR reference
INVEXC(RGMID) ; determine if this exception needs to be sent to MPI/PD
; personnel via FORUM. Return 1 to avoid messaging to FORUM, else 0.
; IA#:3244 is applied in this functionality
CREATE()
APP(X) ; check if the sending/receiving application is relevant to the
; MPI/PD team. Returns 1 if a non-relevant namespace, else 0
IEN773(RGMID) ; find the ien of the record in the HL7 MESSAGE ADMINISTRATION
; (#773) file based on the Message ID. Input: Message ID
; Output: null, no record in 773, else 773 record ien. IA#: 3244
START(RGMSG,RGDC,RGPARAM) ;
STOP(RGQUIT) ;
SHORT(RGEXC,RGTXT) ;
; Retrieve short text description of exception
EXC(RGEXC,RGERR,RGDFN,MSGID,STATNUM) ;
ERR(RGERR,RGSEV) ;

External References

Name Field # of Occurrence
^DIC EXC+41, EXC+45, EXC+60
FILE^DICN CREATE+5
^DIE STOP+7, EXC+49
$$GET1^DIQ INVEXC+5, INVEXC+6
GETS^DIQ INVEXC+20
SENDMPI^RGHLLOG1 EXC+54
ALERT^RGRSUTL2 EXC+63
MAIL^RGRSUTL2 EXC+64
$$NOW^XLFDT START+11, CREATE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^XMB(3.8 - [#3.8] Classic Fileman Calls
^HLMA - [#773] GET1^DIQ,  GETS^DIQ
^RGHL7(991.1 - [#991.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(991.1 EXC+40
^HLMA("C" IEN773+4
^RGHL7(991.1 - [#991.1] CREATE+1, CREATE+2, CREATE+6, STOP+6, STOP+8, EXC+36, EXC+37, EXC+50
^RGHL7(991.11 - [#991.11] EXC+29, EXC+30, EXC+31, EXC+32*, EXC+34, EXC+47, SHORT+2
^RGSITE("COR" - [#990.8] START+12, EXC+61

Label References

Name Line Occurrences
$$APP INVEXC+11, INVEXC+12, INVEXC+26, INVEXC+27
$$CREATE START+12, EXC+35
$$IEN773 CREATE+4, INVEXC+4
$$INVEXC EXC+24
$$SHORT EXC+62, EXC+64
EXC ERR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA CREATE+5*!, STOP+7*!, EXC+43!, EXC+48*, EXC+49!
DA(1 EXC+40*, EXC+48*
DD CREATE+5!
DIC CREATE+5*!, STOP+9!, EXC+39*, EXC+42, EXC+43!, EXC+45*!, EXC+60*!
DIC("DR" CREATE+5*
DIC("P" EXC+40*
DIC(0 CREATE+5*, EXC+40*, EXC+45*, EXC+60*
DIE STOP+7*!, STOP+9!, EXC+42*, EXC+49!
DLAYGO CREATE+5*!, EXC+40*, EXC+43!
DO CREATE+5!
DR STOP+7*!, EXC+43!, EXC+48*, EXC+49!
>> HL("MID" CREATE+4, EXC+24
MSGID EXC~, EXC+54
RG INVEXC+19~, INVEXC+22*, INVEXC+23, INVEXC+24, INVEXC+25
RG(0 INVEXC+25*, INVEXC+26, INVEXC+27
RG1 INVEXC+19~, INVEXC+23*, INVEXC+24, INVEXC+25
RGDC START~, START+11
RGDFN EXC~, EXC+48, EXC+54
RGERR ERR~, ERR+1, EXC~, EXC+27*, EXC+28*, EXC+38*, EXC+48, EXC+54, EXC+62*, EXC+63
, EXC+64
RGEXC EXC~, EXC+11, EXC+14, EXC+27*, EXC+28*, EXC+29*, EXC+30, EXC+31, EXC+32, EXC+34
, EXC+47, EXC+48, EXC+54, EXC+59, EXC+62, EXC+64, SHORT~, SHORT+2
RGFLG INVEXC+3~*, INVEXC+4, INVEXC+10, INVEXC+11*, INVEXC+12*, INVEXC+26*, INVEXC+27*, INVEXC+31
RGFS INVEXC+19~, INVEXC+25*, INVEXC+26, INVEXC+27
RGI EXC+25~, EXC+37*, EXC+40, EXC+48, EXC+51*, EXC+54, EXC+56, EXC+63
RGIEN INVEXC+3~, INVEXC+4*, INVEXC+5, INVEXC+6, INVEXC+20, INVEXC+22*
RGIEN("REC" INVEXC+6*, INVEXC+10, INVEXC+12
RGIEN("SND" INVEXC+5*, INVEXC+10, INVEXC+11
RGLOG START+10!, START+12*, CREATE, CREATE+2*, CREATE+5, CREATE+7, STOP+5, STOP+6, STOP+7, STOP+8
, STOP+9!, EXC+35*, EXC+36, EXC+37, EXC+39, EXC+40, EXC+48, EXC+50
RGLOG(1 START+11*, CREATE+3*, CREATE+5
RGLOG(3 START+11*, CREATE+4*, CREATE+5
RGLOG(4 START+11*, CREATE+5
RGLOG(5 START+11*, CREATE+5
>> RGMG EXC+46*, EXC+47
RGMID INVEXC~, INVEXC+4, IEN773~, IEN773+3, IEN773+4
RGMSG START~, START+11
RGMSH INVEXC+19~, INVEXC+21
RGPARAM START~, START+11
RGQUIT STOP~, STOP+9!, ERR+2*, EXC+33*
RGSEV ERR~, ERR+2
RGTXT SHORT~, SHORT+2
RGZ EXC+25~, EXC+31*, EXC+32, EXC+33, EXC+51*, EXC+56, EXC+60*, EXC+61, EXC+62*, EXC+63
, EXC+64
>> STAT EXC+44*, EXC+47*, EXC+48
STATNUM EXC~, EXC+54
U START+9*, START+12, EXC+26*, EXC+27, EXC+32, EXC+33, EXC+47, EXC+51, EXC+60, EXC+61
X CREATE+5*!, STOP+9!, EXC+40*, EXC+45*, EXC+60*, APP~, APP+2
Y STOP+9!, EXC+46, EXC+60!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All