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 | 
  |