©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DPTLK6 ;BAY/JAT,EG - Patient lookup RPCs for patient safety issue ; 11 Aug 2005 8:33 AM
Source file <DPTLK6.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 3 | ($$CMTS,$$MFLG)^DGMTU ($$DOB,$$SSN,DOB)^DPTLK1 $$BS5^DPTLK5 |
| Package | Total | Caller Graph |
|---|---|---|
| Barcode Medication Administration | 1 | PSBRPC |
| General Medical Record - Vitals | 1 | GMVRPCP |
| IHS Electronic Health Record | 1 | BEHOPTCX |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| 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) |
|
| 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 |
|
| 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 |
|
| 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 |
|
| 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) |
| RPC Name | Call Tags |
|---|---|
| DG CHK PAT/DIV MEANS TEST | GUIMTD |
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | GUIDMT+10, GUIDMT+13, GUIMTD+12, GUIMTD+19 |
| ^DPT - [#2] | GUIBS5+8, GUIBS5+12, GUIBS5A+10, GUIBS5A+15, GUIBS5A+24 |
| ^DPT("BS5" | GUIBS5A+23 |
| ^TMP("DPTLK6" | GUIBS5A+12!, GUIBS5A+13*, GUIBS5A+19*, GUIBS5A+20*, GUIBS5A+30*, GUIBS5A+32*, GUIBS5A+33, GUIBS5A+34! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | GUIBS5~, GUIBS5+7, GUIBS5+8, GUIBS5+9, GUIBS5+12, GUIBS5A~, GUIBS5A+9, GUIBS5A+10, GUIBS5A+11, GUIBS5A+15 , GUIMT~, GUIMT+5, GUIMT+8, GUIMTD~, GUIMTD+10, GUIMTD+16 |
| DGMTLST | GUIMT+6~, GUIMT+8*, GUIMT+9, GUIMTD+14~, GUIMTD+16*, GUIMTD+18 |
| DGREQF | GUIMT+6~, GUIMTD+14~ |
| DPT0 | GUIBS5+11~, GUIBS5+12*, GUIBS5+13, GUIBS5+14, GUIBS5A+14~, GUIBS5A+15*, GUIBS5A+16, GUIBS5A+18, GUIBS5A+24*, GUIBS5A+26 , GUIBS5A+28 |
| DPTBS5 | GUIBS5A+14~, GUIBS5A+17*, GUIBS5A+23 |
| DPTCNT | GUIBS5A+14~, GUIBS5A+21*, GUIBS5A+29*, GUIBS5A+30, GUIBS5A+31*, GUIBS5A+32 |
| DPTDIV | GUIDMT+9~*, GUIDMT+10*, GUIDMT+11, GUIDMT+13, GUIMTD+11~*, GUIMTD+12*, GUIMTD+13, GUIMTD+19 |
| DPTDIVMT | GUIDMT+9~, GUIDMT+13*, GUIDMT+14, GUIMTD+11~, GUIMTD+19*, GUIMTD+20 |
| DPTDOB | GUIBS5A+14~, GUIBS5A+27*, GUIBS5A+28*, GUIBS5A+30 |
| DPTIEN | GUIBS5A+14~, GUIBS5A+22*, GUIBS5A+23*, GUIBS5A+24, GUIBS5A+27, GUIBS5A+30 |
| DPTLAST | GUIBS5A+14~, GUIBS5A+18*, GUIBS5A+19, GUIBS5A+25 |
| DPTNME | GUIBS5+11~, GUIBS5+13*, GUIBS5+15, GUIBS5A+14~, GUIBS5A+16*, GUIBS5A+17, GUIBS5A+24*, GUIBS5A+25, GUIBS5A+26*, GUIBS5A+30 |
| DPTSSN | GUIBS5+11~, GUIBS5+14*, GUIBS5+16, GUIBS5A+14~, GUIBS5A+16*, GUIBS5A+17, GUIBS5A+20 |
| DPTSSN1 | GUIBS5A+14~, GUIBS5A+27*, GUIBS5A+28*, GUIBS5A+30 |
| DUZ(2 | GUIDMT+7, GUIMTD+9 |
| DUZ2 | GUIDMT~, GUIDMT+7*, GUIDMT+8, GUIDMT+10, GUIMTD~, GUIMTD+9*, GUIMTD+10, GUIMTD+12 |
| GUIDATA | GUIBS5~, GUIBS5+6!, GUIBS5A~, GUIBS5A+8!, GUIBS5A+33*, GUIDMT~, GUIDMT+6!, GUIMT~, GUIMT+4!, GUIMT+5* , GUIMT+7*, GUIMT+10*, GUIMTD~, GUIMTD+8! |
| GUIDATA(1 | GUIBS5+7*, GUIBS5+8*, GUIBS5+9*, GUIBS5+10*, GUIBS5A+9*, GUIBS5A+10*, GUIBS5A+11*, GUIDMT+8*, GUIDMT+11*, GUIDMT+12* , GUIDMT+14*, GUIMTD+10*, GUIMTD+13*, GUIMTD+15*, GUIMTD+20* |
| GUIDATA(2 | GUIBS5+15*, GUIDMT+14*, GUIMTD+20* |
| GUIDATA(3 | GUIBS5+16*, GUIDMT+14*, GUIMTD+20* |
| GUIDATA(4 | GUIBS5+17* |
| U | GUIBS5+13, GUIBS5+14, GUIBS5A+16, GUIBS5A+18, GUIBS5A+24, GUIBS5A+26, GUIBS5A+28, GUIBS5A+30, GUIDMT+14, GUIMT+9 , GUIMTD+20 |
| Y | GUIMT+6~, GUIMTD+14~ |
| Name | Field # of Occurrence |
|---|---|
| $T(DOB^DPTLK1 | GUIBS5A+27 |