Routine: PRCXLG01

Information

PRCXLG01 ;WISC/LKG-SCRATCH ROUTINE FOR PRC*5*10 ;8/3/95 10:50

Package	Total	Call Graph
VA FileMan	5	YX^%DTC ^DIC DT^DICRW ^DIE ENALL^DIK
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD

Name	Comments	DBIA/ICR reference
V	;;5.0;IFCAP;10;4/21/95
INSTALL	;Changes value for ROUTINE field in OPTION file entries
REPT	;Displays to screen invoices where Date Due in Fiscal is non-
REPTIN	;Entry point for actual printing
REPTX
HDR

Name	Line Occurrences
Function Call: WRITE	Prompt: !," Starting Date/Time: ",Y Line Location: INSTALL+15
Function Call: WRITE	Prompt: !," Ending Date/Time: ",Y Line Location: INSTALL+22
Function Call: WRITE	Prompt: !!,"This report will list information on Invoices where there is identified" Line Location: REPT+3
Function Call: WRITE	Prompt: !,"inconsistency in the values for fields DATE DUE IN FISCAL and either" Line Location: REPT+4
Function Call: WRITE	Prompt: !,"CURRENT INVOICE LOCATION or STATUS." Line Location: REPT+5
Function Call: WRITE	Prompt: !,"Invoice #: ",$P($G(^PRCF(421.5,PRCXDA,0)),"^"),?30,"Location: ",$P(PRCXNOD2,"^",4) Line Location: REPTIN+8
Function Call: WRITE	Prompt: !,"Status: ",$S(X=0:"INCOMPLETE",X=3:"INVOICE RETURNED TO VENDOR",X=5:"PENDING SERVICE CERTIFICATION",X=10:"AWAITING VOUCHER AUDIT REVIEW",X=11:"VENDOR ID INCOMPLETE",X=15:"IN ACCOUNTING",X=20:"TRANSACTION COMPLETE",1:"") Line Location: REPTIN+10
Function Call: WRITE	Prompt: ?45,"Date Due in Fiscal: ",$S(X]"":$E(X,4,5)_"/"_$E(X,6,7)_"/"_$E(X,2,3),1:""),! Line Location: REPTIN+12
Function Call: WRITE	Prompt: !,?5,"REPORT OF CERTIFIED INVOICES WITH INCONSISTENT DATE DUE IN FISCAL" Line Location: HDR+3
Function Call: WRITE	Prompt: !,?20,"Run Date/Time: ",PRCXD,?65,"Page: ",PRCXP,! Line Location: HDR+4
Routine Call	DIC Line Location: INSTALL+6
Routine Call	DIE Line Location: INSTALL+9
Routine Call	%ZIS Line Location: REPT+6
Routine Call	%ZIS Line Location: REPT+9

FileNo	Call Tags
^DIC(19 - [#19]	Classic Fileman Calls
^PRCF(421.5 - [#421.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	INSTALL+8
^PRCF(421.5 - [#421.5]	INSTALL+14, INSTALL+16, INSTALL+18!, INSTALL+21, REPTIN+4, REPTIN+5, REPTIN+8

Name	Line Occurrences
HDR	REPTIN+3, REPTIN+7
REPTX	REPTIN+4

Name	Field # of Occurrence
%	INSTALL+15!, INSTALL+22!, REPTIN+2!
%H	INSTALL+15!, INSTALL+22!, REPTIN+2*!
>> %ZIS	REPT+6*
DA	INSTALL+8*, INSTALL+9!
DIC	INSTALL+6*!
DIC(0	INSTALL+6*
DIE	INSTALL+9*!
DIK	INSTALL+20*!
DIK(1	INSTALL+20*
DR	INSTALL+9*!
DUZ	INSTALL+1
IO	REPTIN+1
IO("Q"	REPT+7
IOF	REPTIN+14, HDR+2
IOSL	REPTIN+7
IOST	V+1, INSTALL+2, REPTIN+14, HDR, HDR+2
>> POP	REPT+6
PRCXA	INSTALL+5*, INSTALL+8, INSTALL+10, INSTALL+11!
PRCXB	INSTALL+5*, INSTALL+11!
PRCXC	REPTIN+3, REPTIN+7, REPTIN+14, REPTX!
PRCXD	REPTIN+2*, REPTX!, HDR+4
PRCXDA	REPTIN+3, REPTIN+4, REPTIN+5, REPTIN+8, REPTX!
PRCXH	REPTIN+3, REPTIN+4, REPTIN+7, REPTX!, HDR, HDR+1
PRCXL	REPTIN+3, REPTIN+7, REPTIN+13, REPTX!, HDR+5*
PRCXNOD2	REPTIN+5*, REPTIN+6, REPTIN+8, REPTIN+9, REPTIN+11, REPTX!
PRCXP	REPTIN+3, REPTX!, HDR, HDR+2, HDR+4
PRCXTERM	INSTALL+2*, INSTALL+3, INSTALL+4, INSTALL+10, INSTALL+12, INSTALL+13, INSTALL+14, INSTALL+15, INSTALL+17, INSTALL+19 , INSTALL+22, INSTALL+23!
U	INSTALL+1, INSTALL+14
X	INSTALL+5, INSTALL+11!, INSTALL+15!, INSTALL+22!, REPTIN+2!, REPTIN+9, REPTIN+10, REPTIN+11*, REPTIN+12, REPTX!
Y	INSTALL+7, INSTALL+8, INSTALL+11!, INSTALL+15!, INSTALL+22!, REPTIN+2!
>> ZTDESC	REPT+8*
>> ZTQUEUED	REPTIN+15
>> ZTREC	REPTIN+15*
>> ZTRTN	REPT+8*
ZTSK	REPT+9!