Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: MCDUP1

Package: Medicine

Routine: MCDUP1


Information

MCDUP1 ;WASH/DCB-Repoints the pointed to file and removes the dup ;11/8/95 10:50

Source Information

Source file <MCDUP1.m>

Call Graph

Call Graph Total: 2

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

Caller Graph

Caller Graph Total: 1

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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All