WVRPCPT ;HIOFO/FT - WV PATIENT FILE (790) APIS AND RPCS ;Apr 05, 2021@14:28
Source file <WVRPCPT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BRTX(DFN,BRTX,BRDD,CRTX,CRDD,WVPDATE) | ; Update the patient's treatment needs and
; due dates in WV PATIENT file (790) ; Input: DFN - patient DFN [required] ; BRTX - breast treatment need IEN (790.51) [optional] ; BRDD - breast treatment need offset (e.g., 1Y) [optional] ; CRTX - cervical treament need IEN (790.5) [optional] ; CRDD - cervical treatment need offset (e.g., 90D) [optional] ; WVPDATE - date procedure was performed [optional] ; default is today ; Output: <none> |
|
| GETDATA(RESULT,WVDFN,WVTYPE,WVSDATE,WVEDATE,WVMAX,WVDIR,WVDT) | ;RETURN REQUESTED DATA
; INPUT: RESULT - SUBSCRIPT UNDER WHICH TO RETURN DATA OR ERROR MESSAGES ; [REQUIRED] ; WVDFN - IEN OF PATIENT IN WV PATIENT FILE [REQUIRED] ; WVTYPE - TYPE OF DATA TO RETURN [REQUIRED]: ; "P": PREGNANCY DATA ; "L": LACTATION DATA ; WVSDATE - START DATE IN INTERNAL FILEMAN FORMAT [OPTIONAL] ; DEFAULT: NO DATE RANGE RESTRICTION ; WVEDATE - END DATE IN INTERNAL FILEMAN FORMAT [OPTIONAL] ; DEFAULT: NO DATE RANGE RESTRICTION ; WVMAX - MAXIMUM NUMBER OF ENTRIES TO RETURN [OPTIONAL] ; DEFAULT: RETURN ALL DATA ; WVDIR - SEARCH DIRECTION [OPTIONAL]: ; 1:CHRONOLOGICAL ORDER ; -1: REVERSE CHRONOLOGICAL ORDER [DEFAULT] ; WVDT - THE DATE (IN FILEMAN INTERNAL FORMAT) TO USE AS TODAY'S DATE [OPTIONAL] ; DEFAULT: VALUE STORED IN DT VARIABLE ; OUTPUT: ^TMP(RESULT,$J)=NUMBER OF ENTRIES RETURNED ; -1^Error message ; ^TMP(RESULT,$J,N,"FIELD NAME")=INTERNAL_FORMAT^EXTERNAL FORMAT |
|
| PFIELDS | ;PSEUDO-FIELD DEFINITIONS
|
|
| SAVEDATA(WVRETURN,WVDATA) | ;SAVE DATA FROM CLINICAL REMINDERS
; INPUT: WVRETURN - REFERENCE TO ARRAY IN WHICH TO RETURN STATUS ; [REQUIRED] ; WVDATA - REFERENCE TO ARRAY OF DATA TO SAVE ; [REQUIRED] |
|
| VALENTRY(WVFILE,WVENTRY,WVFDA,WVNEWREC) | ;VALIDATE THE DATA TO FILE
|
|
| CHKIENS(WVDATA) | ;ENSURE IENS ARE COMPLETE AND ACCURATE
|
|
| SETARRAY(WVFILE,WVFIELD,WVDATA,WVMSUB) | ;SET DATA INTO THE RETURN ARRAY
; INPUT: WVFILE - FILE NUMBER CONTAINING THE FIELD [REQUIRED] ; WVFIELD - FIELD NUMBER [REQUIRED] ; WVDATA - INTERNAL VALUE OF THE FIELD [REQUIRED] ; WVMSUB - SUBSCRIPT WITHIN THE TMP GLOBAL TO RETURN DATA IN |
|
| GETSTATUS(WVDFN) | ;RETURN SINGLE LINE PREGNANT/LACTATING
|
|
| GETEDD(WVDFN) | ;RETURN EDD AND WEEKS GESTATION
|
