HMPDRA ;SLC/MKB,ASMR/RRB,BL - Radiology extract;Sep 20, 2016 17:43:20
Source file <HMPDRA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,BEG,END,MAX,ID) | ; -- find patient's radiology exams
|
|
| ENQ | ; end
|
|
| EN1(ID,EXAM) | ; -- return an exam in EXAM("attribute")=value
; Expects ^TMP($J,"RAE1",DFN,ID) from EN1^RAO7PC1 |
|
| CPT(IEN) | ; -- return code^description for CPT code, or "^" if error
|
|
| TEXT(PAT,ID) | ; -- Get report text, return temp array name
|
|
| RPTS(DFN,BEG,END,MAX) | ; -- find patient's radiology reports
|
|
| RPT1(DFN,ID,RPT) | ; -- return report as a TIU document
|
|
| XML(EXAM) | ; -- Return exams as XML
|
|
| LOOP() | ; -- build sub-items string from NAMES and X
|
|
| ADD(X) | ; -- Add a line @HMP@(n)=X
|
| FileNo | Call Tags |
|---|---|
| 70.03 | GET1^DIQ |
| ^RARPT - [#74] | GET1^DIQ |