GMRCART ;SLC/DCM,DLT,JFR - Result display logic ;12/17/01 22:39
Source file <GMRCART.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RT(GMRCO) | ;Result Display logic - called from GMRCA1
|
|
| GETRSLT(TMPGLOB,GMRCDET) | ;load the results into global defined in TMPGLOB
|
|
| GETMCAR | ;load the medicine results into TMPGLOB
|
|
| GETCP | ; Load up any Clin. Proc. results
|
|
| GETRES | ;load the TIU notes into TMPGLOB
|
|
| GETCOM | ;Get the comments for resolution actions
|
|
| SAVEHDR | ;Save the action header info to print later if there are comments
|
|
| GETHDR | ;Print the comment header if the action had a comment
|
|
| 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) |
|
| END | ;kill off variables and exit
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
