Routine: ACRFODD

Package	Total	Call Graph
Commitment Register	4	$$ODDPATH^ACRFSYS (JCMD,TCMD)^ACRFUTL PAUSE^ACRFWARN (ASKPATHO,DEL,HFS)^ACRFZISH
NCR Financial System	3	CRTSETUP^AFSLCRTS SETTBL^AFSLLDO1 ^AFSLLDO2
Kernel	2	HOME^%ZIS ($$STATUS,CLOSE)^%ZISH
VA Fileman	2	^DIC ^DIR
IHS VA Utilities	1	^XBKVAR

Package

Total

Call Graph

Commitment Register

$$ODDPATH^ACRFSYS (JCMD,TCMD)^ACRFUTL PAUSE^ACRFWARN (ASKPATHO,DEL,HFS)^ACRFZISH

NCR Financial System

CRTSETUP^AFSLCRTS SETTBL^AFSLLDO1 ^AFSLLDO2

Kernel

HOME^%ZIS ($$STATUS,CLOSE)^%ZISH

VA Fileman

^DIC ^DIR

IHS VA Utilities

^XBKVAR

Name	Comments	DBIA/ICR reference
INFO	;----- WRITE WARNING INFORMATION
PICK(OUT,Y)
SEL(PATH,OUT)
IMP	;EP -- IMPORT ODD OBLIGATIONS INTO OPEN DOCUMENT DATABASE
ASK	; REMOVED
REC	;EP -- ENTRY POINT TO RECEIVE ODD OBLIGATION FILE FROM CORE
LIST(PATH)

External References

Name	Field # of Occurrence
HOME^%ZIS	LIST+27
$$STATUS^%ZISH	LIST+19
CLOSE^%ZISH	LIST+21
$$ODDPATH^ACRFSYS	REC+10, IMP+12
JCMD^ACRFUTL	ASK+8, LIST+13
TCMD^ACRFUTL	REC+26
PAUSE^ACRFWARN	REC+32
ASKPATHO^ACRFZISH	REC+12
DEL^ACRFZISH	IMP+30, LIST+12
HFS^ACRFZISH	LIST+14
CRTSETUP^AFSLCRTS	IMP+23
SETTBL^AFSLLDO1	IMP+24
^AFSLLDO2	IMP+27
^DIC	REC+6
^DIR	ASK+5, IMP+8, PICK+10
^XBKVAR	REC+3, LIST+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DOWNLOAD ABORTED!" Line Location: REC+20
Function Call: WRITE	Prompt: ! Line Location: REC+24
Function Call: WRITE	Prompt: !,"No such directory "_PATH Line Location: ASK+10
Function Call: WRITE	Prompt: ! Line Location: IMP+4
Function Call: WRITE	Prompt: ! Line Location: PICK+4
Function Call: WRITE	Prompt: !,?5,"No such file "_Y Line Location: PICK+13
Function Call: WRITE	Prompt: @IOF Line Location: LIST+28
Function Call: WRITE	Prompt: !,"No files to import" Line Location: LIST+29
Function Call: WRITE	Prompt: !,"ODD files available for import into Open Document database" Line Location: LIST+30
Function Call: WRITE	Prompt: ! Line Location: LIST+31
Function Call: WRITE	Prompt: !,$J($P(DATA,U),15) Line Location: LIST+35
Function Call: WRITE	Prompt: ?18,$P(DATA,U,2) Line Location: LIST+36
Function Call: WRITE	Prompt: ?32,$P(DATA,U,3) Line Location: LIST+37
Function Call: WRITE	Prompt: !?18,"IMPORT CORE OBLIGATIONS DOWNLOAD FILE" Line Location: INFO+2
Function Call: WRITE	Prompt: ! Line Location: INFO+3
Function Call: WRITE	Prompt: !?10,"This import process will completely replace all data" Line Location: INFO+4
Function Call: WRITE	Prompt: !?10,"currently stored in your local obligations document" Line Location: INFO+5
Function Call: WRITE	Prompt: !?10,"file with the current obligations data on file in the" Line Location: INFO+6
Function Call: WRITE	Prompt: !?10,"CORE Accounting System. There should have been NO" Line Location: INFO+7
Function Call: WRITE	Prompt: !?10,"payment data entered into the ARMS PAYMENT system since" Line Location: INFO+8
Function Call: WRITE	Prompt: !?10,"the last DHR Data Entry splitout & transmission to CORE." Line Location: INFO+9
Function Call: WRITE	Prompt: !?10,"Otherwise, that data must be re-entered after this" Line Location: INFO+10
Function Call: WRITE	Prompt: !?10,"import process is completed. IT IS RECOMMENDED THAT" Line Location: INFO+11
Function Call: WRITE	Prompt: !?10,"YOU REQUEST YOUR ADP SITE MANAGER SAVE THE GLOBAL" Line Location: INFO+12
Function Call: WRITE	Prompt: !?10,"^AFSLODOC BEFORE YOU CONTINUE WITH THIS PROCESS." Line Location: INFO+13
Routine Call	%ZIS Line Location: LIST+27
Routine Call	DIC Line Location: REC+6
Routine Call	DIR Line Location: ASK+5 IMP+8 PICK+10

FileNo	Call Tags
^AUTTACPT - [#9999999.69]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^TMP("ACR"	IMP+31!, PICK+12, LIST+5!, LIST+20, LIST+23, LIST+24, LIST+26, LIST+29, LIST+33, LIST+34

Name	Line Occurrences
ASK	ASK+9
INFO	IMP+3
LIST	IMP+16
PICK	IMP+17

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DEV	LIST+14, LIST+15, LIST+16
>> ACROK	REC+12, REC+13
>> AFSEXFN	IMP+25*
>> AFSLAPN	IMP+26*
AP	REC+2~, REC+7*, REC+8, REC+26
DATA	LIST+3~, LIST+34*, LIST+35, LIST+36, LIST+37
DIC	REC+2~, REC+4*
DIC(0	REC+5*
DIR	REC+2~, ASK+2~, IMP+2~, IMP+9!
DIR("?"	PICK+7*
DIR("??"	PICK+8*
DIR("A"	ASK+4, IMP+6, PICK+6*
DIR("B"	IMP+7*
DIR(0	ASK+3, IMP+5, PICK+5*
>> DIRUT	ASK+6
DTIME	LIST+18
>> DTOUT	ASK+6, PICK+11
>> DUOUT	ASK+6, PICK+11
FILE	IMP+2~, IMP+19, IMP+25, IMP+26, LIST+3~, LIST+32, LIST+33*, LIST+34
I	LIST+3~, LIST+17, LIST+20, LIST+22, LIST+23*, LIST+24
IOF	LIST+28
OUT	REC+2~, SEL~, ASK+6, IMP+2~, IMP+17, IMP+18, PICK~, PICK+9, PICK+11
PATH	REC+2~, REC+10, REC+11, REC+12, REC+26, SEL~, ASK+7, ASK+8, ASK+10, IMP+2~ , IMP+12*, IMP+13, IMP+16, IMP+25, IMP+30, LIST~, LIST+12, LIST+13, LIST+14
QUIT	LIST+3~, LIST+17, LIST+19*
U	REC+7, LIST+26, LIST+35, LIST+36, LIST+37
X	REC+2~, LIST+3~, LIST+18, LIST+20, LIST+24, LIST+25*, LIST+26
Y	REC+2~, REC+7, ASK+2~, ASK+7, ASK+8, ASK+9, IMP+2~, IMP+10, IMP+17, IMP+19 , PICK~, PICK+9, PICK+12!, PICK+13

Customize PDF page

Package: Commitment Register

Routine: ACRFODD

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: