Routine: WVSNOMED

Information

WVSNOMED ;HIOFO/FT-IS LAB TEST A PAP SMEAR? ;2/12/04 14:37

Name	Comments	DBIA/ICR reference
SNOMED()	; Check lab test for SNOMED codes that indicate if pap smear. ; LRDFN,LRI,LRSS must be defined. ; Returns: 0 - lab test is not a pap smear ; 1 - lab test is a pap smear ;
CY()	; Check SNOMED codes used by cytology entry
SP()	; Check SNOMED codes used by surgical pathology entry
ADD	; Add pap smear to FILE 790.1
MAIL(DFN,WVLABAN,WVPROV,LRSS,WV7901)	; Send mail message to case manager ; when pap smear added to FILE 790.1 ; Called from above ; DFN -> Patient ien ; WVLABAN -> Lab Accession# (e.g., CY 99 1) ; WVPROV -> File 200 IEN (provider/requestor) ; LRSS -> File 63 subscript (e.g., CY or SP) ; WV7901 -> FILE 790.1 IEN
CPRS(WVORN,WVDFN,WVORDER,WVPROV,WVMSG,WVIEN)	; Generate a CPRS alert ; WVORN - FILE 100.9 IEN ; WVDFN - FILE 2 IEN ; WVORDER - FILE 100 IEN (not currently used) ; WVPROV - FILE 200 IEN ; WVMSG - Free text message ; WVIEN - IEN for a lab or radiology report (not currently used)