Routine: MCDUP1

Package	Total	Call Graph
Medicine	1	POINTER^MCDUPM
VA Fileman	1	$$GET1^DID

Package	Total	Caller Graph
Medicine	1	MCDUPM

Entry Points

Name	Comments	DBIA/ICR reference
REPOINT(FILE,POINTER,POINT)	;Repoints the records
SUBF0	;
SUBFILE(SUBFILE,FILE,SFIELD)	;Repoint records within the Subfile.
JOURNAL(VAL,FILE,TEMP,TEMP2,OLDREC,NEWREC)	;Stores the changes that was made
MAINFILE(PFILE,FILE,FIELD)	;Repoints records within the main file
SUBF(SUBFILE,FILE,SFIELD1,SFILE1,SNODE1,SFIELD,SNODE,SPIECE)	;
COMPILE(FILE)	; ; This routine requires ^TMP($J,"DUP",FILE

External References

Name	Field # of Occurrence
$$GET1^DID	MAINFILE+3, MAINFILE+5, SUBFILE+4, SUBFILE+7, SUBFILE+10, SUBF+3, SUBF0+1, SUBF0+3
POINTER^MCDUPM	COMPILE+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?10,"CHECKING FILES FOR POINTERS TO DUPLICATE ENTRIES:" Line Location: COMPILE+3
Function Call: WRITE	Prompt: !,?20,PFILE," " Line Location: REPOINT+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	REPOINT+5, SUBFILE+2, SUBFILE+3, SUBFILE+6, SUBFILE+9, SUBF+3, SUBF+5, SUBF+7, SUBF+8
^MCAR(	SUBFILE+15
^TMP($J	COMPILE+5, COMPILE+6, MAINFILE+9, SUBFILE+16, SUBF0+10, SUBF0+11, JOURNAL+2, JOURNAL+3, JOURNAL+4, JOURNAL+5

Label References

Name	Line Occurrences
JOURNAL	MAINFILE+14, SUBFILE+21, SUBF0+15
MAINFILE	REPOINT+6
REPOINT	COMPILE+9
SUBF	SUBFILE+9
SUBF0	SUBF+8
SUBFILE	REPOINT+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CFILE	MAINFILE+1~, MAINFILE+5, MAINFILE+6, MAINFILE+8, MAINFILE+12, SUBFILE+1~, SUBFILE+10, SUBFILE+11, SUBFILE+12, SUBFILE+14 , SUBFILE+19, SUBF+3*, SUBF0+6, SUBF0+7, SUBF0+8, SUBF0+9, SUBF0+13
DA	MAINFILE+1~, SUBFILE+1~
DIE	SUBFILE+1~
DR	MAINFILE+1~, SUBFILE+1~
FIELD	REPOINT+1~, REPOINT+2, REPOINT+6, REPOINT+9, MAINFILE~, MAINFILE+3, MAINFILE+13, SUBFILE+1~, SUBFILE+6, SUBFILE+7 , SUBFILE+9, SUBFILE+20, SUBF0+14
FILE	COMPILE~, COMPILE+4, COMPILE+7, COMPILE+9, REPOINT~, REPOINT+2, MAINFILE~, MAINFILE+9, MAINFILE+14, SUBFILE~ , SUBFILE+9, SUBFILE+15, SUBFILE+16, SUBFILE+21, SUBF~, SUBF0+10, SUBF0+11, SUBF0+15, JOURNAL~, JOURNAL+2 , JOURNAL+3, JOURNAL+4, JOURNAL+5
MAINFILE	SUBFILE+2, SUBFILE+6, SUBFILE+7, SUBFILE+9, SUBFILE+10, SUBFILE+20, SUBF+2~, SUBF+3, SUBF+7, SUBF+8 , SUBF0+1, SUBF0+14
MFIELD	SUBF+2~, SUBF+6, SUBF+7, SUBF+8, SUBF0+1
MFILE	REPOINT+1~, REPOINT+2*, REPOINT+6, REPOINT+9, SUBFILE+1~
MFN	SUBF+2~, SUBF+4, SUBF+5, SUBF+7
MNODE	SUBFILE+1~, SUBFILE+8, SUBFILE+9, SUBFILE+19, SUBFILE+20, SUBF+2~, SUBF0+2, SUBF0+13, SUBF0+14
MPIECE	SUBFILE+1~, SUBFILE+8*, SUBFILE+9
MREC	SUBFILE+1~, SUBFILE+11*, SUBFILE+19, SUBFILE+20
NAME	SUBFILE+1~, SUBFILE+3*, SUBFILE+6
NEWREC	MAINFILE+9, MAINFILE+11, MAINFILE+14, SUBFILE+16, SUBFILE+18, SUBFILE+21, SUBF0+11*, SUBF0+12, SUBF0+15, JOURNAL~ , JOURNAL+5
NFILE	COMPILE+2~, COMPILE+4*, COMPILE+5, COMPILE+6
NODE	MAINFILE+1~, MAINFILE+4*, MAINFILE+12, MAINFILE+13
OLDREC	MAINFILE+8, MAINFILE+9, MAINFILE+11, MAINFILE+14, SUBFILE+14, SUBFILE+15, SUBFILE+16, SUBFILE+18, SUBFILE+21, SUBF0+9* , SUBF0+10, SUBF0+11, SUBF0+12, SUBF0+15, JOURNAL~, JOURNAL+4
PFILE	REPOINT+1~, REPOINT+2*, REPOINT+3, REPOINT+5, REPOINT+6, REPOINT+9, MAINFILE~, MAINFILE+3, MAINFILE+5, MAINFILE+13
PIECE	MAINFILE+1~, MAINFILE+4*, MAINFILE+8, MAINFILE+12, MAINFILE+13
POINT	COMPILE+2~, COMPILE+7, COMPILE+9, REPOINT~
POINT(	COMPILE+9, REPOINT+2
POINTER	COMPILE+2~, REPOINT~, REPOINT+2
REC	MAINFILE+1~, MAINFILE+6, MAINFILE+12, MAINFILE+13, SUBF+2~, SUBF0+6, SUBF0+13, SUBF0+14
SFIELD	SUBFILE~, SUBFILE+4, SUBFILE+9, SUBFILE+20, SUBF~, SUBF0+14
SFIELD1	SUBF~, SUBF0+3, SUBF0+14
SFILE1	SUBF~, SUBF+3, SUBF+5, SUBF0+14
SNODE	SUBFILE+1~, SUBFILE+5*, SUBFILE+9, SUBFILE+19, SUBFILE+20, SUBF~, SUBF0+13, SUBF0+14
SNODE1	SUBF~, SUBF0+4*, SUBF0+13, SUBF0+14
SPIECE	SUBFILE+1~, SUBFILE+5, SUBFILE+14, SUBFILE+19, SUBFILE+20, SUBF~, SUBF0+5, SUBF0+9, SUBF0+13, SUBF0+14
SREC	SUBFILE+1~, SUBFILE+12, SUBFILE+19, SUBFILE+20, SUBF+2~, SUBF0+7, SUBF0+13, SUBF0+14
SREC1	SUBF+2~, SUBF0+8*, SUBF0+13, SUBF0+14
SUBFILE	SUBFILE~, SUBFILE+2, SUBFILE+3, SUBFILE+4, SUBFILE+9, SUBFILE+20, SUBF~, SUBF0+3, SUBF0+14
TEMP	COMPILE+2~, COMPILE+9, MAINFILE+1~, MAINFILE+3, MAINFILE+4, MAINFILE+12, MAINFILE+14, SUBFILE+1~, SUBFILE+4, SUBFILE+5 , SUBFILE+7, SUBFILE+8, SUBFILE+19, SUBFILE+21, SUBF0+1, SUBF0+2, SUBF0+3, SUBF0+4, SUBF0+5, SUBF0+13* , SUBF0+15, JOURNAL~, JOURNAL+2
TEMP2	MAINFILE+13, MAINFILE+14, SUBFILE+20, SUBFILE+21, SUBF0+14*, SUBF0+15, JOURNAL~, JOURNAL+3
U	REPOINT+5, MAINFILE+8, MAINFILE+9, MAINFILE+13, SUBFILE+14, SUBFILE+16, SUBFILE+20, SUBF0+9, SUBF0+11, SUBF0+14
VAL	MAINFILE+14, SUBFILE+21, SUBF0+15, JOURNAL~, JOURNAL+1*, JOURNAL+2, JOURNAL+3, JOURNAL+4, JOURNAL+5

Customize PDF page

Package: Medicine

Routine: MCDUP1

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: