MMRSCRE2 ;TCK - Print CRE Report Cont. (Contains functions to collect patient movements) ; 3/3/17 10:37am
Source file <MMRSCRE2.m>
Package | Total | Call Graph |
---|---|---|
Methicillin Resistant Staph Aurerus Initiative Reports | 1 | $$CHKOBS^MMRSIPC2 |
Registration | 1 | (IN5,KVA)^VADPT |
VA FileMan | 1 | $$GET1^DIQ |
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 | 1 | MMRSCRE |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETMOVE | ;Collects ward movements for patients that were admitted or discharged in date range.
|
|
GETADM(LOC) | ;
|
|
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) | ;
|
|
END | ;
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^DG(40.8 - [#40.8] | GET1^DIQ |
^DGPM - [#405] | GET1^DIQ |
^DG(405.1 - [#405.1] | GET1^DIQ |
^DIC(42 - [#42] | GET1^DIQ |
^SC - [#44] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | GETADM+5 |
^DGPM("ATT" | GETADM+3, GETADM+4 |
^MMRS(104.3 - [#104.3] | CNGWARD+2, EXCWARD+3, DUPLOC+3, DUPLOC+6, GETLOC+4 |
^TMP($J | GETADM+45* |
Name | Line Occurrences |
---|---|
$$CNGWARD | GETADM+21 |
$$GETLOC | CNGWARD+1, EXCWARD+1 |
$$TRANTYPE | GETADM+6, GETADM+29 |
GETADM | GETMOVE+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADT | GETADM+26*, END+1! |
DFN | GETADM+5*, GETADM+6, GETADM+29, GETADM+42, GETADM+43, GETADM+45, TRANTYPE~, TRANTYPE+5 |
DIV | GETADM+14*, GETADM+18, END+1! |
DIVID | GETADM+16*, END+1! |
DIVS | GETADM+15*, GETADM+16, END+1! |
DUPLOC | GETMOVE+1~ |
ENDDT | GETADM+3, END+1! |
HLPLC | END+1! |
HSPLC | GETADM+13*, GETADM+14, GETADM+15, END+2! |
INDATE | GETADM+1~, GETADM+23*, GETADM+45 |
INIFN | GETADM+1~, GETADM+24*, GETADM+45 |
INLOC | GETADM+1~, GETADM+41*, GETADM+45 |
INTT | GETADM+1~, GETADM+25*, GETADM+45 |
INWARD | GETADM+1~, GETADM+11*, GETADM+12, GETADM+13, GETADM+20, GETADM+21, GETADM+41 |
LAST4 | GETADM+43*, GETADM+45, END+1! |
LCTNS | DUPLOC~, GETLOC~ |
LCTNS( | DUPLOC+4, GETLOC+3 |
LOC | GETMOVE+2, GETADM~, GETADM+16*, GETADM+18, GETADM+19, GETADM+21, CNGWARD~, CNGWARD+1*, CNGWARD+2, EXCWARD~ , EXCWARD+1*, EXCWARD+2, EXCWARD+3, DUPLOC~, DUPLOC+3, DUPLOC+5, GETLOC+1~, GETLOC+3*, GETLOC+4 |
LOC2 | DUPLOC+1~, DUPLOC+4*, DUPLOC+5, DUPLOC+6 |
LOCNAME | GETADM+1~, GETADM+19*, GETADM+45 |
MASMOV | GETADM+44*, END+1! |
MMRSLOC2 | GETMOVE+1~, CNGWARD+1, EXCWARD+1 |
MOVDT | GETADM+1~, GETADM+3*, GETADM+4 |
MOVIEN | TRANTYPE~, TRANTYPE+5 |
MOVIFN | GETADM+1~, GETADM+4*, GETADM+5, GETADM+24, GETADM+26 |
MOVTYPE | TRANTYPE~, TRANTYPE+1, TRANTYPE+2, TRANTYPE+3, TRANTYPE+4 |
NEXTIEN | GETADM+1~, GETADM+31*, GETADM+37*, GETADM+39 |
OUTDATE | GETADM+1~, GETADM+27*, GETADM+34*, GETADM+45 |
OUTIFN | GETADM+1~, GETADM+27*, GETADM+28, GETADM+34*, GETADM+36 |
OUTTT | GETADM+1~, GETADM+27*, GETADM+34* |
OUTWARD | GETADM+2~, GETADM+30*, GETADM+33* |
PATNM | GETADM+42*, GETADM+45, END+1! |
PREVWARD | GETADM+2~, GETADM+7*, GETADM+8*, GETADM+21 |
RSLT | DUPLOC+1~, DUPLOC+2*, DUPLOC+6*, DUPLOC+7, GETLOC+1~, GETLOC+2*, GETLOC+3, GETLOC+4*, GETLOC+5 |
SSN | GETADM+43*, END+1! |
STRTDT | GETADM+3, END+2! |
TRANTYPE | GETADM+1~, GETADM+6*, GETADM+7, GETADM+9*, GETADM+10, GETADM+21, GETADM+25, GETADM+29*, GETADM+30, GETADM+31 , GETADM+32*, GETADM+34, GETADM+44, TRANTYPE~, TRANTYPE+5*, TRANTYPE+6 |
TT | GETADM+1~, GETADM+3*, GETADM+4 |
U | GETADM+7, GETADM+9, GETADM+30, GETADM+31, GETADM+32, GETADM+45 |
VAIP | GETADM+1~ |
VAIP("E" | GETADM+5*, GETADM+39* |
VAIP(1 | GETADM+6 |
VAIP(15 | GETADM+8 |
VAIP(16 | GETADM+28, GETADM+29, GETADM+33, GETADM+34, GETADM+37 |
VAIP(2 | GETADM+6 |
VAIP(3 | GETADM+23 |
VAIP(4 | GETADM+6 |
VAIP(5 | GETADM+11 |
WARD | GETADM+11*, GETADM+45, EXCWARD~, EXCWARD+1, EXCWARD+3, DUPLOC+1~, DUPLOC+3*, DUPLOC+6, GETLOC~, GETLOC+4 |
WARD1 | CNGWARD~, CNGWARD+1, CNGWARD+2 |
WARD2 | CNGWARD~, CNGWARD+2 |
WRDLOC | END+2! |
WRDLOC( | GETADM+20* |