©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
BEDDUTIS ;VNGT/HS/BEE-BEDD Utility Routine 2 - Cache Calls ; 08 Nov 2011 12:00 PM
Source file <BEDDUTIS.m>
| Package | Total | Call Graph |
|---|---|---|
| Emergency Room | 5 | ($$OPT,UTL)^AMER0 ($$DR1,CONSULT,DRM,KILLADM,STUFF)^AMERSAV ($$DT,$$RUN,INJ)^AMERSAV1 POV^AMERUTIL VER^AMERVER |
| VA Fileman | 5 | (H,YX)^%DTC FILE^DICN (,FILE)^DIE $$IENS^DILF $$GET1^DIQ |
| IHS Emergency Dept Dashboard | 2 | ($$CLIN,POV,PRPOV,PRV)^BEDDUTIU RMRMV^BEDDUTW |
| Kernel | 2 | $$DT^XLFDT DUZ^XUP |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Emergency Dept Dashboard | 2 | BEDDRPT BEDDUTID |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| XEDCNT | ||
| DC(DFN,OBJID,VIEN,DUZ,SITE,BEDD) | ;Disch from BEDD/AMER
|
|
| CONSQRY | ;Perform Query to Gather ED Consults and store in ^TMP("AMER
|
|
| XPRCNT | ||
| PRCNT(OBJID,RET,PROC) | ;Get count of procedures for visit
|
|
| DT(X,Y,T) | ;EP - Calculate Time Difference
|
|
| XDIAGQ | ||
| DCUPDATE(AMERVSIT,DCDT,DISP) | ;Discharge Reversed DC
|
|
| DXCNT(OBJID,RET,DIAG,PRIME) | ;Get count of diagnosis for visit
|
|
| VERENTRY(AMERDFN,AMERPCC) | ;Create V EMERGENCY VISIT RECORD entry
|
|
| PROCQ(PRCPV) | ;Perform Query to Gather Procedures and store in ^TMP("AMER
|
|
| PCCPRV | ;Log Consult Provider(s) in V PROVIDER file
|
|
| DIAGQ | ;EP - Perform Query to Gather Diagnosis and store in ^TMP("AMER
|
|
| XPROCQ | ||
| EDCNT(OBJID,RET,CONS) | ;Get count of ED Consults for visit
|
|
| XCONS | ||
| COMP | ;Process computed fields
|
| Name | Field # of Occurrence |
|---|---|
| H^%DTC | DT+6, DT+7 |
| YX^%DTC | DC+23, DC+108, CONSQRY+22 |
| $$OPT^AMER0 | DC+97 |
| UTL^AMER0 | DC+64 |
| $$DR1^AMERSAV | DC+113, DC+115 |
| CONSULT^AMERSAV | DC+121 |
| DRM^AMERSAV | DC+125 |
| KILLADM^AMERSAV | DC+128 |
| STUFF^AMERSAV | DC+124 |
| $$DT^AMERSAV1 | DC+139, DC+143, DC+147, COMP+17, COMP+33, COMP+37 |
| $$RUN^AMERSAV1 | DC+131 |
| INJ^AMERSAV1 | DC+118 |
| POV^AMERUTIL | DXCNT+24 |
| VER^AMERVER | VERENTRY+3 |
| $$CLIN^BEDDUTIU | DC+111 |
| POV^BEDDUTIU | DC+155 |
| PRPOV^BEDDUTIU | DC+161 |
| PRV^BEDDUTIU | DC+152 |
| RMRMV^BEDDUTW | DC+179 |
| FILE^DICN | PCCPRV+25, VERENTRY+45 |
| ^DIE | COMP+41, COMP+43 |
| FILE^DIE | DC+148, DCUPDATE+11 |
| $$IENS^DILF | PCCPRV+17 |
| $$GET1^DIQ | DC+135, DC+138, DC+142, DC+146, CONSQRY+26, PCCPRV+18, PCCPRV+19, COMP+8, COMP+13, COMP+23 , COMP+28, COMP+32, COMP+36, VERENTRY+12, VERENTRY+15, VERENTRY+18, VERENTRY+21, VERENTRY+31, VERENTRY+32 |
| $$DT^XLFDT | DC+51 |
| DUZ^XUP | DC+50 |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^ICD9 - [#80] | GET1^DIQ |
| ^AUPNVPRV - [#9000010.06] | Classic Fileman Calls |
| ^AUPNVER - [#9000010.29] | Classic Fileman Calls |
| ^AMERVSIT - [#9009080] | Classic Fileman Calls, GET1^DIQ |
| 9009080.019 | GET1^DIQ |
| ^AMER(2.9 - [#9009082.9] | GET1^DIQ |
| ^AMER(3 - [#9009083] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AMERADM - [#9009081] | DC+114 |
| ^AMERVSIT - [#9009080] | DCUPDATE+6, DCUPDATE+13, PCCPRV+10, PCCPRV+12, PCCPRV+13, COMP+21 |
| ^AMERVSIT("AC" | COMP+10 |
| ^AUPNVER - [#9000010.29] | VERENTRY+47* |
| ^AUPNVER("AD" | VERENTRY+7 |
| ^AUPNVPRV - [#9000010.06] | PCCPRV+7 |
| ^AUPNVPRV("AD" | PCCPRV+4, PCCPRV+7 |
| ^TMP("AMER" | DC+61!, DC+65*, DC+76*, DC+78*, DC+79*, DC+80*, DC+81*, DC+82*, DC+83*, DC+84* , DC+85*, DC+86*, DC+87*, DC+88*, DC+91*, DC+97*, DC+102*, DC+103*, DC+104*, DC+105* , DC+106*, DC+107*, DC+109*, DC+110*, DC+111*, CONSQRY+20*, CONSQRY+23*, CONSQRY+25*, CONSQRY+26*, PROCQ+21* |
| Name | Line Occurrences |
|---|---|
| $$DT | COMP+25, COMP+29 |
| $$EDCNT | DC+91 |
| $$PRCNT | DC+95 |
| COMP | DC+164 |
| CONSQRY | DC+92 |
| DCUPDATE | DC+29 |
| PCCPRV | DC+158 |
| PROCQ | DC+96 |
| VERENTRY | DC+176 |
| XCONS | CONSQRY+10 |
| XPROCQ | PROCQ+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DC+19~, DC+23, DC+55~, DC+97*, DC+108, DC+139*, DC+143*, DC+147*, CONSQRY+19~, CONSQRY+22 , DT+2~, DT+9*, DT+10*, DT+11*, DT+12 |
| %H | DC+19~, DC+22*, DC+55~, DC+108*, CONSQRY+19~, CONSQRY+21*, DT+2~, DT+6, DT+7 |
| %T | DT+2~, DT+6, DT+7 |
| %Y | DT+2~ |
| A | DT+2~, DT+6*, DT+8*, DT+9 |
| ADMDTM | COMP+2~, COMP+8*, COMP+14, COMP+17, COMP+25, COMP+29, COMP+33, COMP+37 |
| AMERDA | DC+55~, DC+131*, DC+135, DC+138, DC+139, DC+142, DC+143, DC+146, DC+147, DC+152 , DC+155, DC+161, DC+168, DC+176, PCCPRV+9, PCCPRV+10, PCCPRV+12, PCCPRV+13, PCCPRV+17, COMP+8 , COMP+21, COMP+39, VERENTRY+12, VERENTRY+15, VERENTRY+18, VERENTRY+31 |
| AMERDFN | DC+55~, DC+58*, DC+64, DC+65, DC+114, DC+124, COMP+2~, COMP+7*, COMP+10, VERENTRY~ , VERENTRY+3 |
| AMERDIAG | DIAGQ+4~ |
| AMERDR | DC+55~, COMP+2~ |
| AMERDR(1 | DC+113*, DC+114* |
| AMERDR(12 | COMP+4*, COMP+29*, COMP+33*, COMP+37*, COMP+42 |
| AMERDR(2 | DC+115*, COMP+4*, COMP+18*, COMP+25*, COMP+40 |
| AMERDUR | DC+56~, DC+148 |
| AMERDUR(9009080 | DC+139*, DC+143*, DC+147* |
| AMERED | EDCNT+10~, EDCNT+25* |
| AMERLINE | DC+55~, DC+58* |
| AMERNO | CONSQRY+12~, CONSQRY+14*, CONSQRY+20, CONSQRY+23, CONSQRY+25, CONSQRY+26, CONSQRY+27* |
| AMERPCC | DC+55~, DC+58*, VERENTRY~, VERENTRY+3, VERENTRY+6, VERENTRY+7, VERENTRY+44 |
| AMERPOV | DXCNT+11~, DXCNT+24 |
| AMERPOV( | DXCNT+26, DXCNT+28, DXCNT+29, DXCNT+30, DXCNT+31 |
| AMERPROC | PROCQ+2~, PROCQ+15*, PROCQ+21, PRCNT+10~, PRCNT+25* |
| AMERVSIT | DC+9~, DC+12*, DC+18, DC+29, DC+46, DCUPDATE~, DCUPDATE+4, DCUPDATE+6, DCUPDATE+8, DCUPDATE+9 , DCUPDATE+13 |
| AMUPD | DCUPDATE+2~, DCUPDATE+11 |
| AMUPD(9009080 | DCUPDATE+8*, DCUPDATE+9* |
| AR | DC+56~, DC+135*, DC+139, DC+143, DC+147 |
| B | DT+2~, DT+6*, DT+8*, DT+9 |
| BDT | PROCQ+14~, PROCQ+17*, PROCQ+24 |
| BEDD | DC~, DXCNT+11~, DXCNT+17*, DXCNT+21* |
| BEDD("AdmPrv" | DC+110 |
| BEDD("DCDtTm" | DC+109 |
| BEDD("DCInst" | DC+105 |
| BEDD("DCNrs" | DC+107 |
| BEDD("DCPrv" | DC+106 |
| BEDD("Disp" | DC+26, DC+103 |
| BEDD("FinAct" | DC+102 |
| BEDD("WhrTrn" | DC+104 |
| BTM | PROCQ+14~, PROCQ+18*, PROCQ+24 |
| C | DT+2~, DT+7*, DT+9 |
| CDATE | EDCNT+10~ |
| CNS | EDCNT+10~ |
| CNT | DIAGQ+4~, DIAGQ+7*, PRCNT+10~, PRCNT+14*, XPRCNT+1, EDCNT+10~, EDCNT+14*, XEDCNT+1, DXCNT+11~, DXCNT+26* , DXCNT+28, DXCNT+29, DXCNT+30, DXCNT+31 |
| CODE | DIAGQ+4~, DXCNT+27~, DXCNT+28*, DXCNT+33, DXCNT+34 |
| CONS | EDCNT~, EDCNT+11!, EDCNT+14* |
| COTY | EDCNT+10~ |
| CPRV | CONSQRY+19~, CONSQRY+24*, CONSQRY+25, CONSQRY+26 |
| CTIME | EDCNT+10~ |
| DA | PCCPRV+15~, PCCPRV+17*, COMP+2~, COMP+39* |
| DA(1 | PCCPRV+17* |
| DCDT | DC+19~, DC+23*, DC+29, DCUPDATE~, DCUPDATE+9, VERENTRY+9~, VERENTRY+15*, VERENTRY+44 |
| DD | PCCPRV+22!, PCCPRV+26!, COMP+2~, VERENTRY+9~, VERENTRY+42!, VERENTRY+48! |
| DFN | DC~, DC+58, PCCPRV+24, COMP+7, VERENTRY+44 |
| DIAG | DIAGQ+5!, DXCNT~, DXCNT+21*, DXCNT+32*, DXCNT+33, DXCNT+37*, DXCNT+39 |
| DIAG( | DXCNT+33* |
| DIC | PCCPRV+22!, PCCPRV+23*, PCCPRV+26!, COMP+2~, VERENTRY+9~, VERENTRY+42!, VERENTRY+43*, VERENTRY+48! |
| DIC("DR" | PCCPRV+24*, VERENTRY+44* |
| DIC(0 | PCCPRV+23*, VERENTRY+43* |
| DIE | COMP+2~, COMP+39* |
| DINUM | PCCPRV+22!, PCCPRV+26!, VERENTRY+9~, VERENTRY+42!, VERENTRY+48! |
| >> DIS | VERENTRY+31*, VERENTRY+33*, VERENTRY+34*, VERENTRY+35*, VERENTRY+36*, VERENTRY+37*, VERENTRY+38*, VERENTRY+39*, VERENTRY+44 |
| DISP | DC+19~, DC+26*, DC+29, DCUPDATE~, DCUPDATE+8, VERENTRY+9~, VERENTRY+31*, VERENTRY+32*, VERENTRY+33, VERENTRY+34 , VERENTRY+35, VERENTRY+36, VERENTRY+37, VERENTRY+38, VERENTRY+39, VERENTRY+47 |
| DO | PCCPRV+22!, PCCPRV+26!, COMP+2~, VERENTRY+9~, VERENTRY+42!, VERENTRY+48! |
| DR | COMP+2~, COMP+40*, COMP+42* |
| DSP | VERENTRY+9~ |
| DT | DC+51* |
| DTM | CONSQRY+19~, CONSQRY+22*, CONSQRY+23, CONSQRY+26, COMP+2~, COMP+10*, COMP+14*, COMP+16, COMP+17*, COMP+18 , COMP+25*, COMP+29*, COMP+33*, COMP+37* |
| DUZ | DC~, DC+50, DC+115 |
| E | DT+2~, DT+7*, DT+8, DT+9 |
| EDREF | DC+9~, DC+11*, DC+44*, DC+67*, DC+170* |
| EDT | PROCQ+14~, PROCQ+19*, PROCQ+24 |
| ENTBY | VERENTRY+9~, VERENTRY+18*, VERENTRY+27*, VERENTRY+28*, VERENTRY+29*, VERENTRY+44 |
| ERROR | DC+56~, DCUPDATE+2~ |
| ESTAT | DC+19~, DC+37*, DC+40~, DC+43* |
| ETM | PROCQ+14~, PROCQ+20*, PROCQ+24 |
| FMDT | DC+55~, DC+108* |
| IACT | VERENTRY+9~, VERENTRY+12* |
| ICDIEN | DXCNT+27~, DXCNT+31*, DXCNT+34 |
| IENS | PCCPRV+15~, PCCPRV+17*, PCCPRV+18, PCCPRV+19 |
| MOA | VERENTRY+9~, VERENTRY+18*, VERENTRY+22*, VERENTRY+23*, VERENTRY+24*, VERENTRY+44 |
| MOT | VERENTRY+9~, VERENTRY+18*, VERENTRY+21*, VERENTRY+22, VERENTRY+23, VERENTRY+27, VERENTRY+28, VERENTRY+29 |
| NAR | DIAGQ+4~ |
| NARR | DXCNT+27~, DXCNT+30*, DXCNT+33, DXCNT+34 |
| OBJID | DC~, DC+11, DC+67, DC+91, DC+95, DC+179, CONSQRY+7, PROCQ+7, DIAGQ+11, PRCNT~ , PRCNT+18, EDCNT~, EDCNT+18, DXCNT~, DXCNT+17 |
| PCODE | DIAGQ+4~, DIAGQ+7*, DXCNT+11~, DXCNT+21*, DXCNT+34*, DXCNT+37 |
| PFND | DIAGQ+4~, DIAGQ+7* |
| PIEN | DXCNT+11~, DXCNT+21*, DXCNT+34*, DXCNT+37 |
| PNAR | DIAGQ+4~, DIAGQ+7*, DXCNT+21*, DXCNT+34*, DXCNT+37 |
| PNARR | DXCNT+11~ |
| PRCNT | DC+56~, DC+95*, DC+96, DC+97 |
| PRCPV | DC+56~, DC+96, DC+161, PROCQ~ |
| PRCPV( | PROCQ+24* |
| PRIME | DXCNT~, DXCNT+37 |
| PRM | DIAGQ+4~, DXCNT+27~, DXCNT+29*, DXCNT+33, DXCNT+34 |
| PRMNRS | DC+56~, DC+151*, DC+152 |
| PROC | PRCNT~, PRCNT+11!, PRCNT+14* |
| PRV | PROCQ+2~, PROCQ+16*, PROCQ+24 |
| RCDT | PCCPRV+15~, PCCPRV+19*, PCCPRV+24 |
| RCP | PCCPRV+15~, PCCPRV+18*, PCCPRV+21, PCCPRV+23, PCCPRV+27 |
| RET | PRCNT~, PRCNT+13*, EDCNT~, EDCNT+13*, DXCNT~ |
| RIEN | PCCPRV+2~, PCCPRV+7*, PCCPRV+12*, PCCPRV+13 |
| RIENI | PCCPRV+2~, PCCPRV+13*, PCCPRV+17 |
| >> ROOM | DC+15*, DC+73* |
| RS | CONSQRY+2~, CONSQRY+4*, XCONS*, PROCQ+2~, PROCQ+4*, XPROCQ*, DIAGQ+4~, DIAGQ+8*, DIAGQ+14*, XDIAGQ* , PRCNT+10~, PRCNT+15*, PRCNT+21*, XPRCNT*, EDCNT+10~, EDCNT+15*, EDCNT+21*, XEDCNT* |
| >> RSTAT | DC+172*, DC+173* |
| SERV | CONSQRY+16~, CONSQRY+17*, CONSQRY+18, CONSQRY+26 |
| SITE | DC~ |
| STAT | DC+55~, DC+169*, DC+172, DC+173, DC+180 |
| STATUS | CONSQRY+2~, CONSQRY+7*, CONSQRY+10, PROCQ+2~, PROCQ+7*, PROCQ+10, DIAGQ+4~, DIAGQ+11*, DIAGQ+14, PRCNT+10~ , PRCNT+18*, PRCNT+21, EDCNT+10~, EDCNT+18*, EDCNT+21 |
| T | DT~, DT+5*, DT+10 |
| U | DC+49*, DC+97, DC+114, CONSQRY+26, PROCQ+24, DXCNT+33 |
| URG | VERENTRY+9~, VERENTRY+12*, VERENTRY+44 |
| VIEN | DC~, DC+58, DC+152, DC+155, DC+161, DC+176, PCCPRV+4, PCCPRV+7, PCCPRV+24, DXCNT+11~ , DXCNT+20*, DXCNT+24 |
| VPROV | PCCPRV+2~ |
| VPROV( | PCCPRV+7*, PCCPRV+21, PCCPRV+27* |
| VSIT | COMP+2~, COMP+10*, COMP+13, COMP+23, COMP+28, COMP+32, COMP+36 |
| X | DC+23, DC+56~, DC+108, DC+138*, DC+139, DC+142*, DC+143, DC+146*, DC+147, CONSQRY+22 , PCCPRV+22!, PCCPRV+23*, COMP+2~, COMP+12~, COMP+13*, COMP+14, COMP+22~, COMP+23*, COMP+24, COMP+25 , COMP+28*, COMP+29, COMP+32*, COMP+33, COMP+36*, COMP+37, VERENTRY+9~, VERENTRY+42!, VERENTRY+43*, VERENTRY+48! , DT~, DT+4, DT+6*, DXCNT+11~, DXCNT+14*, DXCNT+15* |
| XPROC | PRCNT+10~ |
| Y | PCCPRV+22!, VERENTRY+9~, VERENTRY+47, DT~, DT+4, DT+6 |