Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: APCLSIL2

Package: Patient Care Component Reports

Routine: APCLSIL2


Information

APCLSIL2 ; IHS/CMI/LAB - H1N1 SURVEILLANCE EXPORT ; 28 Oct 2014 4:58 PM

Source Information

Source file <APCLSIL2.m>

Call Graph

Call Graph Total: 13

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  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Patient Care Component Surveillance 3 APCSSIL1  APCSSIL2  APCSSLAB  
Patient Care Component Reports 2 APCLSIL1  APCLSILI  
Patient Care Component 1 APCHPWH9  

Entry Points

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) ;

External References

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^APCLILIL - [#9001003.4] Classic Fileman Calls
^AUTTLOC - [#9999999.06] GET1^DIQ

Global Variables Directly Accessed

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

Label References

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

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All