Routine: APCLAPI

Package	Total	Call Graph
Patient Care Component Reports	2	($$LASTBHDT,$$LASTBHDX,$$LASTBHED,$$LASTBHME,$$LASTCPTT,$$LASTDXT,$$LASTHF,$$LASTITEM,$$LASTPRCT,$$SNOMEDPV)^APCLAPIU $$START1^APCLDF
IHS Patient	1	$$DOB^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1

Package	Total	Caller Graph
Patient Care Component	6	APCHPRE1 APCHPWH6 APCHSM02 APCHSM03 APCHSM05 APCHSM07
Diabetes Registry	2	BDMD012 BDMD912
Patient Care Component Reports	1	APCLAPIR

Entry Points

Name	Comments	DBIA/ICR reference
LASTFSIG(APCLPDFN,APCLBD,APCLED,APCLFORM)	;PEP - return last sigmoidoscopy ; - V Procedure: 45.24, 45.42 ; - V CPT : BGP SIG CPTS taxonomy
E	;
LASTIPVS(APCLPDFN,APCLBD,APCLED,APCLFORM)	;PEP - date of last ipv screen ; - V Exam 34 or Behavioral Health IPV Screening
LASTDEPS(APCLPDFN,APCLBD,APCLED,APCLFORM)	;PEP - return last depression screen ; Return the last recorded depression screening value: ; - V Exam 36 or Behavioral Health Module Depression Screening ; - Diagnosis - V POV V79.0 ; - Education Topics - V EDUCATION or Behavioral Health Module ; DEP-SCR ; - V Measurement PHQ2, PHQ9, PHQT ; - Behavioral Health Module Diagnosis (POV) of 14.1 ; - Diagnosis in BGP MOOD DISORDERS taxonomy in V POV ; - Diagnosis in BGP MOOD DISORDERS taxonomy in BH ; - Problem Code of 14 or 15 in BH ; - V POV snomed PXRM BQI DEPRESSION SCREENING ; ; Input: ; APCLPDFN - Patient DFN ; APCLBD - beginning date to begin search for value - if blank, default is DOB ; APCLED - ending date of search - if blank, default is DT ; APCLFORM - APCLFORM returned: D - return date only - example 3070801 ; A - return value: ; date^text of item found^value if appropriate^visit ien^File found in^ien of file found in ; Default if blank is D ; Output: ; If APCLFORM is blank or APCLFORM is D returns internal fileman date if one found otherwise returns null ; If APCLFORM is A returns the string: ; date^text of item found^value if appropriate^visit ien^File found in^ien of file found in ;
VE(Y,F,T)	;EP
LASTALCS(P,BD,ED,F)	;
REMDEPS(P,APCLBD,APCLED)	;PEP - called from reminders to get data on last depression screening exam ; Input: ; APCLPDFN - Patient DFN ; APCLBD - beginning date to begin search for value - if blank, default is DOB ; APCLED - ending date of search - if blank, default is DT
LASTDEP(P,BD,ED,F)	;
LASTCOLO(APCLPDFN,APCLBD,APCLED,APCLFORM)	;PEP - return last Colonoscopy ; - V Procedure: 45.43, 45.22, 45.23, 45.25 ; - V CPT : BGP COLO CPTS taxonomy
LASTIPV(P,BD,ED,APCLF)	;
LASTALC(APCLPDFN,APCLBD,APCLED,APCLFORM)	;PEP - date of last alcohol screen ; Return the last recorded alcohol screening value: ; - V Exam 35 or Behavioral Health Module Alcohol Screening ; - V measurement AUDC, AUDT, CRFT ; - Health Factor with Alcohol/Drug Category (CAGE) ; - Diagnosis - V POV V79.1 ; - Education Topics - V EDUCATION or Behavioral Health Module ; AOD-SCR ; CD-SCR ; - Behavioral Health Module Diagnosis (POV) of 29.1 ; - cpts in BGP ALCOHOL SCREENING CPTS taxonomy ; - V POV snomed PXRM BQI ALCOHOL SCREENING ; ; Input: ; APCLPDFN - Patient DFN ; APCLBD - beginning date to begin search for value - if blank, default is DOB ; APCLED - ending date of search - if blank, default is DT ; APCLFORM - APCLFORM returned: D - return date only - example 3070801 ; A - return value: ; date^text of item found^value if appropriate^visit ien^File found in^ien of file found in ; Default if blank is D ; Output: ; If APCLFORM is blank or APCLFORM is D returns internal fileman date if one found otherwise returns null ; If APCLFORM is A returns the string: ; date^text of item found^value if appropriate^visit ien^File found in^ien of file found in ;

Name	Field # of Occurrence
$$LASTBHDT^APCLAPIU	LASTDEPS+55
$$LASTBHDX^APCLAPIU	LASTALC+54, LASTDEPS+48, LASTDEPS+57, LASTDEPS+59
$$LASTBHED^APCLAPIU	LASTALC+56, LASTALC+58, LASTDEPS+50
$$LASTBHME^APCLAPIU	LASTALC+60, LASTALC+62, LASTALC+64, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65
$$LASTCPTT^APCLAPIU	LASTALC+50, LASTDEPS+41, LASTCOLO+25, LASTFSIG+25
$$LASTDXT^APCLAPIU	LASTALC+36, LASTDEPS+33, LASTDEPS+53
$$LASTHF^APCLAPIU	LASTALC+34
$$LASTITEM^APCLAPIU	LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45, LASTALC+48, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+44
$$LASTPRCT^APCLAPIU	LASTCOLO+23, LASTFSIG+23
$$SNOMEDPV^APCLAPIU	LASTALC+52, LASTDEPS+46
$$START1^APCLDF	LASTALCS+4, LASTDEP+3, LASTIPV+3
$$DOB^AUPNPAT	LASTALC+27, LASTDEPS+26, LASTIPVS+17, LASTCOLO+18, LASTFSIG+18, REMDEPS+18
$$VAL^XBDIQ1	VE+1, LASTALCS+15, LASTDEP+14, LASTIPV+14

Name	Line Occurrences (* Changed, ! Killed)
^AMHREC - [#9002011]	LASTALCS+9, LASTDEP+8, LASTIPV+8
^AMHREC("AE"	LASTALCS+8, LASTDEP+7, LASTIPV+7
^AUTTEDT("C"	LASTALC+44, LASTALC+47, LASTDEPS+43

Name	Line Occurrences
$$LASTALCS	LASTALC+32
$$LASTDEP	LASTDEPS+31
$$LASTDEPS	REMDEPS+21
$$LASTIPV	LASTIPVS+22
$$VE	LASTALCS+5, LASTDEP+4, LASTIPV+4
E	LASTALC+33, LASTALC+35, LASTALC+37, LASTALC+39, LASTALC+41, LASTALC+43, LASTALC+46, LASTALC+49, LASTALC+51, LASTALC+53 , LASTALC+55, LASTALC+57, LASTALC+59, LASTALC+61, LASTALC+63, LASTALC+65, LASTDEPS+32, LASTDEPS+34, LASTDEPS+36, LASTDEPS+38 , LASTDEPS+40, LASTDEPS+42, LASTDEPS+45, LASTDEPS+47, LASTDEPS+49, LASTDEPS+51, LASTDEPS+54, LASTDEPS+56, LASTDEPS+58, LASTDEPS+60 , LASTDEPS+62, LASTDEPS+64, LASTDEPS+66, LASTIPVS+23, LASTCOLO+24, LASTCOLO+26, LASTFSIG+24, LASTFSIG+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LASTALCS+2~, LASTALCS+4, LASTDEP+1~, LASTDEP+3, LASTIPV+1~, LASTIPV+3*, LASTCOLO+21~, LASTFSIG+21~
APCLBD	LASTALC~, LASTALC+27, LASTALC+32, LASTALC+34, LASTALC+36, LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45, LASTALC+48 , LASTALC+50, LASTALC+52, LASTALC+54, LASTALC+56, LASTALC+58, LASTALC+60, LASTALC+62, LASTALC+64, LASTDEPS~, LASTDEPS+26 , LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+41, LASTDEPS+44, LASTDEPS+46, LASTDEPS+48, LASTDEPS+50 , LASTDEPS+53, LASTDEPS+55, LASTDEPS+57, LASTDEPS+59, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65, LASTIPVS~, LASTIPVS+17, LASTIPVS+22 , LASTCOLO~, LASTCOLO+18, LASTCOLO+23, LASTCOLO+25, LASTFSIG~, LASTFSIG+18, LASTFSIG+23, LASTFSIG+25, REMDEPS~, REMDEPS+18 , REMDEPS+21
APCLC	LASTALCS+3~, LASTALCS+7, LASTALCS+8, LASTDEP+2~, LASTDEP+6, LASTDEP+7, LASTIPV+2~, LASTIPV+6*, LASTIPV+7
APCLED	LASTALC~, LASTALC+28, LASTALC+32, LASTALC+34, LASTALC+36, LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45, LASTALC+48 , LASTALC+50, LASTALC+52, LASTALC+54, LASTALC+56, LASTALC+58, LASTALC+60, LASTALC+62, LASTALC+64, LASTDEPS~, LASTDEPS+27 , LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+41, LASTDEPS+44, LASTDEPS+46, LASTDEPS+48, LASTDEPS+50 , LASTDEPS+53, LASTDEPS+55, LASTDEPS+57, LASTDEPS+59, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65, LASTIPVS~, LASTIPVS+18, LASTIPVS+22 , LASTCOLO~, LASTCOLO+19, LASTCOLO+23, LASTCOLO+25, LASTFSIG~, LASTFSIG+19, LASTFSIG+23, LASTFSIG+25, REMDEPS~, REMDEPS+19 , REMDEPS+21
APCLF	LASTIPV~
APCLFORM	LASTALC~, LASTALC+29, LASTALC+66, LASTDEPS~, LASTDEPS+28, LASTDEPS+67, LASTIPVS~, LASTIPVS+19, LASTIPVS+24, LASTIPV+15 , LASTCOLO~, LASTCOLO+20, LASTCOLO+27, LASTFSIG~, LASTFSIG+20*, LASTFSIG+27
APCLG	LASTALCS+3~, LASTDEP+2~, LASTIPV+2~
APCLG(1	LASTALCS+5, LASTDEP+4, LASTIPV+4
APCLLAST	LASTALC+30~, LASTALC+31, LASTALC+34, LASTALC+36, LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45, LASTALC+48, LASTALC+50 , LASTALC+52, LASTALC+54, LASTALC+56, LASTALC+58, LASTALC+60, LASTALC+62, LASTALC+64, LASTALC+66, LASTALC+67, E+1 , LASTDEPS+29~, LASTDEPS+30, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+41, LASTDEPS+44, LASTDEPS+46, LASTDEPS+48 , LASTDEPS+50, LASTDEPS+53, LASTDEPS+55, LASTDEPS+57, LASTDEPS+59, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65, LASTDEPS+67, LASTDEPS+68 , LASTIPVS+20~, LASTIPVS+21, LASTIPVS+24, LASTIPVS+25, LASTCOLO+21~, LASTCOLO+22, LASTCOLO+23, LASTCOLO+25, LASTCOLO+27, LASTCOLO+28 , LASTFSIG+21~, LASTFSIG+22, LASTFSIG+23, LASTFSIG+25, LASTFSIG+27, LASTFSIG+28
APCLPDFN	LASTALC~, LASTALC+26, LASTALC+27, LASTALC+32, LASTALC+34, LASTALC+36, LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45 , LASTALC+48, LASTALC+50, LASTALC+52, LASTALC+54, LASTALC+56, LASTALC+58, LASTALC+60, LASTALC+62, LASTALC+64, LASTDEPS~ , LASTDEPS+26, LASTDEPS+31, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+41, LASTDEPS+44, LASTDEPS+46, LASTDEPS+48 , LASTDEPS+50, LASTDEPS+53, LASTDEPS+55, LASTDEPS+57, LASTDEPS+59, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65, LASTIPVS~, LASTIPVS+16 , LASTIPVS+17, LASTIPVS+22, LASTCOLO~, LASTCOLO+17, LASTCOLO+18, LASTCOLO+23, LASTCOLO+25, LASTFSIG~, LASTFSIG+17, LASTFSIG+18 , LASTFSIG+23, LASTFSIG+25
APCLR	REMDEPS+20~, REMDEPS+21*, REMDEPS+22
APCLV	LASTALCS+3~, LASTALCS+7, LASTDEP+2~, LASTDEP+6, LASTIPV+2~, LASTIPV+6*
APCLVAL	LASTALC+30~, LASTALC+32, LASTALC+34, LASTALC+36, LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45, LASTALC+48, LASTALC+50* , LASTALC+52, LASTALC+54, LASTALC+56, LASTALC+58, LASTALC+60, LASTALC+62, LASTALC+64, E+1, LASTDEPS+29~, LASTDEPS+31 , LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+41, LASTDEPS+44, LASTDEPS+46, LASTDEPS+48, LASTDEPS+50, LASTDEPS+53 , LASTDEPS+55, LASTDEPS+57, LASTDEPS+59, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65, LASTIPVS+20~, LASTIPVS+22, LASTCOLO+21~, LASTCOLO+22 , LASTCOLO+23, LASTCOLO+25, LASTFSIG+21~, LASTFSIG+22, LASTFSIG+23, LASTFSIG+25*
APCLX	LASTALC+30~, LASTALC+44, LASTALC+45, LASTALC+47, LASTALC+48, LASTALCS+3~, LASTDEPS+29~, LASTDEPS+43*, LASTDEPS+44, LASTDEP+2~ , LASTIPVS+20~, LASTIPV+2~, LASTCOLO+21~, LASTFSIG+21~
APCLX(	LASTALCS+14, LASTALCS+15, LASTALCS+16, LASTDEP+13, LASTDEP+14, LASTDEP+15, LASTIPV+13, LASTIPV+14*, LASTIPV+15
APCLX(0	LASTALCS+16, LASTDEP+15, LASTIPV+15
APCLX(9999999	LASTALCS+5, LASTDEP+4, LASTIPV+4*
BD	LASTALCS~, LASTALCS+4, LASTALCS+8, LASTDEP~, LASTDEP+3, LASTDEP+7, LASTIPV~, LASTIPV+3, LASTIPV+7
D	LASTALCS+2~, LASTALCS+8, LASTALCS+13, LASTALCS+14, LASTALCS+15, LASTDEP+1~, LASTDEP+7, LASTDEP+12, LASTDEP+13, LASTDEP+14 , LASTIPV+1~, LASTIPV+7*, LASTIPV+12, LASTIPV+13, LASTIPV+14
DT	LASTALC+28, LASTDEPS+27, LASTIPVS+18, LASTCOLO+19, LASTFSIG+19, REMDEPS+19
E	LASTALCS+2~, LASTALCS+4, LASTALCS+8, LASTDEP+1~, LASTDEP+3, LASTDEP+7, LASTIPV+1~, LASTIPV+3, LASTIPV+7, LASTCOLO+21~ , LASTFSIG+21~
ED	LASTALCS~, LASTALCS+4, LASTALCS+8, LASTDEP~, LASTDEP+3, LASTDEP+7, LASTIPV~, LASTIPV+3, LASTIPV+7
F	VE~, LASTALCS~, LASTALCS+16, LASTDEP~, LASTDEP+15
G	LASTALCS+2~, LASTALCS+13, LASTALCS+15, LASTALCS+16, LASTDEP+1~, LASTDEP+12, LASTDEP+14, LASTDEP+15, LASTIPV+1~, LASTIPV+12* , LASTIPV+14, LASTIPV+15*
P	LASTALCS~, LASTALCS+4, LASTALCS+8, LASTDEP~, LASTDEP+3, LASTDEP+7, LASTIPV~, LASTIPV+3, LASTIPV+7, REMDEPS~ , REMDEPS+17, REMDEPS+18, REMDEPS+21
T	VE~, LASTCOLO+21~, LASTFSIG+21~
U	LASTALC+34, LASTALC+36, LASTALC+38, LASTALC+40, LASTALC+42, LASTALC+45, LASTALC+48, LASTALC+50, LASTALC+52, LASTALC+54 , LASTALC+56, LASTALC+58, LASTALC+60, LASTALC+62, LASTALC+64, LASTALC+66, VE+1, LASTALCS+5, LASTALCS+9, LASTALCS+16 , E+1, LASTDEPS+33, LASTDEPS+35, LASTDEPS+37, LASTDEPS+39, LASTDEPS+41, LASTDEPS+44, LASTDEPS+46, LASTDEPS+48, LASTDEPS+50 , LASTDEPS+53, LASTDEPS+55, LASTDEPS+57, LASTDEPS+59, LASTDEPS+61, LASTDEPS+63, LASTDEPS+65, LASTDEPS+67, LASTDEP+4, LASTDEP+8 , LASTDEP+15, LASTIPVS+24, LASTIPV+4, LASTIPV+8, LASTIPV+15, LASTCOLO+23, LASTCOLO+25, LASTCOLO+27, LASTFSIG+23, LASTFSIG+25 , LASTFSIG+27
V	LASTALCS+2~, LASTALCS+8, LASTALCS+9, LASTALCS+15, LASTDEP+1~, LASTDEP+7, LASTDEP+8, LASTDEP+14, LASTIPV+1~, LASTIPV+7* , LASTIPV+8, LASTIPV+14
X	LASTALCS+2~, LASTALCS+9, LASTALCS+10, LASTALCS+11, LASTALCS+12, LASTDEP+1~, LASTDEP+8, LASTDEP+9, LASTDEP+10, LASTDEP+11 , LASTIPV+1~, LASTIPV+8*, LASTIPV+9, LASTIPV+10, LASTIPV+11
Y	VE~, VE+1

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLAPI

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 9

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: