RAHLO3 ;HIRMFO/GJC-Process data set from the bridge program ;11/18/97 12:13
Source file <RAHLO3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RPTSTAT | ; Determine the status to set this report to.
|
|
| TEXT(X) | ; Check if the Impression Text and the Report Text contain
; valid characters. ; Input : X = "I" if Impr Text is being checked, "R" if Rpt Text ; Output: 0=invalid, 1=valid |
|
| VERCHK | ; Check if our provider can verify reports.
; Examine the following four (4) conditions if $D(RAESIG) ; 1) Does this person have a resident or staff classification? ; 2) If a resident, does the division parameter allow resident ; verification? ; 3) Does this person hold the "RA VERIFY" key? ; 4) Is this person an activate Rad/Nuc Med user? ; 5) Can this person verify reports without staff review? ; If 'No' to any of the above questions, kill RAESIG & set the variable ; RAERR to the appropriate error message. |
|
| VFIER | ; Check if the RAVERF string is a partial match to an entry in file
; 200. If if is, check to see that is a partial match to only ONE ; active provider entry in file 200. |
|
| ESIG | ; Added for COTS E-Sig capability
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
