RAPXRM ;HOIFO/SWM,GJC - API for Clinical Reminders ;04 Mar 2019 12:02 PM
Source file <RAPXRM.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN1(RADAS,RARM) | ;retrieve data from Clin. Rem.'s new style index "ACR"
 ; Input: ; RADAS = last subscript of (required), for example: ; ^PXRMINDX(70,"IP",43,1,2,2920720.1049,"2;DT;7079279.895;P;3;0") ; ^PXRMINDX(70,"PI",9,3,45,2921204.155,"9;DT;7078795.8449;P;1;0") ; RARM = array name passed by reference (required) ; Output: ; RARM("aaa") = external value, eg.: ; RARM("EXAM D/T") = Exam Date and time in yyymmdd.hhmm format ; RARM("EXAM STATUS") = Exam Status name ; RARM("PROCEDURE") = Procedure name ; RARM("INTERPRETING PHYSICIAN") = Primary Staff; else Primary Resident ; If exam node doesn't exist, then RARM is undefined ; RARM("RPT STATUS") = Report status name ; RARM("DIV") = Rad/Nuc Med Division Name (file 4) ^ Station # ; RARM("I-LOC") = Imaging Location name  | 
|
| RAD | ;Build the index for RAD/NUC MED PATIENT.
 | 
|
| KRAD(X,DA) | ;Delete index for RAD/NUC MED PATIENT file.
 | 
|
| SRAD(X,DA) | ;Set index for RAD/NUC MED PATIENT file.
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | GET1^DIQ | 
| ^RADPT - [#70] | GET1^DID | 
| ^RA(79.1 - [#79.1] | GET1^DIQ |