Routine: RMPRPS35

Package	Total	Call Graph
Prosthetics	1	CONV35^RMPRPS36
VA FileMan	1	(FILE,UPDATE)^DIE

Package	Total	Caller Graph
Prosthetics	2	RMPRPS34 RMPRPS36

Entry Points

Name	Comments	DBIA/ICR reference
HCPCD(RMPRHPF,RMPRHPT)	;
HCPCDP
HCPCDX
ITEM(RMPRHPO,RMPRHPN)	;
ITEMX
PATCH58
PAT76	; Set up array and replace HCPCS
CFLG	;remove calculation flag.
FLG	;REMOVE calculation flag of the ff HCPCS:

External References

Name	Field # of Occurrence
FILE^DIE	HCPCD+22, HCPCD+39, HCPCD+60, HCPCD+76, HCPCD+86, HCPCDP+5, HCPCDP+15, HCPCDP+21, ITEM+49, ITEM+54 , ITEM+62, ITEM+74
UPDATE^DIE	ITEM+28
CONV35^RMPRPS36	PAT76+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Repointing specified duplicate HCPCS...",! Line Location: PATCH58+2
Function Call: WRITE	Prompt: !!,"Repointing complete.",! Line Location: PATCH58+6
Function Call: WRITE	Prompt: !!,"Replacing the following HCPCS...",! Line Location: PAT76+3
Function Call: WRITE	Prompt: !!,"HCPCS replacement complete.",! Line Location: PAT76+19
Function Call: WRITE	Prompt: !!,"Removing the Calculation flag.....",! Line Location: CFLG+1
Function Call: WRITE	Prompt: !!,"Done Removing Calculation flag!!!",! Line Location: CFLG+4
Routine Call	DIE Line Location: HCPCD+22 HCPCD+39 HCPCD+60 HCPCD+76 HCPCD+86 HCPCDP+5 HCPCDP+15 HCPCDP+21 ITEM+49 ITEM+54 ITEM+62 ITEM+74
Routine Call	DIE Line Location: ITEM+28

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RMPO(665.72 - [#665.72]	HCPCD+27, HCPCD+29, HCPCD+31, HCPCD+32, HCPCD+34, HCPCD+35
^RMPR(660 - [#660]	HCPCD+6, HCPCD+9, HCPCD+10
^RMPR(661.1 - [#661.1]	ITEM+4, ITEM+5, ITEM+9, ITEM+15, ITEM+17, ITEM+23, ITEM+26, CFLG+3*
^RMPR(661.2 - [#661.2]	HCPCDP+1, ITEM+7, ITEM+67, ITEM+68, ITEM+69
^RMPR(661.3 - [#661.3]	HCPCDP+8, HCPCDP+10, HCPCDP+11, ITEM+33, ITEM+35, ITEM+37, ITEM+38
^RMPR(661.6 - [#661.6]	PAT76+10
^RMPR(661.7 - [#661.7]	PAT76+10
^RMPR(661.9 - [#661.9]	PAT76+10
^RMPR(664 - [#664]	HCPCD+69, HCPCD+71, HCPCD+72
^RMPR(664.1 - [#664.1]	HCPCD+53, HCPCD+55, HCPCD+56
^RMPR(665 - [#665]	HCPCD+14, HCPCD+15, HCPCD+17, HCPCD+18
^TMP($J	ITEM+3!, ITEM+27*, ITEM+41, ITEM+42

Label References

Name	Line Occurrences
HCPCD	PATCH58+4
ITEMX	ITEM+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	HCPCD+2~, ITEM+1~
DIE	ITEM+18!
IO("Q"	PATCH58+1, PATCH58+5, PAT76+2, PAT76+18
>> RMFLG61	PAT76+9, PAT76+10
>> RMHCIT	HCPCD+10, HCPCD+85, ITEM+69, ITEM+73
RML	ITEM+2~, ITEM+12, ITEM+21, ITEM+22
RMPR641P	HCPCD+2~, HCPCD+52, HCPCD+53, HCPCD+55, HCPCD+56, HCPCD+57
RMPR64P	HCPCD+2~, HCPCD+68, HCPCD+69, HCPCD+71, HCPCD+72, HCPCD+74
RMPR65P	HCPCD+1~, HCPCD+9*, HCPCD+11, HCPCD+14, HCPCD+15, HCPCD+17, HCPCD+18, HCPCD+19, HCPCD+48, HCPCD+64
RMPRA	PATCH58~
RMPRFDA	HCPCD+1~, HCPCD+20!, HCPCD+37!, HCPCD+58!, HCPCD+73!, HCPCD+82!, HCPCDP+2!, HCPCDP+12!, HCPCDP+18!, ITEM+1~ , ITEM+18!, ITEM+47!, ITEM+52!, ITEM+59!, ITEM+70!
RMPRFDA(	HCPCD+21, HCPCD+38, HCPCD+59, HCPCD+75, HCPCDP+4, HCPCDP+14, HCPCDP+20, ITEM+23, ITEM+24, ITEM+26 , ITEM+48, ITEM+53, ITEM+61, ITEM+72, ITEM+73
RMPRFDA(660	HCPCD+84, HCPCD+85
RMPRFME	HCPCD+1~, HCPCD+20!, HCPCD+37!, HCPCD+58!, HCPCD+73!, HCPCD+82!, HCPCDP+2!, HCPCDP+12!, HCPCDP+18!, ITEM+1~ , ITEM+18!, ITEM+47!, ITEM+52!, ITEM+59!, ITEM+70!
RMPRHPF	HCPCD~, HCPCD+6, HCPCD+18, HCPCD+35, HCPCD+56, HCPCD+72, HCPCDP+1, HCPCDP+11, HCPCDP+19
RMPRHPN	ITEM~, ITEM+5, ITEM+44, ITEM+73
RMPRHPNI	ITEM+1~, ITEM+5*, ITEM+6, ITEM+7, ITEM+15, ITEM+22, ITEM+26, ITEM+53, ITEM+60, ITEM+72
RMPRHPO	ITEM~, ITEM+4
RMPRHPOI	ITEM+1~, ITEM+4*, ITEM+6, ITEM+9, ITEM+17, ITEM+23, ITEM+33, ITEM+35, ITEM+67
RMPRHPT	HCPCD~, HCPCD+21, HCPCD+38, HCPCD+59, HCPCD+75, HCPCD+84, HCPCD+85, HCPCDP+4, HCPCDP+14
RMPRI	HCPCD+1~, HCPCD+5, HCPCD+6, HCPCD+9, HCPCD+10, HCPCD+83, HCPCDP, HCPCDP+1, HCPCDP+3, HCPCDP+7* , HCPCDP+8, HCPCDP+10, HCPCDP+11, HCPCDP+13, ITEM+66, ITEM+67, ITEM+68, ITEM+69, ITEM+71, PATCH58~ , CFLG+2
RMPRIEN	HCPCD+1~, HCPCD+19, HCPCD+21, HCPCD+36, HCPCD+38, HCPCD+57, HCPCD+59, HCPCD+74, HCPCD+75, HCPCD+83* , HCPCD+84, HCPCD+85, HCPCDP+3, HCPCDP+4, HCPCDP+13, HCPCDP+14, HCPCDP+19, HCPCDP+20, ITEM+1~, ITEM+22 , ITEM+23, ITEM+24, ITEM+26, ITEM+46, ITEM+48, ITEM+51, ITEM+53, ITEM+60, ITEM+61, ITEM+71 , ITEM+72, ITEM+73
RMPRIENA	ITEM+1~, ITEM+16, ITEM+19, ITEM+20*, ITEM+27
RMPRIFLG	ITEM+2~, ITEM+8, ITEM+9, ITEM+55*, ITEM+58
RMPRIN	ITEM+2~, ITEM+42*, ITEM+43, ITEM+45
RMPRIO	ITEM+2~, ITEM+40*, ITEM+41, ITEM+42
RMPRITEM	ITEM+2~, ITEM+39, ITEM+40, ITEM+44, ITEM+45*, ITEM+48
RMPRJ	HCPCD+1~, HCPCD+16, HCPCD+17, HCPCD+18, HCPCD+19, HCPCD+54, HCPCD+55, HCPCD+56, HCPCD+57, HCPCD+70* , HCPCD+71, HCPCD+72, HCPCD+74, HCPCDP+9, HCPCDP+10, HCPCDP+11, HCPCDP+13, ITEM+1~, ITEM+14, ITEM+17* , ITEM+19, ITEM+23, ITEM+27, ITEM+32, ITEM+33, ITEM+35, ITEM+37, ITEM+38, ITEM+46, ITEM+51
RMPRK	ITEM+1~, ITEM+34, ITEM+35, ITEM+37, ITEM+38, ITEM+46, ITEM+51
RMPRL	ITEM+2~, ITEM+36, ITEM+37, ITEM+38, ITEM+46
>> RMPRN	ITEM+14, ITEM+15, ITEM+16, ITEM+19, ITEM+20
RMPRO1	HCPCD+2~, HCPCD+26, HCPCD+27, HCPCD+29, HCPCD+31, HCPCD+32, HCPCD+34, HCPCD+35, HCPCD+36
RMPRO2	HCPCD+2~, HCPCD+28, HCPCD+29, HCPCD+31, HCPCD+32, HCPCD+34, HCPCD+35, HCPCD+36
RMPRO3	HCPCD+2~, HCPCD+30, HCPCD+31, HCPCD+32, HCPCD+34, HCPCD+35, HCPCD+36
RMPRO4	HCPCD+2~, HCPCD+33, HCPCD+34, HCPCD+35, HCPCD+36
RMPRPTP	HCPCD+1~, HCPCD+15, HCPCD+32, HCPCD+34, HCPCD+35, HCPCD+36, HCPCD+48, HCPCD+49, HCPCD+53, HCPCD+64* , HCPCD+65, HCPCD+69
RMPRS	HCPCD+1~, ITEM+2~, ITEM+38*, ITEM+39
>> RMPRY	CFLG+2*, CFLG+3
U	ITEM+15, ITEM+69, PAT76+1*, CFLG+3
X	HCPCD+2~, ITEM+1~
Y	HCPCD+2~, ITEM+1~

Marked Items

Name	Field # of Occurrence
$T(FLG+RMPRI	CFLG+2

Customize PDF page

Package: Prosthetics

Routine: RMPRPS35

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items