XU8P698 ;BP/BDT - POST ROUTINE 698 CLEAN UP; 07/26/18
Source file <XU8P698.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ;
|
|
LIST | ; List all duplicate PARENT FACILITY
|
|
CLEAN | ; Clean the dubplicate PARENT FACILITY
|
|
CLEAN1(XUIEN,XUIEN1) | ; delete one given entry in the subfile
|
|
REINDEX(XUIEN) | ; delete x-refs in the subfile for an top entry
|
|
LOOP | ; fix nodes of ASSOCIATION
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | CLEAN1+1~, CLEAN1+2*, REINDEX+1~ |
DA(1 | CLEAN1+2*, REINDEX+2*, REINDEX+3* |
DIK | CLEAN1+1~, CLEAN1+2*, REINDEX+1~, REINDEX+2*, REINDEX+3* |
DIK(1 | REINDEX+2*, REINDEX+3* |
X | CLEAN+1~, CLEAN+3*, CLEAN+4 |
XUI | LIST+1~, LIST+2*, LIST+3, CLEAN+1~, CLEAN+6*, CLEAN+7, LOOP+1~, LOOP+2*, LOOP+3, LOOP+4 |
XUIEN | CLEAN1~, CLEAN1+2, REINDEX~, REINDEX+2, REINDEX+3 |
XUIEN1 | CLEAN1~, CLEAN1+2 |
XUY | LIST+1~, LIST+3*, CLEAN+1~, CLEAN+7* |
Y | CLEAN+1~, CLEAN+3*, CLEAN+4 |