Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: WVRPCPR

Package: Womens Health

Routine: WVRPCPR


Information

WVRPCPR ;HIOFO/FT-WV PROCEDURE file (790.1) RPCs (cont.) ;07/06/2020

Source Information

Source file <WVRPCPR.m>

Entry Points

Name Comments DBIA/ICR reference
TYPEIEN(WVNAME) ; This function returns the IEN of an entry in the
; WV PROCEDURE TYPE file (#790.2)
; Input: WVNAME is the procedure name (i.e., .01 value)
; Output: IEN of the procedure type. Returns -1 if not found.
TYPENAME(WVIEN) ; This function returns the NAME of an entry in the
; WV PROCEDURE TYPE file (#790.2)
; Input: IEN (FILE 790.2)
; Output: Name of the procedure type. Returns -1 if not found.
BUIEN() ; This function returns the IEN for a BREAST ULTRASOUND procedure
; type from FILE 790.2
PAPIEN() ; This function returns the IEN for a screening PAP SMEAR
; procedure type from FILE 790.2
MAMIENS() ; This function returns the IENs for diagnostic MAMMOGRAM
; procedure types from FILE 790.2
; returns a string delimited by caret with the IENS (e.g., "25^26"
LATEST(RESULT,WVDFN,WVPTYPE,WVDATES,WVMAX,WVDX) ; Returns the Pap Smear or
; Mammogram entries in reverse chronological order.
; Input: RESULT - Array name for return values [required]
; WVDFN - patient DFN [required]
; WVPTYPE - "P" for Pap Smear or "M" for Mammogram or
; "U" for Breast Ultrasound [required]
; WVDATES - date range in FileMan internal format
; (e.g., 3020101^3021231) [optional]
; WVMAX - max number of entries to return (e.g., 20)
; (optional - default is 10) [optional]
; WVDX - "N", "A", "P" or "*" to return records with a
; dx/result of normal, abnormal, pending or any
; [optional]
SETRESLT(WVIEN,WVRESULT) ; Update the RESULTS/DIAGNOSIS field (.05)
; for the WV PROCEDURE file (#790.1) record identified by WVIEN.
; Input: WVIEN - FILE 790.1 IEN
; WVRESULT - FILE 790.31 IEN
Info |  Source |  Entry Points