DIK ;SFISC/GFT,YJK,XAK-GATHER A FILE'S XREFS TO EXECUTE ;8NOV2014
Source file <DIK.m>
  | action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DD1 | ||
| DISKIPIN(DISKIPIN) | ;ALSO CALLED FROM DIU1
 | 
|
| DD | ;CALLED FROM DIKZ0
 | 
|
| DDGO | ||
| E | ||
| DH | ||
| DV | ||
| DW | ||
| D | ||
| I | ||
| INX | ||
| CHK(F,DU,DIKCHK) | ;Set DIKCHK(f) for file F and its parents
 | 
|
| A | ||
| A1 | ||
| 0 | ;REMEMBER HOW TO GRAB THE FIELD'S VALUE
 | 
|
| IX | ;One entry, all fields, KILL then SET
 | 
|
| IX1 | ;One entry, all fields, SET (X=1)
 | 
|
| IX2 | ;One entry, all fields, KILL (X=2)
 | 
|
| IXALL | ;All entries, SET (X=1)
 | 
|
| IXALL2 | ;All entries, KILL (X=2)
 | 
|
| EN | ;One entry, KILL then SET
 | 
|
| EN1 | ;One entry, SET (X=1)
 | 
|
| EN2 | ;One entry, KILL (X=2)
 | 
|
| ENALL | ;All entries, SET (X=1)
 | 
|
| ENALL2 | ;All entries, KILL (X=2)
 | 
|
| N(REINDOK) | ||
| PR | ||
| CK | ||
| FREE(X) | ||
| DIKJ | ||
| INT | ||
| CHKS | ;
 | 
|
| DIK0 | ||
| Q |