Routine: PRCHRP8

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA FileMan	3	DD^%DT NOW^%DTC ^DIR
IFCAP	1	^PRCFSITE

Package	Total	Caller Graph
IFCAP	1	PRCH P/C REP8

Entry Points

Name	Comments	DBIA/ICR reference
START	;
RANGE	;
DETAIL	;
WRITE	;
HOLD
HEADER	;

External References

Name	Field # of Occurrence
DD^%DT	DETAIL+1, DETAIL+13
NOW^%DTC	DETAIL+1
^%ZIS	RANGE+6
^%ZISC	RANGE+7, RANGE+8
^%ZTLOAD	RANGE+7
^DIR	RANGE+2, RANGE+4
^PRCFSITE	START+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: " ",Y(0) Line Location: RANGE+2
Function Call: WRITE	Prompt: " ",Y(0) Line Location: RANGE+4
Function Call: WRITE	Prompt: !,"Date range is incorrect." Line Location: RANGE+5
Function Call: WRITE	Prompt: !!!!,?10,"* NO RECORDS TO PRINT *" Line Location: WRITE+2
Function Call: WRITE	Prompt: !,$P(ZIP,"^"),?30,$P(ZIP,"^",2),?43,$P(ZIP,"^",3) Line Location: WRITE+9
Function Call: WRITE	Prompt: ?52,$J(AMT,12,2),?67,$P(ZIP,"^",5) Line Location: WRITE+9
Function Call: WRITE	Prompt: !!,"AVERAGE DOLLAR COST FOR CARD: $",$J(PCCNT,0,2),!," AVERAGE LINE COUNT FOR CARD: ",$J(PCLCT,0,2),! Line Location: WRITE+11
Function Call: WRITE	Prompt: !!,"% OF PC ORDERS FOR CP ",C1,": ",$J(CPCNT,0,3),!,"PC ORDER COUNT: ",AA(C1),?30,"TOTAL ORDER COUNT: ",AA(C1,1),!," PC SUBTOTAL: ",$J(AA(C1,2),0,2) Line Location: WRITE+12
Function Call: READ	Variable: XXZ Timeout: DTIME Line Location: WRITE+13
Function Call: WRITE	Prompt: !?25,"STATION GRAND TOTAL - $",$J(GTOT,0,2) Line Location: WRITE+14
Function Call: READ	Variable: XXZ Timeout: DTIME Line Location: HOLD+0
Function Call: WRITE	Prompt: !,"Press return to continue, '^' to exit: " Line Location: HOLD+0
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+1
Function Call: WRITE	Prompt: "PURCHASE CARD STATISTICS REPORT",?42,TDATE,?70,"PAGE ",P Line Location: HEADER+2
Function Call: WRITE	Prompt: !,"PURCHASE CARD NAME",?30,"PO NUMBER",?43,"LINE ITEMS",?58,"AMOUNT",?67,"DATE PLACED" Line Location: HEADER+3
Function Call: WRITE	Prompt: ! Line Location: HEADER+4
Function Call: WRITE	Prompt: "----------" Line Location: HEADER+4
Function Call: WRITE	Prompt: !!,"FCP: ",C1,?20,"BUYER: ",C2,! Line Location: HEADER+5
Routine Call	DIR Line Location: RANGE+2 RANGE+4
Routine Call	%ZIS Line Location: RANGE+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PRC(440.5 - [#440.5]	DETAIL+12, DETAIL+16
^PRC(442 - [#442]	DETAIL+3, DETAIL+4, DETAIL+5, DETAIL+8
^PRCS(410 - [#410]	DETAIL+15
^TMP($J	START+3!, DETAIL+17*, WRITE+2, WRITE+3, WRITE+4, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+15!
^VA(200 - [#200]	DETAIL+16

Label References

Name	Line Occurrences
DETAIL	RANGE+8
HEADER	WRITE+2, WRITE+5, HOLD
HOLD	WRITE+10
RANGE	RANGE+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	START+2~, DETAIL+1
>> %ZIS	RANGE+6*
>> %ZIS("B"	RANGE+6*
AA	START+1~
AA(	DETAIL+11, DETAIL+14, DETAIL+15*, WRITE+12
AMT	START+1~, DETAIL+15, DETAIL+17, DETAIL+19, WRITE+9
BB	START+1~
BB(	DETAIL+18, DETAIL+19, WRITE+11
BOC	START+1~
C1	START+1~, WRITE+2, WRITE+3, WRITE+4, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+12, HEADER+5
C2	START+1~, WRITE+2, WRITE+3, WRITE+4*, WRITE+6, WRITE+7, WRITE+8, WRITE+9, HEADER+5
C3	START+1~, WRITE+3, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+11
C4	START+1~, WRITE+3, WRITE+7, WRITE+8, WRITE+9
C5	START+1~, WRITE+3, WRITE+8, WRITE+9
CNT	START+1~, DETAIL+2*
COUNT	START+1~, DETAIL+2, DETAIL+17
CP	START+1~, DETAIL+10*, DETAIL+11, DETAIL+14, DETAIL+15, DETAIL+17
CPCNT	START+2~, WRITE+12*
CTR	START+2~, DETAIL+3*, DETAIL+4
CTR1	START+2~, DETAIL+4*, DETAIL+5
DIR	RANGE+2!, RANGE+4!
DIR("?"	RANGE+1, RANGE+3
DIR("A"	RANGE+1, RANGE+3
DIR(0	RANGE+2, RANGE+4
DTIME	WRITE+13, HOLD
EDATE	START+1~, RANGE+4*, RANGE+5, DETAIL+3, DETAIL+9
END	START+1~
EX	START+1~, DETAIL+2, WRITE+3, WRITE+4, WRITE+6, WRITE+7, WRITE+8, WRITE+10, WRITE+11, WRITE+12 , WRITE+13, WRITE+14, HOLD*
FDATE	START+1~, RANGE+2*, RANGE+5, DETAIL+3, DETAIL+9
GTOT	START+1~, DETAIL+2, DETAIL+15, WRITE+14
I	START+2~, HEADER+4*
IO	WRITE+1, HOLD
IO("Q"	RANGE+7
IO(0	HOLD
IOF	START+4, HEADER+1
IOSL	WRITE+10
IOST	WRITE+13, HOLD
LCT	START+1~, DETAIL+15*, DETAIL+17, DETAIL+19
P	START+1~, DETAIL+2, HEADER+2, HEADER+6
PC	START+1~, DETAIL+12*, DETAIL+16
PCCNT	START+1~, WRITE+11*
PCLCT	START+1~, WRITE+11*
PCN	START+1~, DETAIL+12*, DETAIL+17
PCNUM	START+2~, DETAIL+12*, DETAIL+17, DETAIL+18, DETAIL+19
PDATE	START+1~, DETAIL+13*, DETAIL+17
>> POP	RANGE+6
PRC	START+1~
PRC("SITE"	START+4, DETAIL+6
>> PRCF("X"	START+4*
PRCRI	START+2~
SEQNUM	START+2~, DETAIL+7*, DETAIL+17
TDATE	START+1~, DETAIL+1*, HEADER+2
TRAN	START+1~
U	DETAIL+2*, WRITE+3, WRITE+4, WRITE+6, WRITE+7, WRITE+8, WRITE+10, WRITE+11, WRITE+12, WRITE+13 , WRITE+14, HOLD
USER	START+2~, DETAIL+16*, DETAIL+17
>> X	START+5
XXZ	START+1~, WRITE+13, HOLD
Y	START+1~, RANGE+2, RANGE+4, DETAIL+1, DETAIL+9, DETAIL+13
Y(0	RANGE+2, RANGE+4
YY	START+1~, DETAIL+9*, DETAIL+17
Z0	START+2~, DETAIL+5*, DETAIL+6, DETAIL+7, DETAIL+10, DETAIL+15
Z1	START+2~, DETAIL+5*, DETAIL+9
Z23	START+2~, DETAIL+8*, DETAIL+12
Z7	START+2~, DETAIL+5*, DETAIL+15
ZIP	START+2~, WRITE+9*
ZP	START+1~
ZP1	START+2~, DETAIL+5*, DETAIL+8
>> ZTRTN	RANGE+7*
>> ZTSAVE("EDATE"	RANGE+7*
>> ZTSAVE("FDATE"	RANGE+7*
>> ZTSAVE("PRC*"	RANGE+7*

Customize PDF page

Package: IFCAP

Routine: PRCHRP8

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: