Routine: DICL2

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Local Variables

Package	Total	Call Graph
VA Fileman	3	ERR^DICF4 IDS^DICU2 $$VMINUS9^DIEFU

Package

Total

Call Graph

VA Fileman

ERR^DICF4 IDS^DICU2 $$VMINUS9^DIEFU

Package	Total	Caller Graph
VA Fileman	3	DICF1 DICFIX DICLIX

Package

Total

Caller Graph

VA Fileman

DICF1 DICFIX DICLIX

Entry Points

Name	Comments	DBIA/ICR reference
S3	; Additional screening for using an alternate index for loop through file.
S2	; execute any screen on transformed lookup values
S1	; entries tagged for archiving, or missing the .01 or already on ; the list should be screened out.
SCREEN(DIFILE,DIEN,DIFLAGS,DIFIEN,DISCREEN,DINDEX,DI0NODE)	;
S5
S4	; Execute Screen parameter, whole file screen.
A1	; if we're doing the final pass (just looking to see if there are any ; more entries), we don't actually add it to the list, just note what ; we found and quit
A3	; increment (or decrement) the output list subscript
A2	; increment the number found; if it's the max, we flag to make the ; next pass a final just looking pass
A4	; output the specified values of the record
ACCEPT(DIFILE,DIEN,DIFLAGS,DIFIEN,DINDEX,DIDENT,DILIST,DI0NODE)	; ; accept an entry into the output list

Name	Field # of Occurrence
ERR^DICF4	S5+7
IDS^DICU2	A4+3
$$VMINUS9^DIEFU	S1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	S4+2~
D	S2+6~, S3+2~, S3+5, S4+2~*
DA	A3+3~*
DI0NODE	SCREEN~, S1+4, S1+7, ACCEPT~, A4+3, A4+8
DIC	S4+3~*
DIC(0	S4+4, S4+5
DICONTXT	S5+5~, S5+6*, S5+7
DIDENT	ACCEPT~, A4+3
DIDENT(	A1+4, A1+5, A1+6, A1+10, A1+12!, A1+14, A1+15, A2+3, A2+4, A2+5 , A2+8, A2+9, A2+11, A2+12, A3+2, A4+7
DIEN	SCREEN~, S1+3, S1+6, S4+6, S4+7, S4+8, S4+9, S5+7, ACCEPT~, A2+12 , A3+3, A4+3, A4+6
>> DIERR	S5+3
DIFIEN	SCREEN~, S1+3, S4+7, ACCEPT~, A4+3
DIFILE	SCREEN~, S1+3, S1+6, S4+3, S4+8, S4+11~, S5+7, ACCEPT~, A4+3, A4+6
DIFILE(	S1+6, S4+3, S4+8, A4+6
DIFLAGS	SCREEN~, S1+5, S1+6, S2+3, S4+4, S4+5, S4+9, ACCEPT~, A1+7, A2+6 , A3+2, A4+2, A4+3, A4+5, A4+6, A4+7
DILIST	S1+7, ACCEPT~, A4+3, A4+7, A4+8
DILIST("ORDER"	A3+2*, A4+3
DINDEX	SCREEN~, S2+6, S4+2, ACCEPT~, A4+3
DINDEX(	S2+4, S2+6, A1+10, A2+8, A2+9
DINDEX("#"	S2+3, A1+9, A1+12, A1+13, A1+14, A2+7
DINDEX("MAXSUB"	S1+7, A4+8
DINDEX("ROOTCNG"	A2+9
DINDEX("WAY"	A3+2
>> DINDEX0(1	A2+9
DIPART	S3+2~, S3+6*
DIREC	S1+5~, S1+6, S1+7, A4+6~*, A4+7, A4+8
DISAME	A1+8~, A1+9, A1+11, A1+13, A1+14
DISCR	S2+10~, S3+1, S3+3, S3+4, S3+6, S3+7, S4+1, S4+12, S5+6
DISCR2	S2+4~*, S2+5, S2+7
DISCREEN	SCREEN~
DISCREEN(	S2+5, S2+7, S4+1, S4+12
DISCREEN("VAL"	S3+4, S3+6
DISCREEN("X"	S3+1, S3+3, S3+7
DISKIP	S2+2~, S2+3, S2+7, S2+9, S3+1, S3+3, S3+4, S3+5, S3+8, S3+10 , S4+1, S4+12, S5+4*, S5+8
DISUB	S2+3~, S2+4, S2+5, S2+6, S2+7, S3+2~, S3+4, S3+6, S3+7
DIVAL	S2+6~, S3+2~, S3+3, S3+6
DIXV	S4+11~
DIY	S4+11~
DIYX	S4+11~
I	S4+9~, A1+8~, A1+9, A1+10, A1+11, A1+12, A1+14, A2+7~*, A2+8, A2+9
U	S1+4, S1+6, S1+7, S4+8, A4+6, A4+8
X	S3+2~, S3+7, S4+8~
Y	S4+6~*
Y1	S4+7~*

Customize PDF page

Package: VA Fileman

Routine: DICL2

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Local Variables

Legend: