DPTLK6 ;BAY/JAT,EG - Patient lookup RPCs for patient safety issue ; 11 Aug 2005 8:33 AM
Source file <DPTLK6.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GUIBS5(GUIDATA,DFN) | ; RPC checks if other patients on "BS5" xref
 ; with same last name ; returns: 1 or 0 (or -1 if bad dfn or no zero node) ; if 1, returns text to be displayed ; return type: array ; parameter: ien of Patient file  | 
|
| GUIBS5A(GUIDATA,DFN) | ; RPC checks if other patients on "BS5" xref
 ; with same last name ; returns 1 or 0 in 1st string (or -1 if bad DFN or no zero node) ; if 1 returns array nodes where ; text is preceeded by 0 (0^<text>) ; and patient data is preceeded by 1 (1^DFN^patient name^DOB^SSN) ; return type: global array ; parameter: ien of Patient file  | 
 
  | 
| GUIDMT(GUIDATA,DUZ2) | ; RPC checks if the 'Display Means Test Required'
 ; message is to be displayed for the Division user is in ; returns 1 or 0 in 1st string (or -1 if bad DUZ(2)) ; if 1, returns text to be displayed in 2nd and 3rd string (if any) ; return type: array ; parameter: Institution file pointer for user (optional)  | 
|
| GUIMT(GUIDATA,DFN) | ; RPC checks if Means Test is required for this patient
 ; returns 1 or 0 (or -1 if bad DFN) ; return type: single value ; parameter: ien of Patient file  | 
|
| GUIMTD(GUIDATA,DFN,DUZ2) | ; RPC checks if Means Test is required for this
 ; patient and if 'Means Test Required' message is to be ; displayed for the Division user is in ; returns 1 or 0 in 1st string (or -1 if bad parameters) ; if 1, returns text to be displayed in 2nd and 3rd string (if any) ; return type: array ; parameters: ien of Patient file, Institution file pointer for user ; (optional)  | 
 
  | 
| RPC Name | Call Tags | 
|---|---|
| DG CHK BS5 XREF Y/N | GUIBS5 | 
| DG CHK BS5 XREF ARRAY | GUIBS5A | 
| DG CHK MEANS TEST DIV DISPLAY | GUIDMT | 
| DG CHK PAT MEANS TEST REQUIRED | GUIMT | 
| DG CHK PAT/DIV MEANS TEST | GUIMTD |