Routine: PRCHREC4

Package	Total	Caller Graph
IFCAP	3	PARTIAL PRCHREC PRCHREC2

Entry Points

Name	Comments	DBIA/ICR reference
V	;;5.1;IFCAP;;Oct 20, 2000
PRT	; IF METHOD OF PROCESSING=IMPREST FUNDS, UPDATE CONTROL POINT ; OBLIGATED BALANCE
PRT1	; PRINT RECEIVING REPORT IN WAREHOUSE AND IN FISCAL, EXCEPT FOR ; IMPREST FUNDS, WHICH PRINT WHERE REQUESTED BY USER, OR PROOF ; OF DELIVERY FOR GUARANTEED DELIVERY, WHICH PRINTS ONLY IN FISCAL.
PRT2	;
FINI
PRTF
PRTF1
W
WW
ENTD	;PROMPT FOR ENTRY OF SCHEDULED DELIVERY DATE.
E2
UPDD	;UPDATE SCHEDULED DELIVERY DATE FIELD
DSPD	;DISPLAY MULTIPLE DELIVERY DATES
D2
EX
W2
KILL	;CALLED FROM PRCHREC

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"If you wish to allow Fiscal to process this receiving report immediately",!,"without waiting for acceptance by the service, answer 'Y' (yes) to this",!,"question." Line Location: W+1
Function Call: WRITE	Prompt: !!,"Please enter Yes or No." Line Location: WW+1
Function Call: WRITE	Prompt: !! Line Location: E2+0
Function Call: READ	Variable: X Timeout: DTIME Line Location: E2+1
Function Call: WRITE	Prompt: "." Line Location: E2+4
Function Call: WRITE	Prompt: !! Line Location: E2+5
Function Call: WRITE	Prompt: " ",Y,! Line Location: D2+0
Function Call: WRITE	Prompt: $C(7),!!,"Select from one of the listed Scheduled Delivery Dates!",!! Line Location: W2+0
Routine Call	DIE Line Location: UPDD+1
Routine Call	DIR Line Location: PRT2+6
Routine Call	%ZIS Line Location: PRT2+13
Routine Call	%ZIS Line Location: PRT2+24

Name	Line Occurrences (* Changed, ! Killed)
^PRC(442 - [#442]	PRT1+6, PRTF+1, ENTD+1, ENTD+2, DSPD+1
^PRC(442.8 - [#442.8]	ENTD+2, E2+2, E2+4, DSPD+1, D2
^TMP("PRCHREC4"	E2+4!*, KILL+3!

Name	Field # of Occurrence
^(0	E2+4, DSPD+1
^(1	ENTD+1

Name	Field # of Occurrence
>> %	PRTF+1, PRTF1, W, WW, E2+3
>> %A	PRTF1, E2+3
>> %B	PRTF1*
>> %ZIS	PRT2+12*
>> D0	PRT1+6, PRT2+2, PRT2+9, PRTF1+1
DA	UPDD+1!*
DA(1	UPDD+1*, DSPD+1
DIC	KILL+2!
DIE	UPDD+1!*, KILL+2!
DIR	PRT2+7!
DIR("A"	PRT2+3*
DIR("B"	PRT2+4*
DIR(0	PRT2+5*
>> DR	UPDD+1*
DTIME	E2+1
I	E2+4, D2, EX!
IO	PRT2+30
IO("Q"	PRT2+18, PRT2+25!
>> MOPCHK	PRT1+5, FINI+3
>> POP	PRT2+14
>> PRC("PARAM"	PRT2+2, PRTF
>> PRCFA("PARTIAL"	KILL+1*
>> PRCH	E2*, E2+1
PRCHDLVD	ENTD+1, E2, E2+1, E2+3*, E2+4, UPDD+1, KILL+3!
PRCHES	KILL+2!
PRCHFPT	PRT1+6, PRT2+2, PRT2+10, PRTF1+1, KILL+2!
PRCHIMP	PRT1+6, KILL+2!
PRCHLC	KILL+2!
PRCHNM	KILL+2!
PRCHNRQ	KILL+2!
>> PRCHPO	PRT1+6, PRT2+2, PRT2+9, PRTF+1, PRTF1+1, ENTD+1, ENTD+2, UPDD+1
PRCHPONO	ENTD+2, E2+2, E2+4, DSPD+1, D2, EX!
>> PRCHPOO	PRT1+4, PRTF1, KILL+1
PRCHQ	PRT1+6!, PRT2+1!, PRT2+2, PRTF1+1*
PRCHQ("DEST"	PRT1+6, PRT2+2, PRT2+11, PRTF1+1
PRCHQ("DEST2"	PRT1+6, PRTF1+1
PRCHR	KILL+2!
PRCHRAM	KILL+2!
PRCHRAMN	KILL+2!
PRCHRD	KILL+2!
PRCHRDA	KILL+2!
PRCHRDY	KILL+2!
PRCHRES	KILL+2!
PRCHRFIN	KILL+2!
PRCHRIT	KILL+2!
PRCHROV	KILL+2!
PRCHRPT	PRT1+6, PRT2+2, PRT2+10, PRTF1+1, ENTD+1, UPDD+1, KILL+1, KILL+2!
PRCHRQ	KILL+2!
PRCHRQ1	KILL+2!
PRCHRQ2	KILL+3!
PRCHRQ3	KILL+3!
PRCHRS	KILL+3!
PRCHRT	KILL+3!
PRCHRT0	KILL+3!
PRCHRT2	KILL+3!
PRCHRTP	KILL+3!
PRCHX	KILL+3!
ROUTINE	KILL+3!
U	PRT1+6, PRT2+2, PRTF, PRTF+1, ENTD+1, ENTD+2, E2+4, DSPD+1
X	E2+1, E2+2, E2+4, EX!
X1	KILL+3!
Y	PRT2+8, E2, E2+2, E2+3, D2*, EX!
>> ZTQUEUED	FINI
>> ZTREQ	FINI*
>> ZTRTN	PRT2+19*
>> ZTSAVE("D0"	PRT2+22*
>> ZTSAVE("PRCHFPT"	PRT2+20*
>> ZTSAVE("PRCHQ(""DEST"")"	PRT2+21*