WVRPCNO ;HIOFO/FT-WV NOTIFICATIONS file (790.4) RPCs ;1/7/05 15:03
Source file <WVRPCNO.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ACCESION(WVIEN) | ; Returns the external value of FILE 790.4, Field .06  
 ; Input: record ien ; Output: external value of the .01 field  | 
|
| OUTCOME(WVIEN) | ; Returns the external value of FILE 790.405
 ; Input: record ien ; Output: external value of the .01 field  | 
|
| PURPOSE(WVIEN) | ; Returns the external value of FILE 790.404
 ; Input: record ien ; Output: external value of the .01 field  | 
|
| TYPE(WVIEN) | ; Returns the external value of FILE 790.403
 ; Input: record ien ; Output: external value of the .01 field  | 
|
| NEW(WVRESULT,WVNOTPUR) | ; Update procedure result, create notification,
 ; print notification and update treatment needs. ; Input: WVRESULT(n)=FILE 790.1 IEN^"A", "N" or "U" (WVRESULT array is ; Optional) ; where A=Abnornal, N=No Evidence of Malignancy and ; U=Unsatisfactory for Dx. ; n is a number greater than zero. ; ; WVNOTPUR(FILE 790.404 IEN,n)=FILE 790.1 IEN^"I", "L" or "P"^ ; FILE 3.5 NAME^DFN ; where I=In-person, L=letter and P=phone call (i.e., ; notification type) ; Output: None  | 
|
| ADD(WVIEN,WVPURP,WVTYPE,WVPRINTR,WVDFN) | ; Create a new notification entry
 ; in FILE 790.4. ; Input: WVIEN - FILE 790.1 IEN [Required] ; WVPURP - FILE 790.404 IEN [Required] ; WVTYPE - FILE 790.403 IEN [Required] ; WVPRINTR - FILE 3.5 NAME (device) [Optional] ; WVDFN - FILE 790 IEN [Optional] ; Output: <None>  | 
|
| TX | ; update treatment needs
 | 
| RPC Name | Call Tags | 
|---|---|
| ORQQPXRM GET WH LETTER TYPE | GETTYPE |