Routine: AMERPCC1

Package	Total	Call Graph
Emergency Room	3	DIE^AMEREDIT SYNCHERD^AMERERS ($$VPRVIEN,DELVPRV,VPRVDIE)^AMERVSIT
VA Fileman	3	(H,YMD)^%DTC EN^DDIOL ^DIR
IHS Patient	1	MOD^AUPNVSIT
Patient Care Component	1	EN^APCDALVR
Patient Care Component Reports	1	($$PCCVF,$$PRIMPROV)^APCLV

Package	Total	Caller Graph
Emergency Room	1	AMERPCC

Name	Comments	DBIA/ICR reference
VPRVUPDT	; ; For each ER Provider, check to see if an entry has been made in V PROVIDER ; - If entry has been made: ; -- Compare data and update if needed ; -- Remove this provider from local array of V providers ; - If entry has not been made ; -- add V PROVIDER entry ; For each remaining V PROVIDER in local array ASK if user wants remove entry from V PROVIDER
GETPCCPV(AMERPCC)
SYNCHPRV(AMERDA,AMERPCC,AMERPAT)	; EP from AMERPCC ; INPUT ; AMERDA : IEN OF ER VISIT FILE ; AMERPCC : IEN OF VISIT FILE being broght in synch ; AMERPAT : IEN OF PATIENT FILE for selected ER VISIT
ADDPRV(AMERPCC,AMERPIEN,AMERTIME,AMERDFN,AMERTYPE,AMERSTAT)	; EP FROM AMERPCC ; ADD AN ENTRY TO V PROVIDER ; INPUT: ; AMERPCC - VISIT IEN ; AMERPIEN - PROVIDIER IEN ; AMERTIME - TIME OF PROVIDER ; AMERDFN - PATIENT IEN
PRVTHERE(AMERPRVD,AMERPCC)

Name	Field # of Occurrence
H^%DTC	SYNCHPRV+30
YMD^%DTC	SYNCHPRV+31
DIE^AMEREDIT	VPRVUPDT+32
SYNCHERD^AMERERS	VPRVUPDT+79
$$VPRVIEN^AMERVSIT	SYNCHPRV+23
DELVPRV^AMERVSIT	VPRVUPDT+89, VPRVUPDT+126
VPRVDIE^AMERVSIT	VPRVUPDT+54
EN^APCDALVR	ADDPRV+21
$$PCCVF^APCLV	SYNCHPRV+11, PRVTHERE+7, GETPCCPV+8
$$PRIMPROV^APCLV	VPRVUPDT+61, VPRVUPDT+113
MOD^AUPNVSIT	ADDPRV+22
EN^DDIOL	VPRVUPDT+21, VPRVUPDT+22, VPRVUPDT+23, VPRVUPDT+68, VPRVUPDT+69, VPRVUPDT+70, VPRVUPDT+92, VPRVUPDT+93, VPRVUPDT+103, VPRVUPDT+104 , VPRVUPDT+106, VPRVUPDT+107, VPRVUPDT+118, VPRVUPDT+119, VPRVUPDT+127
^DIR	VPRVUPDT+26, VPRVUPDT+73, VPRVUPDT+122

Name	Line Occurrences (* Changed, ! Killed)
^AMERVSIT - [#9009080]	SYNCHPRV+29, SYNCHPRV+34, SYNCHPRV+37, SYNCHPRV+42, SYNCHPRV+43, SYNCHPRV+49, SYNCHPRV+50, SYNCHPRV+59, SYNCHPRV+61, SYNCHPRV+65 , SYNCHPRV+68, SYNCHPRV+69
^AUPNVSIT - [#9000010]	SYNCHPRV+20, SYNCHPRV+21
^VA(200 - [#200]	VPRVUPDT+64, VPRVUPDT+66

Name	Line Occurrences
$$ADDPRV	VPRVUPDT+92, VPRVUPDT+103, VPRVUPDT+106
VPRVUPDT	SYNCHPRV+73

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %H	SYNCHPRV+31
>> AMERANS	VPRVUPDT+27, VPRVUPDT+28, VPRVUPDT+35, VPRVUPDT+62, VPRVUPDT+74, VPRVUPDT+75, VPRVUPDT+77, VPRVUPDT+84, VPRVUPDT+123*
AMERCHCK	PRVTHERE+4~, PRVTHERE+9, PRVTHERE+13, PRVTHERE+14, PRVTHERE+17
AMERCNT	SYNCHPRV+6~, SYNCHPRV+61*, SYNCHPRV+68, SYNCHPRV+69, SYNCHPRV+70
AMERCNUM	SYNCHPRV+6~, SYNCHPRV+60, SYNCHPRV+61, SYNCHPRV+65, SYNCHPRV+68, SYNCHPRV+69
AMERDA	SYNCHPRV~, SYNCHPRV+29, SYNCHPRV+34, SYNCHPRV+37, SYNCHPRV+42, SYNCHPRV+43, SYNCHPRV+49, SYNCHPRV+50, SYNCHPRV+59, SYNCHPRV+61 , SYNCHPRV+65, SYNCHPRV+68, SYNCHPRV+69, VPRVUPDT+32, VPRVUPDT+79
AMERDFN	ADDPRV~, ADDPRV+10, ADDPRV+14
AMERDONE	PRVTHERE+4~, PRVTHERE+9, PRVTHERE+10, PRVTHERE+11, PRVTHERE+14*
AMERDR	VPRVUPDT+8~, VPRVUPDT+31*, VPRVUPDT+32
AMEREINT	VPRVUPDT+8~, VPRVUPDT+65*, VPRVUPDT+66
AMERENAM	VPRVUPDT+8~, VPRVUPDT+66*, VPRVUPDT+70
AMERERR	PRVTHERE+4~, PRVTHERE+7, PRVTHERE+8, GETPCCPV+8
AMERETIM	SYNCHPRV+5~
AMERETIM(	SYNCHPRV+69*, VPRVUPDT+92, VPRVUPDT+103, VPRVUPDT+106
AMERETIM(1	SYNCHPRV+35*
AMERETIM(2	SYNCHPRV+38, SYNCHPRV+40
AMERETIM(3	SYNCHPRV+43*
AMERETIM(4	SYNCHPRV+50*
AMEREVAL	SYNCHPRV+5~
AMEREVAL(	SYNCHPRV+68*, SYNCHPRV+70, VPRVUPDT+11, VPRVUPDT+14, VPRVUPDT+16, VPRVUPDT+65, VPRVUPDT+92, VPRVUPDT+100, VPRVUPDT+103, VPRVUPDT+106
AMEREVAL(1	SYNCHPRV+34, SYNCHPRV+36, SYNCHPRV+40, SYNCHPRV+45, SYNCHPRV+52, VPRVUPDT+33, VPRVUPDT+80*, VPRVUPDT+117
AMEREVAL(2	SYNCHPRV+37, SYNCHPRV+40, SYNCHPRV+41, SYNCHPRV+48, SYNCHPRV+54, VPRVUPDT+23, VPRVUPDT+117
AMEREVAL(3	SYNCHPRV+42, SYNCHPRV+45, SYNCHPRV+46, SYNCHPRV+48*, SYNCHPRV+56, VPRVUPDT+117
AMEREVAL(4	SYNCHPRV+49, SYNCHPRV+52, SYNCHPRV+54, SYNCHPRV+56, SYNCHPRV+57, VPRVUPDT+117
AMERFND	SYNCHPRV+5~, SYNCHPRV+63, SYNCHPRV+64, SYNCHPRV+65, SYNCHPRV+67, VPRVUPDT+8~, VPRVUPDT+9, VPRVUPDT+13, VPRVUPDT+17, VPRVUPDT+59 , VPRVUPDT+98, VPRVUPDT+100*, VPRVUPDT+102
>> AMERI	SYNCHPRV+64*
>> AMERIEN	PRVTHERE+12*, PRVTHERE+13
AMERINDX	PRVTHERE+4~, PRVTHERE+9, PRVTHERE+10, PRVTHERE+11, PRVTHERE+12, GETPCCPV+5~, GETPCCPV+9, GETPCCPV+10, GETPCCPV+11
AMERLIST	SYNCHPRV+6~, SYNCHPRV+10, SYNCHPRV+36, SYNCHPRV+41, SYNCHPRV+46, SYNCHPRV+57, SYNCHPRV+64, SYNCHPRV+70
>> AMERNEW	VPRVUPDT+30*, VPRVUPDT+31, VPRVUPDT+33
AMERPAT	SYNCHPRV~, VPRVUPDT+92, VPRVUPDT+103, VPRVUPDT+106
AMERPCC	SYNCHPRV~, SYNCHPRV+11, SYNCHPRV+20, SYNCHPRV+21, SYNCHPRV+23, VPRVUPDT+61, VPRVUPDT+79, VPRVUPDT+92, VPRVUPDT+103, VPRVUPDT+106 , VPRVUPDT+113, ADDPRV~, ADDPRV+8, ADDPRV+15, PRVTHERE~, PRVTHERE+6, PRVTHERE+7, GETPCCPV~, GETPCCPV+8
AMERPIEN	ADDPRV~, ADDPRV+9, ADDPRV+12
AMERPROV	SYNCHPRV+6~, SYNCHPRV+64, SYNCHPRV+65, VPRVUPDT+8~, VPRVUPDT+9, VPRVUPDT+11*, VPRVUPDT+14, VPRVUPDT+16, VPRVUPDT+19, VPRVUPDT+43 , VPRVUPDT+60, VPRVUPDT+65, VPRVUPDT+92, VPRVUPDT+96, VPRVUPDT+100, VPRVUPDT+103, VPRVUPDT+105, VPRVUPDT+106
AMERPRVD	PRVTHERE~, PRVTHERE+13
AMERPRVS	GETPCCPV+5~, GETPCCPV+6, GETPCCPV+11, GETPCCPV+14
AMERSTAT	ADDPRV~, ADDPRV+17
AMERTIME	SYNCHPRV+6~, SYNCHPRV+32*, SYNCHPRV+35, SYNCHPRV+38, VPRVUPDT+49, VPRVUPDT+51, ADDPRV~, ADDPRV+16
AMERTYPE	ADDPRV~, ADDPRV+11*, ADDPRV+19
AMERVDR	VPRVUPDT+8~, VPRVUPDT+10, VPRVUPDT+36, VPRVUPDT+37, VPRVUPDT+44, VPRVUPDT+45, VPRVUPDT+50, VPRVUPDT+51, VPRVUPDT+54, VPRVUPDT+56
AMERVERR	SYNCHPRV+5~, SYNCHPRV+11*
AMERVIEN	SYNCHPRV+6~, SYNCHPRV+17, SYNCHPRV+23, SYNCHPRV+24, VPRVUPDT+8~, VPRVUPDT+10, VPRVUPDT+38, VPRVUPDT+46, VPRVUPDT+52, VPRVUPDT+54 , VPRVUPDT+56, VPRVUPDT+88, VPRVUPDT+89, VPRVUPDT+125*, VPRVUPDT+126
AMERVINT	VPRVUPDT+8~, VPRVUPDT+61, VPRVUPDT+64, VPRVUPDT+67, VPRVUPDT+80, VPRVUPDT+82, VPRVUPDT+86, VPRVUPDT+87, VPRVUPDT+113
AMERVNAM	VPRVUPDT+8~, VPRVUPDT+63, VPRVUPDT+64, VPRVUPDT+69
AMERVPRV	SYNCHPRV+5~, SYNCHPRV+17, SYNCHPRV+18, SYNCHPRV+20, SYNCHPRV+21, SYNCHPRV+23, SYNCHPRV+24, VPRVUPDT+8~, VPRVUPDT+9, VPRVUPDT+15 , VPRVUPDT+16, VPRVUPDT+19, VPRVUPDT+22, VPRVUPDT+30, VPRVUPDT+38, VPRVUPDT+42, VPRVUPDT+46, VPRVUPDT+49, VPRVUPDT+52, VPRVUPDT+55 , VPRVUPDT+81, VPRVUPDT+82, VPRVUPDT+86, VPRVUPDT+87, VPRVUPDT+88, VPRVUPDT+99, VPRVUPDT+100, VPRVUPDT+114*, VPRVUPDT+117, VPRVUPDT+119 , VPRVUPDT+125
APCDAFLE	ADDPRV+7!, ADDPRV+23!
APCDAFLE("APCDAFLE"	ADDPRV+13*
APCDALVR	ADDPRV+7!
APCDALVR("APCDATMP"	ADDPRV+20*
APCDALVR("APCDPAT"	ADDPRV+14*
APCDALVR("APCDTCDT"	ADDPRV+16*
APCDALVR("APCDTOA"	ADDPRV+17, ADDPRV+18
APCDALVR("APCDTPRO"	ADDPRV+12*
APCDALVR("APCDTPS"	ADDPRV+19*
APCDALVR("APCDVSIT"	ADDPRV+15*
APCDATMP	ADDPRV+23!
APCDLVR	ADDPRV+23!
APCDPAT	ADDPRV+23!
APCDTCDT	ADDPRV+23!
APCDTOA	ADDPRV+23!
APCDTPRO	ADDPRV+23!
APCDTPS	ADDPRV+23!
APCDVSIT	ADDPRV+23!
APCLV	SYNCHPRV+9!, SYNCHPRV+74!, PRVTHERE+5!, PRVTHERE+16!, GETPCCPV+7!, GETPCCPV+13!
APCLV(	SYNCHPRV+18, SYNCHPRV+20, SYNCHPRV+21, SYNCHPRV+23, SYNCHPRV+24*, VPRVUPDT+15, VPRVUPDT+16, VPRVUPDT+19, VPRVUPDT+22, VPRVUPDT+30 , VPRVUPDT+38, VPRVUPDT+42, VPRVUPDT+46, VPRVUPDT+49, VPRVUPDT+52, VPRVUPDT+55!, VPRVUPDT+82!, VPRVUPDT+86, VPRVUPDT+87, VPRVUPDT+88 , VPRVUPDT+99, VPRVUPDT+100, VPRVUPDT+114, VPRVUPDT+117, VPRVUPDT+119, VPRVUPDT+125, PRVTHERE+10, PRVTHERE+12, GETPCCPV+10, GETPCCPV+11
DIR	VPRVUPDT+26!, VPRVUPDT+73!, VPRVUPDT+122!
DIR("A"	VPRVUPDT+25, VPRVUPDT+72, VPRVUPDT+121*
DIR(0	VPRVUPDT+24, VPRVUPDT+71, VPRVUPDT+120*
U	SYNCHPRV+20, SYNCHPRV+21, SYNCHPRV+23, SYNCHPRV+24, SYNCHPRV+29, SYNCHPRV+34, SYNCHPRV+37, SYNCHPRV+42, SYNCHPRV+43, SYNCHPRV+49 , SYNCHPRV+50, SYNCHPRV+64, SYNCHPRV+65, SYNCHPRV+68, SYNCHPRV+69, VPRVUPDT+16, VPRVUPDT+19, VPRVUPDT+22, VPRVUPDT+30, VPRVUPDT+38 , VPRVUPDT+42, VPRVUPDT+46, VPRVUPDT+49, VPRVUPDT+52, VPRVUPDT+87, VPRVUPDT+88, VPRVUPDT+119, VPRVUPDT+125
>> X	SYNCHPRV+29*, SYNCHPRV+32
>> Y	VPRVUPDT+27, VPRVUPDT+28, VPRVUPDT+74, VPRVUPDT+75, VPRVUPDT+123, VPRVUPDT+124

Customize PDF page

Package: Emergency Room

Routine: AMERPCC1

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: