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* |