XDRDADJ ;IHS/EDE/OHPRD;ADJUSTS DUPLICATE RECORD FILE UPON MERGE; [ 08/13/92 09:50 AM ]
Source file <XDRDADJ.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SET | ; DO SET SIDE OF XREFS
|
|
END | ||
DIK | ; CALL ^DIK TO DELETE ENTRY
; Delete entry because another entry has same pair. |
|
EOJ | ;
|
|
KILL2 | ;
|
|
START | ;
|
|
INIT | ;
|
|
XREFS | ; GET XREFS LESS TRIGGERS
|
|
KILL | ; DO KILL SIDE OF XREFS
|
|
SET2 | ;
|
|
ENTRIES | ; ADJUST ENTRIES
|
|
ENTRY | ; ADJUST ONE ENTRY
|
FileNo | Call Tags |
---|---|
^VA(15 - [#15] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | ENTRY+10 |
^DD( | XREFS+1 |
^VA(15 - [#15] | ENTRIES+1, ENTRY+3, ENTRY+4, ENTRY+7*, ENTRY+9, KILL+2, KILL+5, SET+2, SET+5, INIT+2 |
Name | Line Occurrences |
---|---|
DIK | ENTRY+5, ENTRY+9 |
ENTRIES | START+5 |
ENTRY | ENTRIES+1 |
EOJ | END |
INIT | START+4 |
KILL | ENTRY+6 |
KILL2 | KILL+3, KILL+6 |
SET | ENTRY+8 |
SET2 | SET+3, SET+6 |
XREFS | INIT+1 |
Name | Field # of Occurrence |
---|---|
^( | XREFS+1 |
^(0 | ENTRIES+1, ENTRY+9, XREFS+1 |
^(1 | XREFS+1 |
^(2 | XREFS+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | ENTRY+3*, ENTRY+4, INIT+2*, INIT+3, INIT+4, INIT+5, INIT+6 |
D | START+3~ |
D0 | START+3~ |
DA | START+2, START+3~, ENTRY+1*, ENTRY+3, ENTRY+7, ENTRY+9, KILL+2, KILL+5, SET+2, SET+5 |
DB | START+3~ |
DC | START+3~ |
DE | START+3~ |
DG | START+3~ |
DH | START+3~ |
DI | START+3~ |
DIC | START+3~ |
DICR | START+3~ |
DIE | START+3~ |
DIEL | START+3~ |
DIFLD | START+3~ |
DIG | START+3~ |
DIH | START+3~ |
DIK | START+3~, DIK+2*, DIK+3! |
DINAME | START+3~ |
DIP | START+3~ |
DIU | START+3~ |
DIV | START+3~ |
DIW | START+3~ |
DK | START+3~ |
DL | START+3~ |
DM | START+3~ |
DOV | START+3~ |
DP | START+3~ |
DQ | START+3~ |
DR | START+3~ |
DSC | START+3~ |
DU | START+3~ |
DV | START+3~ |
DW | START+3~ |
DXS | START+3~ |
F | START+3~, INIT+1*, XREFS+1 |
U | ENTRIES+1, ENTRY+2, ENTRY+3, ENTRY+7, ENTRY+9, KILL+2, KILL+5, SET+2, SET+5, INIT+2 , INIT+3, INIT+5, INIT+7 |
X | START+3~, ENTRIES+1*, ENTRY+2, ENTRY+4*, ENTRY+10*, KILL+2*, KILL+5*, SET+2*, SET+5*, INIT+1* , INIT+2*, INIT+3, INIT+5, INIT+7, XREFS+1 |
XDRD | ENTRY+10! |
XDRDADJ | START+1!, EOJ+1! |
XDRDADJ("DA" | START+2*, ENTRIES+1, INIT+2 |
XDRDADJ("FL" | ENTRY+4, INIT+7*, INIT+8, INIT+9 |
XDRDADJ("FLD" | KILL+1*, KILL+4*, KILL2+1, SET+1*, SET+4*, SET2+1 |
XDRDADJ("FPC" | INIT+4* |
XDRDADJ("FR" | INIT+3*, INIT+8 |
XDRDADJ("FRC" | ENTRIES+1, ENTRY+2, INIT+8* |
XDRDADJ("PC" | ENTRY+2*, ENTRY+3, ENTRY+7, KILL+1, KILL+2, SET+1, SET+2 |
XDRDADJ("TO" | ENTRY+3, INIT+5*, INIT+9 |
XDRDADJ("TOC" | ENTRY+7, INIT+9* |
XDRDADJ("TPC" | INIT+6* |
XDRDADJY | ENTRIES+1*, ENTRY+1, ENTRY+10, EOJ+1! |
XDRDPDA | ENTRY+10*! |
XDRDXREF | EOJ+1! |
XDRDXREF( | KILL2+1, SET2+1, XREFS+1* |
XDRFL | ENTRY+10~ |
XDRQFLG | ENTRY+10~ |
Y | START+3~, ENTRY+4*, ENTRY+5, KILL2+1*, SET2+1*, XREFS+1* |