MMRSIPC2 ;MIA/LMT - Print MRSA IPEC Report Cont. (Contains functions to collect patient movements) ;02/15/17 10:35
Source file <MMRSIPC2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Methicillin Resistant Staph Aurerus Initiative Reports | 4 | MMRSCRE2 MMRSIPC MMRSIPC5 MMRSORD |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETMOVE | ;Collects ward movements for patients that were admitted or discharged in date range.
|
|
GETADM(LOC) | ;
|
|
GETDIS(LOC) | ;
|
|
GETNODIS(LOC) | ;For Discharge/Transmission report, it adds patients that have not been discharged from the wards to the report
|
|
CNGWARD(LOC,WARD1,WARD2) | ;Did patient change wards?
|
|
EXCWARD(LOC,WARD) | ;Is this ward excluded from the reports?
|
|
DUPLOC(LOC,LCTNS) | ;
|
|
GETLOC(WARD,LCTNS) | ;
|
|
TRANTYPE(MOVTYPE,TRANTYPE,MOVIEN,DFN) | ;
|
|
CHKOBS(DFN,MOVIEN,TRANTYPE) | ;
; Check if the patient is being discharged from a mixed observation ward (colocated with acute care ; patients) and being immediately admitted to acute care. If yes, we want to consider this ; discharge/admission as an interward transfer. |
|
CALLIN5(RESULT,DFN,MOVIEN) | ;
|
|
ONLYOBS(WARD) | ;
|
Name | Field # of Occurrence |
---|---|
$$SPEC^DGPMOBS | CHKOBS+18, CHKOBS+32 |
$$GET1^DIQ | CHKOBS+17, CHKOBS+31 |
IN5^VADPT | GETADM+9, GETADM+36, GETDIS+9, GETDIS+32, GETDIS+38, GETNODIS+17, GETNODIS+32, CHKOBS+15, CALLIN5+6 |
KVA^VADPT | GETADM+9, GETADM+34, GETADM+43, GETDIS+9, GETDIS+32, GETDIS+36, GETDIS+46, GETNODIS+15, GETNODIS+30, GETNODIS+49 , CHKOBS+13 |
$$FMDIFF^XLFDT | CHKOBS+23, CHKOBS+32 |
$$NOW^XLFDT | GETNODIS+10 |
FileNo | Call Tags |
---|---|
^DIC(45.7 - [#45.7] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | GETADM+9, GETDIS+9 |
^DGPM("AMV" | GETNODIS+11, GETNODIS+12 |
^DGPM("APTT1" | CHKOBS+19, CHKOBS+20 |
^DGPM("APTT3" | CHKOBS+27, CHKOBS+28 |
^DGPM("ATT" | GETADM+7, GETADM+8, GETDIS+7, GETDIS+8 |
^DPT("CN" | GETNODIS+7, GETNODIS+8 |
^MMRS(104.3 - [#104.3] | GETADM+40, GETDIS+43, GETNODIS+46, CNGWARD+5, EXCWARD+6, DUPLOC+5, DUPLOC+8, GETLOC+6, ONLYOBS+7, ONLYOBS+8 , ONLYOBS+9 |
^TMP($J | GETADM+41*, GETDIS+44*, GETNODIS+47* |
Name | Line Occurrences |
---|---|
$$CHKOBS | TRANTYPE+6 |
$$CNGWARD | GETADM+16, GETADM+31, GETDIS+16, GETDIS+33, GETDIS+34, GETNODIS+28 |
$$DUPLOC | GETMOVE+7 |
$$EXCWARD | GETADM+17, GETDIS+17, GETNODIS+20 |
$$GETLOC | GETADM+39, GETDIS+42, GETNODIS+45, CNGWARD+4, EXCWARD+4 |
$$ONLYOBS | CHKOBS+18, CHKOBS+32 |
$$TRANTYPE | GETADM+10, GETADM+25, GETDIS+11, GETDIS+25, GETNODIS+22, GETNODIS+33 |
CALLIN5 | CHKOBS+22, CHKOBS+30 |
GETADM | GETMOVE+10, GETMOVE+14 |
GETDIS | GETMOVE+11, GETMOVE+15 |
GETNODIS | GETMOVE+12, GETMOVE+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BYADM | GETMOVE+10, GETMOVE+11, GETMOVE+12, GETMOVE+14, GETMOVE+15, GETMOVE+16 |
DFN | GETADM+4~, GETADM+9*, GETADM+10, GETADM+25, GETADM+41, GETDIS+4~, GETDIS+9*, GETDIS+11, GETDIS+25, GETDIS+44 , GETNODIS+4~, GETNODIS+8*, GETNODIS+12*, GETNODIS+14*, GETNODIS+22, GETNODIS+33, GETNODIS+47, TRANTYPE~, TRANTYPE+6, CHKOBS~ , CHKOBS+19, CHKOBS+20, CHKOBS+22, CHKOBS+27, CHKOBS+28, CHKOBS+30, CALLIN5~ |
DUPLOC | GETMOVE+4~, GETMOVE+7*, GETMOVE+8, GETMOVE+9 |
EDT | GETNODIS+4~, GETNODIS+10*, GETNODIS+11 |
>> ENDDT | GETADM+7, GETDIS+7, GETNODIS+11, GETNODIS+16 |
IEN | GETNODIS+4~, GETNODIS+29*, GETNODIS+31 |
INDATE | GETADM+4~, GETADM+19*, GETADM+41, GETDIS+4~, GETDIS+23*, GETDIS+30*, GETDIS+33*, GETDIS+34*, GETDIS+44, GETNODIS+4~ , GETNODIS+41*, GETNODIS+47 |
INIFN | GETADM+4~, GETADM+20*, GETADM+41, GETDIS+4~, GETDIS+23*, GETDIS+24, GETDIS+30*, GETDIS+33*, GETDIS+34*, GETDIS+35 , GETDIS+40, GETDIS+44, GETNODIS+4~, GETNODIS+42*, GETNODIS+43, GETNODIS+47 |
INLOC | GETADM+4~, GETADM+38*, GETADM+39*, GETADM+40, GETADM+41, GETDIS+4~, GETDIS+41*, GETDIS+42*, GETDIS+43, GETDIS+44 , GETNODIS+4~, GETNODIS+44*, GETNODIS+45*, GETNODIS+46, GETNODIS+47 |
INTT | GETADM+4~, GETADM+21*, GETADM+41, GETDIS+4~, GETDIS+23*, GETDIS+30*, GETDIS+33*, GETDIS+34*, GETDIS+44, GETNODIS+4~ , GETNODIS+22*, GETNODIS+23, GETNODIS+24, GETNODIS+25*, GETNODIS+28, GETNODIS+33*, GETNODIS+34, GETNODIS+35, GETNODIS+36*, GETNODIS+40 , GETNODIS+47 |
INWARD | GETADM+4~, GETADM+14*, GETADM+16, GETADM+17, GETADM+31, GETADM+39, GETDIS+4~, GETDIS+22*, GETDIS+42, GETNODIS+4~ , GETNODIS+19*, GETNODIS+20, GETNODIS+45 |
LCTNS | DUPLOC~, GETLOC~ |
LCTNS( | DUPLOC+6, GETLOC+5 |
LOC | GETMOVE+4~, GETMOVE+6*, GETMOVE+7, GETMOVE+8, GETMOVE+10, GETMOVE+11, GETMOVE+12, GETADM~, GETADM+16, GETADM+17 , GETADM+31, GETADM+38, GETDIS~, GETDIS+16, GETDIS+17, GETDIS+33, GETDIS+34, GETDIS+41, GETNODIS~, GETNODIS+20 , GETNODIS+28, GETNODIS+44, CNGWARD~, CNGWARD+4*, CNGWARD+5, EXCWARD~, EXCWARD+4*, EXCWARD+5, EXCWARD+6, DUPLOC~ , DUPLOC+5, DUPLOC+7, GETLOC+2~, GETLOC+5*, GETLOC+6 |
LOC2 | DUPLOC+2~, DUPLOC+6*, DUPLOC+7, DUPLOC+8 |
LOCNAME | GETADM+4~, GETADM+40*, GETADM+41, GETDIS+4~, GETDIS+43*, GETDIS+44, GETNODIS+4~, GETNODIS+46*, GETNODIS+47 |
MMRSLOC | GETMOVE+7, ONLYOBS+2~, ONLYOBS+6*, ONLYOBS+7*, ONLYOBS+8, ONLYOBS+9 |
MMRSLOC( | GETMOVE+6 |
MMRSLOC2 | GETMOVE+4~, GETMOVE+13, GETADM+39, GETDIS+42, GETNODIS+45, CNGWARD+4, EXCWARD+4 |
MMRSLOC2( | GETMOVE+8* |
MOVDT | GETADM+4~, GETADM+7*, GETADM+8, GETDIS+4~, GETDIS+7*, GETDIS+8 |
MOVIEN | TRANTYPE~, TRANTYPE+6, CHKOBS~, CHKOBS+14, CALLIN5~, CALLIN5+4 |
MOVIFN | GETADM+4~, GETADM+8*, GETADM+9, GETADM+20, GETDIS+4~, GETDIS+8*, GETDIS+9, GETDIS+19 |
MOVTYPE | TRANTYPE~, TRANTYPE+2, TRANTYPE+3, TRANTYPE+4, TRANTYPE+5 |
NEXTIEN | GETADM+4~, GETADM+27*, GETADM+33*, GETADM+35 |
NEXTMOV | CHKOBS+7~, CHKOBS+20*, CHKOBS+21, CHKOBS+22, CHKOBS+24 |
NEXTMOVDT | CHKOBS+7~, CHKOBS+19*, CHKOBS+20 |
NEXTWARD | GETDIS+5~, GETDIS+12*, GETDIS+14*, GETDIS+16 |
>> ODOBS( | CHKOBS+42*, CHKOBS+51* |
ONLYOBS | ONLYOBS+2~, ONLYOBS+4*, ONLYOBS+7, ONLYOBS+9*, ONLYOBS+11 |
OUTDATE | GETADM+4~, GETADM+23*, GETADM+30*, GETADM+31*, GETADM+41, GETDIS+4~, GETDIS+18*, GETDIS+44 |
OUTIFN | GETADM+4~, GETADM+23*, GETADM+24, GETADM+30*, GETADM+31*, GETADM+32, GETADM+41, GETDIS+4~, GETDIS+19*, GETDIS+44 |
OUTTT | GETADM+4~, GETADM+23*, GETADM+30*, GETADM+31*, GETADM+41, GETDIS+4~, GETDIS+20*, GETDIS+44 |
OUTWARD | GETADM+5~, GETADM+26*, GETADM+29*, GETADM+31 |
PREVIEN | GETDIS+4~, GETDIS+27*, GETDIS+29*, GETDIS+32, GETDIS+37, GETNODIS+5~, GETNODIS+24*, GETNODIS+27*, GETNODIS+28, GETNODIS+29 , GETNODIS+35*, GETNODIS+38* |
PREVMOV | CHKOBS+7~, CHKOBS+28*, CHKOBS+29, CHKOBS+30, CHKOBS+33 |
PREVMOVDT | CHKOBS+7~, CHKOBS+27*, CHKOBS+28 |
PREVWARD | GETADM+5~, GETADM+11*, GETADM+15*, GETADM+16, GETDIS+5~, GETDIS+26*, GETDIS+31, GETDIS+34, GETNODIS+5~, GETNODIS+23* , GETNODIS+26*, GETNODIS+28, GETNODIS+34*, GETNODIS+37* |
RESULT | CALLIN5~, CALLIN5+5 |
RSLT | DUPLOC+2~, DUPLOC+4*, DUPLOC+8*, DUPLOC+9, GETLOC+2~, GETLOC+4*, GETLOC+5, GETLOC+6*, GETLOC+7 |
SDT | GETNODIS+4~, GETNODIS+11*, GETNODIS+12 |
SPEC | CHKOBS+7~, CHKOBS+17*, CHKOBS+18, CHKOBS+31*, CHKOBS+32 |
>> STRTDT | GETADM+7, GETDIS+7, CHKOBS+40, CHKOBS+41, CHKOBS+50 |
TIMETOADM | CHKOBS+7~, CHKOBS+11*, CHKOBS+23, CHKOBS+32 |
TMP | GETNODIS+4~ |
TMP( | GETNODIS+8*, GETNODIS+12*, GETNODIS+14 |
TRANTYPE | GETADM+4~, GETADM+10*, GETADM+11, GETADM+12*, GETADM+13, GETADM+16, GETADM+21, GETADM+25*, GETADM+26, GETADM+27 , GETADM+28*, GETADM+30, GETADM+31, GETDIS+4~, GETDIS+11*, GETDIS+12, GETDIS+13*, GETDIS+15, GETDIS+16, GETDIS+20 , GETDIS+25*, GETDIS+26, GETDIS+27, GETDIS+28*, GETDIS+30, GETDIS+31, GETDIS+34, TRANTYPE~, TRANTYPE+6*, TRANTYPE+7 , CHKOBS~, CHKOBS+9, CHKOBS+18, CHKOBS+24*, CHKOBS+26, CHKOBS+33*, CHKOBS+53 |
TT | GETADM+4~, GETADM+7*, GETADM+8, GETDIS+4~, GETDIS+7*, GETDIS+8, GETNODIS+4~, GETNODIS+11*, GETNODIS+12 |
U | GETADM+11, GETADM+12, GETADM+26, GETADM+27, GETADM+28, GETADM+40, GETADM+41, GETDIS+12, GETDIS+13, GETDIS+26 , GETDIS+27, GETDIS+28, GETDIS+43, GETDIS+44, GETNODIS+23, GETNODIS+24, GETNODIS+25, GETNODIS+34, GETNODIS+35, GETNODIS+36 , GETNODIS+46, GETNODIS+47, CHKOBS+24, CHKOBS+33, ONLYOBS+9 |
VAIP | GETADM+4~, GETDIS+4~, GETNODIS+4~, CHKOBS+7~, CALLIN5+2~ |
VAIP("D" | GETNODIS+16* |
VAIP("E" | GETADM+9*, GETADM+35*, GETDIS+9*, GETDIS+32*, GETDIS+37*, GETNODIS+31*, CHKOBS+14*, CALLIN5+4* |
VAIP("V" | CALLIN5+5* |
VAIP(1 | GETADM+10, GETDIS+11, GETDIS+33, GETNODIS+18, GETNODIS+22, GETNODIS+33, GETNODIS+42 |
VAIP(15 | GETADM+15, GETDIS+10, GETDIS+16, GETDIS+17, GETDIS+22, GETDIS+24, GETDIS+25, GETDIS+29, GETDIS+30, GETDIS+33 , GETDIS+34, GETNODIS+26, GETNODIS+27, GETNODIS+37, GETNODIS+38 |
VAIP(16 | GETADM+24, GETADM+25, GETADM+29, GETADM+30, GETADM+31, GETADM+33 |
VAIP(17 | CHKOBS+50, CHKOBS+51 |
VAIP(2 | GETADM+10, GETDIS+10, GETDIS+11, GETNODIS+22, GETNODIS+33 |
VAIP(3 | GETADM+19, GETDIS+18, GETDIS+33, GETNODIS+41, CHKOBS+19, CHKOBS+23, CHKOBS+27, CHKOBS+32, CHKOBS+41, CHKOBS+50 |
VAIP(4 | GETADM+10, GETDIS+11, GETNODIS+22, GETNODIS+33 |
VAIP(5 | GETADM+14, GETDIS+14, GETDIS+33, GETNODIS+19, GETNODIS+28, CHKOBS+18 |
VAIP(8 | CHKOBS+17 |
VAIP2 | CHKOBS+7~ |
VAIP2(13 | CHKOBS+41, CHKOBS+50 |
VAIP2(15 | CHKOBS+33 |
VAIP2(16 | CHKOBS+24 |
VAIP2(3 | CHKOBS+23, CHKOBS+32, CHKOBS+41, CHKOBS+50 |
VAIP2(5 | CHKOBS+24, CHKOBS+32, CHKOBS+33, CHKOBS+42 |
VAIP2(8 | CHKOBS+31 |
WARD | GETNODIS+4~, GETNODIS+7*, GETNODIS+8, EXCWARD~, EXCWARD+4, EXCWARD+6, DUPLOC+2~, DUPLOC+5*, DUPLOC+8, GETLOC~ , GETLOC+6, ONLYOBS~, ONLYOBS+8 |
WARD1 | CNGWARD~, CNGWARD+4, CNGWARD+5 |
WARD2 | CNGWARD~, CNGWARD+5 |