Routine: AUPNMAP

Package	Total	Call Graph
VA Fileman	4	FILE^DICN ^DIE ^DIK $$GET1^DIQ
IHS VA Utilities	3	$$VALI^XBDIQ1 ^XBFMK EN^XBNEW
IHS Code Mapping	1	($$HANDED,$$MM,$$PRIMPOV,HANDED,MM,PRIMPOV)^BCQMAPI
Patient Care Component Reports	1	($$ADMSOURC,$$ADMTYPE,$$ADMUB,$$CLINIC,$$PRIMPROV,$$VD)^APCLV
VueCentric Framework	1	($$GETVAR,GETVAR)^CIAVMEVT

Package	Total	Caller Graph
Patient Care Component	2	BJPC2P22 BJPC2PMU
IHS Patient	1	AUPNVSIT

Name	Comments	DBIA/ICR reference
REFMAPN	;
DELGEN	;
REFMAP	;EP - CALLED FROM DD
PRC	;EP - CALLED FROM XREF ON V PROCEDURE NEW STYLE XREF
CPT	;EP - CALLED FROM XREF ON V CPT NEW STYLE XREF
DISCH1	;
RAD1	;
IMM1	;
WHSEEN1	;
EDUC	;EP - CALLED FROM XREF
HF	;EP - CALLED FROM XREF
HANDSM	;EP - CALLED FROM XREF
IFQ	;PEP - CALLED FROM XREF
RAD	;EP - CALLED FROM XREF
MEASQ	;PEP - CALLED FROM XREF
SETPRIM	;EP - SET PRIM SNOMED CODE
CPT1	;
EDUC1	;
EXAM1	;
SCEDIT	;
EXWIPE	;EP - CALLED FROM XREF
EXAM	;EP - CALLED FROM XREF
MEAS1	;
DISCH	;EP
FTF1	;
UPDREV	;EP - CALLED FROM XREF
IMM	;EP - CALLED FROM XREF
MEAS	;PEP - CALLED FROM XREF TO MAP MEAS TO SNOMED/LOINC
UPDREV1	;
FTF	;PEP - get face to face snomeds and store into 28 multiple of VISIT file
PRC1	;
IF	;PEP - CALLED FROM XREF
MAP	;
WHSEEN	;PEP - get where seen called from mod^aupnvsit
SCEDIT1	;
IF1	;
HF1	;
FILEV(F,AUPNDA,N,X)	;stuff snomed codes into multiple field
HANDSM1	;
FILEDISC(F,AUPNDA,X)	;stuff snomed codes into multiple field
EXWIPE1	;EP CALLED FROM XBNEW
REFMAP1	;

Name	Field # of Occurrence
$$ADMSOURC^APCLV	WHSEEN1+8
$$ADMTYPE^APCLV	WHSEEN1+6
$$ADMUB^APCLV	WHSEEN1+7
$$CLINIC^APCLV	WHSEEN1+5, FTF1+5
$$PRIMPROV^APCLV	FTF1+6
$$VD^APCLV	WHSEEN1+13, FTF1+11, MAP+3, DISCH1+12, HANDSM1+6
$$HANDED^BCQMAPI	HANDSM1+6
$$MM^BCQMAPI	WHSEEN1+13, FTF1+11, MAP+3, DISCH1+12
$$PRIMPOV^BCQMAPI	SETPRIM+6
HANDED^BCQMAPI	HANDSM1+4
MM^BCQMAPI	WHSEEN1+12, FTF1+10, MAP+2, DISCH1+11
PRIMPOV^BCQMAPI	SETPRIM+6
$$GETVAR^CIAVMEVT	REFMAP+5
GETVAR^CIAVMEVT	REFMAP+3
FILE^DICN	FILEV+6
^DIE	SETPRIM+9, SETPRIM+13, SETPRIM+18, REFMAP1+5, FILEDISC+5
^DIK	WHSEEN1+2, FTF1+2, DELGEN+7, HANDSM1+2
$$GET1^DIQ	WHSEEN1+4, FTF1+4, EXWIPE1+11, EXWIPE1+13, EXAM+15, EXAM+17, EXAM1+3, EXAM1+4, EXAM1+5, RAD1+3 , UPDREV1+3, IMM1+3, IMM1+4, IMM1+5, HF1+3, EDUC1+3, EDUC1+4, MEAS1+7, MEAS1+8, MEAS1+9 , MEAS1+10, MEAS1+13, DISCH1+8, IF1+6, IF1+10, HANDSM1+5, PRC1+3, PRC1+4, CPT1+3, CPT1+4
$$VALI^XBDIQ1	MAP+3
^XBFMK	FILEV+7
EN^XBNEW	WHSEEN+5, FTF+7, REFMAPN+3, EXWIPE+5, EXWIPE1+16, EXAM+5, EXAM+20, RAD+5, UPDREV+5, IMM+5 , HF+5, EDUC+5, MEAS+5, MEASQ+5, DISCH+3, IF+5, IFQ+5, SCEDIT+3, HANDSM+4, PRC+5 , CPT+5

FileNo	Call Tags
^AUPNVSIT - [#9000010]	GET1^DIQ
9000010.015	GET1^DIQ
^AUPNVPOV - [#9000010.07]	Classic Fileman Calls
^AUPNVXAM - [#9000010.13]	GET1^DIQ
9000010.4413	GET1^DIQ
^AUPNVSTR - [#9000010.63]	GET1^DIQ
^AUPNPREF - [#9000022]	Classic Fileman Calls
^AUTTEDT - [#9999999.09]	GET1^DIQ
^AUTTEXAM - [#9999999.15]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPREF - [#9000022]	REFMAP1+1
^AUPNVIF - [#9000010.44]	IF1+9
^AUPNVIMM("AD"	SCEDIT1+2
^AUPNVINP - [#9000010.02]	DISCH1+12
^AUPNVMSR - [#9000010.01]	MEAS1+12
^AUPNVNOT("AD"	FTF1+7
^AUPNVPOV - [#9000010.07]	SETPRIM+13
^AUPNVPOV("AD"	SETPRIM+2, SETPRIM+8, SETPRIM+12, SETPRIM+16
^AUPNVSIT - [#9000010]	WHSEEN1+1, FTF1+1
^AUPNVSTR - [#9000010.63]	HANDSM1+1
^AUPNVXAM - [#9000010.13]	EXWIPE1+4, EXAM+8
^AUPNVXAM("AD"	EXWIPE1+8, EXAM+12
^AUTTREFR - [#9999999.102]	REFMAP1+5
^AUTTREFR("AM"	REFMAP1+3
^DIC - [#1]	DELGEN+3, FILEV+2

Name	Line Occurrences
DELGEN	EXWIPE1+1, EXAM1+1, RAD1+1, UPDREV1+1, IMM1+1, HF1+1, EDUC1+1, MEAS1+4, IF1+4, PRC1+1 , CPT1+1
FILEDISC	DISCH1+17
FILEV	WHSEEN1+18, FTF1+16, MAP+8, MAP+9, HANDSM1+11
IMM	SCEDIT1+2
MAP	EXAM1+6, RAD1+4, UPDREV1+4, IMM1+6, HF1+5, EDUC1+6, MEAS1+14, IF1+7, IF1+11, PRC1+5 , CPT1+5
REFMAPN	REFMAP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AUPND	EXWIPE1+3~, EXAM+7~
AUPND(	EXWIPE1+7, EXWIPE1+9, EXWIPE1+10, EXAM+11, EXAM+13, EXAM+14
AUPNDA	WHSEEN+1~, WHSEEN+2, WHSEEN1+1, WHSEEN1+2, WHSEEN1+4, WHSEEN1+5, WHSEEN1+6, WHSEEN1+7, WHSEEN1+8, WHSEEN1+10 , WHSEEN1+13, WHSEEN1+18, FTF+3~, FTF+4, FTF1+1, FTF1+2, FTF1+4, FTF1+5, FTF1+6, FTF1+7 , FTF1+11, FTF1+16, SETPRIM+4~, SETPRIM+8, SETPRIM+9, SETPRIM+12, SETPRIM+13, SETPRIM+16, SETPRIM+17, SETPRIM+18 , REFMAP+1~, REFMAPN+1, REFMAP1+1, REFMAP1+5, EXWIPE+1~, EXWIPE+2, EXWIPE1+4, EXWIPE1+7, EXWIPE1+15, EXAM+1~ , EXAM+2, EXAM+8, EXAM+11, EXAM+19, EXAM1+3, EXAM1+4, EXAM1+5, RAD+1~, RAD+2, RAD1+3 , UPDREV+1~, UPDREV+2, UPDREV1+3, IMM+1~, IMM+2, IMM1+3, IMM1+4, HF+1~, HF+2, HF1+3 , EDUC+1~, EDUC+2, EDUC1+3, MEAS+1~, MEAS+2, MEASQ+1~, MEASQ+2, DELGEN+4, DELGEN+7, MEAS1+7 , MEAS1+8, MEAS1+9, MEAS1+10, MEAS1+12, MEAS1+13, MAP+3, MAP+8, MAP+9, FILEV~, FILEV+3 , FILEV+5, DISCH+1~, DISCH+2, DISCH1+4, DISCH1+8, DISCH1+12, DISCH1+17, FILEDISC~, FILEDISC+3, IF+1~ , IF+2, IFQ+1~, IFQ+2, IF1+6, IF1+9, IF1+10, SCEDIT1+2, HANDSM+1~, HANDSM+2, HANDSM1+1 , HANDSM1+2, HANDSM1+5, HANDSM1+6, HANDSM1+11, PRC+1~, PRC+2, PRC1+3, PRC1+4, CPT+1~, CPT+2 , CPT1+3, CPT1+4
AUPNFILE	WHSEEN+1~, WHSEEN+3, FTF+3~, FTF+5, REFMAP+1~, REFMAPN+2, EXWIPE+1~, EXWIPE+3, EXAM+1~, EXAM+3* , EXAM1+3, EXAM1+4, EXAM1+5, RAD+1~, RAD+3, RAD1+3, UPDREV+1~, UPDREV+3, UPDREV1+3, IMM+1~ , IMM+3, IMM1+3, IMM1+4, HF+1~, HF+3, HF1+3, EDUC+1~, EDUC+3, EDUC1+3, MEAS+1~ , MEAS+3, MEASQ+1~, MEASQ+3, DELGEN+3, MEAS1+7, MEAS1+8, MEAS1+9, MEAS1+10, MAP+3, MAP+8 , MAP+9, FILEV+2, DISCH1+5, DISCH1+8, DISCH1+17, FILEDISC+2, IF+1~, IF+3, IFQ+1~, IFQ+3 , IF1+6, HANDSM+1~, HANDSM+3, PRC+1~, PRC+3, PRC1+3, PRC1+4, CPT+1~, CPT+3*, CPT1+3 , CPT1+4
AUPNG	DELGEN+1~, DELGEN+5*, DELGEN+6
AUPNS	SETPRIM+4~, SETPRIM+5, SETPRIM+6, SETPRIM+7*, SETPRIM+13, SETPRIM+18
>> AUPNT	WHSEEN1+17, WHSEEN1+18, FTF1+15, FTF1+16, MAP+7, MAP+8, MAP+9, DISCH1+16, DISCH1+17, HANDSM1+10* , HANDSM1+11
AUPNTF	WHSEEN+1~, WHSEEN+4, WHSEEN1+13, FTF+3~, FTF+6, FTF1+11, REFMAP+1~, EXWIPE+1~, EXWIPE+4, EXAM+1~ , EXAM+4, RAD+1~, RAD+4, UPDREV+1~, UPDREV+4, IMM+1~, IMM+4, HF+1~, HF+4, EDUC+1~ , EDUC+4, MEAS+1~, MEAS+4, MEASQ+1~, MEASQ+4, MAP+3, DISCH1+6, DISCH1+12, IF+1~, IF+4* , IFQ+1~, IFQ+4, IF1+8, HANDSM+1~, PRC+1~, PRC+4, CPT+1~, CPT+4
AUPNV	EXWIPE1+3~, EXWIPE1+4, EXWIPE1+5, EXWIPE1+8, EXAM+7~, EXAM+8, EXAM+9, EXAM+12
AUPNVIEN	SCEDIT+1~, SCEDIT+2*, SCEDIT1+2
>> AUPNVSIT	WHSEEN+2, FTF+4, SETPRIM+2, SETPRIM+8, SETPRIM+12, SETPRIM+16
AUPNX	WHSEEN1+1, WHSEEN1+2, WHSEEN1+16, WHSEEN1+17, WHSEEN1+18, FTF1+1, FTF1+2, FTF1+14, FTF1+15, FTF1+16 , SETPRIM+4~, SETPRIM+11, SETPRIM+13, SETPRIM+14, EXWIPE1+3~, EXWIPE1+6, EXWIPE1+8, EXWIPE1+9, EXWIPE1+10, EXWIPE1+11 , EXWIPE1+15, EXAM+7~, EXAM+10, EXAM+12, EXAM+13, EXAM+14, EXAM+15, EXAM+19, DELGEN+1~, DELGEN+6* , DELGEN+7, MAP+6, MAP+7, MAP+8, MAP+9, DISCH1+15, DISCH1+16, DISCH1+17, HANDSM1+1, HANDSM1+2 , HANDSM1+9, HANDSM1+10, HANDSM1+11
AUPNY	MEAS1+11~, MEAS1+12, MEAS1+13, IF1+9, IF1+10
AUPNZ	EXWIPE1+3~, EXWIPE1+11, EXWIPE1+12, EXWIPE1+13, EXWIPE1+14, EXAM+7~, EXAM+15, EXAM+16, EXAM+17, EXAM+18
>> CODES(	WHSEEN1+16, WHSEEN1+17, WHSEEN1+18, FTF1+14, FTF1+15, FTF1+16, MAP+6, MAP+7, MAP+8, MAP+9 , DISCH1+15, DISCH1+16, DISCH1+17, HANDSM1+9, HANDSM1+10, HANDSM1+11
DA	WHSEEN1+2, FTF1+2, SETPRIM+4~, SETPRIM+9!, SETPRIM+13!, SETPRIM+18!, REFMAPN+1, REFMAP1+5, EXWIPE+2, EXAM+2 , RAD+2, UPDREV+2, IMM+2, HF+2, EDUC+2, MEAS+2, DELGEN+7!, DISCH+2, DISCH1+4, FILEDISC+1~ , FILEDISC+3, IF+2, SCEDIT+2, SCEDIT1+2, HANDSM+2, HANDSM1+2*, PRC+2, CPT+2
DA(1	WHSEEN1+2, FTF1+2, MEASQ+2, DELGEN+7, FILEV+5, IFQ+2, HANDSM1+2*
DIC	FILEV+1~, FILEV+3*
DIC(0	FILEV+4*
DIE	SETPRIM+4~, SETPRIM+9!, SETPRIM+13!, SETPRIM+18!, REFMAP1+5, FILEDISC+1~, FILEDISC+2*
>> DIK	WHSEEN1+2, FTF1+2, DELGEN+4, DELGEN+5, HANDSM1+2
DR	SETPRIM+4~, SETPRIM+9!, SETPRIM+13!, SETPRIM+18!, REFMAP1+5, FILEDISC+1~, FILEDISC+4*
F	FILEV~, FILEDISC~
G	DELGEN+1~, DELGEN+3, DELGEN+4, FILEV+1~, FILEV+2, FILEV+3
>> LK	WHSEEN1+4, WHSEEN1+13, FTF1+4, FTF1+11, EXAM1+3, RAD1+3, UPDREV1+3, IMM1+3, HF1+3, EDUC1+3 , EDUC1+4, MEAS1+7, MEAS1+8, MEAS1+9, MAP+3, DISCH1+8, DISCH1+9, DISCH1+12, IF1+6, IF1+10* , PRC1+3, CPT1+3
N	DELGEN+1~, DELGEN+2*, DELGEN+4, FILEV~, FILEV+3
U	SETPRIM+13, REFMAP1+1, REFMAP1+5, EXWIPE1+4, EXAM+8, DISCH1+12
>> V	REFMAP1+1, REFMAP1+2, REFMAP1+3, REFMAP1+4, REFMAP1+5, IMM1+4, IMM1+5, HANDSM1+5, HANDSM1+6
>> V1	WHSEEN1+3, WHSEEN1+5, WHSEEN1+13, FTF1+3, FTF1+5, FTF1+11, EXAM1+2, EXAM1+4, RAD1+2, UPDREV1+2 , IMM1+2, IMM1+5, HF1+2, EDUC1+2, MEAS1+6, MEAS1+8, MEAS1+9, MAP+3, DISCH1+7, DISCH1+12 , IF1+5, PRC1+2, CPT1+2*
>> V2	WHSEEN1+3, WHSEEN1+6, WHSEEN1+13, FTF1+3, FTF1+6, FTF1+11, EXAM1+2, EXAM1+5, RAD1+2, UPDREV1+2 , IMM1+2, HF1+2, EDUC1+2, MEAS1+6, MEAS1+13, MAP+3, DISCH1+7, DISCH1+12, IF1+5, PRC1+2 , PRC1+4, CPT1+2, CPT1+4*
>> V3	WHSEEN1+3, WHSEEN1+7, WHSEEN1+13, FTF1+3, FTF1+7, FTF1+11, EXAM1+2, RAD1+2, UPDREV1+2, IMM1+2 , HF1+2, EDUC1+2, MEAS1+6, MEAS1+10, MAP+3, DISCH1+7, DISCH1+12, IF1+5, PRC1+2, CPT1+2
>> V4	WHSEEN1+3, WHSEEN1+8, WHSEEN1+13, FTF1+3, FTF1+11, EXAM1+2, RAD1+2, UPDREV1+2, IMM1+2, HF1+2 , EDUC1+2, MEAS1+6, MAP+3, DISCH1+7, DISCH1+12, IF1+5, PRC1+2, CPT1+2
>> V5	WHSEEN1+3, WHSEEN1+9, WHSEEN1+13, FTF1+3, FTF1+8, FTF1+11, EXAM1+2, RAD1+2, UPDREV1+2, IMM1+2 , HF1+2, EDUC1+2, MEAS1+6, MAP+3, DISCH1+7, DISCH1+12, IF1+5, PRC1+2, CPT1+2*
>> V6	WHSEEN1+3, WHSEEN1+10, WHSEEN1+13, FTF1+3, FTF1+11, EXAM1+2, RAD1+2, UPDREV1+2, IMM1+2, HF1+2 , EDUC1+2, MEAS1+6, MAP+3, DISCH1+7, DISCH1+12, IF1+5, PRC1+2, CPT1+2
X	WHSEEN1+13, WHSEEN1+14, FTF1+11, FTF1+12, REFMAP+4~, REFMAP+5, REFMAP+6, MAP+3, MAP+4, FILEV~ , DISCH1+12, DISCH1+13, FILEDISC~, FILEDISC+4, HANDSM1+6, HANDSM1+7

Customize PDF page

Package: IHS Patient

Routine: AUPNMAP

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 3

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(GETVAR^CIAVMEVT	REFMAP+3
$T(HANDED^BCQMAPI	HANDSM1+4
$T(MM^BCQMAPI	WHSEEN1+12, FTF1+10, MAP+2, DISCH1+11
$T(PRIMPOV^BCQMAPI	SETPRIM+6