DIKC ;SFISC/MKO-FIRE INDEX FILE CROSS REFERENCES ;24OCT2012
Source file <DIKC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INDEX(DIFILE,DIREC,DIFLD,DIXREF,DICTRL) | ;Fire Index file xrefs
|
|
| LOAD | ;Load xref information into @DIKTMP
|
|
| EXIT | ;Move error messages if necessary
|
|
| FIREALL(DIFILE,DA,DIROOT,DILOG,DIMF,DIKTMP,DIKON,DIKEY,DIKCT) | ;Fire xrefs, all recs
|
|
| FIRE(DIFILE,DA,DILOG,DIKTMP,DIKON,DIKEY,DIKCT,DIIENS) | ;Fire xrefs, one record
|
|
| FIRESUB(DIFILE,DA,DIROOT,DILOG,DIMF,DIKTMP,DIKON,DIKEY,DIKCT) | ;Fire xrefs for
|
|
| XECUTE(DIFILE,DIXR,DILOG,DIKCX1,DIKCX2,DIKTMP) | ;Xecute the logic in ^TMP
|
|
| XECKW(DIFILE,DA,DIKSUB) | ;Execute the logic to kill the entire index
|
|
| SETXARR(DIFILE,DIXR,DIKTMP,DINULL,DION,DI01) | ;Loop through DIKTMP and set X array.
|
