WVALERTR ;HIOFO/FT - RETURN RADIOLOGY/NM REPORT IN TMP GLOBAL;Oct 24, 2023@15:19:39
Source file <WVALERTR.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN(WVIEN,DIAGNS) | ; Set up radiology report data
 | 
|
| RADCASE(WVIEN,DIAGNS,WVIENS,WVRPTIEN,WVSECDXS,WVPDX) | ;
 | 
|
| RADREP(WVIENS,WVRPTIEN,WVSECDXS,WVPDX) | ;
 | 
|
| AMEND(WVRPTIEN) | ; Check if RAD/NM report is amended.
 ; WVRPTIEN - File 74 ien  | 
|
| COMPARE() | ; Compares Clinical History fields in files 70 & 74
 ; Returns 1 (different) or 0 (same)  | 
| FileNo | Call Tags | 
|---|---|
| 70.03 | GETS^DIQ | 
| ^RARPT - [#74] | GETS^DIQ | 
| 74.06 | LIST^DIC | 
| ^RA(78.3 - [#78.3] | GET1^DIQ |