Routine: APCHPWH9

Information

APCHPWH9 ; IHS/CMI/LAB - PCC HEALTH SUMMARY - MAIN DRIVER PART 2 ;

Source Information

Call Graph

Call Graph Total: 18

Package	Total	Call Graph
Patient Care Component	6	S^APCHPWH1 ($$DMDX,$$LASTBP)^APCHPWH2 (SUBHEAD,WRITET)^APCHPWHU $$MRGOAL^APCHSACG GETMEDS^APCHSMU1 $$ACTWARF^APCHSTP1
Patient Care Component Reports	6	$$LASTVAE^APCLAPI1 $$LASTDENT^APCLAPI2 ($$LASTLAB,ALLLAB)^APCLAPIU $$START1^APCLDF $$BMI^APCLSIL2 $$AGE^APCLSILU
VA Fileman	2	$$GET1^DIQ ^DIWP
DRG Grouper	1	$$ICDDX^ICDEX
IHS Patient	1	($$AGE,$$DOB)^AUPNPAT
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Kernel	1	($$FMADD,$$FMTE,$$NOW)^XLFDT

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Patient Care Component	2	APCHPWH2 APCHPWH8

Entry Points

Name	Comments	DBIA/ICR reference
FAMHX	;EP
RECENTBP	;EP
ANTICOAG	;EP
PRV(CLINIC)	;EP; -- returns default provider for clinic ; Y returns as ien^provider name
APPTS	;EP
PROBLIST	;EP
DENTAL	;
APPTS1	;
LASTGLUC(P,BD,ED,FORM)	;PEP - date of last GLUCOSE SCREENING ; Return the last recorded GLUCOSE SCREENING: ; - V Lab: DM AUDIT GLUCOSE TESTS TAX, APCH SCREENING GLUCOSE LOINC
GETPROB	;
DMPV(P)	;EP - how many dm povs?
ONEVIS
ADOLBP	;EP - BP component
FAMHX1
GETFHX	;
DIABSCRN	;EP
PEDSCRN	;EP
OW(P,BMI,A)	;EP obese or overweight, really just overweight

External References

Name	Field # of Occurrence
S^APCHPWH1	ADOLBP+4, ADOLBP+5, ADOLBP+10, ADOLBP+11, ADOLBP+13, ADOLBP+14, RECENTBP+4, RECENTBP+5, RECENTBP+8, RECENTBP+9 , RECENTBP+14, DIABSCRN+9, DIABSCRN+10, DIABSCRN+17, DIABSCRN+22, PROBLIST+7, PROBLIST+8, PROBLIST+9, PROBLIST+10, PROBLIST+20 , PROBLIST+21, PROBLIST+29, FAMHX+7, FAMHX+8, FAMHX+9, FAMHX+10, FAMHX+11, FAMHX1+1, FAMHX1+2, FAMHX1+3 , FAMHX1+4, FAMHX1+5, APPTS+16, APPTS+17, APPTS+19, APPTS+20, APPTS1+7, APPTS1+11, APPTS1+14, PEDSCRN+5 , PEDSCRN+6, PEDSCRN+13, PEDSCRN+14, PEDSCRN+16, DENTAL+6, DENTAL+7, DENTAL+9, ANTICOAG+4, ANTICOAG+5, ANTICOAG+6 , ANTICOAG+9, ANTICOAG+10, ANTICOAG+14, ANTICOAG+22, ANTICOAG+23, ANTICOAG+27, ANTICOAG+34, ANTICOAG+35, ANTICOAG+38, ANTICOAG+39 , ONEVIS+13, ONEVIS+14
$$DMDX^APCHPWH2	DIABSCRN+4
$$LASTBP^APCHPWH2	ADOLBP+6
SUBHEAD^APCHPWHU	ADOLBP+1, RECENTBP+2, DIABSCRN+8, PROBLIST+5, FAMHX+5, APPTS+11, PEDSCRN+4, ANTICOAG+3
WRITET^APCHPWHU	DIABSCRN+14, DIABSCRN+16, DIABSCRN+19, DIABSCRN+21
$$MRGOAL^APCHSACG	ANTICOAG+7
GETMEDS^APCHSMU1	ANTICOAG+29
$$ACTWARF^APCHSTP1	ANTICOAG+2
$$LASTVAE^APCLAPI1	PEDSCRN+11
$$LASTDENT^APCLAPI2	DENTAL+4
$$LASTLAB^APCLAPIU	LASTGLUC+8
ALLLAB^APCLAPIU	ANTICOAG+17
$$START1^APCLDF	RECENTBP+7, DMPV+2
$$BMI^APCLSIL2	DIABSCRN+5
$$AGE^APCLSILU	PEDSCRN+8
$$AGE^AUPNPAT	ADOLBP+3, RECENTBP+1, DIABSCRN+2, APPTS+14, PEDSCRN+2
$$DOB^AUPNPAT	RECENTBP+7, LASTGLUC+4
$$GET1^DIQ	PRV+6
^DIWP	PROBLIST+19, PROBLIST+28, FAMHX1, ANTICOAG+37
$$ICDDX^ICDEX	PROBLIST+15, FAMHX+16
$$VAL^XBDIQ1	PROBLIST+18, PROBLIST+19, GETPROB+6, GETPROB+7, FAMHX+21, FAMHX+24, FAMHX+25, APPTS+17, APPTS+20, ANTICOAG+37
$$VALI^XBDIQ1	PROBLIST+14, FAMHX+15, FAMHX+22
$$FMADD^XLFDT	DIABSCRN+11, PEDSCRN+11, ANTICOAG+2, ANTICOAG+17, ANTICOAG+29
$$FMTE^XLFDT	ADOLBP+13, ADOLBP+14, RECENTBP+12, DIABSCRN+17, DIABSCRN+22, APPTS1+10, PEDSCRN+16, DENTAL+9, ANTICOAG+14, ANTICOAG+27 , ANTICOAG+35, ONEVIS+11
$$NOW^XLFDT	ANTICOAG+45

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCCCTRL - [#9001000]	APPTS1+9
^APCLBMI - [#9001003.9]	OW+9, OW+10
^APCLBMI("H"	OW+6, OW+7
^ATXAX("B"	LASTGLUC+8, ANTICOAG+17
^ATXLAB("B"	LASTGLUC+8, ANTICOAG+17
^AUPNFH - [#9000014]	FAMHX+21, GETFHX+3
^AUPNFH("AC"	GETFHX+2
^AUPNPROB - [#9000011]	PROBLIST+23, PROBLIST+24, PROBLIST+25, GETPROB+3, GETPROB+4, GETPROB+5
^AUPNPROB("AC"	GETPROB+2
^BSDSC - [#9009017.2]	APPTS+8
^DIC(4 - [#4]	APPTS1+9
^DIC(40.7 - [#40.7]	ONEVIS+7
^DPT - [#2]	OW+3, APPTS+3, APPTS+4, APPTS1+1, ANTICOAG+45, ONEVIS
^SC - [#44]	APPTS1+5, APPTS1+8, PRV+4, PRV+5, ONEVIS+5
^UTILITY($J	PROBLIST+19!, PROBLIST+20, PROBLIST+21, PROBLIST+22!, PROBLIST+28!, PROBLIST+29, PROBLIST+30!, FAMHX1!, FAMHX1+1, FAMHX1+2 , ANTICOAG+37!, ANTICOAG+38, ANTICOAG+39, ANTICOAG+40!

Name	Line Occurrences
$$DMPV	DENTAL+2
$$LASTGLUC	DIABSCRN+11
$$OW	DIABSCRN+7
$$PRV	APPTS1+13
APPTS1	APPTS+21
DENTAL	PEDSCRN+9
FAMHX1	FAMHX+23
GETFHX	FAMHX+3
GETPROB	PROBLIST+3
ONEVIS	ANTICOAG+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	OW~, OW+6, OW+7
APCHAGE	ADOLBP+2~, ADOLBP+3, ADOLBP+10, ADOLBP+13, RECENTBP+1, RECENTBP+4, RECENTBP+8, DIABSCRN+1~, DIABSCRN+2, DIABSCRN+3 , DIABSCRN+7, DIABSCRN+12, APPTS+1~, APPTS+14, APPTS+15, APPTS+18, PEDSCRN+1~, PEDSCRN+2*, PEDSCRN+3, DENTAL+3
APCHAM	PEDSCRN+1~
APCHAPPT	APPTS+1~, APPTS+10
APCHAPPT(	APPTS+9*, APPTS+21
APCHBMI	DIABSCRN+1~, DIABSCRN+5*, DIABSCRN+6, DIABSCRN+7
APCHBP	ADOLBP+2~, ADOLBP+6*, ADOLBP+7, ADOLBP+8, ADOLBP+9, ADOLBP+12, ADOLBP+13, ADOLBP+14
APCHC	PROBLIST+1~, PROBLIST+23, PROBLIST+27, PROBLIST+29, FAMHX+1~
APCHCKD	ADOLBP+2~
APCHCLN	APPTS+1~
APCHD	PROBLIST+1~, PROBLIST+18, PROBLIST+20, FAMHX+1~, FAMHX+21, FAMHX1+1, ANTICOAG+1~, ANTICOAG+19!, ANTICOAG+21
APCHD(	ANTICOAG+25, ANTICOAG+26, ANTICOAG+27
APCHD(9999999	ANTICOAG+20*
APCHDM	ADOLBP+2~
APCHDMPV	PEDSCRN+1~, DENTAL+2*, DENTAL+3
APCHDT	ADOLBP+2~, ADOLBP+8*
APCHF	LASTGLUC+7~
APCHGLUC	DIABSCRN+1~, DIABSCRN+11*, DIABSCRN+13, DIABSCRN+15, DIABSCRN+17, DIABSCRN+18, DIABSCRN+20, DIABSCRN+22
APCHGOAL	ANTICOAG+1~, ANTICOAG+7*, ANTICOAG+8, ANTICOAG+11, ANTICOAG+12, ANTICOAG+14
APCHHT	RECENTBP+3~
APCHI	PROBLIST+1~, PROBLIST+17, PROBLIST+20, FAMHX+1~, FAMHX+18, FAMHX+19, FAMHX+20
APCHLDE	PEDSCRN+1~, DENTAL+4*, DENTAL+5, DENTAL+8, DENTAL+9
APCHLVAE	PEDSCRN+1~, PEDSCRN+11*, PEDSCRN+12, PEDSCRN+15, PEDSCRN+16
APCHMEDD	ANTICOAG+42!
APCHMEDD(	ANTICOAG+32, ANTICOAG+33
APCHMEDD(0	ANTICOAG+32
APCHMEDD(9999999	ANTICOAG+31*
APCHMEDS	ANTICOAG+28!, ANTICOAG+29, ANTICOAG+42!
APCHMEDS(	ANTICOAG+31
APCHN	PROBLIST+1~, PROBLIST+13, PROBLIST+14, PROBLIST+18, PROBLIST+19, PROBLIST+23, PROBLIST+24, PROBLIST+25, FAMHX+1~, FAMHX+14 , FAMHX+15, FAMHX+21, FAMHX+22
APCHPROB	PROBLIST+1~, PROBLIST+2!, PROBLIST+4, FAMHX+1~, FAMHX+2!
APCHPROB(	PROBLIST+13, GETPROB+8, FAMHX+14, GETFHX+4
APCHR	FAMHX+1~, FAMHX+22*, FAMHX+23, FAMHX+24, FAMHX+25
>> APCHRD	FAMHX+23, FAMHX+24, FAMHX1+1
APCHS	PROBLIST+1~, PROBLIST+24, PROBLIST+25, FAMHX+1~, FAMHX+23, FAMHX+25*, FAMHX1+1
APCHSAM	APPTS+1~, APPTS1+2, APPTS1+3, APPTS1+4, PEDSCRN+8, PEDSCRN+9, ONEVIS+10, ONEVIS+12*, ONEVIS+14
>> APCHSCN	APPTS1+5*, APPTS1+10
>> APCHSCP	APPTS1+5*, APPTS1+8, APPTS1+13
APCHSD1	ANTICOAG+43~, ANTICOAG+44, ANTICOAG+45, ONEVIS+9
APCHSDAT	APPTS+1~, APPTS+3, ANTICOAG+43~, ANTICOAG+45, ONEVIS+11*, ONEVIS+14
>> APCHSDFN	ADOLBP+3, ADOLBP+6, RECENTBP+1, RECENTBP+7, DIABSCRN+2, DIABSCRN+4, DIABSCRN+5, DIABSCRN+7, DIABSCRN+11, GETPROB+2 , GETFHX+2, APPTS+3, APPTS+4, APPTS+14, APPTS1+1, PEDSCRN+2, PEDSCRN+8, PEDSCRN+11, DENTAL+2, DENTAL+4 , ANTICOAG+2, ANTICOAG+7, ANTICOAG+17, ANTICOAG+45, ONEVIS
APCHSN	APPTS+1~, APPTS+4, APPTS+5, APPTS+6, APPTS+7, APPTS1+1, APPTS1+5, ANTICOAG+43~, ONEVIS*, ONEVIS+1 , ONEVIS+2, ONEVIS+3
APCHST	ADOLBP+2~, ADOLBP+7*
APCHSVDT	APPTS+1~, APPTS+3, APPTS+4, APPTS+9, APPTS+21, APPTS1+1, APPTS1+3, APPTS1+10, ANTICOAG+43~, ANTICOAG+45* , ONEVIS, ONEVIS+11, ONEVIS+12
APCHSVT	APPTS+1~, APPTS1+3, APPTS1+4, APPTS1+10, ONEVIS+12*, ONEVIS+14
APCHT	PROBLIST+1~, PROBLIST+16, FAMHX+1~, FAMHX+17, FAMHX1
APCHV	ANTICOAG+1~, ANTICOAG+15!, ANTICOAG+16*, ANTICOAG+17
APCHV(	ANTICOAG+20
APCHVAL	LASTGLUC+7~, LASTGLUC+8*, LASTGLUC+9, LASTGLUC+10
APCHWT	RECENTBP+3~, RECENTBP+6!, RECENTBP+8
APCHWT(	RECENTBP+10, RECENTBP+12, RECENTBP+13
APCHX	LASTGLUC+7~, PROBLIST+1~, FAMHX+1~, APPTS+1~, DMPV+1~
APCHX(2	DMPV+3
APCHY	LASTGLUC+7~, PROBLIST+1~, PROBLIST+14, PROBLIST+15, PROBLIST+16, PROBLIST+17, FAMHX+1~, FAMHX+15, FAMHX+16, FAMHX+17 , FAMHX+18
APCHZ	PROBLIST+1~, PROBLIST+23*, PROBLIST+24, PROBLIST+25, FAMHX+1~
BD	LASTGLUC~, LASTGLUC+4*, LASTGLUC+8
BMI	OW~, OW+2, OW+9, OW+10
>> C	ANTICOAG+25, ANTICOAG+26, ANTICOAG+27, ONEVIS+3, ONEVIS+4, ONEVIS+5, ONEVIS+6, ONEVIS+7*, ONEVIS+8
CLINIC	PRV~, PRV+4, PRV+5
>> DFN	ANTICOAG+29
DIWF	PROBLIST+19*, PROBLIST+22!
DIWL	PROBLIST+19, PROBLIST+22!, PROBLIST+28, FAMHX1, ANTICOAG+37
DIWR	PROBLIST+19, PROBLIST+22!, PROBLIST+28, FAMHX1, ANTICOAG+37
DT	ADOLBP+3, RECENTBP+1, RECENTBP+7, DIABSCRN+2, DIABSCRN+5, DIABSCRN+11, LASTGLUC+5, APPTS+3, APPTS+14, PEDSCRN+2 , PEDSCRN+8, PEDSCRN+11, ANTICOAG+2, ANTICOAG+17, ANTICOAG+29
DUZ(2	APPTS+17, APPTS+20
E	RECENTBP+3~, RECENTBP+7, RECENTBP+9, RECENTBP+11, RECENTBP+12, RECENTBP+13, RECENTBP+14, LASTGLUC+7~, DMPV+1~, DMPV+2
ED	LASTGLUC~, LASTGLUC+5*, LASTGLUC+8
F	PROBLIST+21, PROBLIST+29, FAMHX1+2, APPTS+1~, APPTS1+8, APPTS1+9, APPTS1+10, ANTICOAG+39
FORM	LASTGLUC~, LASTGLUC+6*, LASTGLUC+9
G	LASTGLUC+7~, ANTICOAG+1~, ANTICOAG+12, ANTICOAG+13, ANTICOAG+14, ANTICOAG+20, ANTICOAG+25, ANTICOAG+26, ANTICOAG+27, ANTICOAG+32* , ANTICOAG+33*, ANTICOAG+35, ANTICOAG+37
>> H	ANTICOAG+32*, ANTICOAG+33
>> N	APPTS+7*, APPTS+8
P	OW~, OW+3, LASTGLUC~, LASTGLUC+3, LASTGLUC+4, LASTGLUC+8, APPTS1+13*, APPTS1+14, DMPV~, DMPV+2
R	OW+1~, OW+6, OW+7, OW+8, OW+9, OW+10, LASTGLUC+7~
S	OW+1~, OW+3*, OW+4, OW+5, OW+6, OW+7, PROBLIST+1~, FAMHX+1~
T	LASTGLUC+7~
U	ADOLBP+7, ADOLBP+8, ADOLBP+13, ADOLBP+14, RECENTBP+12, RECENTBP+13, DIABSCRN+5, DIABSCRN+17, DIABSCRN+22, OW+3 , OW+9, OW+10, LASTGLUC+9, PROBLIST+16, PROBLIST+17, PROBLIST+25, GETPROB+4, GETPROB+5, FAMHX+17, FAMHX+18 , FAMHX+21, APPTS+5, APPTS+6, APPTS+7, APPTS+8, APPTS1+5, APPTS1+8, APPTS1+9, APPTS1+14, PRV+5 , PRV+6, PEDSCRN+16, DENTAL+9, ANTICOAG+12, ANTICOAG+14, ANTICOAG+20, ANTICOAG+27, ANTICOAG+31, ANTICOAG+35, ANTICOAG+37 , ONEVIS+1, ONEVIS+2, ONEVIS+3, ONEVIS+5, ONEVIS+7
V	LASTGLUC+7~
X	RECENTBP+3~, RECENTBP+7, RECENTBP+10, RECENTBP+12, RECENTBP+13, LASTGLUC+7~, PROBLIST+1~, PROBLIST+19, PROBLIST+20, PROBLIST+21* , PROBLIST+25, PROBLIST+26, PROBLIST+29, GETPROB+1~, GETPROB+2, GETPROB+3, GETPROB+4, GETPROB+5, GETPROB+6, GETPROB+7 , GETPROB+8, FAMHX+1~, FAMHX1, FAMHX1+1, FAMHX1+2, GETFHX+1~, GETFHX+2, GETFHX+3, GETFHX+4, APPTS+1~ , APPTS1+10, APPTS1+11, PRV+2~, PRV+4, PRV+5, DMPV+1~, DMPV+2, ANTICOAG+26, ANTICOAG+27, ANTICOAG+31 , ANTICOAG+37, ANTICOAG+38, ANTICOAG+39*
Y	LASTGLUC+7~, GETPROB+1~, GETFHX+1~, APPTS+1~, PRV+2~, PRV+3, PRV+5, PRV+6, PRV+8, ONEVIS+11

Customize PDF page

Package: Patient Care Component

Routine: APCHPWH9

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: