Routine: ACRFPAY9

Package	Total	Call Graph
Commitment Register	6	^ACRFDATE (DIC,DIR)^ACRFDIC (PBD1,PBHEAD)^ACRFPAY7 OTA^ACRFSSA1 $$NAME2^ACRFUTL1 ^ACRFZIS

Package	Total	Caller Graph
Commitment Register	3	ACRFIV12 ACRFPAY1 ACRFPAY6

Entry Points

Name	Comments	DBIA/ICR reference
DATES	;SELECT DATE RANGE FOR PAYMENTS TO REVIEW
TPHEAD	;
ZIS	;SELECT DEVICE TO PRINT REPORT
FY	;SELECT FISCAL YEAR FOR REPORT
FYFUN	;EP;FISCAL YEAR OF FUNDS
PTYPE	;EP;SELECT PAYMENT TYPE
TP	;
TECH	;LOOK UP ACCOUNTING TECH
TP1	;EP;TO PRINT TECH PAYMENTS REPORT
OTA	;EP;SYNCHRONIZE TRAVEL ADVANCE
TPEXIT
TECHPAY	;EP;TO PRINT PAYMENTS MADE BY ONE ACCOUNTING TECH

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: TECH+5
Function Call: WRITE	Prompt: ! Line Location: FY+4
Function Call: WRITE	Prompt: ! Line Location: DATES+1
Function Call: WRITE	Prompt: @IOF Line Location: TPHEAD+1
Function Call: WRITE	Prompt: !?10,"Review Payments for a Selected Accounting Tech",! Line Location: TPHEAD+2
Function Call: WRITE	Prompt: !!,"PAYMENT TYPE REQUIRED",! Line Location: PTYPE+7
Function Call: WRITE	Prompt: !!,"FISCAL YEAR OF FUNDS REQUIRED",! Line Location: FYFUN+7

FileNo	Call Tags
^ACRAU - [#9002185.3]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ACRDOC("B"	OTA+4
^AFSLAFP - [#9002325]	TP1+5, TP1+9, TP1+18
^AFSLAFP("B"	FY+8
^AFSLAFP("D"	TP1+4, TP1+8
^AUTTDOCR("B"	OTA+2
^AUTTVNDR - [#9999999.11]	TP1+11
^TMP("ACRPBAT"	TPEXIT+1!, TP1+15*, TP1+17, TP1+22, TP1+24

Name	Field # of Occurrence
^(2	TP1+5

Name	Field # of Occurrence
ACR	TPEXIT!
>> ACR3	PTYPE+8*
>> ACRADV	OTA+6*
ACRBATDA	TPEXIT!, TP1+2~, TP1+3, TP1+4, TP1+5, TP1+8, TP1+9, TP1+15, TP1+16, TP1+17 , TP1+18, TP1+22, TP1+24
ACRBATNO	TPEXIT!, TP1+18*
ACRBEGIN	TPEXIT!, TP+7, TP1+5
>> ACRBTYP	PTYPE+4
>> ACRDFYDA	PTYPE+4
>> ACRDOC	OTA+4
ACRDOCDA	OTA+3~, OTA+4*, OTA+5
ACREND	TPEXIT!, TP+7, TP1+5
ACRFY	TPEXIT!, FY+7*, FY+8, FYFUN+1!
ACRFYDA	TPEXIT!, TP+5, FY+8*, TP1+1, TP1+4, TP1+5, TP1+8, TP1+9, TP1+15, TP1+17 , TP1+18, TP1+22, TP1+24
>> ACRFYFUN	FYFUN+8*, FYFUN+9
>> ACRIVT	OTA+6
>> ACRLBDT	FYFUN+9*
ACROUT	TECHPAY+2, TPEXIT!, PTYPE+6, FYFUN+6
ACRQUIT	TECHPAY+2, TPEXIT!, TP+3, TP+5, TP+7, TECH+7*, TP1+17, TP1+22, TP1+24
>> ACRREF	OTA+1*
>> ACRREFDA	OTA+2*
ACRRTN	TPEXIT!, ZIS+1*
ACRSEQDA	TP1+6~, TP1+7, TP1+8, TP1+9, TP1+15, TP1+23, TP1+24
>> ACRTCODE	PTYPE+9*, PTYPE+10
ACRTDA	TPEXIT!, TP+3, TECH+8*, TP1+1, TP1+4, TP1+8
ACRX	TP1+20~, TP1+21, TP1+22, TP1+24
>> DIC	TECH+1, PTYPE+1
>> DIC("A"	TECH+3, PTYPE+3
>> DIC("B"	PTYPE+4*
>> DIC("S"	TECH+4*
>> DIC(0	TECH+2, PTYPE+2
>> DIR("A"	FY+2, FYFUN+3
>> DIR("B"	FY+3, FYFUN+4
>> DIR(0	FY+1, FYFUN+2
DT	FY+3, FYFUN+4
IOF	TPHEAD+1
U	TP1+5, TP1+10, TP1+11, TP1+13, TP1+18, FYFUN+9
>> X	TP1+9, TP1+10, TP1+11, TP1+13*, TP1+14, TP1+15, PTYPE+6, FYFUN+6
>> Y	TECH+7, TECH+8, FY+6, FY+7, PTYPE+7, PTYPE+8*, PTYPE+9, FYFUN+7, FYFUN+8
>> ZTDESC	ZIS+2*
>> ZTRTN	ZIS+1*