Print Page as PDF
TEST PATIENT CHECK ICR (2760)

TEST PATIENT CHECK    ICR (2760)

Name Value
NUMBER 2760
IA # 2760
DATE CREATED 1999/02/26
CUSTODIAL PACKAGE CLINICAL INFO RESOURCE NETWORK
USAGE Private
TYPE Routine
ROUTINE RGRSUTL1
NAME TEST PATIENT CHECK
GENERAL DESCRIPTION 
This function will identify that a given patient is
either a dead patient, test patient, an employee, a non-veteran, or a Psuedo
patient.  It will return a 1 if it meets the given parameter(s) or a 0 if it
does not meet the given parameter(s).
STATUS Withdrawn
ID RGRSUTL1
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT VARIABLES
$$SEND2(DFN,PARAMS)
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input 
IEN of PATIENT (#2) file
PARAMS Input 
PARAMS - "D"ead Patient
"T"est Patient
"E"mployee
"V"eteran (Non)
"P"suedo
$$SEND2(DFN,PARAMS) Output 

if the parameter list contains:

input   output      reason
"D"       1         Dead patient
"T"       1         Test patient
"E"       1         Employee
"V"       1         Non-Veteran
"P"       1         Psuedo

otherwise the function returns  0
SUBSCRIBING PACKAGE MASTER PATIENT INDEX VISTA