BGPMUH01 ; IHS/MSC/MGH - MI measure NQF0495&NQF0497 ED-1 ;13-May-2011 16:00;MGH
Source file <BGPMUH01.m>
Package | Total | Call Graph |
---|---|---|
IHS GPRA Information System | 2 | $$ACTUPAP^BGPMUEPD $$DATE^BGPMUUTL |
Kernel | 1 | $$FMDIFF^XLFDT |
Registration | 1 | $$SPEC^DGPMOBS |
Taxonomy | 1 | $$ICD^ATXCHK |
VA Fileman | 1 | C^%DTC |
Name | Comments | DBIA/ICR reference |
---|---|---|
ENTRY2 | ;PEP 0497 Time from provider order to discharge
|
|
TOTAL(LIST,RPT,POP) | ;Find the median
|
|
FINDADM(DFN,ERADMIT,EREND) | ;FIND AN ADMISSION
|
|
SAVE2(LIST,POP,ER) | ;Save the result
|
|
CKDX(DX) | ;Check for primary diagnosis of behavioral health issue
|
|
RECSAVE(RPT,POP,LIST,ER) | ;save record
|
|
SPEC(FAC) | ;specialty check
|
|
WARDCK(WARD) | ;ward check
|
|
SAVE(LIST,POP,ER) | ;Save the result
|
|
ORDER(DFN,START,END) | ;Find the admission order
|
|
ENTRY(RPT) | ;PEP 0495 Median time admission to discharge from ED
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AMERVSIT - [#9009080] | ENTRY+7, ENTRY+9, ENTRY+13, ENTRY+14, ENTRY+16 |
^AMERVSIT("B" | ENTRY+5, ENTRY+6 |
^ATXAX("B" | CKDX+4 |
^AUTTASRC - [#9999999.53] | FINDADM+13 |
^DGPM - [#405] | FINDADM+7, FINDADM+9, FINDADM+11, FINDADM+15, FINDADM+23, FINDADM+25 |
^DGPM("C" | FINDADM+5 |
^DGPM("CA" | FINDADM+22 |
^DIC(42 - [#42] | WARDCK+4 |
^DIC(45.7 - [#45.7] | SPEC+3 |
^OR(100 - [#100] | ORDER+6, ORDER+7, ORDER+8, ORDER+11 |
^ORD(101.41 - [#101.41] | ORDER+10 |
^TMP("BGPMU0495" | SAVE+2, SAVE+11*, SAVE+12*, TOTAL+4, TOTAL+32* |
^TMP("BGPMU0497" | SAVE2+2, SAVE2+11*, SAVE2+12*, TOTAL+6, TOTAL+34* |
Name | Line Occurrences |
---|---|
$$CKDX | ENTRY+27 |
$$FINDADM | ENTRY+21 |
$$ORDER | RECSAVE+4 |
$$SPEC | FINDADM+27 |
$$WARDCK | FINDADM+18 |
RECSAVE | ENTRY+25, ENTRY+30, ENTRY+33 |
SAVE | RECSAVE+2 |
SAVE2 | RECSAVE+5 |
TOTAL | RECSAVE+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADMIT | ENTRY+1~, ENTRY+21*, ENTRY+22, ENTRY+23, FINDADM+1~, FINDADM+3*, FINDADM+19*, FINDADM+28*, FINDADM+29*, FINDADM+30 , ORDER+2~, ORDER+4*, ORDER+6 |
ADMOR | ENTRY+1~, RECSAVE+4*, RECSAVE+5, SAVE2+4 |
>> BGPACTUP | ENTRY+11*, ENTRY+12 |
>> BGPBDATE | ENTRY+2, ENTRY+11 |
>> BGPBEN | ENTRY+11 |
>> BGPEDATE | ENTRY+3, ENTRY+11 |
>> BGPICARE("MU.ED.0495.1" | SAVE+8* |
>> BGPICARE("MU.ED.0495.2" | SAVE+9* |
>> BGPICARE("MU.ED.0495.3" | SAVE+10* |
>> BGPICARE("MU.ED.0497.1" | SAVE2+8* |
>> BGPICARE("MU.ED.0497.2" | SAVE2+9* |
>> BGPICARE("MU.ED.0497.3" | SAVE2+10* |
>> BGPIISO | ENTRY+12 |
>> BGPMUTF | SAVE+2, SAVE+8, SAVE+9, SAVE+10, SAVE+11, SAVE+12, SAVE2+2, SAVE2+8, SAVE2+9, SAVE2+10 , SAVE2+11, SAVE2+12, TOTAL+4, TOTAL+6, TOTAL+32, TOTAL+34 |
BGPTX | CKDX+1~, CKDX+4*, CKDX+5, CKDX+6 |
>> BGPXPXPX | ENTRY+12 |
CNT | SAVE+1~, SAVE+2*, SAVE+3*, SAVE+6, SAVE+7, SAVE+8, SAVE+9, SAVE+10, SAVE+11, SAVE+12 , SAVE2+1~, SAVE2+2*, SAVE2+3*, SAVE2+6, SAVE2+7, SAVE2+8, SAVE2+9, SAVE2+10, SAVE2+11, SAVE2+12 , TOTAL+1~, TOTAL+4*, TOTAL+6*, TOTAL+7, TOTAL+32, TOTAL+34 |
CNT2 | TOTAL+1~, TOTAL+7*, TOTAL+8, TOTAL+10, TOTAL+24 |
DFN | ENTRY+1~, ENTRY+9*, ENTRY+10, ENTRY+11, ENTRY+21, FINDADM~, FINDADM+5, RECSAVE+4, SAVE+8, SAVE+9 , SAVE+10, SAVE+12, SAVE2+8, SAVE2+9, SAVE2+10, SAVE2+12, ORDER~, ORDER+5 |
DISCH | ORDER+2~, ORDER+4*, ORDER+6 |
DX | CKDX~, CKDX+6 |
DXCHK | ENTRY+1~, ENTRY+27*, ENTRY+28 |
END | ENTRY+1~, ENTRY+3*, ENTRY+5, ORDER~, ORDER+4 |
ER | RECSAVE~, RECSAVE+2, RECSAVE+5, SAVE~, SAVE+8, SAVE+9, SAVE+10, SAVE2~, SAVE2+8, SAVE2+9 , SAVE2+10 |
ERADMIT | ENTRY+1~, ENTRY+7*, ENTRY+8, ENTRY+21, ENTRY+25, ENTRY+30, ENTRY+33, FINDADM~, FINDADM+4, FINDADM+8 , RECSAVE+4, SAVE+4 |
ERDIS | ENTRY+1~, ENTRY+16* |
ERDX | ENTRY+1~ |
EREND | ENTRY+1~, ENTRY+16*, ENTRY+17, ENTRY+21, FINDADM~, RECSAVE+4, SAVE+4, SAVE2+4 |
ERPRIDX | ENTRY+1~, ENTRY+14*, ENTRY+15, ENTRY+27 |
ERPRV | ENTRY+1~, ENTRY+13* |
ERVST | ENTRY+1~, ENTRY+9* |
FAC | FINDADM+1~, FINDADM+25*, FINDADM+26, FINDADM+27, SPEC~, SPEC+2, SPEC+3 |
FSPEC | SPEC+1~, SPEC+4*, SPEC+5*, SPEC+6 |
I | TOTAL+1~ |
IEN | ENTRY+1~, ENTRY+6*, ENTRY+7, ENTRY+9, ENTRY+13, ENTRY+14, ENTRY+16 |
LIST | ENTRY+1~, ENTRY+25, ENTRY+30, ENTRY+33, RECSAVE~, RECSAVE+2, RECSAVE+5, RECSAVE+6, SAVE~, SAVE2~ , TOTAL~ |
LIST("ORDERED" | SAVE+6*, SAVE2+6*, TOTAL+14, TOTAL+15, TOTAL+18, TOTAL+20, TOTAL+26, TOTAL+27 |
LIST("POP" | SAVE+7*, SAVE2+7* |
MEDIAN | TOTAL+1~, TOTAL+30*, TOTAL+32, TOTAL+34 |
MGVT | FINDADM+1~ |
MID1 | TOTAL+1~, TOTAL+19*, TOTAL+20*, TOTAL+21 |
MID2 | TOTAL+1~, TOTAL+19*, TOTAL+20*, TOTAL+21 |
MIDDLE | TOTAL+1~, TOTAL+2*, TOTAL+14, TOTAL+15, TOTAL+21*, TOTAL+26, TOTAL+27, TOTAL+29*, TOTAL+30 |
MTVED | FINDADM+1~ |
MVTDT | FINDADM+1~, FINDADM+7*, FINDADM+8 |
MVTED | FINDADM+2~, FINDADM+4*, FINDADM+8 |
MVTFAC | FINDADM+1~, FINDADM+22*, FINDADM+23, FINDADM+25 |
MVTIEN | FINDADM+1~, FINDADM+5*, FINDADM+7, FINDADM+9, FINDADM+11, FINDADM+15, FINDADM+22 |
>> NXTPT | TOTAL+18*, TOTAL+19 |
OBS | FINDADM+1~, FINDADM+18*, FINDADM+19 |
OFFSET | TOTAL+1~, TOTAL+11*, TOTAL+16*, TOTAL+17, TOTAL+25*, TOTAL+28*, TOTAL+29 |
OFFSET2 | TOTAL+1~ |
ORD | ORDER+2~, ORDER+6*, ORDER+7 |
ORDIA | ORDER+2~, ORDER+8*, ORDER+9 |
ORDLK | ORDER+2~, ORDER+9*, ORDER+10 |
ORIEN | ORDER+2~, ORDER+7*, ORDER+8, ORDER+11 |
POP | ENTRY+1~, ENTRY+19*, ENTRY+24*, ENTRY+25, ENTRY+29*, ENTRY+30, ENTRY+32, ENTRY+33, RECSAVE~, RECSAVE+2 , RECSAVE+5, RECSAVE+6, SAVE~, SAVE+2, SAVE+6, SAVE+7, SAVE+8, SAVE+9, SAVE+10, SAVE+11 , SAVE+12, SAVE2~, SAVE2+2, SAVE2+6, SAVE2+7, SAVE2+8, SAVE2+9, SAVE2+10, SAVE2+11, SAVE2+12 , TOTAL~, TOTAL+4, TOTAL+6, TOTAL+14, TOTAL+15, TOTAL+18, TOTAL+20, TOTAL+26, TOTAL+27, TOTAL+32 , TOTAL+34 |
PT | ORDER+2~, ORDER+5*, ORDER+6, ORDER+7 |
>> PTCNT | TOTAL+15*, TOTAL+18, TOTAL+27* |
RESULT | CKDX+1~, CKDX+2*, CKDX+6*, CKDX+7, SAVE+1~, SAVE+8*, SAVE+9*, SAVE+10*, SAVE+12, SAVE2+1~ , SAVE2+8*, SAVE2+9*, SAVE2+10*, SAVE2+12 |
RET | ORDER+2~, ORDER+3*, ORDER+6, ORDER+11*, ORDER+12 |
RPT | ENTRY~, ENTRY+25, ENTRY+30, ENTRY+33, RECSAVE~, RECSAVE+1, RECSAVE+3, RECSAVE+6, TOTAL~, TOTAL+3 , TOTAL+5, TOTAL+31, TOTAL+33 |
SPEC | FINDADM+1~, FINDADM+21*, FINDADM+22, FINDADM+27*, FINDADM+28 |
SPIFN | WARDCK+1~, WARDCK+4*, WARDCK+5, WARDCK+6, SPEC+1~, SPEC+3*, SPEC+4 |
SRC | FINDADM+2~, FINDADM+11*, FINDADM+12, FINDADM+13 |
START | ENTRY+1~, ENTRY+2*, ENTRY+5*, ENTRY+6, ORDER~, ORDER+4 |
TAX | CKDX+1~, CKDX+3*, CKDX+4 |
TIME | SAVE+1~, SAVE+5*, SAVE+6, SAVE+7, SAVE+8, SAVE+9, SAVE+10, SAVE2+1~, SAVE2+5*, SAVE2+6 , SAVE2+7, SAVE2+8, SAVE2+9, SAVE2+10, TOTAL+14*, TOTAL+15, TOTAL+18, TOTAL+19, TOTAL+20, TOTAL+26* , TOTAL+27, TOTAL+29 |
TRANS | FINDADM+1~, FINDADM+9*, FINDADM+10 |
TRANS2 | FINDADM+1~, FINDADM+23*, FINDADM+24 |
TXT | ORDER+2~, ORDER+10*, ORDER+11 |
U | ENTRY+7, ENTRY+9, ENTRY+13, ENTRY+14, ENTRY+16, FINDADM+7, FINDADM+9, FINDADM+11, FINDADM+13, FINDADM+15 , FINDADM+23, FINDADM+25, WARDCK+4, SPEC+3, SAVE+8, SAVE+9, SAVE+10, SAVE+12, SAVE2+8, SAVE2+9 , SAVE2+10, SAVE2+12, ORDER+8, ORDER+10, ORDER+11, TOTAL+32, TOTAL+34 |
UB | FINDADM+2~, FINDADM+13*, FINDADM+14 |
WARD | FINDADM+1~, FINDADM+15*, FINDADM+17, FINDADM+18, WARDCK~, WARDCK+3, WARDCK+4 |
WHOLE | TOTAL+1~, TOTAL+10*, TOTAL+13*, TOTAL+17, TOTAL+24*, TOTAL+29 |
WSPEC | WARDCK+1~, WARDCK+2*, WARDCK+6*, WARDCK+7*, WARDCK+8 |
X | FINDADM+1~, FINDADM+4 |
X1 | FINDADM+1~, FINDADM+4*, SAVE+1~, SAVE+4*, SAVE+5, SAVE2+1~, SAVE2+4*, SAVE2+5 |
X2 | FINDADM+1~, FINDADM+4*, SAVE+1~, SAVE+4*, SAVE+5, SAVE2+1~, SAVE2+4*, SAVE2+5 |
X3 | SAVE+1~, SAVE+4*, SAVE+5, SAVE2+1~, SAVE2+4*, SAVE2+5 |