Routine: WVRPCNO1

Information

WVRPCNO1 ;HIOFO/FT-WV PRINT LETTERS. ;8/21/03 13:37

Name	Comments	DBIA/ICR reference
DEVICE(WVDA,WVPRINTR)	; Queue to TaskMan to print letter
PRINT	; 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