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 |  Marked Items  | All
Print Page as PDF
Routine: MCDUPM

Package: Medicine

Routine: MCDUPM


Information

MCDUPM ;WASH/DCB-DUPLICATION FINDER ;4/30/96 08:39

Source Information

Source file <MCDUPM.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Medicine 2 COMPILE^MCDUP1  ^MCDUPR  
VA FileMan 2 $$GET1^DID  EN^DIQ1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Medicine 2 MCDUP1  MCDUPE  

Entry Points

Name Comments DBIA/ICR reference
START ;
MAIN2(IEN) ;The 2nd half of main
DUP(FILE,ID) ;Main Routine
ID(FILE) ;loads the Identifiers from the ID node
POINTER(FILE,POINT) ;load the pointers from th PT node
INIT(FILE,ID) ; Builds a global with all of the indefitiers
LOAD(FILE,NAME,ID) ;Loads the array.
MOVE(FILE,FILEN,REC,COUNT) ;Get the Identifiers from the file
FINDDUPS(FILE,ID) ; Finds Duplications and store them in a temp global
BUILD(TEMP,FILEN) ; Move the duplication in a single global
TABLE(FILE,ID) ; Takes the temp array and builds a table for repointing
FILE ;;File#

External References

Name Field # of Occurrence
$$GET1^DID MAIN2+1, MAIN2+2
EN^DIQ1 MOVE+5
COMPILE^MCDUP1 MAIN2+7
^MCDUPR START+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Compiling Data: please wait",!!!!
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,IEN,?20,$$GET1^DID(IEN,"","","NAME")
  • Line Location: MAIN2+1
Function Call: WRITE
  • Prompt: ?60,$S($D(YES):"DUP",1:"NO DUP")
  • Line Location: MAIN2+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( ID+2, POINTER+2, POINTER+3
^MCAR( LOAD+5!
^TMP($J START+1!, MAIN2+4!, MAIN2+5*, MOVE+8*, FINDDUPS+2, BUILD+2, BUILD+3, BUILD+5*, BUILD+6, TABLE+2
, TABLE+3, TABLE+4, TABLE+5*

Label References

Name Line Occurrences
$$ID MAIN2+3
BUILD FINDDUPS+2
DUP MAIN2+4
FINDDUPS DUP+2
INIT DUP+2
LOAD INIT+4
MAIN2 START+5, START+7
MOVE LOAD+6
TABLE DUP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR BUILD+1~
ARR( BUILD+3*, BUILD+4, BUILD+5, BUILD+6
COUNT DUP+1~, POINTER+1~, POINTER+2*, POINTER+3, INIT+3*, LOAD+1~, MOVE~
DA MOVE+4~, MOVE+5*
DIC MOVE+4~, MOVE+5*
>> DIQ MOVE+5*
>> DIQ(0 MOVE+5*
DR MOVE+4~, MOVE+5*
FIELD ID+1~*, ID+2*
FIL START+2~
FILE START+2~, MAIN2+2*, MAIN2+3, MAIN2+4, MAIN2+7, DUP~, DUP+2, DUP+3, ID~, ID+1
, POINTER~, POINTER+1, INIT~, INIT+2, INIT+3, INIT+4, LOAD~, LOAD+3, LOAD+4, LOAD+5
, LOAD+6, MOVE~, MOVE+5, FINDDUPS~, FINDDUPS+1, TABLE~, TABLE+1
FILEN INIT+1~, INIT+2*, LOAD+1~, LOAD+3*, LOAD+5, LOAD+6, MOVE~, MOVE+6, MOVE+7, MOVE+8
, FINDDUPS+1~*, FINDDUPS+2, BUILD~, BUILD+2, BUILD+3, BUILD+5, BUILD+6, TABLE+1~*, TABLE+2, TABLE+3
, TABLE+4, TABLE+5
FLOC START+2~
HOLD MOVE+4~, MOVE+5*, MOVE+7*, MOVE+8
ID START+2~, MAIN2+3*, MAIN2+4, DUP~, DUP+2, DUP+3, ID+1*, ID+2*, ID+3, INIT~
, INIT+4, LOAD~, MOVE+5, MOVE+7, FINDDUPS~, TABLE~
ID3 MOVE+4~
ID3( MOVE+6, MOVE+7
IEN START+2~, START+4*, START+5, MAIN2~, MAIN2+1, MAIN2+2, MAIN2+4, MAIN2+5
IOF START+3
LOOP MOVE+4~, MOVE+7*, BUILD+1~*, BUILD+4*, BUILD+5, BUILD+6, TABLE+1~, TABLE+5*
MFILE ID+1~*, ID+2, POINTER+1~*, POINTER+2, POINTER+3
>> MREC INIT+3*
NAME LOAD~, LOAD+5
>> OFFSET START+4*
OLD TABLE+1~, TABLE+5*
ORD INIT+1~, INIT+3*, INIT+4
POINT DUP+1~, POINTER~
POINT( POINTER+3*
REC LOAD+1~, LOAD+2*, LOAD+4*, LOAD+5, LOAD+6, MOVE~, MOVE+5, MOVE+6, MOVE+7, MOVE+8
, BUILD+1~*, BUILD+2*, BUILD+3, TABLE+1~, TABLE+3*, TABLE+4, TABLE+5
>> RECC INIT+3*
TEMP ID+1~, POINTER+1~*, POINTER+2*, POINTER+3, INIT+1~, INIT+3*, INIT+4*, LOAD+1~, LOAD+2*, MOVE+4~
, FINDDUPS+1~*, FINDDUPS+2*, BUILD~, BUILD+2, BUILD+3, BUILD+5, BUILD+6, TABLE+1~*, TABLE+2*, TABLE+3
, TABLE+4, TABLE+5
TMP MOVE+4~, MOVE+7*
TMP1 MOVE+4~, MOVE+6*, MOVE+8
U MOVE+5, MOVE+7, BUILD+5, BUILD+6, TABLE+5
VAL START+2~
XDUP DUP+1~
YES START+2~, MAIN2+2!, MAIN2+4, MAIN2+5, MAIN2+6, MAIN2+7, DUP+3, BUILD+6*

Marked Items

Name Field # of Occurrence
$T(FILE+OFFSET START+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All