Routine: APCLW21

Package	Total	Call Graph
Patient Care Component Reports	3	$$START1^APCLDF XTMP^APCLOSUT $$DEMO^APCLUTL
IHS Patient	2	(,$$BEN)^AUPNPAT $$ICD^AUPNVUTL
VA Fileman	2	DD^%DT (,C)^%DTC
DRG Grouper	1	$$ICDDX^ICDEX
Kernel	1	($$FMADD,$$FMTE)^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
A	;
GETRECNT	;get most recent in 3 yrs
B	;
GETWTHT	;
P	;
PN	;kill off those that have prenatal code as dx
EOJ	;
GETWHSD	;check for height and weight on same date
1
START	;EP
SET	;set for each age
SRT	;
RO	;set up by date
PROC	;
CALCBMI	;calculate BMI value

External References

Name	Field # of Occurrence
DD^%DT	START+2, START+3, START+4
^%DTC	PROC+26
C^%DTC	START+2, START+3
$$START1^APCLDF	GETWTHT+2, GETWTHT+4
XTMP^APCLOSUT	START+6
$$DEMO^APCLUTL	PROC+4
^AUPNPAT	PROC+6
$$BEN^AUPNPAT	PROC+13
$$ICD^AUPNVUTL	PN+3, PN+7
$$ICDDX^ICDEX	PN+2, PN+6
$$FMADD^XLFDT	PROC+17
$$FMTE^XLFDT	PROC+17

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCLBMI - [#9001003.9]	PROC+38, PROC+39, 1
^APCLBMI("H"	PROC+35, PROC+36
^ATXAX("B"	PN+3, PN+7
^AUPNPAT - [#9000001]	PROC+1, SRT+2
^AUPNVPOV - [#9000010.07]	PN+2, PN+6
^AUPNVPOV("AD"	PN+2, PN+6
^DIBT(	PROC+5, SET+1*
^DPT - [#2]	PROC+2, PROC+3, PROC+17, SRT+1
^XTMP("APCLW2"	SET+2*

Label References

Name	Line Occurrences
1	PROC+38
@(	SRT+4
CALCBMI	PROC+29
GETRECNT	PROC+22
GETWHSD	PROC+23
GETWTHT	PROC+18
SET	1, 1+6
SRT	PROC+31

Naked Globals

Name	Field # of Occurrence
^(0	SRT+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	EOJ+3!
APCL1YR	START+2*, PROC+17, PROC+18, EOJ+1!
APCL3YR	START+3*, PROC+18, EOJ+1!
APCLA	EOJ+1!
>> APCLAGE	PROC+11, PROC+17, PROC+18, PROC+22, PROC+23, PROC+26, PROC+27, PROC+28, PROC+35, PROC+36 , A+1, SET+2
>> APCLAGER	PROC+27, PROC+28
APCLBD	PROC+18*, EOJ+1!, GETWTHT+2
>> APCLBMI	PROC+30, PROC+38, PROC+39, 1, B+1, SET+2, CALCBMI+2*
>> APCLBMIR	PROC+30
>> APCLBTH	START+5*, SET+2
APCLCHT	PROC+21!, PROC+25, EOJ+1!, SET+2, CALCBMI+2, GETWHSD+2, GETRECNT+2
>> APCLCLAS	PROC+13*, PROC+14, PROC+15
APCLCWT	PROC+21!, PROC+24, PROC+26, EOJ+1!, SET+2, CALCBMI+2, GETWHSD+2, GETRECNT+1
>> APCLDEMO	PROC+4
>> APCLDT	START+4*, GETWTHT+2, GETWTHT+4
APCLER	EOJ+1!, GETWTHT+2, GETWTHT+4
APCLGHT	PROC+20, EOJ+1!, GETWTHT+1!
APCLGHT(	GETWTHT+5!, PN+6, PN+7!, RO+3, GETWHSD+2, GETRECNT+2
>> APCLGRAN	START+5, SET+1, SET+3*
APCLGWT	PROC+19, EOJ+1!, GETWTHT+1!
APCLGWT(	GETWTHT+3!, PN+2, PN+3!, RO+2, GETWHSD+2, GETRECNT+1
>> APCLHBD	PROC+17*, GETWTHT+4
>> APCLHRN	SRT+2*, SET+2
>> APCLIBEN	PROC+15
>> APCLJOB	START+5*, SET+2
APCLMGI	EOJ+1!
APCLMHT	EOJ+1!, CALCBMI+2*
APCLMWT	EOJ+1!, CALCBMI+2*
>> APCLNAME	SRT+1*, P+1, SET+2
APCLNN	EOJ+1!
>> APCLOBE	PROC+32, PROC+38, PROC+39, 1+3, 1+4, 1+5, SRT+5, SET+2
>> APCLOVR	PROC+32, PROC+38, PROC+39, 1+2, 1+5, SRT+5, SET+2
APCLREF	PROC+35, PROC+36, PROC+37, PROC+38, PROC+39, 1, EOJ+1!
APCLROHT	EOJ+1!, RO+1!
APCLROHT(	RO+3*, GETWHSD+2, GETRECNT+2
APCLROWT	EOJ+1!, RO+1!
APCLROWT(	RO+2*, GETWHSD+2, GETRECNT+1
>> APCLRPT	1, 1+1, 1+2, 1+3, 1+4, 1+5
>> APCLRTYP	PROC+31, PROC+32, SET+1
>> APCLSEAT	PROC+4, PROC+5
>> APCLSEX	PROC+9
>> APCLSORT	SRT+4
>> APCLSRT	SRT+3, B+1, P+1, A+1, SET+2
>> APCLSTMP	SET+1
APCLX	EOJ+1!, GETWTHT+2, GETWTHT+4
APCLY	EOJ+1!, GETWTHT+2, GETWTHT+4
AUPNDAYS	PROC+11, EOJ+2!
AUPNDOB	PROC+10, PROC+26, EOJ+2!
AUPNDOD	EOJ+2!
AUPNPAT	EOJ+2!
AUPNSEX	PROC+7, PROC+8, PROC+9, PROC+35, PROC+36, EOJ+2!, SET+2
D	EOJ+3!, PN+2, PN+3, PN+6, PN+7
DFN	START+5, PROC+1, PROC+2, PROC+3, PROC+4, PROC+5, PROC+6, PROC+13, PROC+17, EOJ+3! , SRT+1, SRT+2, SET+1, SET+2, GETWTHT+2, GETWTHT+4
DT	START+2, START+3, START+4
DUZ(2	SRT+2
I	EOJ+3!
J	EOJ+3!
>> P	PN+2, PN+6
U	PROC+3, PROC+17, PROC+26, PROC+38, PROC+39, 1, SRT+1, SRT+2, SET+2, GETWTHT+3 , GETWTHT+5, PN+2, PN+6, RO+2, RO+3, GETWHSD+2, GETRECNT+1, GETRECNT+2
V	EOJ+3!, PN+2, PN+6
X	START+2, START+3, PROC+26, EOJ+3!, GETWTHT+3, GETWTHT+5, PN+2, PN+3, PN+6, PN+7 , RO+2, RO+3, GETWHSD+2, GETRECNT+1, GETRECNT+2*
>> X1	START+2, START+3, PROC+26*
>> X2	START+2, START+3, PROC+26*
Y	START+2, START+3, START+4, PROC+6, EOJ+3!
Z	EOJ+3!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLW21

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: