RARIC ;HISC/FPT,GJC AISC/SAW-Radiologic Image Capture and Display Routine ;08/05/08 14:35
Source file <RARIC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CREATE | ; >>create new stub entry in file 74<<
; -------------------------------------------------------------------- ; IA: 1178 (the value of RARPT is currently null) If no report entry is ; created, RARPT is set to null or negative (negative w/report) |
|
XIT | ;exit the CREATE subroutine
; ================================================================= |
|
PTR | ; associate images with a radiology report record
; -------------------------------------------------------------------- |
|
DELRPT(Y) | ; delete a report (RARIC). The report record should
|
|
NEWIEN() | ; ##### ALLOCATES A NEW RECORD IN THE RAD/NUC MED REPORTS FILE
; (#74) AND LOCKS IT ; -------------------------------------------------------------------- ; Return Values ; ============= ; >0 IEN for the new record in the RAD/NUC MED REPORTS FILE (#74) |
|
UNLOCXAM | ;Unlock the EXAMINATION node locked by this process.
; -------------------------------------------------------------------- |