Routine: APCHS2A3

Package	Total	Call Graph
VA Fileman	1	^%DTC

Package	Total	Caller Graph
Patient Care Component	2	APCDMSR1 APCHS2A1
Order Entry Results Reporting	1	ORWGAPIX
PCC New Encounter Form	1	VENPCCS3

Entry Points

Name	Comments	DBIA/ICR reference
NXTDATE
RW(APCHPAT,APCHWT,APCHDATE)	; ENTRY POINT - TO OBTAIN RELATIVE WEIGHT PERCENTAGE
SIZES	;;
ERROR
EXIT
COMMON	;OBTAIN DOB, AGE, SEX, and COMN
BMI(APCHPAT,APCHWT,APCHDATE)	; ENTRY POINT - TO OBTAIN BODY MASS INDEX
HITE
NXTHT

Name	Field # of Occurrence
^%DTC	COMMON+5, HITE, HITE+1

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMSR - [#9000010.01]	NXTHT+1, HITE+1
^AUPNVMSR("AA"	COMMON+4, NXTHT, NXTDATE
^AUTTMSR("B"	COMMON+2
^DPT - [#2]	COMMON+5

Name	Field # of Occurrence
APCHAGE	BMI+1~, RW+1~, EXIT+2!, COMMON+5*, HITE+2
APCHBMI	BMI+1~, BMI+8*, BMI+9, RW+1~, EXIT+2!
APCHCOMT	BMI+1~, BMI+3, BMI+5, BMI+6, BMI+9, RW+1~, RW+3, RW+5, RW+6, RW+7* , RW+9, ERROR, EXIT+1, EXIT+2!, COMMON+4, COMMON+6, NXTDATE+2, HITE+2*
APCHDA	BMI+1~, RW+1~, EXIT+2!, COMMON+7, NXTHT, NXTHT+1, NXTHT+2, NXTHT+3*, NXTHT+4, HITE+1
APCHDATE	BMI~, BMI+3, RW~, RW+3, EXIT+2!, NXTHT, NXTDATE*, HITE, HITE+1
APCHDOB	BMI+1~, RW+1~, EXIT+2!, COMMON+5*, HITE
>> APCHHDA	COMMON+7, NXTHT+2, NXTHT+3
APCHHPTR	EXIT+2!, COMMON+2*, COMMON+4, NXTHT, NXTDATE
APCHHT	BMI+1~, BMI+6, BMI+8, RW+1~, RW+6, RW+7, RW+8, EXIT+2!, HITE+1*
APCHMDT	BMI+1~, RW+1~, EXIT+2!, HITE*, HITE+2
APCHPAT	BMI~, BMI+3, RW~, RW+3, EXIT+2!, COMMON+4, COMMON+5, NXTHT, NXTDATE
APCHPRW	BMI+1~, RW+1~, RW+8*, RW+9, EXIT+2!
APCHRW	BMI+1~, RW+1~, RW+8*, EXIT+2!
APCHSEX	BMI+1~, RW+1~, RW+6, RW+7, EXIT+2!, COMMON+5*
APCHSWT	BMI+1~, BMI+9, RW+1~, RW+9, ERROR*, EXIT+1, EXIT+2!
APCHSX	BMI+1~, RW+1~, RW+8, EXIT+2!, COMMON+5*
APCHWT	BMI~, BMI+3, BMI+8*, RW~, RW+3, RW+8, EXIT+2!
DT	COMMON+5, HITE+1
U	COMMON+5, NXTHT+1, HITE+1
X	EXIT!, COMMON+5, HITE, HITE+2
X1	EXIT!, COMMON+5, HITE, HITE+1*
X2	EXIT!, COMMON+5, HITE, HITE+1*
>> Y	EXIT+1*, EXIT+3

Name	Field # of Occurrence
$T(SIZES+APCHHT	RW+8