APCHSM08 ; IHS/CMI/LAB -- CONTINUATION OF ROUTINES ;
Source file <APCHSM08.m>
Package | Total | Call Graph |
---|---|---|
Patient Care Component | 3 | ($$AGESEX,$$DATE,$$DATEAGE,$$INAC,$$LASTHF,$$OVR,$$PLTAX,$$REF,$$SITECRIT,WRITE)^APCHSMU $$CPTREFT^APCHSMU2 (GETTPT,WRITETP)^APCHSTP |
Patient Care Component Reports | 3 | ($$LASTMMR,$$LASTRUB)^APCLAPI3 $$LASTNBHS^APCLAPI5 $$START1^APCLDF |
DRG Grouper | 1 | $$CODEN^ICPTCOD |
IHS Patient | 1 | ($$AGE,$$DOB,$$SEX)^AUPNPAT |
Kernel | 1 | ($$FMADD,$$FMDIFF)^XLFDT |
Name | Comments | DBIA/ICR reference |
---|---|---|
DSSWT | ;
|
|
DSSREG | ;regular stuff
|
|
HEARWT | ;
|
|
RUB | ;EP
|
|
HEARREG | ;regular stuff
|
|
S(X) | ;
|
|
DSS | ;EP - depression screen score
|
|
POS(P) | ;is any DSS over 10 in past 365 days?
|
|
MMR1D(P) | ;
|
|
MMR1 | ;EP - mmr one dose version
|
|
MMR2 | ;EP - mmr two dose version
|
|
RUBWT | ;
|
|
RUBIMM(P,C,ED) | ;EP - ANApHYLAXIS/NEOMYCIN/IMMUNE CONTRAINDICATION
|
|
NEWBORNH | ;
|
Name | Field # of Occurrence |
---|---|
$$AGESEX^APCHSMU | MMR1+19, MMR2+62 |
$$DATE^APCHSMU | DSS+12, DSSREG+7, DSSREG+8, MMR1+7, MMR2+50, NEWBORNH+11, HEARREG+2 |
$$DATEAGE^APCHSMU | NEWBORNH+4, HEARREG+2 |
$$INAC^APCHSMU | DSS+2, MMR1+1, MMR2+1, RUB+1, NEWBORNH+1 |
$$LASTHF^APCHSMU | DSS+7, RUB+9 |
$$OVR^APCHSMU | DSS+10, MMR1+5, MMR2+48, NEWBORNH+9 |
$$PLTAX^APCHSMU | NEWBORNH+3 |
$$REF^APCHSMU | MMR1+9, MMR1+10, MMR1+24, MMR1+25, MMR2+52, MMR2+53, MMR2+66, MMR2+72, MMR2+73, RUBWT+2 , RUBWT+3, RUBWT+4, RUBWT+5, RUBWT+6, HEARWT+1, HEARWT+2, HEARWT+3 |
$$SITECRIT^APCHSMU | MMR1+15, MMR2+58 |
WRITE^APCHSMU | DSSWT+1, DSS+13, MMR1+12, MMR1+27, MMR2+55, MMR2+67, MMR2+75, RUBWT+8, HEARWT+10 |
$$CPTREFT^APCHSMU2 | HEARWT+9 |
GETTPT^APCHSTP | RUB+13 |
WRITETP^APCHSTP | RUB+14 |
$$LASTMMR^APCLAPI3 | MMR1+3, MMR2+3 |
$$LASTRUB^APCLAPI3 | RUB+3 |
$$LASTNBHS^APCLAPI5 | NEWBORNH+6 |
$$START1^APCLDF | MMR2+7, MMR2+11, MMR2+15, MMR2+19 |
$$AGE^AUPNPAT | DSS+3, MMR1D+1, MMR1D+2 |
$$DOB^AUPNPAT | MMR1D+3, MMR1+21, MMR2+7, MMR2+11, MMR2+15, MMR2+19, RUB+5 |
$$SEX^AUPNPAT | MMR1D+2 |
$$CODEN^ICPTCOD | MMR2+24 |
$$FMADD^XLFDT | DSSREG+6, POS+5, MMR1+21, MMR2+7, MMR2+11, MMR2+15, MMR2+19, RUB+5, NEWBORNH+5 |
$$FMDIFF^XLFDT | MMR2+46 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ATXAX("B" | HEARWT+8 |
^AUPNVCPT("AA" | MMR2+25, MMR2+26, MMR2+31, MMR2+32 |
^AUPNVHF - [#9000010.23] | POS+11 |
^AUPNVHF("AA" | POS+7, POS+8, POS+10 |
^AUTTEXAM("C" | HEARWT+1, HEARWT+2, HEARWT+3 |
^AUTTHF("AC" | POS+6 |
^AUTTHF("B" | POS+2 |
^AUTTIMM("C" | MMR1+9, MMR1+10, MMR1+24, MMR1+25, MMR2+52, MMR2+53, MMR2+66, MMR2+72, MMR2+73, RUBIMM+2 , RUBWT+2, RUBWT+3, RUBWT+4, RUBWT+5, RUBWT+6 |
^BICONT - [#9002084.81] | RUBIMM+5, RUBIMM+10 |
^BIPC - [#9002084.11] | RUBIMM+3, RUBIMM+6, RUBIMM+9 |
^BIPC("AC" | RUBIMM+2 |
Name | Line Occurrences |
---|---|
$$MMR1D | MMR1+17, MMR2+60, RUB+6 |
$$POS | DSS+6 |
$$RUBIMM | RUB+12 |
DSSWT | DSSREG+5, DSSREG+9 |
HEARWT | NEWBORNH+12, HEARREG+2 |
S | DSS+12, MMR1+7, MMR1+11, MMR1+26, MMR2+50, MMR2+54, MMR2+66, MMR2+74, RUBWT+7, HEARWT+1 , HEARWT+2, HEARWT+3, HEARWT+9, NEWBORNH+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | S+1~*, MMR2+7*, MMR2+11*, MMR2+15*, MMR2+19*, MMR2+25*, MMR2+31* |
A | POS+4~, POS+5*, POS+9 |
>> APCHCOLW | RUB+13 |
>> APCHICAR | MMR1+3*, MMR1+4, MMR2+3*, MMR2+4, RUB+3*, RUB+4, NEWBORNH+6*, NEWBORNH+7 |
>> APCHLAS1 | DSS+7*, DSS+8, DSS+9 |
>> APCHLAST | DSS+4*, DSS+7*, DSS+11, DSSREG+5, DSSREG+6, MMR1+2*, MMR1+4*, MMR1+6, MMR1+9, MMR1+10 , MMR1+21, MMR1+24, MMR1+25, MMR2+2*, MMR2+4*, MMR2+49, MMR2+52, MMR2+53, MMR2+66, MMR2+72 , MMR2+73, RUB+2*, RUB+4*, RUB+5*, RUB+7, RUB+13, RUBWT+2, RUBWT+3, RUBWT+4, RUBWT+5 , RUBWT+6, HEARWT+1, HEARWT+2, HEARWT+3, HEARWT+9, NEWBORNH+2*, NEWBORNH+7*, NEWBORNH+8, NEWBORNH+10, HEARREG+2 |
>> APCHLR | MMR1+8*, MMR1+9*, MMR1+10*, MMR1+11, MMR1+23*, MMR1+24*, MMR1+25*, MMR1+26, MMR2+51*, MMR2+52* , MMR2+53*, MMR2+54, MMR2+71*, MMR2+72*, MMR2+73*, MMR2+74, RUBWT+1*, RUBWT+2*, RUBWT+3*, RUBWT+4* , RUBWT+5*, RUBWT+6*, RUBWT+7 |
>> APCHMIN | HEARREG+1*, HEARREG+2 |
APCHMMR | MMR2+6! |
APCHMMR( | MMR2+9*, MMR2+13*, MMR2+17*, MMR2+21*, MMR2+37*, MMR2+44, MMR2+45!, MMR2+46! |
>> APCHNEXT | DSS+4*, DSSREG+6*, DSSREG+7, DSSREG+8, MMR1+2*, MMR2+2*, RUB+2*, NEWBORNH+2* |
>> APCHOVR | DSS+10*, DSS+11, DSS+12, MMR1+5*, MMR1+6, MMR1+7, MMR2+48*, MMR2+49, MMR2+50, NEWBORNH+9* , NEWBORNH+10, NEWBORNH+11 |
>> APCHRIHF | RUB+9*, RUB+10, RUB+13 |
>> APCHSCRI | MMR1+15*, MMR1+16, MMR1+19, MMR2+58*, MMR2+59, MMR2+62 |
>> APCHSINT | DSS+8*, DSS+9*, DSSREG+6, MMR1+15*, MMR1+18*, MMR1+19*, MMR1+20, MMR2+58*, MMR2+61*, MMR2+62* , MMR2+63, RUB+8*, HEARREG+1* |
>> APCHSITI | DSS+2, DSS+10, MMR1+1, MMR1+5, MMR1+15, MMR1+19, MMR2+1, MMR2+48, MMR2+58, MMR2+62 , RUB+1, RUB+13, NEWBORNH+1, NEWBORNH+9 |
>> APCHSPAT | DSS+3, DSS+6, DSS+7, DSS+10, MMR1+3, MMR1+5, MMR1+9, MMR1+10, MMR1+17, MMR1+19 , MMR1+21, MMR1+24, MMR1+25, MMR2+3, MMR2+7, MMR2+11, MMR2+15, MMR2+19, MMR2+25, MMR2+26 , MMR2+31, MMR2+32, MMR2+48, MMR2+52, MMR2+53, MMR2+60, MMR2+62, MMR2+66, MMR2+72, MMR2+73 , RUB+3, RUB+5, RUB+6, RUB+9, RUB+12, RUBWT+2, RUBWT+3, RUBWT+4, RUBWT+5, RUBWT+6 , HEARWT+1, HEARWT+2, HEARWT+3, HEARWT+9, NEWBORNH+3, NEWBORNH+4, NEWBORNH+6, NEWBORNH+9, HEARREG+2 |
>> APCHSPOS | DSS+6*, DSS+8, DSS+9 |
APCHSTEX | DSS+4!, MMR1+2!, MMR2+2!, RUB+2!, RUB+13, NEWBORNH+2! |
APCHSTEX( | S+1, S+2* |
APCHSTEX(1 | DSSREG+5*, DSSREG+7*, DSSREG+8*, MMR1+22*, MMR2+65*, MMR2+70*, HEARREG+2* |
>> APCHSURX | DSSWT+2, DSS+14, MMR1+13, MMR1+20, MMR1+28, MMR2+56, MMR2+63, MMR2+64, MMR2+68, MMR2+76 , RUB+10, RUB+12, RUBWT+9, HEARWT+11 |
>> APCHT | HEARWT+8*, HEARWT+9 |
APCHY | MMR2+6!, MMR2+10!, MMR2+14!, MMR2+18!, MMR2+22!, MMR2+38! |
APCHY( | MMR2+9, MMR2+13, MMR2+17, MMR2+21, MMR2+28*, MMR2+34*, MMR2+37 |
APCHYA1M | MMR2+43!, MMR2+46*, MMR2+64 |
APCHYA1Y | MMR2+43!, MMR2+45*, MMR2+46, MMR2+65 |
C | S+1~*, S+2, POS+2*, POS+3, POS+6, MMR2+23~, MMR2+24*, MMR2+28*, MMR2+34*, RUBIMM~ , RUBIMM+2 |
D | POS+4~, POS+8*, POS+9, POS+10, MMR2+27*, MMR2+28, MMR2+33*, MMR2+34, MMR2+44*, MMR2+45 , MMR2+46, RUBIMM+6*, RUBIMM+7, RUBIMM+10, NEWBORNH+4*, NEWBORNH+5 |
DT | DSSREG+7, DSSREG+8, POS+5, MMR2+7, MMR2+11, MMR2+15, MMR2+19, RUB+12, HEARWT+9, NEWBORNH+5 |
>> E | MMR2+7*, MMR2+11*, MMR2+15*, MMR2+19*, MMR2+26*, MMR2+27, MMR2+32*, MMR2+33 |
ED | RUBIMM~, RUBIMM+9 |
G | POS+4~*, POS+6, POS+8, POS+10, POS+12*, POS+15, RUBIMM+2*, RUBIMM+10*, RUBIMM+11 |
H | POS+4~*, POS+6*, POS+7, POS+8, POS+10 |
>> I | POS+10*, POS+11 |
O | POS+4~! |
P | POS~, POS+1, POS+7, POS+8, POS+10, MMR1D~, MMR1D+1, MMR1D+2, MMR1D+3, RUBIMM~ , RUBIMM+2 |
>> R | RUBIMM+3*, RUBIMM+4, RUBIMM+5, RUBIMM+10 |
S | POS+4~* |
T1 | MMR2+23~, MMR2+24*, MMR2+25, MMR2+26 |
T2 | MMR2+23~, MMR2+24*, MMR2+31, MMR2+32 |
U | DSS+11, DSS+12, POS+11, MMR1+4, MMR1+6, MMR1+7, MMR1+10, MMR1+11, MMR1+25, MMR1+26 , MMR2+4, MMR2+9, MMR2+13, MMR2+17, MMR2+21, MMR2+37, MMR2+49, MMR2+50, MMR2+53, MMR2+54 , MMR2+66, MMR2+73, MMR2+74, RUB+4, RUBIMM+3, RUBIMM+6, RUBIMM+9, RUBIMM+10, RUBWT+3, RUBWT+4 , RUBWT+5, RUBWT+6, RUBWT+7, HEARWT+1, HEARWT+2, HEARWT+3, HEARWT+9, NEWBORNH+7, NEWBORNH+10, NEWBORNH+11 |
>> V | MMR1+9*, MMR1+10*, MMR1+24*, MMR1+25*, MMR2+52*, MMR2+53*, MMR2+66*, MMR2+72*, MMR2+73*, RUBWT+2* , RUBWT+3*, RUBWT+4*, RUBWT+5*, RUBWT+6*, HEARWT+1*, HEARWT+2*, HEARWT+3*, HEARWT+9* |
X | S~, S+2, DSS+12*, MMR1+7*, MMR1+11*, MMR1+26*, MMR2+9*, MMR2+13*, MMR2+17*, MMR2+21* , MMR2+37*, MMR2+50*, MMR2+54*, MMR2+66*, MMR2+74*, RUBIMM+1~, RUBIMM+2*, RUBIMM+3, RUBIMM+6, RUBIMM+9 , RUBWT+7*, HEARWT+1*, HEARWT+2*, HEARWT+3*, HEARWT+9*, NEWBORNH+11* |
>> Y | RUBIMM+2* |