Routine: AMERPCC1

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

AMERPCC1 ; IHS/OIT/SCR - SUPPORTING ROUTINES FOR PCC VISIT CREATION AND V PROVIDER EDITING ;

Source Information

Source file <AMERPCC1.m>

Call Graph

Call Graph Total: 9

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

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Emergency Room	1	AMERPCC

Entry Points

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)

External References

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

Global Variables Directly Accessed

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

Call Graph Total: 9

Caller Graph Total: 1