Routine: PRCSREC3

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?32,"THIS IS A LONG REPORT",!,?10,"Please check the paper in your printer before selecting a device",! Line Location: NEW1+4
Function Call: WRITE	Prompt: !,"Please wait while I loop through your control points." Line Location: NEW1+5
Function Call: WRITE	Prompt: "." Line Location: NEW1+8
Function Call: WRITE	Prompt: !,"Beginning processing time: ",Y Line Location: PROCESS+1
Function Call: WRITE	Prompt: !!,"Please select a device for printing this report",!! Line Location: PROCESS+2
Function Call: WRITE	Prompt: !,"Ending processing time: ",Y,!,"Total time for processing: ",$$FMDIFF^XLFDT(ENDTIME,STARTIME,3),! Line Location: FINAL+1
Function Call: WRITE	Prompt: !,"End of processing" Line Location: FINAL+2
Function Call: WRITE	Prompt: !,"Use this option ONLY if you need to re-run your site running balance.",! Line Location: RESTART+2
Function Call: WRITE	Prompt: !,"Do you wish to continue" Line Location: RESTART+2
Function Call: READ	Variable: NX Timeout: DTIME Line Location: RESTART+5
Function Call: READ	Variable: NXX Timeout: DTIME Line Location: RESTART+6
Function Call: WRITE	Prompt: !,"Looping through control points.." Line Location: RESTART+7
Function Call: WRITE	Prompt: "." Line Location: LOOP+2
Routine Call	%ZIS Line Location: PROCESS+3

Name	Line Occurrences (* Changed, ! Killed)
^PRC(420 - [#420]	NEW1+6, NEW1+8, LOOP, LOOP+2
^TMP($J	NEW1+8, PROCESS1+1, PROCESS1+2, FINAL+2!, LOOP+2

Name	Field # of Occurrence
%	NEW1+1~, PROCESS+1, FINAL+1, RESTART+1~, RESTART+2*
>> %ZIS	PROCESS+3*
DT	NEW1+2, NEW1+3, RESTART+3, RESTART+4
DTIME	RESTART+5, RESTART+6
ENDTIME	FINAL+1~*
FLIP	NEW1+1~, NEW1+8, PROCESS1+1, PROCESS1+2, RESTART+1~, RESTART+6, LOOP+2
>> FLIP1	NEW1+8, LOOP+2
I	NEW1+1~, NEW1+6, NEW1+7, PROCESS1+1, RESTART+1~, LOOP, LOOP+1
IO("Q"	PROCESS+4
>> IOP	PROCESS+3*
J	NEW1+1~, NEW1+6, RESTART+1~, RESTART+5, LOOP*
K	NEW1+1~, NEW1+7, NEW1+8, PROCESS1+1, PROCESS1+2, RESTART+1~, LOOP+1*, LOOP+2
NX	RESTART+1~, RESTART+5*, LOOP+2
NXX	RESTART+1~, RESTART+6*
>> POP	PROCESS+3
PRC	NEW1+1~, RESTART+1~
PRC("CP"	PROCESS1+2*, PROCESS1+3
PRC("FY"	NEW1+2, PROCESS1+3, RESTART+3
PRC("QTR"	NEW1+3, PROCESS1+3, RESTART+4
PRC("SITE"	PROCESS1+2*, PROCESS1+3
PRCSZ	NEW1+1~, PROCESS1+3*, RESTART+1~
SITE	NEW1+1~, RESTART+1~
SITE(	NEW1+6, NEW1+8, LOOP, LOOP+2
STARTIME	PROCESS+1~*, FINAL+1
Y	PROCESS+1~, FINAL+1
Z	NEW1+1~, PROCESS1+3*, RESTART+1~
>> ZTRTN	PROCESS+4*
>> ZTSAVE("I"	PROCESS+4*
>> ZTSAVE("PRC*"	PROCESS+4*
>> ZTSAVE("^TMP($J,"	PROCESS+4*