Routine: ACRFDHRE

Package	Total	Call Graph
VA Fileman	6	^DDS ^DIC FILE^DICN ^DIE ^DIK ^DIR
Commitment Register	1	DISPLAY^ACRFDHRD
IHS VA Utilities	1	^XBKVAR
Kernel	1	HOME^%ZIS

Package	Total	Caller Graph
Commitment Register	2	ACRFDHRD ACRFDHRV
NCR Financial System	1	AFSHEX1

Entry Points

External References

Name	Field # of Occurrence
HOME^%ZIS	RO+2
DISPLAY^ACRFDHRD	RO+5
^DDS	EDIT+11
^DIC	CLR+16, DT+11, ID+13, SEQ+20
FILE^DICN	ADDFMS+14
^DIE	TRAIL+21, REOPEN+9, ADDFMS+27, ADDFMS+36, LINK+16
^DIK	KILL+9
^DIR	OPT+6, DUPE+13, DUPE+21, TYPE+5, RB+6, TRAIL+14
^XBKVAR	RO+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: A+2
Function Call: WRITE	Prompt: *7," ",ACRD3," <DELETED>" Line Location: KILL+10
Function Call: WRITE	Prompt: !,"TRAILER DATA: RECORD COUNT = ",CNT," HASH DOLLARS = ",AMT Line Location: TRAIL+10
Function Call: WRITE	Prompt: !,"TRAILER RECORD ADDED" Line Location: TRAIL+22
Function Call: WRITE	Prompt: !," Batch is already OPEN" Line Location: RO+9
Function Call: WRITE	Prompt: !," Batch reopened" Line Location: REOPEN+10
Routine Call	%ZIS Line Location: RO+2
Routine Call	DIE Line Location: TRAIL+21 REOPEN+9 ADDFMS+27 ADDFMS+36 LINK+16
Routine Call	DDS Line Location: EDIT+11
Routine Call	DIC Line Location: CLR+16 DT+11 ID+13 SEQ+20
Routine Call	DIR Line Location: OPT+6 DUPE+13 DUPE+21 TYPE+5 RB+6 TRAIL+14

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACRDHR - [#9002189.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AFSHRCDS(	DUPE+4, DUPE+25, SEQ+12, SEQ+13, DEL+5, HDR+8, HDR+10, HDR+12, TRAIL+6, TRAIL+7 , RO+8, ADDFMS+5, ADDFMS+6, ADDFMS+7
^DD(9002322	DT+9
^DD(9002322.02	ID+11
^DD(9002322.21	SEQ+18

Label References

Name	Line Occurrences
CLR	A+3
DT	A+7
ID	A+11
KILL	DEL+10
REOPEN	RO+11
RO	RO+8, RO+12
SEL	RO+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACRADD	SEL~, A+3, A+7, A+11, CLR~, CLR+13, DT~, DT+7, DT+10, ID~ , ID+8, ID+12, SEQ~, SEQ+10, SEQ+19
ACRCLR	SEL~, A+3, CLR~, CLR+6, CLR+9, CLR+10, RB~, RB+9*
ACRD0	SEL~, A+5*, A+7, A+11, DUPE~, DUPE+4, DUPE+25, DT~, DT+4, ID~ , ID+5, SEQ~, SEQ+7, EDIT~, EDIT+7, DEL~, DEL+5, DEL+10, KILL~, KILL+4 , TRAIL~, TRAIL+6, TRAIL+7, TRAIL+16, RO+6, RO+8, RO+11, REOPEN~, REOPEN+4, ADDFMS~ , ADDFMS+5, ADDFMS+6, ADDFMS+7, ADDFMS+30
ACRD1	SEL~, A+9*, A+11, DUPE~, DUPE+4, DUPE+25, ID~, ID+4, SEQ~, SEQ+6 , EDIT~, EDIT+6, DEL~, DEL+5, DEL+10, KILL~, KILL+5, TRAIL~, TRAIL+6, TRAIL+7 , TRAIL+17, RO+6, RO+8, RO+11, REOPEN~, REOPEN+5, ADDFMS~, ADDFMS+5, ADDFMS+6, ADDFMS+7 , ADDFMS+31
ACRD2	SEL~, A+13*, DUPE~, DUPE+4, DUPE+25, SEQ~, SEQ+5, EDIT~, EDIT+5, DEL~ , DEL+5, DEL+10, KILL~, KILL+6, TRAIL~, TRAIL+6, TRAIL+7, TRAIL+18, RO+6, RO+8 , RO+11, REOPEN~, REOPEN+6, ADDFMS~, ADDFMS+5, ADDFMS+6, ADDFMS+7, ADDFMS+32
ACRD3	DUPE~, DUPE+4, DUPE+25, EDIT~, EDIT+4, DEL~, DEL+5, DEL+10, KILL~, KILL+7 , KILL+10, ADDFMS~, ADDFMS+5, ADDFMS+6, ADDFMS+7, ADDFMS+33
ACRDR	DUPE~, DUPE+16!, DUPE+17, DUPE+24, DUPE+32, DUPE+35, DUPE+36, DUPE+37!, SEQ~, SEQ+17
ACRDUP	DUPE~, DUPE+5, DUPE+9, DUPE+14*, DUPE+16
>> ACRFMS	ADDFMS+16*, ADDFMS+35
ACROPT	OPT~, OPT+9*, OPT+10, SEL~, A+3, CLR~, CLR+10
ACROUT	OPT~, OPT+7, OPT+8, OPT+10, SEL~, A+3, A+4, A+7, A+8, A+11 , A+12, CLR~, CLR+11, CLR+12, CLR+17, CLR+18, RB+7, RB+8, DT~, DT+12* , DT+13, ID~, ID+14, ID+15, RO+4, RO+6, RO+7
ACRSRC	ADDFMS~, ADDFMS+18
ACRTYPE	SEQ+4*, SEQ+16, EDIT~, EDIT+10, DEL~, DEL+6, DEL+8
AMT	TRAIL+4~, TRAIL+5, TRAIL+9, TRAIL+10, TRAIL+20
CNT	TRAIL+4~, TRAIL+5, TRAIL+8, TRAIL+10, TRAIL+20
D0	HDR~, HDR+4, HDR+8, HDR+10, HDR+12, LINK+12~
D1	HDR~, HDR+5, HDR+8, HDR+10, LINK+12~
D2	HDR~, HDR+6, HDR+10, LINK+12~
D3	LINK+12~
DA	DT+3~, ID+3~, SEQ+3~, EDIT+3~, EDIT+4, KILL+3~, KILL+7, TRAIL+4~, TRAIL+18, REOPEN+3~ , REOPEN+6, ADDFMS+4~, ADDFMS+16, ADDFMS+33, LINK~, LINK+13
DA(1	DT+4, DT+5, ID+4, ID+6, SEQ+5, SEQ+8, SEQ+12, SEQ+13, EDIT+5, KILL+6* , KILL+8, TRAIL+17, TRAIL+19, REOPEN+5, REOPEN+7, ADDFMS+32*, ADDFMS+34
DA(2	ID+5, ID+6, SEQ+6, SEQ+8, SEQ+12, SEQ+13, EDIT+6, KILL+5, KILL+8, TRAIL+16* , TRAIL+19, REOPEN+4, REOPEN+7, ADDFMS+31, ADDFMS+34
DA(3	SEQ+7, SEQ+8, SEQ+12, SEQ+13, EDIT+7, KILL+4, KILL+8, ADDFMS+30, ADDFMS+34
DATA	DUPE+3~, DUPE+25, DUPE+32, DUPE+35, DEL+3~, DEL+5, DEL+7, DEL+9, TRAIL+4~, TRAIL+7* , TRAIL+9, ADDFMS+4~, ADDFMS+7*, ADDFMS+8, ADDFMS+9, ADDFMS+20, ADDFMS+24
DD	ADDFMS+11!
DDSFILE	EDIT+3~, EDIT+8*
DDSFILE(1	EDIT+9*
DDSPARM	EDIT~
DEL	DEL+3~, DEL+4, DEL+7, DEL+9*, DEL+10
DIC	CLR+3~, CLR+4, DT+3~, DT+5, ID+3~, ID+6, SEQ+3~, SEQ+8, ADDFMS+4~, ADDFMS+12* , ADDFMS+17
DIC("A"	CLR+8, DT+8, ID+9, SEQ+11
DIC("B"	SEQ+14*
DIC("DR"	ID+10, SEQ+16, SEQ+17*
DIC("P"	DT+9, ID+11, SEQ+18*
DIC(0	CLR+5, CLR+7, CLR+14, DT+6, DT+7, ID+7, ID+8, SEQ+9, SEQ+10, ADDFMS+13
DIE	TRAIL+4~, TRAIL+19, REOPEN+3~, REOPEN+7, ADDFMS+4~, ADDFMS+17, ADDFMS+34, LINK+12~, LINK+14*
DIK	KILL+3~, KILL+8*
DIR	OPT+3~, DUPE+3~, DUPE+15!, DUPE+22!, TYPE+2~, CLR+3~, RB+3~, TRAIL+4~, REOPEN+3~
DIR("?"	DUPE+20*
DIR("A"	OPT+5, DUPE+7, DUPE+11, DUPE+19, TYPE+4, RB+5, TRAIL+12*
DIR("B"	DUPE+8, DUPE+12, TRAIL+13*
DIR(0	OPT+4, DUPE+6, DUPE+10, DUPE+18, TYPE+3, RB+4, TRAIL+11*
DIRUT	OPT+3~, OPT+7, TYPE+2~, TYPE+6, RB+7
DLAYGO	CLR+3~, CLR+15, DT+3~, DT+10, ID+3~, ID+12, SEQ+3~, SEQ+19
DO	ADDFMS+11!
DR	EDIT+3~, EDIT+10, TRAIL+4~, TRAIL+20, REOPEN+3~, REOPEN+8, ADDFMS+4~, ADDFMS+18, ADDFMS+29!, ADDFMS+35* , LINK+12~, LINK+15*
DR(1	ADDFMS+22, ADDFMS+26
DT	ADDFMS+18
DTOUT	OPT+3~, OPT+7, TYPE+2~, TYPE+6, CLR+3~, CLR+17, RB+3~, RB+7, DT+3~, DT+12 , ID+3~, ID+14, SEQ+3~, SEQ+21
DUOUT	OPT+3~, OPT+7, TYPE+2~, TYPE+6, CLR+3~, CLR+17, RB+3~, RB+7, DT+3~, DT+12 , ID+3~, ID+14, SEQ+3~, SEQ+21
DUZ	ADDFMS+18
I	DUPE+3~, DUPE+26, DUPE+27, DEL+3~, DEL+7, DEL+9, ADDFMS+4~, ADDFMS+20, ADDFMS+24*
J	DUPE+3~, DUPE+29*, DUPE+30, DUPE+31, DUPE+32
U	DUPE+32, DUPE+35, CLR+10, DT+9, ID+11, SEQ+12, SEQ+18, DEL+7, DEL+9, HDR+8 , HDR+10, HDR+12, TRAIL+9, RO+8, ADDFMS+8, ADDFMS+20, ADDFMS+24
X	OPT+3~, DUPE+3~, DUPE+15!, CLR+3~, CLR+10, CLR+11, RB+3~, DT+3~, ID+3~, SEQ+3~ , SEQ+12, SEQ+13, SEQ+14, SEQ+15!, HDR+3~, HDR+7, HDR+10, HDR+11, HDR+13, HDR+14 , HDR+16, HDR+17, TRAIL+4~, TRAIL+5, TRAIL+6, TRAIL+7, DATE~, DATE+5, DATE+6, DATE+7 , ADDFMS+4~, ADDFMS+8, ADDFMS+9, ADDFMS+10, ADDFMS+19, ADDFMS+20, ADDFMS+21, ADDFMS+22, ADDFMS+23, ADDFMS+24 , ADDFMS+25*, ADDFMS+26, LINK+12~
X1	LINK~, LINK+15
X3	LINK~, LINK+15
X4	LINK~, LINK+15
X5	LINK~, LINK+15
X6	LINK~, LINK+15
X7	LINK~, LINK+15
Y	OPT+3~, OPT+8, OPT+9, A+1~, A+3, A+5, A+6!, A+7, A+9, A+10! , A+11, A+13, A+14!, DUPE+3~, DUPE+14, DUPE+15!, DUPE+23, DUPE+26, DUPE+27, TYPE~ , TYPE+6, CLR~, CLR+18, RB+3~, RB+8, RB+9, DT~, DT+13, ID~, ID+15 , SEQ~, SEQ+21, TRAIL+4~, TRAIL+15, REOPEN+3~, DATE+3~, DATE+4, DATE+7, DATE+8, ADDFMS+4~ , ADDFMS+15, ADDFMS+16, LINK+12~
Z	DUPE+3~, DUPE+27, DUPE+28, DUPE+29, DUPE+33, DUPE+34, DUPE+35, HDR+3~, HDR+8, HDR+9* , HDR+10, HDR+12, HDR+13, HDR+15, HDR+16

Name	Comments	DBIA/ICR reference
A	;
DUPE(ACRD0,ACRD1,ACRD2,ACRD3,ACRDUP,ACRDR)
DEL(ACRD0,ACRD1,ACRD2,ACRD3,ACRTYPE)
RO	;EP -- CALLED FROM REOPEN BATCH OPTION
TYPE(Y)	;EP -- SELECT RECORD TYPE
RB(ACRCLR)
EDIT(ACRD0,ACRD1,ACRD2,ACRD3,ACRTYPE,DDSPARM)
DATE(X)	;EP -- FORMAT DATE
ID(ACRD0,ACRD1,ACRADD,Y,ACROUT)
HDR(D0,D1,D2)
CLR(ACRADD,Y,ACROPT,ACROUT,ACRCLR)
LINK(DA,X1,X3,X4,X5,X6,X7)
KILL(ACRD0,ACRD1,ACRD2,ACRD3)
DT(ACRD0,ACRADD,Y,ACROUT)
TRAIL(ACRD0,ACRD1,ACRD2)
OPT(ACROPT,ACROUT)	;EP
SEQ(ACRD0,ACRD1,ACRD2,ACRDR,ACRADD,Y)
SEL(ACRD0,ACRD1,ACRD2,ACROUT,ACRADD,ACROPT,ACRCLR)
ADDFMS(ACRD0,ACRD1,ACRD2,ACRD3,ACRSRC)	;EP
REOPEN(ACRD0,ACRD1,ACRD2)

Customize PDF page

Package: Commitment Register

Routine: ACRFDHRE

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: