Routine: RMPRN7

Package	Total	Call Graph
Prosthetics	9	(DATA,FMT,MAIL)^RMPRN6XM CAL^RMPRN7 (CODE,DESP,DESPR)^RMPRN73 DESP^RMPRN7PL ^RMPRN7PR ^RMPRN7PT DISP^RMPRN7S ^RMPRN7UT DIV4^RMPRSIT
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD KILL^XUSCLEAN
VA FileMan	3	(,DD)^%DT ^DIE ^DIR

Package	Total	Caller Graph
Prosthetics	3	RMPR NPPDL PRL L RMPR NPPDL PRT RMPRN7

Name	Comments	DBIA/ICR reference
DATE
DET	;select detail or brief
DEV	;device
PRT	;print
ENL	;entry point for one line
GNP	;gather nppd data
GNPC	;worksheet/detail
EXIT	;commom exit point
GNPCC	;one line only
PRTL	;print one line entry from taskman
SET	;set temp global
LOOP	;sort on hcpcs key and grouper is complete
CAL	;loop through grouper key sort
GROUP	;total grouper to main key
SORT	;main data for worksheets
REP	;calculate repair cost
NEW	;calculate new costs

Name	Field # of Occurrence
^%DT	DATE, DATE+2
DD^%DT	GNPCC+6
^%ZIS	DEV+1, GNPCC+7
^%ZISC	EXIT+2
^%ZTLOAD	DEV+4, GNPCC+10
^DIE	GNP+31, GNP+44
^DIR	DET+4
DATA^RMPRN6XM	GNP+35, GNP+48
FMT^RMPRN6XM	GNP+56
MAIL^RMPRN6XM	GNP+56
CAL^RMPRN7	GNPC+2, PRTL+3
CODE^RMPRN73	GNPCC+2, CAL+2
DESP^RMPRN73	GNPC+9
DESPR^RMPRN73	GNPC+10
DESP^RMPRN7PL	PRTL+6
^RMPRN7PR	GNPC+6
^RMPRN7PT	GNPC+4
DISP^RMPRN7S	DET+1
^RMPRN7UT	GNPCC+3
DIV4^RMPRSIT	RMPRN7+2, ENL+1
KILL^XUSCLEAN	EXIT+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$C(7),"ENDING DATE RANGE IS LESS THAN BEGINNING DATE RANGE",! Line Location: DATE+3
Routine Call	DIE Line Location: GNP+31 GNP+44
Routine Call	DIR Line Location: DET+4
Routine Call	%ZIS Line Location: DEV+1 GNPCC+7

FileNo	Call Tags
^RMPR(660 - [#660]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SET+3
^RMPR(660 - [#660]	GNP+4, GNP+6, GNP+8, GNP+16, GNP+17, GNP+19, GNP+30, GNP+31, GNP+43, GNP+44 , GNP+53, SET+3, GROUP+11, GROUP+17, GROUP+19, GROUP+24, GROUP+26, SORT+1, SORT+3, SORT+5 , SORT+6, SORT+10, SORT+12
^RMPR(661.1 - [#661.1]	GNP+23, GNP+27, GNP+36, GNP+40, GNP+51
^TMP($J	GNP+3!, GNP+33, GNP+34, GNP+46, GNP+47, EXIT+1!, SET+2, SET+4, CAL+4, CAL+6 , CAL+11, CAL+13, GROUP+1, GROUP+25, SORT+14, REP+7, REP+8, REP+9, REP+11, REP+12* , REP+13, REP+14, REP+15, REP+16, REP+17, REP+18, REP+19, REP+20, NEW+6, NEW+7 , NEW+8, NEW+9, NEW+10, NEW+11, NEW+12, NEW+13, NEW+14, NEW+15, NEW+16, NEW+17 , NEW+18*

Name	Line Occurrences
DATE	DATE+3, ENL+3
EXIT	RMPRN7+2, DATE, DATE+2, DEV+1, DEV+4, ENL+1, ENL+4, ENL+7, GNPC+5, GNPC+7 , GNPC+8, GNPCC+4, GNPCC+7, GNPCC+10
GNP	PRT+2, PRTL+2
GNPC	PRT+2
GNPCC	ENL+7
GROUP	CAL+8
NEW	GROUP+30, SORT+16
PRT	DEV+1
PRTL	GNPCC+7
REP	GROUP+29, SORT+15
SET	GNP+55
SORT	CAL+14

Name	Field # of Occurrence
^(	REP+19, NEW+17
^("AM"	GNP+53, GROUP+26, SORT+5
^("AMS"	GNP+53, GROUP+26, SORT+5
^(0	GNP+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	DATE, DATE+2
>> %DT("A"	DATE, DATE+2
>> %ZIS	DEV+1, GNPCC+7
>> B	GNP+35, GNP+48
>> B1	GROUP+28, SORT+13
BC	GROUP+1*, GROUP+14!
BC(	GROUP+4, GROUP+7, GROUP+10
BC(1	GROUP+13
>> BCOST	GROUP+11*, GROUP+12
>> BF	GROUP+2, GROUP+4, GROUP+7, GROUP+10, GROUP+13
>> BL	GROUP+6, GROUP+7, GROUP+10
>> BR	GROUP+8, GROUP+10, GROUP+11, GROUP+13
>> BRA(	GNPCC+5
>> BTCOST	GROUP+2, GROUP+12, GROUP+20
>> CATEGRY	GNP+53, GROUP+26, SORT+5*, REP+12, REP+13, REP+14, REP+15, NEW+10, NEW+11, NEW+12 , NEW+13
>> CC	LOOP+3*
>> CM	LOOP+3*
>> CODE	PRTL+5, LOOP+2, LOOP+3, CAL+10, CAL+11, CAL+13, GROUP+13, GROUP+25, SORT+14, REP+5 , NEW+5
>> COST	GROUP+20, GROUP+25, SORT+6, SORT+14, REP+11, REP+19, NEW+9, NEW+17
>> COUNT	LOOP+2*
DA	GNP+29, GNP+32!, GNP+42, GNP+45!
>> DATE	GNP+2, GNP+4, GNP+6, LOOP+2, LOOP+4
>> DATE(1	DATE+1*, DATE+3, ENL+4, GNP+2, GNPCC+6, LOOP+4
>> DATE(2	DATE+2*, DATE+3, ENL+4, GNP+4, GNPCC+6
>> DATE(3	GNPCC+6*
>> DATE(4	GNPCC+6*
DIE	GNP+29, GNP+32!, GNP+42, GNP+45!
DIR	DET+2!
DIR("A"	DET+4*
DIR("B"	DET+4*
DIR(0	DET+3*
>> DIRUT	DET+5, GNPCC+4
>> DIS	LOOP+3*
DR	GNP+29, GNP+32!, GNP+42, GNP+45!
>> DTOUT	DATE, DATE+2, DET+5, GNPCC+4
>> ERR	GNP+26, GNP+30, GNP+31, GNP+33, GNP+39, GNP+43, GNP+44, GNP+46
>> FL	GNPC+3, GNPC+5, GNPC+7, PRTL+4
>> FLAG	GNP+51, GNP+52, SET+2
>> FLG	CAL+5, CAL+6, CAL+8, CAL+11, CAL+13
>> FM	LOOP+3*
>> FORM	SORT+10*
>> GN	GNP+53, GNP+54, SET+2, CAL+3, CAL+4, CAL+6, CAL+11, CAL+13, GROUP+1, GROUP+26 , SORT+5*
IO	PRT+1, PRTL+1
IO("Q"	DEV+2, PRT+1, GNPCC+8, PRTL+1
IOM	GNP+1
ION	DEV+2, GNPCC+8
IOP	DEV+1!, GNPCC+7!
IOST	DEV+1, GNPCC+7
>> LEG	LOOP+3*
LINE	GNP+17, GNP+19, GNP+22!, GNP+23, GNP+24, GNP+27, GNP+36, GNP+37, GNP+40, SET+2 , REP+5, REP+6, REP+7, REP+8, REP+9, REP+11, REP+12, REP+13, REP+14, REP+15 , REP+16, REP+17, REP+18, REP+19, REP+20, NEW+5, NEW+6, NEW+7, NEW+8, NEW+9 , NEW+10, NEW+11, NEW+12, NEW+13, NEW+14, NEW+15, NEW+16, NEW+17, NEW+18
>> LN	GNP+1*
>> MR	GNP+16, GNP+17, GNP+19*, GNP+20, GNP+23, GNP+27, GNP+36, GNP+40, GNP+51
>> PAGE	GNPC+3, PRTL+4
>> POP	DEV+1, GNPCC+7
>> QTY	GROUP+24, SORT+12, REP+6*, REP+8, REP+9, NEW+7, NEW+8
>> RD	CAL+12, CAL+13, SORT+1, SORT+3, SORT+5, SORT+6, SORT+10, SORT+12, SORT+13, SORT+14
>> REC	GNP+8*, GNP+9, GNP+10, GNP+13, GNP+14
>> RMPR("NAME"	GNPC+1, GNPCC+1, SET+1, CAL+1
>> RMPR("STA"	GNP+10
>> RMPR21	LOOP+3*
>> RMPRAA	LOOP+3*
>> RMPRAD	LOOP+2*
>> RMPRB	GNP+5, GNP+6, GNP+8, GNP+16, GNP+17, GNP+19, GNP+29, GNP+30, GNP+31, GNP+33 , GNP+34, GNP+35, GNP+42, GNP+43, GNP+44, GNP+46, GNP+47, GNP+48, GNP+53, SET+2 , SET+3, LOOP+2, LOOP+3, LOOP+4*
>> RMPRC	LOOP+3*
>> RMPRCDE	DATE+4, ENL+2, GNPCC+5, PRTL+5
>> RMPRCT	LOOP+3*
>> RMPRCT1	LOOP+3*
>> RMPRDET	DET+6, ENL+6, GNPC+8, CAL+6, CAL+8
>> RMPRFG	LOOP+2*
>> RMPRI	LOOP+2*
>> RMPRN	LOOP+3*
>> RMPRNI	LOOP+3*
>> RMPRNO	LOOP+3*
>> RMPRNW	LOOP+2*
>> RMPROTH	LOOP+3*
>> RMPRPHC	LOOP+3*
>> RMPRPSC	LOOP+3*
>> RMPRRPR	LOOP+2*
>> RMPRSL	LOOP+3*
>> RMPRT	LOOP+2*
RMSSN	SET+3*, SET+4, SET+5!
>> SI	LOOP+3*
>> SO	LOOP+3*
>> SOURCE	GROUP+19, SORT+3, SORT+4, REP+6, REP+8, REP+9, NEW+7, NEW+8
>> SPEC	GNP+53, GROUP+26, SORT+5*, REP+16, REP+17, REP+18, REP+19, NEW+14, NEW+15, NEW+16 , NEW+17
>> SRD	GROUP+2, GROUP+13, GROUP+15, GROUP+17, GROUP+19, GROUP+24, GROUP+25, GROUP+26, GROUP+28
>> STN	GNPC+1, GNPCC+1, SET+1, SET+2, CAL+1, CAL+4, CAL+6, CAL+11, CAL+13, GROUP+1 , REP+7, REP+8, REP+9, REP+11, REP+12, REP+13, REP+14, REP+15, REP+16, REP+17 , REP+18, REP+19, REP+20, NEW+6, NEW+7, NEW+8, NEW+9, NEW+10, NEW+11, NEW+12 , NEW+13, NEW+14, NEW+15, NEW+16, NEW+17, NEW+18
>> T1	LOOP+2*
>> TAM	LOOP+2*
>> TQTY	LOOP+3*
>> TT	LOOP+3*
>> TY	GNP+15, GNP+17, GNP+19, GNP+23, GNP+24, GNP+36, GNP+37, GROUP+18, GROUP+29, GROUP+30 , SORT+2*, SORT+15, SORT+16
>> TYPE	GNP+14, GNP+15, GNP+25, GNP+28, GNP+38, GNP+41, GROUP+17, GROUP+18, SORT+1*, SORT+2 , REP+20, NEW+18
U	DATE, DATE+2, GNP+9, GNP+10, GNP+13, GNP+14, GNP+16, GNP+17, GNP+19, GNP+23 , GNP+27, GNP+36, GNP+40, GNP+51, GNP+53, SET+3, GROUP+11, GROUP+17, GROUP+19, GROUP+24 , GROUP+26, SORT+1, SORT+3, SORT+5, SORT+6, SORT+10, SORT+12, REP+8, REP+9, REP+11 , REP+12, REP+13, REP+14, REP+15, REP+16, REP+17, REP+18, REP+19, REP+20, NEW+7 , NEW+8, NEW+9, NEW+10, NEW+11, NEW+12, NEW+13, NEW+14, NEW+15, NEW+16, NEW+17 , NEW+18
>> VA	LOOP+3*
>> X	RMPRN7+2, DATE, DATE+2, ENL+1
>> Y	DATE+1, DATE+2, DET+6, GNPCC+5, GNPCC+6*
ZTDESC	DEV+4!, GNPCC+10!
ZTIO	DEV+2, DEV+4!, GNPCC+8, GNPCC+10!
ZTRTN	DEV+4!, GNPCC+10!
ZTSAVE	DEV+4!, GNPCC+10!
ZTSAVE("DATE("	DEV+3, GNPCC+9
ZTSAVE("RMPR("	DEV+2, GNPCC+8
ZTSAVE("RMPRCDE"	GNPCC+9*
ZTSAVE("RMPRDET"	DEV+3, GNPCC+9
ZTSAVE("RMPRSITE"	DEV+2, GNPCC+8
ZTSAVE("RMPRZ"	DEV+3, GNPCC+9

Customize PDF page

Package: Prosthetics

Routine: RMPRN7

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: