Routine: XDRMERG2

Information

XDRMERG2 ;SF-IRMFO.SEA/JLI - TENATIVE UPDATE POINTER NODES ; [6/12/02 9:48am]

Package	Total	Call Graph
VA FileMan	5	$$FIND1^DIC FILE^DICN (FILE,UPDATE)^DIE ($$GET1,GETS)^DIQ ^DIR
Toolkit	3	XREFS^XDRMERG1 (MERGEIT,SAVEMERG)^XDRMERGB CHKFROM^XDRMERGC
Kernel	1	($$FMADD,$$FMDIFF,$$NOW)^XLFDT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 4

Package	Total	Caller Graph
Toolkit	4	XDR CHECK MERGE PROCESS STATUS XDRMERG XDRMERG0 XDRMERG1

Entry Points

Name	Comments	DBIA/ICR reference
DINUM(XVAL,XR,XDRIENS)	; FIND AND MERGE DINUMMED POINTERS
MERGEIT(XDRDIC,IENFROM,IENTO)	; MERGE TWO ENTRIES IN FILE
TIMSTAMP(PHASE,FILE,IEN)	;
XREFS(XVAL,XR,XDRIENS)	; FIND POINTERS BASED ON KNOWN X-REFS FOR FILE
SETVALS	; IDENTIFY THE LOCATIONS OF POINTERS (NODE, PIECE, AND X-REF I ANY)
DOMAIN(FILE,FROM)	; MERGE ACTUAL ENTRIES IN THE FILE (THE ONES POINTED TO)
CHKFROM(FROM,FILE)	;
GETSSN	; For files 2 and 200, get SSN value for XDRFROM entry
OVRWRI(FILE,IENFR,IENTO)	;
SETALIAS	; For selected files place data into alias field of TO entry
CHKLOCAL	; CHECK STATUS FOR LOCAL MERGE PROCESSES (EVEN IF SOME DATA EXISTS IN MERGE PROCESS FILE)
CHECK	;
CHK1	;
HEADER	;REM -9/25/96 Write header.
DATE8	;
ONESET(FILE,SPECIAL)	;
LOOP

External References

Name	Field # of Occurrence
$$FIND1^DIC	DOMAIN+30
FILE^DICN	DINUM+12
FILE^DIE	OVRWRI+19, SETALIAS+8
UPDATE^DIE	DINUM+20, DOMAIN+34, DOMAIN+38, SETALIAS+5
$$GET1^DIQ	DINUM+18
GETS^DIQ	OVRWRI+9, OVRWRI+14
^DIR	CHK1+16
XREFS^XDRMERG1	XREFS+1
MERGEIT^XDRMERGB	MERGEIT+3
SAVEMERG^XDRMERGB	DINUM+9, DOMAIN+22
CHKFROM^XDRMERGC	CHKFROM+1
$$FMADD^XLFDT	DOMAIN+2
$$FMDIFF^XLFDT	TIMSTAMP+2, LOOP+10, LOOP+14
$$NOW^XLFDT	TIMSTAMP+1, LOOP+10, LOOP+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: CHK1+3
Function Call: WRITE	Prompt: @IOF,! Line Location: CHK1+15
Function Call: WRITE	Prompt: ! Line Location: CHK1+20
Function Call: WRITE	Prompt: !,XNAME Line Location: CHK1+23
Function Call: WRITE	Prompt: ! Line Location: CHK1+23
Function Call: WRITE	Prompt: ?20,X," ",$P(^TMP($J,"BDT",N),"~") Line Location: CHK1+24
Function Call: WRITE	Prompt: ! Condition for execution: START="" Line Location: CHK1+24
Function Call: WRITE	Prompt: ?36,X Line Location: CHK1+25
Function Call: WRITE	Prompt: ?36,X Line Location: CHK1+27
Function Call: WRITE	Prompt: ?50,$P(XJOB,U,3),?55,$P(XJOB,U,4),?64," ",$P(XJOB,U,5) Line Location: CHK1+28
Function Call: WRITE	Prompt: !?5,"ERROR: ",$E($P(^TMP($J,"BDT",N),"~"),1,230),! Line Location: CHK1+29
Function Call: WRITE	Prompt: !,?55,"Current",?65,"Current" Line Location: HEADER+1
Function Call: WRITE	Prompt: !,"Merge Set Start Stat Last Chk Phase File Entry",! Line Location: HEADER+2
Routine Call	DIC Line Location: DOMAIN+30
Routine Call	DIE Line Location: OVRWRI+19 SETALIAS+8
Routine Call	DIE Line Location: DINUM+20 DOMAIN+34 DOMAIN+38 SETALIAS+5
Routine Call	DIR Line Location: CHK1+16

FileNo	Call Tags
^VA(15.3 - [#15.3]	FIND1^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	SETVALS+4
^DD("IX" - [#.11]	DINUM+12, DINUM+16, DINUM+17
^DIC - [#1]	DOMAIN+6
^DPT - [#2]	GETSSN+1
^TMP($J	SETVALS+1, SETVALS+2, CHK1+7, CHK1+14, CHK1+17, CHK1+18, CHK1+19, CHK1+24, CHK1+29, CHK1+30! , LOOP, LOOP+4, LOOP+5, LOOP+6, LOOP+10, LOOP+11, LOOP+14, LOOP+15
^VA(15 - [#15]	OVRWRI+7
^VA(15.2 - [#15.2]	TIMSTAMP+4*, CHK1+1, CHK1+5
^VA(200 - [#200]	GETSSN+2
^XTMP("XDRSTAT"	TIMSTAMP+6*, CHK1+6
^XTMP("XDRTESTK"	DOMAIN+2*

Label References

Name	Line Occurrences
CHK1	CHKLOCAL+3
DATE8	CHK1+24, CHK1+25, CHK1+27
GETSSN	DOMAIN+19
HEADER	CHK1+13, CHK1+15
LOOP	ONESET+2, LOOP
MERGEIT	DINUM+23, DOMAIN+25
ONESET	CHK1+8, CHK1+12
OVRWRI	DINUM+22, DOMAIN+24
SETALIAS	DOMAIN+28
SETVALS	DINUM+3
TIMSTAMP	DINUM+24, DOMAIN+39

Naked Globals

Name	Field # of Occurrence
^(	OVRWRI+7
^(0	LOOP+1, LOOP+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BA	CHECK+1~, CHK1+2, CHK1+20, CHK1+21
CHKLOCAL	CHKLOCAL+1~, CHKLOCAL+2*, CHK1+1
DA	DINUM+11~, MERGEIT+1~
DD	DINUM+11~
DFN	MERGEIT+1~, DOMAIN+20*
DIC	DINUM+11~, DINUM+12*
DIC(0	DINUM+12*
DIK	MERGEIT+1~
DINUM	DINUM+11~, DINUM+12*
DIR	CHK1+16!
DIR(0	CHK1+16*
DIRUT	CHKLOCAL+1~, CHECK+1~, CHK1+14, CHK1+15
DO	DINUM+11~
DT	DOMAIN+2
FILE	TIMSTAMP~, TIMSTAMP+4, TIMSTAMP+6, DOMAIN~, DOMAIN+3, DOMAIN+6, DOMAIN+22, DOMAIN+30, DOMAIN+32, DOMAIN+33 , DOMAIN+36, DOMAIN+37, DOMAIN+39, CHKFROM~, CHKFROM+1, GETSSN+1, GETSSN+2, OVRWRI~, OVRWRI+7, OVRWRI+9 , OVRWRI+10, OVRWRI+11, OVRWRI+12, OVRWRI+14, OVRWRI+15, OVRWRI+16, SETALIAS+2, SETALIAS+6, ONESET~, ONESET+2 , ONESET+3, LOOP+1, LOOP+2, LOOP+3, LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+9, LOOP+13* , LOOP+14*
FILEI	DINUM+1~, DINUM+6, DINUM+9, DINUM+12, DINUM+16, DINUM+17, DINUM+18, DINUM+20, DINUM+22, DINUM+24 , SETVALS+1, SETVALS+2, SETVALS+3*, SETVALS+4
FLDJ	DINUM+1~, DINUM+12, DINUM+16, DINUM+19, SETVALS+1, SETVALS+2, SETVALS+4
FROM	DINUM+4, DINUM+6, DINUM+7, DOMAIN~, DOMAIN+8, DOMAIN+10, DOMAIN+20, CHKFROM~, CHKFROM+1, OVRWRI+3 , OVRWRI+4, OVRWRI+5
I	MERGEIT+1~, OVRWRI+1~, OVRWRI+7, OVRWRI+10, OVRWRI+11
IEN	TIMSTAMP~, TIMSTAMP+4, TIMSTAMP+6
IENA	OVRWRI+1~, OVRWRI+3*, OVRWRI+4, OVRWRI+5
IENB	OVRWRI+1~, OVRWRI+4*, OVRWRI+5
IENFR	OVRWRI~, OVRWRI+3, OVRWRI+4, OVRWRI+5, OVRWRI+6
IENFROM	MERGEIT~, DOMAIN+1~, DOMAIN+7, DOMAIN+8, DOMAIN+9, DOMAIN+10, DOMAIN+11, DOMAIN+12, DOMAIN+13, DOMAIN+17 , DOMAIN+20, DOMAIN+22, DOMAIN+24, DOMAIN+25, DOMAIN+26, DOMAIN+27, DOMAIN+36, DOMAIN+39, GETSSN+1, GETSSN+2
IENNEW	DINUM+1~, DINUM+7*, DINUM+9, DINUM+10, DINUM+12, DINUM+19, DINUM+20, DINUM+22, DINUM+23
IENOLD	DINUM+1~, DINUM+4*, DINUM+5, DINUM+6, DINUM+7, DINUM+9, DINUM+18, DINUM+22, DINUM+23, DINUM+24
IENSF	OVRWRI+1~, OVRWRI+6*, OVRWRI+9, OVRWRI+10, OVRWRI+11, OVRWRI+16
IENST	OVRWRI+13~*, OVRWRI+14, OVRWRI+15, OVRWRI+16
IENTO	MERGEIT~, DOMAIN+1~, DOMAIN+10, DOMAIN+11, DOMAIN+20, DOMAIN+22, DOMAIN+24, DOMAIN+25, DOMAIN+27, DOMAIN+37 , OVRWRI~, OVRWRI+3, OVRWRI+4, OVRWRI+5, OVRWRI+11, OVRWRI+12, OVRWRI+13, SETALIAS+3, SETALIAS+4, SETALIAS+7
IENTOSTR	MERGEIT+1~
IOF	CHK1+3, CHK1+15
IOSL	CHK1+15
IOST	CHK1+15
>> J	CHK1+10*, CHK1+11
JOBNUM	ONESET+1~, ONESET+2*, LOOP+1, LOOP+5, LOOP+7, LOOP+9
JVAL	ONESET+1~, ONESET+2*, LOOP+3
M	CHECK+1~, CHK1+4*, CHK1+5, CHK1+6
N	CHKLOCAL+1~, CHECK+1~, CHK1+2, CHK1+7, CHK1+14, CHK1+17, CHK1+18, CHK1+19, CHK1+24, CHK1+29 , LOOP*, LOOP+4, LOOP+5, LOOP+6, LOOP+10, LOOP+11, LOOP+14, LOOP+15
NODE	MERGEIT+1~
NODE1	MERGEIT+1~
NODE2	MERGEIT+1~
NODEA	MERGEIT+1~
NODEB	MERGEIT+1~
PHASE	TIMSTAMP~, TIMSTAMP+4, TIMSTAMP+6
SFILE	MERGEIT+1~
SPECIAL	ONESET~, LOOP+1, LOOP+2, LOOP+3, LOOP+4, LOOP+7, LOOP+10, LOOP+14
START	CHECK+1~, CHK1+18, CHK1+20, CHK1+21, CHK1+24, LOOP+1, LOOP+2*, LOOP+15
U	TIMSTAMP+4, TIMSTAMP+6, SETVALS+2, SETVALS+3, SETVALS+4, DOMAIN+2, DOMAIN+12, DOMAIN+13, DOMAIN+17, GETSSN+1 , GETSSN+2, CHK1+5, CHK1+25, CHK1+27, CHK1+28, LOOP+1, LOOP+2, LOOP+3, LOOP+4, LOOP+7 , LOOP+9, LOOP+10, LOOP+13, LOOP+14
VALUE	MERGEIT+1~, DOMAIN+29~, DOMAIN+30*, DOMAIN+31
VREF	DINUM+1~, MERGEIT+1~, SETVALS+4*
X	DINUM+11~, DINUM+12, DOMAIN+15~, DOMAIN+16, DOMAIN+17, DOMAIN+18, CHKLOCAL+1~, CHECK+1~, CHK1+24, CHK1+25* , CHK1+26, CHK1+27, DATE8+2, DATE8+3, DATE8+4, DATE8+6
X1	DATE8+1~, DATE8+3, DATE8+4, DATE8+5, DATE8+6
XDRARR	DINUM+15~, OVRWRI+1~, SETALIAS+1~
XDRARR(	DINUM+20, OVRWRI+10, OVRWRI+11, SETALIAS+3, SETALIAS+4, SETALIAS+7
XDRARR1	OVRWRI+1~
XDRARR1(	OVRWRI+11, OVRWRI+12, OVRWRI+16
XDRARR2	OVRWRI+13~
XDRARR2(	OVRWRI+15, OVRWRI+16
XDRDIC	MERGEIT~, DOMAIN+6, DOMAIN+9, DOMAIN+11, DOMAIN+12, DOMAIN+13, DOMAIN+17, DOMAIN+25, DOMAIN+26, DOMAIN+27
>> XDRFDA	TIMSTAMP+3, TIMSTAMP+4
>> XDRFDA1	TIMSTAMP+4
XDRFFLD	DINUM+15~, DINUM+18, DINUM+19, DINUM+20
>> XDRFGLOB	SETVALS+4
XDRFIL	CHKLOCAL+1~, CHKLOCAL+2, CHECK+1~, CHK1+1, CHK1+4, CHK1+5, CHK1+6, CHK1+9, LOOP+3, LOOP+4 , LOOP+7, LOOP+9, LOOP+10, LOOP+12, LOOP+14
XDRFIL1	CHECK+1~, CHK1+6*, CHK1+8, CHK1+10, CHK1+11
XDRFIL2	CHECK+1~, CHK1+11*, CHK1+12
XDRFLDI	DINUM+15~, DINUM+17*, DINUM+18, DINUM+19, DINUM+20
XDRFROM	MERGEIT+1~
>> XDRGID	TIMSTAMP+6
XDRIENS	DINUM~, XREFS~, DOMAIN+1~, DOMAIN+5*
XDRINDSB	DINUM+15~, DINUM+16*, DINUM+17
>> XDRTESTK	DOMAIN+2*
XDRTO	MERGEIT+1~
XDRVAL	DOMAIN+1~, DOMAIN+12, DOMAIN+13, DOMAIN+14, DOMAIN+15, DOMAIN+18*, DOMAIN+23~, DOMAIN+26, SETALIAS+3, SETALIAS+7
XDRVAL("SSN"	GETSSN+1, GETSSN+2, SETALIAS+4
>> XDRXFLG	DINUM+6, DOMAIN+4
>> XDRXT	TIMSTAMP+2, TIMSTAMP+7*
XDRXX	MERGEIT+1~, DOMAIN+29~, DOMAIN+35!
XDRXX(	DOMAIN+32, DOMAIN+36, DOMAIN+37*
>> XDRYT	TIMSTAMP+1*, TIMSTAMP+2, TIMSTAMP+4, TIMSTAMP+6, TIMSTAMP+7
XDRYY	MERGEIT+1~, DOMAIN+29~, DOMAIN+33!, DOMAIN+35!
XDRYY(1	DOMAIN+33*
XFILNO	MERGEIT+1~, DOMAIN+3*, DOMAIN+24
XJOB	CHKLOCAL+1~, CHECK+1~, CHK1+7, CHK1+19, CHK1+25, CHK1+27, CHK1+28, LOOP+3, LOOP+7, LOOP+8 , LOOP+9, LOOP+10, LOOP+14, LOOP+15
XNAME	CHKLOCAL+1~, CHECK+1~, CHK1+7, CHK1+17, CHK1+22, CHK1+23, LOOP+3, LOOP+15
XNI	OVRWRI+1~, OVRWRI+6, OVRWRI+7, OVRWRI+8, OVRWRI+9
XNN	MERGEIT+1~, OVRWRI+1~, OVRWRI+5*, OVRWRI+7
XR	DINUM~, XREFS~, SETVALS+1, SETVALS+2
XREF	DINUM+1~, SETVALS+3*
XSTAT	CHKLOCAL+1~
XVAL	DINUM~, DINUM+5, DINUM+10, DINUM+12, DINUM+23, XREFS~
XVALUE	MERGEIT+1~
Y	DINUM+12, DINUM+15~, MERGEIT+1~

Customize PDF page

Package: Toolkit