APCLSIL2 ; IHS/CMI/LAB - H1N1 SURVEILLANCE EXPORT ; 28 Oct 2014 4:58 PM
Source file <APCLSIL2.m>
Package | Total | Call Graph |
---|---|---|
Patient Care Component Reports | 5 | ($$LASTCPTT,$$LASTITEM,ALLV)^APCLAPIU $$START1^APCLDF $$PN^APCLSIL1 ($$ICD,$$ICDDX)^APCLSILU ($$CLINIC,$$PRIMPOV,$$PRIMPROV,$$VD)^APCLV |
VA Fileman | 3 | FILE^DICN UPDATE^DIE $$GET1^DIQ |
IHS Patient | 2 | ($$AGE,$$COMMRES,$$DOB,$$HRN)^AUPNPAT $$UIDV^AUPNVSIT |
Kernel | 2 | ($$FMADD,$$FMTE)^XLFDT ($$STRIP,$$UP)^XLFSTR |
IHS VA Utilities | 1 | ($$VAL,$$VALI)^XBDIQ1 |
Package | Total | Caller Graph |
---|---|---|
Patient Care Component Surveillance | 3 | APCSSIL1 APCSSIL2 APCSSLAB |
Patient Care Component Reports | 2 | APCLSIL1 APCLSILI |
Patient Care Component | 1 | APCHPWH9 |
Name | Comments | DBIA/ICR reference |
---|---|---|
E | ;
|
|
ERR | ;EP
|
|
JDATE(D) | ;EP
|
|
R(V) | ;EP
|
|
WT(P,BDATE,EDATE) | ;EP
|
|
SETV | ;EP
|
|
CHSDT | ;
|
|
UID(APCLA) | ;Given DFN return unique patient record id.
|
|
HTWTSD(P,BDATE,EDATE) | ;EP - get last ht / wt on same day
|
|
BMI(P,EDATE) | ;EP - get last calulable bmi as of EDATE and date of wt
|
|
PNEU(P,EDATE) | ;EP
|
|
REF(V) | ;EP
|
|
DSCHTYPE(V) | ;EP
|
|
ASTDM(P,EDATE) | ;EP
|
|
OB(P,BMI,A) | ;EP obese
|
|
HT(P,BDATE,EDATE) | ;EP
|
|
DSCHDATE(V) | ;EP
|
|
SETREC | ;EP - called from
|
|
CHSDD | ;
|
|
DATE(D) | ;
|
Name | Field # of Occurrence |
---|---|
$$LASTCPTT^APCLAPIU | PNEU+22 |
$$LASTITEM^APCLAPIU | SETREC+67, SETREC+70, PNEU+19 |
ALLV^APCLAPIU | ASTDM+17 |
$$START1^APCLDF | HTWTSD+4, HTWTSD+8, HT+3, WT+3 |
$$PN^APCLSIL1 | SETREC+31 |
$$ICD^APCLSILU | WT+9, ASTDM+13, ASTDM+14, ASTDM+27, ASTDM+28 |
$$ICDDX^APCLSILU | WT+8 |
$$CLINIC^APCLV | SETREC+40 |
$$PRIMPOV^APCLV | ASTDM+25 |
$$PRIMPROV^APCLV | SETREC+76 |
$$VD^APCLV | SETREC+17, SETREC+28, SETREC+33, SETREC+67, SETREC+70, PNEU+14 |
$$AGE^AUPNPAT | SETREC+34, BMI+23 |
$$COMMRES^AUPNPAT | SETREC+6 |
$$DOB^AUPNPAT | PNEU+4, PNEU+19, PNEU+22 |
$$HRN^AUPNPAT | SETREC+3 |
$$UIDV^AUPNVSIT | SETREC+18 |
FILE^DICN | SETREC+81 |
UPDATE^DIE | SETREC+88 |
$$GET1^DIQ | UID+4 |
$$VAL^XBDIQ1 | SETREC+14, PNEU+20, PNEU+23, CHSDT+2 |
$$VALI^XBDIQ1 | PNEU+13, DSCHTYPE+8 |
$$FMADD^XLFDT | BMI+26, BMI+42, BMI+59, REF+5 |
$$FMTE^XLFDT | BMI+27, BMI+31, BMI+36, BMI+43, BMI+47, BMI+52, BMI+60, JDATE+3 |
$$STRIP^XLFSTR | SETREC+46, SETREC+47, SETREC+48, SETREC+49, SETREC+51, SETREC+52, SETREC+73, SETREC+74 |
$$UP^XLFSTR | JDATE+4 |
FileNo | Call Tags |
---|---|
^APCLILIL - [#9001003.4] | Classic Fileman Calls |
^AUTTLOC - [#9999999.06] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^APCLBMI - [#9001003.9] | OB+8, OB+9 |
^APCLBMI("H" | OB+5, OB+6 |
^APCLDATA($J | SETREC+78* |
^APCLILIL("B" | SETREC+80 |
^ATXAX - [#9002226] | PNEU+12 |
^ATXAX("B" | PNEU+5, PNEU+6, WT+9, ASTDM+4, ASTDM+5 |
^AUPNPAT - [#9000001] | BMI+21, UID+2 |
^AUPNPROB - [#9000011] | ASTDM+8, ASTDM+9, ASTDM+10, ASTDM+11, ASTDM+12 |
^AUPNPROB("AC" | ASTDM+7 |
^AUPNVCHS - [#9000010.03] | CHSDD+2 |
^AUPNVCHS("AD" | CHSDT+1, CHSDD+1 |
^AUPNVIMM - [#9000010.11] | PNEU+8, PNEU+14 |
^AUPNVIMM("AC" | PNEU+7 |
^AUPNVINP - [#9000010.02] | DSCHDATE+6 |
^AUPNVINP("AD" | DSCHTYPE+6, DSCHDATE+5 |
^AUPNVMSR - [#9000010.01] | SETREC+13, SETREC+15 |
^AUPNVMSR("AD" | SETREC+12 |
^AUPNVPOV - [#9000010.07] | WT+8 |
^AUPNVPOV("AD" | WT+6, WT+7 |
^AUPNVSIT - [#9000010] | SETREC+18, SETREC+19, SETREC+20, ASTDM+23, ASTDM+24, REF+4, REF+5, REF+6, DSCHTYPE+2, DSCHTYPE+3 , DSCHTYPE+5, DSCHDATE+2, DSCHDATE+3 |
^AUTTIMM - [#9999999.14] | PNEU+10 |
^AUTTLOC - [#9999999.06] | SETREC+7 |
^AUTTSITE(1 | UID+4 |
^BMCREF - [#90001] | REF+8, REF+12 |
^BMCREF("D" | REF+7 |
^DD(9000010.02 | DSCHTYPE+10, DSCHTYPE+11 |
^DG(405.1 - [#405.1] | DSCHTYPE+11 |
^DIC(42.2 - [#42.2] | DSCHTYPE+10 |
^DPT - [#2] | SETREC+4, SETREC+5, OB+3, BMI+22 |
Name | Line Occurrences |
---|---|
$$ASTDM | SETREC+28 |
$$BMI | SETREC+33 |
$$DSCHDATE | SETREC+22, REF+5 |
$$DSCHTYPE | SETREC+21 |
$$HT | BMI+34, BMI+50 |
$$HTWTSD | BMI+61 |
$$OB | SETREC+34 |
$$PNEU | SETREC+37 |
$$R | SETREC+35 |
$$REF | SETREC+23 |
$$UID | SETREC+2 |
$$WT | BMI+29, BMI+45 |
CHSDD | DSCHDATE+5 |
CHSDT | DSCHTYPE+5 |
E | PNEU+18, PNEU+21, PNEU+24 |
ERR | BMI+31, BMI+36, BMI+47, BMI+52, BMI+62, BMI+63 |
SETV | BMI+40, BMI+56, BMI+71 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | SETREC+37*, SETREC+38, SETREC+39, PNEU+23*, BMI+16~, HTWTSD+2~, HTWTSD+4*, HTWTSD+8*, HT+2~, HT+3* , WT+2~, ASTDM+2~, DSCHTYPE+4~, DSCHTYPE+6* |
%DT | BMI+16~ |
A | OB~, OB+5, OB+6, JDATE+2~, JDATE+3*, JDATE+4 |
AGE | BMI+16~, BMI+23*, BMI+25, BMI+41, BMI+58 |
APCL | ASTDM+2~, ASTDM+18 |
APCL( | ASTDM+21, ASTDM+22, ASTDM+27, ASTDM+28 |
APCLA | UID~, UID+1, UID+2, UID+4 |
>> APCLADVE | SETREC+53, SETREC+56 |
APCLARRY | HT+2~ |
APCLARRY(1 | HT+4, HT+7 |
APCLAS | ASTDM+2~, ASTDM+3*, ASTDM+13*, ASTDM+15, ASTDM+18, ASTDM+21, ASTDM+27*, ASTDM+30 |
APCLASC | ASTDM+2~, ASTDM+3*, ASTDM+27* |
>> APCLASDM | SETREC+28*, SETREC+29, SETREC+30 |
>> APCLAVM | SETREC+46, SETREC+47 |
>> APCLBMI | SETREC+33*, SETREC+34, SETREC+35, SETREC+36, SETREC+66, SETREC+69 |
>> APCLC | SETREC+10* |
>> APCLCHT | HTWTSD+12*, HTWTSD+13*, HTWTSD+14 |
>> APCLDATE | SETREC+8, SETREC+62, SETREC+63, SETREC+75 |
APCLDM | ASTDM+2~, ASTDM+3*, ASTDM+14*, ASTDM+15, ASTDM+18, ASTDM+21, ASTDM+28*, ASTDM+30 |
APCLDMC | ASTDM+2~, ASTDM+3*, ASTDM+28* |
APCLERRR | SETREC+82~ |
APCLFDA | SETREC+82~ |
APCLFDA( | SETREC+84*, SETREC+85*, SETREC+86*, SETREC+87* |
>> APCLH1N1 | SETREC+23, SETREC+41 |
APCLHTS | HTWTSD+2~ |
APCLHTS( | HTWTSD+5!, HTWTSD+6, HTWTSD+13 |
APCLHTS1 | HTWTSD+2~, HTWTSD+6! |
APCLHTS1( | HTWTSD+6*, HTWTSD+12, HTWTSD+13 |
>> APCLHVAC | SETREC+26, SETREC+48, SETREC+49, SETREC+63 |
APCLICD | WT+2~, WT+8*, WT+9 |
APCLIENS | SETREC+82~, SETREC+83* |
>> APCLILI | SETREC+10, SETREC+23 |
>> APCLIVAC | SETREC+27, SETREC+51, SETREC+52, SETREC+62 |
APCLJ | ASTDM+20~ |
APCLJ( | ASTDM+27* |
APCLK | ASTDM+20~ |
APCLK( | ASTDM+28* |
APCLL | WT+2~, WT+3! |
APCLL( | WT+4, WT+5, WT+6, WT+10 |
APCLLAST | PNEU+2~, PNEU+3*, PNEU+19, PNEU+22, PNEU+25, E+1* |
APCLLD | WT+2~, WT+7*, WT+8 |
APCLLN | WT+2~, WT+4*, WT+5, WT+6, WT+10 |
>> APCLLOC | SETREC+3, SETREC+7 |
APCLLW | WT+2~, WT+3*, WT+4, WT+6*, WT+7, WT+10*, WT+12 |
APCLLX | WT+2~, WT+3* |
APCLLZ | WT+2~, WT+5*, WT+6, WT+7 |
>> APCLNVAC | SETREC+72, SETREC+73, SETREC+74, SETREC+75 |
>> APCLOVAC | SETREC+54 |
>> APCLPCVA | SETREC+59 |
>> APCLPCVE | SETREC+58 |
>> APCLPCVF | SETREC+57 |
>> APCLPCVI | SETREC+61 |
>> APCLPCVS | SETREC+60 |
>> APCLPN | SETREC+31*, SETREC+32, SETREC+33, SETREC+34 |
>> APCLPVAC | SETREC+55 |
>> APCLREAS | SETREC+87 |
>> APCLREC | SETREC+2*, SETREC+3*, SETREC+4*, SETREC+5*, SETREC+6*, SETREC+7*, SETREC+8*, SETREC+10*, SETREC+17*, SETREC+18* , SETREC+19*, SETREC+20*, SETREC+21*, SETREC+22*, SETREC+24*, SETREC+25*, SETREC+26*, SETREC+27*, SETREC+29*, SETREC+30* , SETREC+32*, SETREC+34*, SETREC+35*, SETREC+36*, SETREC+38*, SETREC+39*, SETREC+40*, SETREC+41*, SETREC+42*, SETREC+43* , SETREC+44*, SETREC+45*, SETREC+46*, SETREC+47*, SETREC+48*, SETREC+49*, SETREC+50*, SETREC+51*, SETREC+52*, SETREC+53* , SETREC+54*, SETREC+55*, SETREC+56*, SETREC+57*, SETREC+58*, SETREC+59*, SETREC+60*, SETREC+61*, SETREC+62*, SETREC+63* , SETREC+66*, SETREC+67*, SETREC+69*, SETREC+70*, SETREC+71*, SETREC+72*, SETREC+73*, SETREC+74*, SETREC+75*, SETREC+76* , SETREC+78 |
>> APCLREF | SETREC+23*, SETREC+24, SETREC+25 |
>> APCLSRD | SETREC+42, SETREC+43, SETREC+44, SETREC+45 |
>> APCLSTAT | SETREC+71, SETREC+86 |
>> APCLTEMP | SETREC+11*, SETREC+16*, SETREC+17 |
>> APCLV | SETREC+12, SETREC+17, SETREC+18, SETREC+19, SETREC+20, SETREC+21, SETREC+22, SETREC+23, SETREC+28, SETREC+31 , SETREC+33, SETREC+40, SETREC+67, SETREC+70, SETREC+76, SETREC+80, SETREC+81, SETREC+84, SETREC+85, SETREC+86 , SETREC+87 |
>> APCLVTOT | SETREC+77*, SETREC+78 |
APCLWTS | HTWTSD+2~ |
APCLWTS( | HTWTSD+9!, HTWTSD+11, HTWTSD+13 |
APCLWTS1 | HTWTSD+2~, HTWTSD+11! |
APCLWTS1( | HTWTSD+11*, HTWTSD+12, HTWTSD+13 |
>> APCLZHSD | SETREC+84, SETREC+85 |
B | BMI+16~, REF+2~, REF+4*, REF+5, REF+10 |
BDATE | PNEU+2~, PNEU+4*, PNEU+15, BMI+16~, BMI+26*, BMI+29, BMI+34, BMI+42*, BMI+45, BMI+50 , BMI+59*, BMI+61, HTWTSD~, HTWTSD+4, HTWTSD+8, HT~, HT+3, WT~, WT+3 |
BMI | OB~, OB+2, OB+8, OB+9, BMI+16~, BMI+39*, BMI+55*, BMI+70*, SETV+1 |
C | SETREC+1*, ERR+2~, ERR+3*, ERR+4*, ERR+5, REF+2~, REF+3*, REF+13*, REF+15 |
CD | BMI+16~ |
CVX | PNEU+2~, PNEU+10*, PNEU+11, PNEU+12, PNEU+17 |
D | PNEU+13*, PNEU+14*, PNEU+15, PNEU+16, PNEU+17, BMI+16~, REF+8*, REF+9, REF+10, REF+11 , REF+13, DATE~, DATE+1, JDATE~, JDATE+1, JDATE+3, JDATE+4 |
D0 | SETREC+81! |
DD | SETREC+81! |
>> DFN | SETREC+2, SETREC+3, SETREC+4, SETREC+5, SETREC+6, SETREC+28, SETREC+31, SETREC+33, SETREC+34, SETREC+37 , SETREC+67, SETREC+70 |
DIADD | SETREC+81*! |
DIC | SETREC+81*! |
DIC(0 | SETREC+81* |
DINUM | SETREC+81*! |
DLAYGO | SETREC+81*! |
DO | SETREC+81! |
DT | SETREC+37, BMI+19 |
DUZ(2 | SETREC+3 |
E | HTWTSD+4*, HTWTSD+8*, HT+2~, HT+3*, WT+2~, WT+3*, ASTDM+2~, REF+2~, REF+5*, REF+11 |
EDATE | PNEU~, PNEU+16, PNEU+19, PNEU+22, BMI~, BMI+19*, BMI+23, BMI+26, BMI+27*, BMI+29 , BMI+31, BMI+34, BMI+36, BMI+42, BMI+43*, BMI+45, BMI+47, BMI+50, BMI+52, BMI+59 , BMI+60*, BMI+61, BMI+62, BMI+63, HTWTSD~, HTWTSD+4, HTWTSD+8, HT~, HT+3, WT~ , WT+3, ASTDM~, ASTDM+11, ASTDM+17 |
ERR | BMI+16~, BMI+31*, BMI+36*, BMI+47*, BMI+52*, BMI+62*, BMI+63*, ERR+4 |
ERRC | BMI+16~, BMI+17*, ERR+1*, ERR+4 |
F | PNEU+2~ |
G | ASTDM+2~, ASTDM+6* |
H | BMI+16~, BMI+35*, BMI+36, BMI+39*, BMI+51*, BMI+52, BMI+55*, BMI+65*, BMI+70*, HT+2~ , HT+4*, HT+5, HT+6, HT+7*, HT+8 |
HD | BMI+16~, BMI+37*, BMI+53*, BMI+68*, SETV+3 |
HV | BMI+16~, BMI+38*, BMI+54*, BMI+69*, SETV+4 |
I | PNEU+2~, PNEU+8*, PNEU+9, PNEU+10 |
OH | BMI+16~, BMI+35*, BMI+51*, BMI+65*, SETV+2 |
OW | BMI+16~, BMI+30*, BMI+46*, BMI+64*, SETV+5 |
P | PNEU~, PNEU+1, PNEU+4, PNEU+7, PNEU+19, PNEU+22, OB~, OB+3, BMI~, BMI+20 , BMI+21, BMI+22, BMI+23, BMI+29, BMI+34, BMI+45, BMI+50, BMI+61, HTWTSD~, HTWTSD+1 , HTWTSD+4, HTWTSD+8, HT~, HT+1, HT+3, WT~, WT+1, WT+3, ASTDM~, ASTDM+7 , ASTDM+17, REF+2~, REF+6*, REF+7 |
Q | ASTDM+2~, ASTDM+12*, ASTDM+13, ASTDM+14, ASTDM+25*, ASTDM+26, ASTDM+27, ASTDM+28 |
R | OB+1~, OB+5*, OB+6*, OB+7, OB+8, OB+9 |
S | OB+1~, OB+3*, OB+4, OB+5, OB+6 |
T | PNEU+2~, PNEU+5*, PNEU+12, ASTDM+2~, ASTDM+4*, ASTDM+13, ASTDM+27 |
T1 | PNEU+2~, PNEU+6*, PNEU+12 |
TD | ASTDM+2~, ASTDM+5*, ASTDM+14, ASTDM+28 |
U | SETREC+4, SETREC+5, SETREC+7, SETREC+10, SETREC+13, SETREC+15, SETREC+18, SETREC+19, SETREC+20, SETREC+24 , SETREC+25, SETREC+26, SETREC+27, SETREC+29, SETREC+30, SETREC+34, SETREC+35, SETREC+36, SETREC+38, SETREC+39 , SETREC+41, SETREC+42, SETREC+43, SETREC+44, SETREC+45, SETREC+46, SETREC+47, SETREC+48, SETREC+49, SETREC+51 , SETREC+52, SETREC+53, SETREC+55, SETREC+56, SETREC+66, SETREC+67, SETREC+69, SETREC+70, SETREC+72, SETREC+73 , SETREC+74, PNEU+8, PNEU+10, PNEU+14, PNEU+17, PNEU+19, PNEU+20, PNEU+22, PNEU+23, PNEU+25 , E+1, OB+3, OB+8, OB+9, BMI+30, BMI+32, BMI+33, BMI+35, BMI+37, BMI+38 , BMI+46, BMI+48, BMI+49, BMI+51, BMI+53, BMI+54, BMI+66, BMI+67, BMI+68, BMI+69 , HTWTSD+5, HTWTSD+6, HTWTSD+9, HTWTSD+11, HTWTSD+13, HT+4, HT+7, WT+5, WT+6, WT+8 , WT+10, ERR+3, ERR+5, SETV+1, SETV+2, SETV+3, SETV+4, SETV+5, SETV+6, SETV+7 , ASTDM+9, ASTDM+10, ASTDM+11, ASTDM+12, ASTDM+15, ASTDM+18, ASTDM+22, ASTDM+24, ASTDM+27, ASTDM+28 , ASTDM+30, REF+4, REF+5, REF+6, REF+8, REF+12, REF+13, UID+4 |
V | SETREC+15*, SETREC+16, PNEU+2~, PNEU+3*, PNEU+17*, PNEU+19*, PNEU+20*, PNEU+22*, PNEU+23*, E+1 , R~, R+1, R+2, R+3*, R+4, BMI+16~, BMI+29*, BMI+30, BMI+32, BMI+33 , BMI+34*, BMI+35, BMI+37, BMI+38, BMI+45*, BMI+46, BMI+48, BMI+49, BMI+50*, BMI+51 , BMI+53, BMI+54, ASTDM+2~, ASTDM+22*, ASTDM+23, ASTDM+24, ASTDM+25, REF~, REF+4, REF+5 , REF+6, DSCHTYPE~, DSCHTYPE+1, DSCHTYPE+2, DSCHTYPE+3, DSCHTYPE+5, DSCHTYPE+6, CHSDT+1, DSCHDATE~, DSCHDATE+1 , DSCHDATE+2, DSCHDATE+3, DSCHDATE+5, CHSDD+1 |
VALUE | BMI+16~, BMI+18*, BMI+24*, BMI+25, BMI+41, BMI+58, ERR+3, ERR+5*, SETV+1*, SETV+2* , SETV+3*, SETV+4*, SETV+5*, SETV+6*, SETV+7* |
W | BMI+16~, BMI+30*, BMI+31, BMI+39*, BMI+46*, BMI+47, BMI+55*, BMI+64*, BMI+70* |
WD | BMI+16~, BMI+32*, BMI+48*, BMI+66*, SETV+6 |
WV | BMI+16~, BMI+33*, BMI+49*, BMI+67*, SETV+7 |
X | SETREC+10*, SETREC+12*, SETREC+13, SETREC+14, SETREC+15, SETREC+67*, SETREC+70*, SETREC+81*, PNEU+2~, PNEU+7* , PNEU+8, PNEU+13, PNEU+14, BMI+61*, BMI+62, BMI+63, BMI+64, BMI+65, BMI+66, BMI+67 , BMI+68, BMI+69, HTWTSD+2~, HTWTSD+6*, HTWTSD+11*, HTWTSD+12*, HTWTSD+13, WT+2~, ASTDM+2~, ASTDM+7* , ASTDM+8, ASTDM+9, ASTDM+10, ASTDM+11, ASTDM+12, ASTDM+21*, ASTDM+22, ASTDM+27, ASTDM+28, REF+2~ , REF+7*, REF+8, REF+12 |
Y | SETREC+10*, PNEU+2~, HTWTSD+2~, HTWTSD+5*, HTWTSD+9*, ASTDM+2~, REF+2~, DSCHTYPE+4~, DSCHTYPE+8*, DSCHTYPE+9 , DSCHTYPE+10, DSCHTYPE+11, CHSDT+2*, CHSDT+3, DSCHDATE+4~, DSCHDATE+6*, DSCHDATE+7, DSCHDATE+8, CHSDD+2*, CHSDD+3 , CHSDD+4 |
Z | SETREC+10*, REF+2~, DSCHTYPE+4~, DSCHTYPE+6*, DSCHTYPE+7, DSCHTYPE+8, CHSDT+1*, CHSDT+2, DSCHDATE+4~, DSCHDATE+5* , DSCHDATE+6, CHSDD+1*, CHSDD+2 |