Routine: DDUCHK1

Package	Total	Caller Graph
Registration	1	DG53705I
VA Fileman	1	DDUCHK

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"'ID' node for field ",DDUCRFE," = 'Q'" Line Location: ID+0
Function Call: WRITE	Prompt: """ID"",",DDUCRFE Line Location: ID1+0
Function Call: WRITE	Prompt: """IX"" Subscript: "_DDUCXREF_" " Line Location: IX1+2
Function Call: WRITE	Prompt: !?5,"Cross-reference logic is missing for """,DDUCXREF,""" x-ref" Line Location: IX1+5
Function Call: WRITE	Prompt: """IX"",",DDUCXREF_","_DDUCRFI_","_DDUCRFE Line Location: IX2+0
Function Call: WRITE	Prompt: """PT"",",DDUCRFI Line Location: PT1+0
Function Call: WRITE	Prompt: """PT"" Subscript " Line Location: PT1+1
Function Call: WRITE	Prompt: "is not a pointer." Line Location: PT1+2
Function Call: WRITE	Prompt: "is not a pointer to file ",DDUCFI Line Location: PT1+3
Function Call: WRITE	Prompt: """PT"",",DDUCRFI,",",DDUCRFE Line Location: PTM+1
Function Call: WRITE	Prompt: !?10,"Duplicate ""NM"" node was deleted." Line Location: NM+1
Function Call: WRITE	Prompt: !?5,"Field: ",DDUCFE," (",$P(DDUCX,U),") " Line Location: WHO+0
Function Call: WRITE	Prompt: !?5,"File: ",DDUCRFI," " Line Location: WFI+0
Function Call: WRITE	Prompt: ?5,"Field: ",DDUCRFE," " Line Location: WFE+0
Function Call: WRITE	Prompt: "is missing." Line Location: WMS+0
Function Call: WRITE	Prompt: !?10,"^DD(",DDUCFI,",0," Line Location: M1+0
Function Call: WRITE	Prompt: ") was killed." Line Location: M2+0
Function Call: WRITE	Prompt: !?5,"*File: ",DDUCRFI," Index: """_DDUCXREF_""" has duplicate Fields." Line Location: MN+2
Function Call: WRITE	Prompt: !?21,"Field: ",DDUCRFEP," Field: ",DDUCRFE Line Location: MN+3

Name	Line Occurrences (* Changed, ! Killed)
^DD(	ID, ID1!, IX, IX1+1, IX1+2, IX1+3, IX1+4, IX2!, PT, PT1! , PT1+1, PTM!, AC2, NM, NM+1!, IXDUP+3, IXDUP+5, MN
^DD("ACOMP"	AC, AC1, ACM!
^DIC - [#1]	NM

Label References

Name	Line Occurrences
AC1	AC
AC2	AC1
AC3	AC2+2
ACM	AC2, AC2+1, AC3+1
ID1	ID
IX1	IX
IX2	IX1+2, IX1+5
IXDUP	IX1
M1	ID1, IX2, PT1, PTM+1
M2	ID1, IX2, PT1, PTM+1
PT1	PT
PTM	PT1+1, PT1+2, PT1+3
WFE	IX1+2, PT1+1, PT1+2, PT1+3
WFI	IX1+2, PT1, PT1+1, PT1+2, PT1+3
WMS	IX1+2, PT1, PT1+1

Name	Field # of Occurrence
^(	ID, IX1+4, MN
^(0	PT1+2, PT1+3, AC2+1, NM, MN
^(9.01	AC2+2

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DDUCF	AC2+2, AC3, AC3+1
>> DDUCFE	AC*, AC1, AC3, ACM, WHO
>> DDUCFI	ID, ID1, IX, IX1+1, IX2, PT, PT1, PT1+3, PTM, AC , AC1, AC3, ACM, NM, NM+1, M1, IXDUP+3, IXDUP+5, MN
>> DDUCFIX	ID, IX1+2, IX1+3, IX1+5, PT1, PT1+1, PT1+2, PT1+3, AC2, AC2+1 , AC3+1
DDUCRFE	ID, ID1, IX1+1, IX1+2, IX1+3, IX1+4, IX2, PT, PT1+1, PTM , PTM+1, AC1, AC2, ACM, WFE, IXDUP+1~, IXDUP+2, IXDUP+3, IXDUP+5*, IXDUP+6 , IXDUP+7, MN, MN+3, MN+4
DDUCRFE1	IX1+4*, IX1+6!
DDUCRFEP	IXDUP+1~, IXDUP+2, IXDUP+6, IXDUP+7, MN+3, MN+4, MN+6
DDUCRFEX	IX1+4*!, IX1+5
>> DDUCRFI	IX, IX1+1, IX1+2, IX1+3, IX1+4, IX2, PT, PT1, PT1+1, PTM , PTM+1, AC1*, AC2, ACM, WFI, IXDUP+3, IXDUP+5, MN, MN+2
>> DDUCRFI(1	NM*, NM+1
>> DDUCX	ID, AC2+1, AC2+2, WHO
>> DDUCX1	AC2+2*, AC3
>> DDUCX2	AC3*
>> DDUCXREF	IX*, IX1+1, IX1+2, IX1+4, IX1+5, IX2, IXDUP+5, MN, MN+2
>> DDUCZ	ID, IX, AC3*
I	MN~*!, MN+1
U	IX1+4, PT1+2, PT1+3, AC2+1, AC2+2, AC3, NM, WHO, MN

Customize PDF page

Package: VA Fileman

Routine: DDUCHK1

Information

Source Information

Caller Graph

Caller Graph Total: 2

Entry Points

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
WFI
ACM
WFE
IXDUP	;Check for duplicate fields for same xref ;22*130
M1
M2
PTM
NM
PT
WHO
IX2
IX1
IX
AC
WMS
ID
PT1
MN
ID1
AC3
AC2
AC1