Routine: APCHSMU2

Information

APCHSMU2 ; IHS/CMI/LAB - utilities for hmr ;

Source Information

Source file <APCHSMU2.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
DRG Grouper	2	($$CODEABA,$$ICDDX,$$ICDOP)^ICDEX ($$CODEN,$$CPT)^ICPTCOD
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Patient Care Component	1	($$FFD,$$REF,$$TYPEREF)^APCHSMU
Patient Care Component Reports	1	$$LASTTD^APCLAPI4
Taxonomy	1	$$ICD^ATXAPI

Caller Graph

Caller Graph Total: 17

Package	Total	Caller Graph
Patient Care Component	11	APCHPWH5 APCHPWH6 APCHS3C APCHS9B4 APCHSM04 APCHSM05 APCHSM06 APCHSM07 APCHSM08 APCHSMU APCHSTP
Health Summary Components	3	BHSDM4 BHSEXAM BHSMU
IHS Mods To Patient Care Encounter	2	BPXRMPCC BPXRMTP
Clinical Scheduling for Windows	1	BSDX41K

Entry Points

Name	Comments	DBIA/ICR reference
PRCREFT(P,BDATE,EDATE,T)	;EP - return ien of proc
CPTI(P,BDATE,EDATE,CPTI)	;EP - did patient have this cpt (ien) in date range
WH(P,BDATE,EDATE,T,F)	;EP
RADREF(P,BDATE,EDATE,T)	;EP - return ien of CPT entry if patient had this CPT
S(X)	;
LASTDXI(P,T,BDATE,EDATE)	;EP
LASTTD(P)	;EP
CPT(P,BDATE,EDATE,T,F)	;EP - return ien of CPT entry if patient had this CPT
CPTREFT(P,BDATE,EDATE,T)	;EP - return ien of CPT entry if patient had this CPT
LASTDX(P,T,BDATE,EDATE)	;EP
MAMREF	;EP
LASTCPTI(P,T,BDATE,EDATE)	;EP
LASTPRCI(P,T,BDATE,EDATE)	;EP
LASTPRC(P,T,BDATE,EDATE)	;EP

External References

Name	Field # of Occurrence
$$FFD^APCHSMU	CPTREFT+10, RADREF+12
$$REF^APCHSMU	MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9, MAMREF+10 , MAMREF+11
$$TYPEREF^APCHSMU	CPTREFT+10, RADREF+12
$$LASTTD^APCLAPI4	LASTTD+2
$$ICD^ATXAPI	CPT+14, LASTDX+16, LASTPRC+15, CPTREFT+9, RADREF+10, PRCREFT+9
$$CODEABA^ICDEX	LASTDXI+7, LASTPRCI+7
$$ICDDX^ICDEX	LASTDX+17, LASTDXI+16
$$ICDOP^ICDEX	LASTPRC+16, LASTPRCI+16, PRCREFT+10
$$CODEN^ICPTCOD	LASTCPTI+7
$$CPT^ICPTCOD	CPT+26, LASTCPTI+16
$$VAL^XBDIQ1	CPTREFT+10, RADREF+12
$$FMADD^XLFDT	WH+5, CPT+5, CPTREFT+4, RADREF+4, PRCREFT+4
$$FMTE^XLFDT	WH+20, CPT+22, CPTREFT+10, RADREF+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	LASTDX+7, LASTPRC+7
^AUPNPREF - [#9000022]	CPTREFT+8, RADREF+8, RADREF+11, PRCREFT+8, PRCREFT+10
^AUPNPREF("AA"	CPTREFT+7, CPTREFT+8, RADREF+7, RADREF+8, PRCREFT+7, PRCREFT+8
^AUPNVCPT - [#9000010.18]	CPT+14, CPT+21, CPT+22, CPT+26, LASTCPTI+13
^AUPNVCPT("AA"	CPTI+6, CPTI+9, LASTCPTI+11, LASTCPTI+12
^AUPNVCPT("AD"	CPT+12, CPT+13
^AUPNVPOV - [#9000010.07]	LASTDX+13, LASTDXI+13
^AUPNVPOV("AA"	LASTDX+11, LASTDX+12, LASTDXI+11, LASTDXI+12
^AUPNVPRC - [#9000010.08]	LASTPRC+13, LASTPRCI+13
^AUPNVPRC("AA"	LASTPRC+11, LASTPRC+12, LASTPRCI+11, LASTPRCI+12
^AUPNVSIT - [#9000010]	CPT+11, CPT+21, CPT+22, CPT+26
^AUPNVSIT("AA"	CPT+9, CPT+10
^BWPCD - [#9002086.1]	WH+9, WH+10, WH+11, WH+19, WH+20
^BWPCD("C"	WH+8
^DPT - [#2]	LASTDX+5, LASTDXI+5, LASTPRC+5, LASTPRCI+5, LASTCPTI+5
^ICD9 - [#80]	LASTDX+15
^ICPT - [#81]	CPTI+5
^RAMIS(71 - [#71]	RADREF+9, MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9 , MAMREF+10, MAMREF+11

Label References

Name	Line Occurrences
S	MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9, MAMREF+10 , MAMREF+11

Local Variables

Name	Field # of Occurrence
%	S+1~*
APCHDX1	LASTDX+3~, LASTDX+4, LASTDX+11, LASTDX+12, LASTDX+17, LASTDXI+3~, LASTDXI+4, LASTDXI+11, LASTDXI+12, LASTDXI+16 , LASTPRC+3~, LASTPRC+4, LASTPRC+11, LASTPRC+12, LASTPRC+16, LASTPRCI+3~, LASTPRCI+4, LASTPRCI+11, LASTPRCI+12, LASTPRCI+16 , LASTCPTI+3~, LASTCPTI+4, LASTCPTI+11, LASTCPTI+12, LASTCPTI+16
APCHDX2	LASTDX+3~, LASTDX+4, LASTDX+12, LASTDX+13, LASTDX+17, LASTDXI+3~, LASTDXI+4, LASTDXI+12, LASTDXI+13, LASTDXI+16 , LASTPRC+3~, LASTPRC+4, LASTPRC+12, LASTPRC+13, LASTPRC+16, LASTPRCI+3~, LASTPRCI+4, LASTPRCI+12, LASTPRCI+13, LASTPRCI+16 , LASTCPTI+3~, LASTCPTI+4, LASTCPTI+12, LASTCPTI+13, LASTCPTI+16
APCHDX3	LASTDX+3~, LASTDX+4, LASTDX+13, LASTDX+14, LASTDX+15, LASTDX+16, LASTDX+17, LASTDXI+3~, LASTDXI+4, LASTDXI+13 , LASTDXI+14, LASTDXI+15, LASTDXI+16, LASTPRC+3~, LASTPRC+4, LASTPRC+13, LASTPRC+14, LASTPRC+15, LASTPRC+16, LASTPRCI+3~ , LASTPRCI+4, LASTPRCI+13, LASTPRCI+14, LASTPRCI+15, LASTPRCI+16, LASTCPTI+3~, LASTCPTI+4, LASTCPTI+13, LASTCPTI+14, LASTCPTI+15 , LASTCPTI+16
APCHDX4	LASTDX+3~, LASTDX+4, LASTDX+9, LASTDX+11, LASTDX+12, LASTDX+17, LASTDX+20, LASTDXI+4, LASTDXI+9, LASTDXI+11 , LASTDXI+12, LASTDXI+16, LASTDXI+19, LASTPRC+3~, LASTPRC+4, LASTPRC+9, LASTPRC+11, LASTPRC+12, LASTPRC+16, LASTPRC+19 , LASTPRCI+3~, LASTPRCI+4, LASTPRCI+9, LASTPRCI+11, LASTPRCI+12, LASTPRCI+16, LASTPRCI+19, LASTCPTI+3~, LASTCPTI+4, LASTCPTI+9 , LASTCPTI+11, LASTCPTI+12, LASTCPTI+16*, LASTCPTI+19
APCHDX5	LASTDXI+3~
APCHDXBD	LASTDX+3~, LASTDX+10, LASTDX+11, LASTDXI+3~, LASTDXI+10, LASTDXI+11, LASTPRC+3~, LASTPRC+10, LASTPRC+11, LASTPRCI+3~ , LASTPRCI+10, LASTPRCI+11, LASTCPTI+3~, LASTCPTI+10*, LASTCPTI+11
APCHDXED	LASTDX+3~, LASTDX+10, LASTDX+11, LASTDXI+3~, LASTDXI+10, LASTDXI+11, LASTPRC+3~, LASTPRC+10, LASTPRC+11, LASTPRCI+3~ , LASTPRCI+10, LASTPRCI+11, LASTCPTI+3~, LASTCPTI+10*, LASTCPTI+11
>> APCHLAST	MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9, MAMREF+10 , MAMREF+11
>> APCHSPAT	MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9, MAMREF+10 , MAMREF+11
>> APCHSTEX(	S+1, S+2*
APCHSVDT	CPT+24~, CPT+26*
APCHTX5	LASTDX+3~, LASTDX+4, LASTDX+7, LASTDX+8, LASTDX+16, LASTDXI+3~, LASTDXI+4, LASTDXI+7, LASTDXI+8, LASTDXI+15 , LASTPRC+3~, LASTPRC+4, LASTPRC+7, LASTPRC+8, LASTPRC+15, LASTPRCI+3~, LASTPRCI+4, LASTPRCI+7, LASTPRCI+8, LASTPRCI+15 , LASTCPTI+3~, LASTCPTI+4, LASTCPTI+7, LASTCPTI+8, LASTCPTI+11, LASTCPTI+12, LASTCPTI+15
BD	CPT+7~, CPT+8, CPT+9, CPTI+7~, CPTI+8, CPTI+9
BDATE	WH~, WH+5, WH+12, CPT~, CPT+5, CPT+8, LASTDX~, LASTDX+5, LASTDX+10, LASTDXI~ , LASTDXI+5, LASTDXI+10, LASTPRC~, LASTPRC+5, LASTPRC+10, LASTPRCI~, LASTPRCI+5, LASTPRCI+10, CPTI~, CPTI+3 , CPTI+8, LASTCPTI~, LASTCPTI+5, LASTCPTI+10, CPTREFT~, CPTREFT+4, CPTREFT+8, RADREF~, RADREF+4, RADREF+8 , PRCREFT~, PRCREFT+4, PRCREFT+8
C	RADREF+5~, RADREF+9, RADREF+10, RADREF+12, S+1~, S+2
CPTI	CPTI~, CPTI+2, CPTI+5, CPTI+9
D	WH+7~, WH+11, WH+12, WH+13, WH+19, WH+20, CPT+7~, CPTI+7~, CPTREFT+8, CPTREFT+10 , RADREF+8, RADREF+12, PRCREFT+8, PRCREFT+10
DT	LASTDX+6, LASTDXI+6, LASTPRC+6, LASTPRCI+6, LASTCPTI+6
ED	CPT+7~, CPT+8, CPT+9, CPT+10, CPTI+7~, CPTI+8, CPTI+9
EDATE	WH~, WH+4, WH+5, WH+13, CPT~, CPT+4, CPT+5, CPT+8, LASTDX~, LASTDX+6* , LASTDX+10, LASTDXI~, LASTDXI+6, LASTDXI+10, LASTPRC~, LASTPRC+6, LASTPRC+10, LASTPRCI~, LASTPRCI+6, LASTPRCI+10 , CPTI~, CPTI+4, CPTI+8, LASTCPTI~, LASTCPTI+6, LASTCPTI+10, CPTREFT~, CPTREFT+3, CPTREFT+4, CPTREFT+8 , RADREF~, RADREF+3, RADREF+4, RADREF+8, PRCREFT~, PRCREFT+3, PRCREFT+4, PRCREFT+8
F	WH~, WH+3, WH+17, WH+18, WH+19, WH+20, CPT~, CPT+3, CPT+19, CPT+20 , CPT+21, CPT+22, CPT+26
G	WH+7~, WH+8, WH+14, WH+16, WH+17, WH+18, WH+19, WH+20, CPT+7~, CPT+8* , CPT+9, CPT+10, CPT+13, CPT+14, CPT+18, CPT+19, CPT+20, CPT+21, CPT+22, CPT+26 , CPTI+7~, CPTI+8, CPTI+9, CPTI+10, CPTREFT+5~, CPTREFT+6, CPTREFT+7, CPTREFT+8, CPTREFT+10, CPTREFT+12 , RADREF+5~, RADREF+6, RADREF+7, RADREF+8, RADREF+12, RADREF+14, PRCREFT+5~, PRCREFT+6, PRCREFT+7, PRCREFT+8* , PRCREFT+10*, PRCREFT+12
I	CPTREFT+5~, CPTREFT+7, CPTREFT+8, CPTREFT+9, CPTREFT+10, RADREF+5~, RADREF+7, RADREF+8, RADREF+9, PRCREFT+5~ , PRCREFT+7*, PRCREFT+8, PRCREFT+9, PRCREFT+10
>> N	RADREF+11*
P	WH~, WH+1, WH+8, CPT~, CPT+1, CPT+9, CPT+10, LASTDX~, LASTDX+1, LASTDX+5 , LASTDX+11, LASTDX+12, LASTDXI~, LASTDXI+1, LASTDXI+5, LASTDXI+11, LASTDXI+12, LASTPRC~, LASTPRC+1, LASTPRC+5 , LASTPRC+11, LASTPRC+12, LASTPRCI~, LASTPRCI+1, LASTPRCI+5, LASTPRCI+11, LASTPRCI+12, CPTI~, CPTI+1, CPTI+6 , CPTI+9, LASTCPTI~, LASTCPTI+1, LASTCPTI+5, LASTCPTI+11, LASTCPTI+12, CPTREFT~, CPTREFT+1, CPTREFT+7, CPTREFT+8 , RADREF~, RADREF+1, RADREF+7, RADREF+8, LASTTD~, LASTTD+1, LASTTD+2, PRCREFT~, PRCREFT+1, PRCREFT+7 , PRCREFT+8
T	WH~, WH+2, WH+10, CPT~, CPT+2, CPT+14, LASTDX~, LASTDX+7, LASTDXI~, LASTDXI+7 , LASTPRC~, LASTPRC+7, LASTPRCI~, LASTPRCI+7, LASTCPTI~, LASTCPTI+7, CPTREFT~, CPTREFT+2, CPTREFT+9, RADREF~ , RADREF+2, RADREF+10, PRCREFT~, PRCREFT+2, PRCREFT+9
U	WH+10, WH+11, WH+19, WH+20, CPT+14, CPT+21, CPT+22, CPT+26, LASTDX+5, LASTDX+13 , LASTDX+17, LASTDXI+5, LASTDXI+13, LASTDXI+16, LASTPRC+5, LASTPRC+13, LASTPRC+16, LASTPRCI+5, LASTPRCI+13, LASTPRCI+16 , LASTCPTI+5, LASTCPTI+13, LASTCPTI+16, CPTREFT+7, CPTREFT+8, RADREF+7, RADREF+8, RADREF+9, RADREF+11, PRCREFT+7 , PRCREFT+8, PRCREFT+10, MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8 , MAMREF+9, MAMREF+10, MAMREF+11
V	WH+7~, WH+8, WH+9, WH+10, WH+11, WH+14, CPT+7~, CPT+10, CPT+11, CPT+12 , CPT+13, CPT+21, CPT+22, CPT+26, CPTI+7~, MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5 , MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9, MAMREF+10, MAMREF+11
X	WH+7~, CPT+7~, CPT+13, CPT+14, CPTI+7~, CPTREFT+5~, CPTREFT+8, RADREF+5~, RADREF+8, PRCREFT+5~ , PRCREFT+8, MAMREF+1, MAMREF+2, MAMREF+3, MAMREF+4, MAMREF+5, MAMREF+6, MAMREF+7, MAMREF+8, MAMREF+9* , MAMREF+10, MAMREF+11, S~, S+2
Y	WH+7~, CPT+7~, CPTI+7~, CPTREFT+5~, CPTREFT+8, CPTREFT+10, RADREF+5~, RADREF+8, RADREF+11, RADREF+12 , PRCREFT+5~, PRCREFT+8*, PRCREFT+10
Z	CPTREFT+5~, RADREF+5~, PRCREFT+5~

Customize PDF page

Package: Patient Care Component

Routine: APCHSMU2

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 17

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed