DGNTUT ;ALB/RPM - Utility functions for N/T Radium Treatments ; 7/16/01 3:04pm
Source file <DGNTUT.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CHANGE(DGDFN,DGNTN,DGENR) | ;Did the answers change?
 ; Input ; DGDFN - Patients DFN ; DGNTN("HNC") - Head/Neck Cancer Diagnosis "Y,N" ; DGNTN("NTR") - NTR Status code, "Y,N,U" ; DGNTN("AVI") - Aviator code, "Y,N" ; DGNTN("SUB") - Sub Training code, "Y,N" ; DGNTN("VER") - Verification method, "S,M,N" ; DGENR - Enrollment Z11 update [optional default=0]  | 
|
| CHNGQ | ||
| SITE(DGSITE) | ;Convert a station number into a pointer to the
 ; INSTITUTION file (#4). If called with a null parameter then ; the pointer to the INSTITUTION file (#4) of the primary site ; will be returned.  | 
|
| INTERP(DGINTR) | ;Create external status interpretation
 | 
|
| STATUS(DGARR) | ;Determine if screening status is complete
 ; Input ; DGARR - result array of $$GETCUR^DGNTAPI  |