Routine: AFSLLDO2

Package	Total	Call Graph
NCR Financial System	3	OPENHFS^AFSLCK1 ^AFSLCKZC ^AFSLLDO3
VA Fileman	3	^%DT (NOW,YX)^%DTC IXALL^DIK
Commitment Register	1	DIR^ACRFDIC
IHS VA Utilities	1	^XBCLS
Kernel	1	CLOSE^%ZISH

Package	Total	Caller Graph
Commitment Register	1	ACRFODD
NCR Financial System	1	AFSLLDO1

Entry Points

External References

Name	Field # of Occurrence
^%DT	CHKSX+7
NOW^%DTC	SKPCLR+7, SKPCLR+9
YX^%DTC	SKPCLR+7, SKPCLR+9
CLOSE^%ZISH	SKPCLR+12
DIR^ACRFDIC	FRD+9, FRD+15
OPENHFS^AFSLCK1	SKPCLR+3
^AFSLCKZC	SKPCLR+5
^AFSLLDO3	CHKEND+8
IXALL^DIK	SKPCLR+8
^XBCLS	FRD, FRD+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"READY TO IMPORT SELECTED DOWNLOAD FILE." Line Location: FRD+1
Function Call: WRITE	Prompt: !!,"Some Area Offices make obligations/payments for multiple accounting points." Line Location: FRD+2
Function Call: WRITE	Prompt: !,"I must CLEAR the local obligations database before importing the 1ST",!,"Accounting Point download file ONLY." Line Location: FRD+3
Function Call: WRITE	Prompt: !!,@AFSLRVON,"**WARNING! ANSWERING ""Y"" TO THE NEXT QUESTION WILL CLEAR THE DATABASE.",@AFSLRVOF,7 Line Location: FRD+4
Function Call: WRITE	Prompt: !,"LOADING RECORDS FOR A/P ",AFSLAPN,!,"WORKING " Line Location: FRD+20
Function Call: READ	Timeout: 60 Variable: X Line Location: SKPCLR+5
Function Call: WRITE	Prompt: "." Line Location: SKPCLR+5
Function Call: WRITE	Prompt: AFSLI Line Location: SKPCLR+6
Function Call: WRITE	Prompt: !!,"BEGINNING COMPILED RE-CROSSREFERENCING. PLEASE WAIT WHILE FILEMAN REINDEXES.",!,"BEGIN: " Line Location: SKPCLR+7
Function Call: WRITE	Prompt: Y Line Location: SKPCLR+7
Function Call: WRITE	Prompt: !?58,"END: " Line Location: SKPCLR+9
Function Call: WRITE	Prompt: Y Line Location: SKPCLR+9
Function Call: WRITE	Prompt: !,"FILE IN USE AT THIS TIME. TRY LATER." Line Location: CHKS+4
Function Call: WRITE	Prompt: !!,"DUPLICATE ENTRY! DOC.# "_$E(X,17,26)_" ALREADY EXISTS YOU CANNOT CREATE A DUPLICATE." Line Location: 1+0
Function Call: WRITE	Prompt: !!,"CHS FI PAYMENT! DOC.# "_$P(AFSLXZ,U,1)_" CANNOT BE ENTERED INTO THE 1166 DOCUMENTS FILE." Line Location: 3+0
Function Call: WRITE	Prompt: !!,"OBLIGATION YR FORMAT ERROR ON RECORD# "_AFSLI Line Location: 5+0
Function Call: WRITE	Prompt: !!,"DOCUMENT NO. FORMAT ERROR ON RECORD# "_AFSLI Line Location: 6+0
Function Call: WRITE	Prompt: !!,"RECORD# ",AFSLI," DOC# ",$P(AFSLXZ,U,1)," NOT SAVED (CLOSED & AGE>",AFSLPY," YRS." Line Location: 7+0
Function Call: WRITE	Prompt: !!,"OBJECT CLASS FORMAT ERROR ON RECORD# "_AFSLI Line Location: 8+0
Function Call: WRITE	Prompt: !!,"LOCATION CODE FORMAT ERROR ON RECORD# "_AFSLI Line Location: 9+0
Function Call: WRITE	Prompt: !!,"OBLIGATION DT FORMAT ERROR ON RECORD# "_AFSLI Line Location: 10+0
Function Call: WRITE	Prompt: !!,"DOC.REF. CODE FORMAT ERROR ON RECORD# "_AFSLI Line Location: 11+0
Function Call: WRITE	Prompt: !!,"CAN NUMBER FORMAT ERROR ON RECORD# "_AFSLI Line Location: 12+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AFSLODOC(	FRD+22!, SKPCLR+10, CHKS+4, CHKSX+12
^AFSLODOC("B"	CHKSX+10
^AFSLODOC("C"	CHKSX+14
^AFSLODOC("D"	CHKSX+16
^AFSLODOC(0	FRD+23*
^AFSLREJT	FRD+22!, NOSAV+1, NOSAV+2, NOSAV+3, NOSAV+4
^AFSLREJT("B"	NOSAV+3, NOSAV+5
^AFSLREJT(0	FRD+23, NOSAV+2

Label References

Name	Line Occurrences
@(	SKPCLR+5, CHKEND+1, CHKEND+2, CHKEND+3, CHKEND+4, CHKEND+5, CHKEND+6, CHKEND+7, CHKEND+9
CHKEND	CHKS+8, CHKS+9, CHKS+10, CHKS+11, CHKS+12, CHKS+18, CHKSX+1, CHKSX+2, CHKSX+11, CHKSX+13 , CHKSX+15
CHKS	SKPCLR+5
NOSAV	1, 3, 5, 6, 7, 8, 9, 10, 11, 12
SKPCLR	FRD+21
VARKIL	SKPCLR+13, CHKEND+1, CHKEND+2, CHKEND+3, CHKEND+4, CHKEND+5, CHKEND+6, CHKEND+7, CHKEND+8, CHKEND+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DEV	SKPCLR+13!
%FN	FRD+19*, SKPCLR+13!
%IN	FRD+19*, SKPCLR+13!
>> ACROUT	FRD+17
>> ACRQUIT	FRD+17
>> ACRY	FRD+10, FRD+16
AFSEXFN	FRD+19, SKPCLR+14!
>> AFSLACRL	CHKS+7*
>> AFSLAPIN	FRD+10*, FRD+21
>> AFSLAPN	FRD+20, CHKS+3, CHKS+11
AFSLCAN	CHKS+6*, CHKS+10, CHKS+11, CHKSX+14, VARKIL+2!
AFSLCFLG	CHKS+5, CHKSX+14, VARKIL+1!
AFSLCMD	SKPCLR+14!
AFSLCONT	FRD+16*, FRD+17, SKPCLR+14!
>> AFSLCRDT	CHKS+7*
AFSLDDAT	VARKIL+2!
AFSLDNOD	SKPCLR+14!
AFSLDNXT	SKPCLR+14!
AFSLDOC	CHKS+6*, CHKS+9, CHKSX+12, VARKIL+1!
AFSLDOCN	CHKSX+12*, CHKSX+14, CHKSX+16, VARKIL+2!
AFSLDOCX	SKPCLR+14!
>> AFSLDREF	CHKS+6*, CHKSX+2
>> AFSLDSBT	CHKS+7*
AFSLDT	SKPCLR+14!
AFSLDUP	FRD+19, SKPCLR+5, SKPCLR+14!, CHKS+5, CHKSX+11, CHKSX+13, CHKSX+15, CHKSX+16, CHKEND+8, CHKEND+9 , 1*
>> AFSLDUPF	FRD+19, CHKS+4
AFSLDUPV	SKPCLR+14!
AFSLEMSG	SKPCLR+5, CHKS+5, CHKS+8, CHKS+9, CHKS+10, CHKS+11, CHKS+12, CHKS+18, CHKSX+1, CHKSX+2* , CHKSX+16*, CHKEND+1, CHKEND+2, CHKEND+3, CHKEND+4, CHKEND+5, CHKEND+6, CHKEND+7, CHKEND+9, 1! , 3!, 5!, 6!, 7!, 8!, 9!, 10!, 11!, 12!, VARKIL+1! , NOSAV+3, NOSAV+4
AFSLFFND	SKPCLR+14!
AFSLFNUM	VARKIL+2!
AFSLFY	SKPCLR+14!, CHKS+6, CHKS+8, CHKSX+7, CHKSX+10
AFSLFYN	CHKSX+10*, CHKSX+12, CHKSX+14, CHKSX+16, VARKIL+2!
AFSLI	SKPCLR+5*, SKPCLR+6, SKPCLR+14!, 5, 6, 7, 8, 9, 10, 11 , 12, NOSAV+3, NOSAV+4
>> AFSLIMN	CHKS+7*
>> AFSLLADT	CHKS+7*
>> AFSLLCD	CHKS+6, CHKS+13, CHKS+14, CHKS+15, CHKS+16, CHKS+17, CHKS+18
AFSLLTDL	SKPCLR+14!
AFSLLTH	SKPCLR+14!
AFSLLTR	SKPCLR+14!
>> AFSLNZC	SKPCLR+5
>> AFSLOBDT	CHKS+6*, CHKSX+1
AFSLOBJ	CHKS+6*, CHKS+12, CHKSX+16, VARKIL+2!
AFSLOBLD	SKPCLR+15!
AFSLOFLG	CHKS+5, CHKSX+16, VARKIL+1!
AFSLOK	SKPCLR+15!
>> AFSLPY	7
AFSLRVOF	FRD+4, SKPCLR+15!
AFSLRVON	FRD+4, SKPCLR+15!
AFSLSN	SKPCLR+15!
AFSLSNX	SKPCLR+15!
AFSLVAL	SKPCLR+15!
AFSLWCTR	SKPCLR+2, SKPCLR+5, SKPCLR+6!
AFSLXC	SKPCLR+15!
AFSLXFND	SKPCLR+15!
AFSLXY	FRD+19, SKPCLR+13!, VARKIL+3
AFSLXY2	SKPCLR+15!, VARKIL+3*
AFSLXZ	FRD+19, SKPCLR+13!, 3, 7, VARKIL+3
AFSLXZ2	SKPCLR+13!
AFSLYNOD	SKPCLR+15!
AFSLYNXT	SKPCLR+15!
AFSLYY	VARKIL+2!
AFSLZROS	FRD+19*, SKPCLR+15!
DA	VARKIL+1!
DIE	VARKIL+1!
DIK	SKPCLR+8*, SKPCLR+15!
DIR	FRD+5~, FRD+11~
DIR("A"	FRD+7, FRD+13
DIR("B"	FRD+8, FRD+14
DIR(0	FRD+6, FRD+12
DR	VARKIL+1!
DX	SKPCLR+15!
DY	SKPCLR+15!
I	SKPCLR+15!
IO	SKPCLR+5
IO(0	SKPCLR+5, SKPCLR+6, SKPCLR+7, SKPCLR+9, CHKS+4
K	SKPCLR+15!, NOSAV+1, NOSAV+2*, NOSAV+3, NOSAV+4, NOSAV+5
U	3, 7, NOSAV+2, NOSAV+3, NOSAV+4
X	FRD+5~, FRD+11~, SKPCLR+1, SKPCLR+5, SKPCLR+15!, CHKS+1, CHKS+2, CHKS+3, CHKS+6, CHKS+7 , CHKSX+6, CHKSX+7, CHKSX+8, 1, NOSAV+3, NOSAV+4
>> XSAVEX	CHKSX+6*, CHKSX+8
XY	SKPCLR+15!
Y	FRD+5~, FRD+11~, SKPCLR+7, SKPCLR+9, CHKSX+7

Customize PDF page

Package: NCR Financial System

Routine: AFSLLDO2

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
11
10
12
FRD
CHKEND	;
6
NOSAV	;
CHKS	;
1
3
EMSG	;ERROR MESSAGES
5
7
SKPCLR	;
9
8
CHKSX	;
VARKIL	;