WVRPCNO1 ;HIOFO/FT-WV PRINT LETTERS. ;8/21/03 13:37
Source file <WVRPCNO1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DEVICE(WVDA,WVPRINTR) | ; Queue to TaskMan to print letter
|
|
; Print notification letter, update treatment needs & due dates
; required variable: wvda=ien in ^WV(790.4, |
||
LETTER(RESULT,WVIEN) | ; Returns the letter text for the purpose of
; notification ; Input: RESULT - array name to return data in [required] ; WVIEN - FILE 790.404 IEN [required] |
|
GETDXIEN(WVX) | ; Function returns FILE 790.31 IEN
; Input: WVX="A" for Abnormal ; "N" for No Evidence of Malignancy ; "U" for Unsatisfactory for Dx ; Output: IEN of corresponding FILE 790.31 entry |
|
GETYPIEN(WVX) | ; Function returns FILE 790.403 IEN
; Input: WVX="P" for CONTACT PHN ; WVX="I" for CONVERSATION WITH PATIENT ; WVX="L" for LETTER, FIRST ; Output: IEN of corresponding FILE 790.403 entry |
|
GETOIEN(WVX) | ; Function returns FILE 790.405 IEN
; Input: WVX = .01 value of FILE 790.405 entry (Outcome) ; Output: IEN of that entry |
RPC Name | Call Tags |
---|---|
ORQQPXRM GET WH LETTER TEXT | LETTER |