XDRMERG2 ;SF-IRMFO.SEA/JLI - TENATIVE UPDATE POINTER NODES ; [6/12/02 9:48am]
Source file <XDRMERG2.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
XREFS(XVAL,XR,XDRIENS) | ; FIND POINTERS BASED ON KNOWN X-REFS FOR FILE
|
|
GETSSN | ; For files 2 and 200, get SSN value for XDRFROM entry
|
|
CHKLOCAL | ; CHECK STATUS FOR LOCAL MERGE PROCESSES (EVEN IF SOME DATA EXISTS IN MERGE PROCESS FILE)
|
|
MERGEIT(XDRDIC,IENFROM,IENTO) | ; MERGE TWO ENTRIES IN FILE
|
|
TIMSTAMP(PHASE,FILE,IEN) | ;
|
|
DOMAIN(FILE,FROM) | ; MERGE ACTUAL ENTRIES IN THE FILE (THE ONES POINTED TO)
|
|
OVRWRI(FILE,IENFR,IENTO) | ;
|
|
HEADER | ;REM -9/25/96 Write header.
|
|
CHK1 | ;
|
|
ONESET(FILE,SPECIAL) | ;
|
|
DATE8 | ;
|
|
CHKFROM(FROM,FILE) | ;
|
|
DINUM(XVAL,XR,XDRIENS) | ; FIND AND MERGE DINUMMED POINTERS
|
|
SETVALS | ; IDENTIFY THE LOCATIONS OF POINTERS (NODE, PIECE, AND X-REF I ANY)
|
|
SETALIAS | ; For selected files place data into alias field of TO entry
|
|
CHECK | ;
|
|
LOOP |
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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(15.3 - [#15.3] | FIND1^DIC |
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* |
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 |
Name | Field # of Occurrence |
---|---|
^( | OVRWRI+7 |
^(0 | LOOP+1, LOOP+2 |
>> | 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~ |