;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)