Routine: GMRCART

Information

GMRCART ;SLC/DCM,DLT,JFR - Result display logic ;12/17/01 22:39

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Consult Request Tracking	4	EXAC^GMRCADC ($$RESOLUA,$$RESOLUS)^GMRCAU $$CENTER^GMRCP5D PRINT^GMRCTIUP
Kernel	4	(RMDEV,SAVDEV,USE)^%ZISUTL $$FMTE^XLFDT ($$CJ,$$REPEAT)^XLFSTR ($$STA,F4)^XUAF4
Registration	3	EN^VALM FULL^VALM1 KILL^VALM10
RPC Broker	1	DIRECT^XWB2HL7

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Consult Request Tracking	4	GMRCA1 GMRCGUIA GMRCSLM2 GMRCTIUP

Entry Points

Name	Comments	DBIA/ICR reference
SAVEHDR	;Save the action header info to print later if there are comments
GETRSLT(TMPGLOB,GMRCDET)	;load the results into global defined in TMPGLOB
GETRES	;load the TIU notes into TMPGLOB
GETHDR	;Print the comment header if the action had a comment
GETCOM	;Get the comments for resolution actions
RT(GMRCO)	;Result Display logic - called from GMRCA1
GETMCAR	;load the medicine results into TMPGLOB
GETREMOT(GMRCDA,GMRCAR,GMRCNT)	;retrieve remote results and load up in display ; Input: ; GMRCDA = consult ien from file 123 ; GMRCAR = array to return results in (e.g. $NA(^TMP("GMRCAR",$J)) ) ; GMRCNT = number within GMRCAR to start placing results (pass by ref)
GETCP	; Load up any Clin. Proc. results
END	;kill off variables and exit

External References

Name	Field # of Occurrence
RMDEV^%ZISUTL	GETREMOT+29
SAVDEV^%ZISUTL	GETREMOT+26
USE^%ZISUTL	GETREMOT+28
EXAC^GMRCADC	RT+5
$$RESOLUA^GMRCAU	GETCOM+11
$$RESOLUS^GMRCAU	RT+5, GETCOM+2
$$CENTER^GMRCP5D	GETHDR+2
PRINT^GMRCTIUP	GETRSLT+13
EN^VALM	RT+17
FULL^VALM1	RT+8
KILL^VALM10	RT+19
$$FMTE^XLFDT	SAVEHDR+4, GETREMOT+34
$$CJ^XLFSTR	GETREMOT+31, GETREMOT+32, GETREMOT+34
$$REPEAT^XLFSTR	GETREMOT+14, GETREMOT+15
$$STA^XUAF4	GETREMOT+21
F4^XUAF4	GETREMOT+22
DIRECT^XWB2HL7	GETREMOT+27

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Compiling Result Display..." Line Location: RT+7
Routine Call	VALM Line Location: RT+17

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	RT+3, RT+4, GETRSLT+11, GETCOM+1, GETCOM+6, GETCOM+10, GETCOM+19, GETCOM+21, SAVEHDR+3, SAVEHDR+4 , GETREMOT+11, GETREMOT+18, GETREMOT+20
^GMR(123.1 - [#123.1]	GETHDR+2
^TMP("GMRC"	END+3
^TMP("GMRCR"	RT+9!, GETRSLT+8!, GETMCAR+1, GETMCAR+3, GETMCAR+6, GETMCAR+8!, GETCP+1, GETCP+3, GETCP+6, GETCP+7 , GETCP+9!, GETRES+1, GETRES+4, GETRES+5, GETRES+7, GETRES+9, GETRES+10, GETRES+11, GETRES+12, GETRES+15 , GETRES+18!
^VA(200 - [#200]	GETHDR+3, GETHDR+4

Label References

Name	Line Occurrences
END	RT+5, RT+22
GETCOM	GETRSLT+24
GETCP	GETRSLT+16
GETHDR	GETCOM+20
GETMCAR	GETRSLT+15
GETRES	GETRSLT+17
GETRSLT	RT+15
SAVEHDR	GETCOM+15

Naked Globals

Name	Field # of Occurrence
^("GMRCRPT"	GETRES+7
^("MENU"	END+3
^(0	RT+3, GETRSLT+11, GETMCAR+4, GETCP+4, SAVEHDR+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIROUT	END+1, END+2!
DTOUT	END+1, END+2!
DUOUT	END+2!
FTR	GETREMOT+12~, GETREMOT+15*, GETREMOT+53
GMRCAHDR	GETCOM+14~, GETCOM+20, SAVEHDR+1*, GETHDR+5!
GMRCAIEN	GETCOM+9~, GETCOM+10*, GETCOM+11, GETHDR+2
GMRCAR	GETREMOT~, GETREMOT+13, GETREMOT+16, GETREMOT+17, GETREMOT+31, GETREMOT+32, GETREMOT+34, GETREMOT+35, GETREMOT+40, GETREMOT+42 , GETREMOT+46, GETREMOT+48, GETREMOT+52, GETREMOT+53, GETREMOT+54
GMRCCT	RT+1~, RT+9, GETRSLT+5~, GETRSLT+9, GETRSLT+11, GETRSLT+13, GETRSLT+14, GETRSLT+19, GETRSLT+20, GETRSLT+21 , GETRSLT+22, GETRSLT+25, GETMCAR+4, GETMCAR+5, GETMCAR+6, GETCP+4, GETCP+5, GETCP+7, GETRES+6, GETRES+7 , GETRES+8, GETRES+9, GETRES+10, GETRES+11, GETRES+13, GETRES+14, GETRES+15, GETCOM+21, GETHDR+1, GETHDR+2* , GETHDR+3, GETHDR+4
GMRCCTS	GETRSLT+5~, GETRSLT+14*, GETRSLT+19
GMRCDA	GETREMOT~, GETREMOT+11, GETREMOT+18, GETREMOT+20
GMRCDATA	GETREMOT+12~, GETREMOT+27, GETREMOT+30, GETREMOT+37, GETREMOT+43, GETREMOT+44, GETREMOT+45, GETREMOT+48, GETREMOT+49, GETREMOT+50!
GMRCDATA(	GETREMOT+38, GETREMOT+39, GETREMOT+42
GMRCDET	GETRSLT~, GETRSLT+10*, GETRSLT+13, GETRSLT+24
GMRCDVL	RT+13, RT+21!, GETRSLT+7, GETRSLT+20, GETRES+7, GETRES+9
GMRCENBY	GETCOM+14~, SAVEHDR+3*, GETHDR+3
GMRCENDT	GETCOM+14~, SAVEHDR+4*, GETHDR+3
GMRCIO	GETREMOT+12~
GMRCLCT	RT+21!
GMRCMSG	RT+1~, RT+5*
GMRCNT	GETREMOT~, GETREMOT+13, GETREMOT+16, GETREMOT+17, GETREMOT+31, GETREMOT+32, GETREMOT+33, GETREMOT+34, GETREMOT+35, GETREMOT+40 , GETREMOT+41, GETREMOT+42, GETREMOT+46, GETREMOT+47, GETREMOT+48, GETREMOT+52, GETREMOT+53*, GETREMOT+54
GMRCO	RT~, RT+3, RT+4, GETRSLT+11, GETRSLT+13, GETCOM+1, GETCOM+6, GETCOM+10, GETCOM+19, GETCOM+21 , SAVEHDR+3, SAVEHDR+4
GMRCPRNM	RT+21!
GMRCPROV	GETCOM+14~, SAVEHDR+3*, GETHDR+4
>> GMRCQIT	END+1*
GMRCQT	GETREMOT+36~, GETREMOT+38, GETREMOT+39, GETREMOT+44, GETREMOT+45*
>> GMRCQUT	RT+5*
GMRCREM	GETREMOT+12~, GETREMOT+18*, GETREMOT+20
GMRCREM0	GETREMOT+19~, GETREMOT+20*, GETREMOT+21, GETREMOT+23, GETREMOT+34
GMRCRES	GETREMOT+19~, GETREMOT+23, GETREMOT+24, GETREMOT+25, GETREMOT+27, GETREMOT+31
GMRCRPC	GETREMOT+19~, GETREMOT+24, GETREMOT+25, GETREMOT+27
GMRCRPT	RT+21!
GMRCSITE	GETREMOT+19~, GETREMOT+22
GMRCSITE("NAME"	GETREMOT+32
GMRCSR	RT+1~, RT+3*, RT+5
GMRCSTA	GETREMOT+19~, GETREMOT+21*, GETREMOT+22, GETREMOT+27
GMRCSTS	RT+1~, RT+4, RT+5, GETCOM+1, GETCOM+2
GMRCTMP	RT+1~, RT+12*, RT+15
GMRCTO	RT+21!
GMRCTUFN	RT+1~, RT+3*, RT+5, RT+21!
GMRCVAL	RT+11*, RT+18, RT+21!
GMRCX	RT+21!
HDR	GETREMOT+12~, GETREMOT+14*, GETREMOT+16
I	GETREMOT+38~, GETREMOT+39, GETREMOT+42, GETREMOT+44~, GETREMOT+45, GETREMOT+48
>> IOBM	RT+8
>> IOSTBM	RT+8
>> IOTM	RT+8
>> LNCT	RT+18
MCFILE	RT+21!
MCPROC	RT+21!
ND	GETMCAR+2~, GETMCAR+3, GETMCAR+6, GETCP+2~, GETCP+3, GETCP+6, GETCP+7, GETRES+3~, GETRES+4, GETRES+5 , GETRES+7, GETRES+9, GETRES+10, GETRES+11, GETRES+12, GETRES+15, GETCOM+5~, GETCOM+6
ND1	GETMCAR+2~, GETMCAR+6, GETCP+2~, GETCP+6, GETCP+7, GETRES+3~, GETRES+11, GETRES+12, GETRES+15, GETCOM+5~ , GETCOM+6*, GETCOM+10, GETCOM+19, GETCOM+21, SAVEHDR+3, SAVEHDR+4
ND2	GETRES+15, GETCOM+5~, GETCOM+18, GETCOM+19*, GETCOM+21
ORAGE	RT+20!
ORDG	RT+20!
ORDOB	RT+20!
OREND	RT+20!
ORFT	RT+20!
ORHI	RT+20!
ORIFN	RT+20!
ORIO	RT+20!
ORL	RT+20!
ORNP	RT+20!
ORPD	RT+20!
ORPNM	RT+20!
ORPV	RT+20!
ORSEQ	RT+20!
ORSEX	RT+20!
ORWARD	RT+20!
SF	GETRSLT+5~, GETRSLT+11*, GETRSLT+20
TAB	GETRSLT+5~, GETRSLT+6*, GETMCAR+5, GETCP+5, GETRES+14
TMPGLOB	GETRSLT~, GETRSLT+8, GETRSLT+11, GETRSLT+20, GETRSLT+21, GETRSLT+25*, GETMCAR+4, GETMCAR+5, GETMCAR+6, GETCP+4 , GETCP+5, GETCP+7, GETRES+6, GETRES+7, GETRES+9, GETRES+10, GETRES+11, GETRES+13, GETRES+14, GETRES+15 , GETCOM+21, GETHDR+1, GETHDR+2, GETHDR+3, GETHDR+4
U	GETREMOT+21, GETREMOT+23, GETREMOT+39, GETREMOT+45
>> VALMAR	RT+11, RT+18*
>> VALMCNT	RT+18*
>> XQORM("A"	RT+10*
>> XQORM("HIJACK"	END+3*

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCART

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: