Routine: APCLV1

Information

APCLV1 ; IHS/CMI/LAB - visit entry utilities/get codes ;

Source Information

Source file <APCLV1.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
IHS VA Utilities	2	($$VAL,$$VALI)^XBDIQ1 $$EXTSET^XBFUNC
Patient Care Component Reports	2	$$START1^APCLDF ($$CHART,$$PRIMPROV)^APCLV
DRG Grouper	1	$$CPT^ICPTCOD
Kernel	1	($$DOW,$$FMTE)^XLFDT
VA Fileman	1	^%DTC

Caller Graph

Caller Graph Total: 6

Package	Total	Caller Graph
Diabetes Registry	3	BDMDMSM BDMDR4 BDMSELFM
Patient Care Component Reports	2	APCLDMSM APCLV
IHS Designated Provider	1	BDPDPEE

Entry Points

Name	Comments	DBIA/ICR reference
GETABBRV	;
CLEX	;
APWI	;EP
DSCHTYPE	;EP
36	;;
ADMUB	;EP
LOS	;EP
CODT	;EP
TRAVTIME	;EP
DSCHSERV	;EP
ADMSERV	;EP
DOW	;EP - returns
PCHART	;EP
NLAB	;EP - #labs
CHSCOST	;EP
APCWL	;EP
PATIENT	;EP
09	;;
42	;;
DDTM	;EP
41	;;
FACTX	;EP
LS	;EP - level of service code
ADMSOURC	;EP
OUTSL	;EP
DVEX	;EP
DSCHDATE	;EP
EM	;EP - eval&man cpt code
DWEX	;EP
VD	; EP - given visit ien in V, return date of visit in internal or external format
CONSULTS	;EP
LASTVD(P,F)	;PEP - given patient DFN in P, return pt's last pcc visit date, ; using the data fetcher. Returns date in format specified in F.
LOCENC	;EP - given visit ien V, return loc. of encounter in format F
CLINIC	;EP - clinic
COMM	;EP ; get COMMUNITY - STATE,COUNTY,COMMUNITY codes
DLM	;EP
ACTTIME	;EP
VDTM	;EP - given visit ien in V, return visit date and time in F format
11	;;
60	;;
ADMTYPE	;EP
54	;;
GETCHART(L)	;
APDT	;EP
51	;;
CHART	;EP - returns ASUFAC_HRN ( 12 digits, HRN is left zero filled)
53	;;
52	;;
99	;;
NRX	;EP - #rxs
TIME	;EP - given visit ien in V, returns visit time of day in format F
SC	;EP - service category
TYPE	;EP type of visit

External References

Name	Field # of Occurrence
^%DTC	LOS+5
$$START1^APCLDF	LASTVD+6
$$CHART^APCLV	PATIENT+7
$$PRIMPROV^APCLV	APCWL+26
$$CPT^ICPTCOD	EM+8
$$VAL^XBDIQ1	ADMUB+7, ADMSOURC+8, ADMSOURC+9, FACTX+8
$$VALI^XBDIQ1	ADMSERV+6, DSCHSERV+6, ADMTYPE+6, ADMUB+6, ADMSOURC+7, DSCHTYPE+6, FACTX+6, FACTX+7, ACTTIME+6, TRAVTIME+6 , CHSCOST+6
$$EXTSET^XBFUNC	TYPE+5, SC+5, LS+5, APWI+5
$$DOW^XLFDT	DOW+6
$$FMTE^XLFDT	VD+6, VDTM+6, TIME+6, LASTVD+9, DSCHDATE+7, DDTM+7, DLM+6, DVEX+6, DWEX+6, CODT+6 , APDT+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	COMM+6, COMM+7, COMM+8, COMM+9, CHART+7, CHART+9, GETCHART+3, PCHART+3, PCHART+5
^AUPNVCHS("AD"	CHSCOST+4
^AUPNVINP - [#9000010.02]	DSCHDATE+5, DDTM+5, CONSULTS+6, LOS+5
^AUPNVINP("AD"	ADMSERV+4, DSCHSERV+4, ADMTYPE+4, ADMUB+4, ADMSOURC+4, DSCHTYPE+4, DSCHDATE+4, DDTM+4, CONSULTS+5, LOS+4 , FACTX+4
^AUPNVLAB("AD"	NLAB+4
^AUPNVMED("AD"	NRX+4, APCWL+23
^AUPNVPOV("AD"	APCWL+6
^AUPNVPRV("AD"	APCWL+7
^AUPNVSIT - [#9000010]	COMM+3, COMM+4, CHART+3, CHART+4, LOCENC+2, LOCENC+4, VD+2, VD+4, VDTM+2, VDTM+4 , TIME+2, TIME+4, DOW+2, DOW+4, TYPE+2, TYPE+4, SC+2, SC+4, CLINIC+2, CLINIC+4 , EM+2, EM+4, LS+2, LS+4, NLAB+2, NRX+2, ADMSERV+2, DSCHSERV+2, ADMTYPE+2, ADMUB+2 , ADMSOURC+2, DSCHTYPE+2, DSCHDATE+2, DDTM+2, CONSULTS+2, CONSULTS+4, LOS+2, LOS+5, FACTX+2, ACTTIME+2 , TRAVTIME+2, CHSCOST+2, PATIENT+2, PATIENT+4, DLM+2, DLM+4, DVEX+2, DVEX+4, DWEX+2, DWEX+4 , APWI+2, APWI+4, CODT+2, CODT+4, APDT+2, APDT+4, OUTSL+2, OUTSL+4, APCWL+2, APCWL+3
^AUPNVSIT("AC"	LASTVD+4
^AUPNVTM("AD"	ACTTIME+4, TRAVTIME+4
^AUTTCOM - [#9999999.05]	COMM+11
^AUTTLOC - [#9999999.06]	GETCHART+1, LOCENC+6, LOCENC+7, FACTX+7, PCHART+8, APCWL+18
^DD(9000010.02	ADMTYPE+7, ADMTYPE+8, DSCHTYPE+7, DSCHTYPE+8
^DG(405.1 - [#405.1]	ADMTYPE+8, DSCHTYPE+8
^DIC(4 - [#4]	LOCENC+7
^DIC(40.7 - [#40.7]	CLINIC+6, CLINIC+7, APCWL+22, APCWL+24
^DIC(42.1 - [#42.1]	ADMTYPE+7
^DIC(42.2 - [#42.2]	DSCHTYPE+7
^DIC(45.7 - [#45.7]	ADMSERV+7, DSCHSERV+7
^DIC(7 - [#7]	APCWL+28, APCWL+29
^DPT - [#2]	PATIENT+6, PATIENT+7, APCWL+14, APCWL+15
^ICPT - [#81]	EM+6

Label References

Name	Line Occurrences
$$GETCHART	CHART+7, CHART+8, CHART+9, PCHART+6

Local Variables

Name	Field # of Occurrence
%	COMM+1~, COMM+2, COMM+3, COMM+5, COMM+6, COMM+7, CHART+1~, CHART+2, CHART+3, CHART+6 , CHART+7, CHART+8, CHART+9, CHART+10, CHART+11, GETCHART+6, GETCHART+7, NLAB+3~, NLAB+4, NLAB+5 , NRX+3~, NRX+4, NRX+5, ADMSERV+3~, ADMSERV+4, ADMSERV+5, ADMSERV+7, DSCHSERV+3~, DSCHSERV+4, DSCHSERV+5 , DSCHSERV+7, ADMTYPE+3~, ADMTYPE+4, ADMTYPE+5, ADMTYPE+7, ADMTYPE+8, ADMUB+3~, ADMUB+4, ADMUB+5, ADMSOURC+3~ , ADMSOURC+4, ADMSOURC+5, DSCHTYPE+3~, DSCHTYPE+4, DSCHTYPE+5, DSCHTYPE+7, DSCHTYPE+8, FACTX+3~, FACTX+4, FACTX+5 , PCHART+1~, PCHART+2, PCHART+3, PCHART+4, PCHART+5, PCHART+6, PCHART+7, PCHART+8, PCHART+9
C	CHART+1~, GETCHART+3, GETCHART+4, GETCHART+5, GETCHART+6, PCHART+1~, APCWL+3~, APCWL+21*, APCWL+22, APCWL+24
CL	APCWL+20~, APCWL+22*, APCWL+23
>> D	APCWL+26*, APCWL+27, APCWL+28, APCWL+29
DUZ(2	CHART+8
ERR	LASTVD+5~, LASTVD+6*
F	COMM+11, LOCENC+7, VD+6, VDTM+6, TIME+6, TIME+7, TIME+8, LASTVD~, LASTVD+3*, LASTVD+9 , DOW+6, TYPE+5, SC+5, CLINIC+7, EM+8, LS+5, ADMSERV+7, DSCHSERV+7, ADMTYPE+7, ADMTYPE+8 , ADMUB+6, ADMSOURC+6, DSCHTYPE+7, DSCHTYPE+8, DSCHDATE+7, DDTM+7, FACTX+6, FACTX+7, PATIENT+7, DLM+6 , DVEX+6, DWEX+6, APWI+5, CODT+6, APDT+6
L	CHART+1~, CHART+7, CHART+8, CHART+9, GETCHART~, GETCHART+1, GETCHART+3, PCHART+4, PCHART+5, PCHART+6 , PCHART+8, APCWL+3~, APCWL+16, APCWL+17, APCWL+18
LVD	LASTVD+5~
LVD(1	LASTVD+7, LASTVD+8
P	COMM+1~, COMM+4, COMM+5, COMM+6, COMM+7, COMM+8, COMM+9, CHART+1~, CHART+5, CHART+6 , CHART+7, CHART+9, GETCHART+3, LASTVD~, LASTVD+2, LASTVD+4, LASTVD+6, PCHART+3, PCHART+5, APCWL+3~ , APCWL+12*, APCWL+13, APCWL+14, APCWL+15
R	APCWL+3~*, APCWL+4, APCWL+5, APCWL+8, APCWL+9, APCWL+10, APCWL+11, APCWL+12, APCWL+16, APCWL+21
S	CHART+1~, GETCHART+1*, GETCHART+2, GETCHART+6, PCHART+1~
U	COMM+4, COMM+8, COMM+9, COMM+11, CHART+5, CHART+7, GETCHART+1, GETCHART+3, LOCENC+4, LOCENC+7 , VD+4, VDTM+4, TIME+4, LASTVD+8, DOW+4, TYPE+4, SC+4, CLINIC+4, CLINIC+7, EM+4 , EM+8, LS+4, ADMSERV+7, DSCHSERV+7, ADMTYPE+7, ADMTYPE+8, DSCHTYPE+7, DSCHTYPE+8, DSCHDATE+5, DDTM+5 , CONSULTS+4, CONSULTS+6, LOS+5, FACTX+7, PATIENT+4, PATIENT+7, DLM+4, DVEX+4, DWEX+4, APWI+4 , CODT+4, APDT+4, OUTSL+4, PCHART+8, APCWL+4, APCWL+5, APCWL+8, APCWL+9, APCWL+10, APCWL+11 , APCWL+12, APCWL+15, APCWL+16, APCWL+21, APCWL+22, APCWL+24, APCWL+29
>> V	COMM+3, COMM+4, CHART+3, CHART+4, LOCENC+1, LOCENC+2, LOCENC+4, VD+1, VD+2, VD+4 , VDTM+1, VDTM+2, VDTM+4, TIME+1, TIME+2, TIME+4, DOW+1, DOW+2, DOW+4, TYPE+1 , TYPE+2, TYPE+4, SC+1, SC+2, SC+4, CLINIC+1, CLINIC+2, CLINIC+4, EM+1, EM+2 , EM+4, LS+1, LS+2, LS+4, NLAB+1, NLAB+2, NLAB+4, NRX+1, NRX+2, NRX+4 , ADMSERV+1, ADMSERV+2, ADMSERV+4, DSCHSERV+1, DSCHSERV+2, DSCHSERV+4, ADMTYPE+1, ADMTYPE+2, ADMTYPE+4, ADMUB+1 , ADMUB+2, ADMUB+4, ADMSOURC+1, ADMSOURC+2, ADMSOURC+4, DSCHTYPE+1, DSCHTYPE+2, DSCHTYPE+4, DSCHDATE+1, DSCHDATE+2 , DSCHDATE+4, DDTM+1, DDTM+2, DDTM+4, CONSULTS+1, CONSULTS+2, CONSULTS+4, CONSULTS+5, LOS+1, LOS+2 , LOS+4, FACTX+1, FACTX+2, FACTX+4, ACTTIME+1, ACTTIME+2, ACTTIME+4, TRAVTIME+1, TRAVTIME+2, TRAVTIME+4 , CHSCOST+1, CHSCOST+2, CHSCOST+4, PATIENT+1, PATIENT+2, PATIENT+4, PATIENT+7, DLM+1, DLM+2, DLM+4 , DVEX+1, DVEX+2, DVEX+4, DWEX+1, DWEX+2, DWEX+4, APWI+1, APWI+2, APWI+4, CODT+1 , CODT+2, CODT+4, APDT+1, APDT+2, APDT+4, OUTSL+1, OUTSL+2, OUTSL+4, APCWL+1, APCWL+2 , APCWL+3, APCWL+6, APCWL+7, APCWL+23, APCWL+26
X	LOS+3~, LOS+6*, LOS+7
X1	LOS+3~, LOS+5*
X2	LOS+3~, LOS+5*
Y	COMM+1~, COMM+7, COMM+8, LOCENC+3~, LOCENC+4, LOCENC+5, LOCENC+6, LOCENC+7, VD+3~, VD+4* , VD+5, VD+6, VDTM+3~, VDTM+4, VDTM+5, VDTM+6, TIME+3~, TIME+4, TIME+5, TIME+6* , TIME+7, TIME+8, TIME+9, LASTVD+5~, LASTVD+8, LASTVD+9, DOW+3~, DOW+4, DOW+5, DOW+6 , TYPE+3~, TYPE+4, TYPE+5, SC+3~, SC+4, SC+5, CLINIC+3~, CLINIC+4, CLINIC+5, CLINIC+6 , CLINIC+7, EM+3~, EM+4, EM+5, EM+6, EM+8, LS+3~, LS+4, LS+5, NLAB+3~ , NLAB+4, NRX+3~, NRX+4, ADMSERV+3~, ADMSERV+6, ADMSERV+7, DSCHSERV+3~, DSCHSERV+6, DSCHSERV+7, ADMTYPE+3~ , ADMTYPE+6, ADMTYPE+7, ADMTYPE+8, ADMUB+3~, ADMSOURC+3~, ADMSOURC+6, ADMSOURC+7, ADMSOURC+8, DSCHTYPE+3~, DSCHTYPE+6* , DSCHTYPE+7, DSCHTYPE+8, DSCHDATE+3~, DSCHDATE+5, DSCHDATE+6, DSCHDATE+7, DDTM+3~, DDTM+5, DDTM+6, DDTM+7 , CONSULTS+3~, LOS+3~, FACTX+3~, FACTX+7, ACTTIME+3~, ACTTIME+4, ACTTIME+5, ACTTIME+6, TRAVTIME+3~, TRAVTIME+4* , TRAVTIME+5, TRAVTIME+6, CHSCOST+3~, CHSCOST+4, CHSCOST+5, CHSCOST+6, PATIENT+3~, PATIENT+4, PATIENT+5, PATIENT+6 , PATIENT+7, DLM+3~, DLM+4, DLM+5, DLM+6, DVEX+3~, DVEX+4, DVEX+5, DVEX+6, DWEX+3~ , DWEX+4, DWEX+5, DWEX+6, APWI+3~, APWI+4, APWI+5, CODT+3~, CODT+4, CODT+5, CODT+6 , APDT+3~, APDT+4, APDT+5, APDT+6, OUTSL+3~
Z	COMM+1~, COMM+8, COMM+9, COMM+10, COMM+11, CHART+1~, CHART+4, CHART+5, CHART+7, ADMSERV+3~ , ADMSERV+4, ADMSERV+5, ADMSERV+6, DSCHSERV+3~, DSCHSERV+4, DSCHSERV+5, DSCHSERV+6, ADMTYPE+3~, ADMTYPE+4, ADMTYPE+5 , ADMTYPE+6, ADMUB+3~, ADMUB+4, ADMUB+5, ADMUB+6, ADMUB+7, ADMSOURC+3~, ADMSOURC+4, ADMSOURC+5, ADMSOURC+7 , ADMSOURC+9, DSCHTYPE+3~, DSCHTYPE+4, DSCHTYPE+5, DSCHTYPE+6, DSCHDATE+3~, DSCHDATE+4, DSCHDATE+5, DDTM+3~, DDTM+4* , DDTM+5, CONSULTS+3~, CONSULTS+5, CONSULTS+6, LOS+3~, LOS+4, LOS+5, FACTX+3~, FACTX+4*, FACTX+5 , FACTX+6, FACTX+7, FACTX+8, PCHART+1~

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLV1

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed