DIKCUTL2 ;SFISC/MKO-UTILITY OPTION TO MODIFY INDEX ;17DEC2010
Source file <DIKCUTL2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRTMSG(DIXR) | ;
|
|
| BLDLOG(DIXR) | ;
|
|
| CHOOSE(DIKCCNT,DIKCPR,DIKCSCR) | ;
|
|
| TYPE() | ;
|
|
| FSTR(FIL,FLG) | ;
|
|
| GETXR(FIL,CNT,FLG) | ;
|
|
| LIST(CNT,HDR,SCR) | ;
|
|
| UPDEXEC(DIXR) | ;Update Execution based on number of field-type xref values
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | FSTR+2 |
| ^DD("IX" - [#.11] | GETXR+7, GETXR+8!, GETXR+11, PRTMSG+7, BLDLOG+5, BLDLOG+17, BLDLOG+18, UPDEXEC+3, UPDEXEC+4 |
| ^DD("KEY" - [#.31] | GETXR+12, PRTMSG+3, PRTMSG+4 |
| Name | Line Occurrences |
|---|---|
| $$FSTR | LIST+1, LIST+5, LIST+12, LIST+16 |
| UPDEXEC | BLDLOG+6 |
| Name | Field # of Occurrence |
|---|---|
| ^("NOREINDEX" | GETXR+9 |
| ^(0 | GETXR+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | GETXR~, GETXR+2!, GETXR+6*, GETXR+10*, GETXR+14*, LIST~, LIST+1, LIST+4, BLDLOG+1~, BLDLOG+21* , BLDLOG+29 |
| CNT( | GETXR+11*, GETXR+12*, LIST+8, LIST+9, LIST+10, LIST+11, LIST+14 |
| CRV | BLDLOG+1~, BLDLOG+17*, BLDLOG+18, UPDEXEC+1~, UPDEXEC+2*, UPDEXEC+3*, UPDEXEC+4 |
| CRV(1 | UPDEXEC+2* |
| CRV0 | BLDLOG+1~, BLDLOG+18*, BLDLOG+19, BLDLOG+20, BLDLOG+22, BLDLOG+23, UPDEXEC+1~, UPDEXEC+4*, UPDEXEC+5 |
| DIERR | BLDLOG+1~, UPDEXEC+1~ |
| DIKCCNT | CHOOSE~, CHOOSE+1, CHOOSE+7 |
| DIKCCNT( | CHOOSE+5 |
| DIKCCNT(0 | CHOOSE+7 |
| DIKCPR | CHOOSE~, CHOOSE+6 |
| DIKCSCR | CHOOSE~ |
| DIR | TYPE+1~, CHOOSE+2~ |
| DIR("?" | TYPE+5*, TYPE+6*, TYPE+7*, TYPE+8*, TYPE+9*, TYPE+10*, TYPE+11*, TYPE+12*, CHOOSE+8* |
| DIR("??" | CHOOSE+8* |
| DIR("A" | TYPE+3*, CHOOSE+6* |
| DIR("B" | TYPE+4*, CHOOSE+7* |
| DIR("C" | CHOOSE+5* |
| DIR(0 | TYPE+2*, CHOOSE+4* |
| DIROUT | TYPE+1~, CHOOSE+2~ |
| DIRUT | TYPE+1~, TYPE+14, CHOOSE+2~, CHOOSE+9 |
| DIXR | PRTMSG~, PRTMSG+3, PRTMSG+7, BLDLOG~, BLDLOG+5, BLDLOG+6, BLDLOG+17, BLDLOG+18, BLDLOG+41, BLDLOG+42 , BLDLOG+43, BLDLOG+44, UPDEXEC~, UPDEXEC+2, UPDEXEC+3, UPDEXEC+4, UPDEXEC+6 |
| DTOUT | TYPE+1~, CHOOSE+2~ |
| DUOUT | TYPE+1~, CHOOSE+2~ |
| F | GETXR+1~, GETXR+6*, GETXR+7, GETXR+8, GETXR+11 |
| FCNT | BLDLOG+1~, BLDLOG+20*, BLDLOG+44, UPDEXEC+1~, UPDEXEC+5*, UPDEXEC+6 |
| FDA | BLDLOG+1~, BLDLOG+40!, UPDEXEC+1~ |
| FDA( | BLDLOG+41*, BLDLOG+42*, BLDLOG+43*, BLDLOG+44*, UPDEXEC+6* |
| FIL | GETXR~, GETXR+3, GETXR+4, GETXR+14, LIST+2~, LIST+10*, LIST+16, FSTR~, FSTR+2 |
| FILE | BLDLOG+1~, BLDLOG+7*, BLDLOG+10, BLDLOG+12 |
| FLG | GETXR~, GETXR+3, GETXR+9, GETXR+14, FSTR~, FSTR+2 |
| HDR | LIST~, LIST+5*, LIST+6 |
| I | LIST+2~, LIST+19*, CHOOSE+2~, CHOOSE+5*, PRTMSG+1~, PRTMSG+11* |
| INDID | PRTMSG+1~, PRTMSG+7*, PRTMSG+8 |
| IX0 | BLDLOG+1~, BLDLOG+5*, BLDLOG+6, BLDLOG+7 |
| KEYID | PRTMSG+1~, PRTMSG+3*, PRTMSG+4*, PRTMSG+5*, PRTMSG+8 |
| KILL | BLDLOG+1~, BLDLOG+38*, BLDLOG+39*, BLDLOG+42 |
| L | BLDLOG+1~, BLDLOG+34* |
| LDIF | BLDLOG+1~, BLDLOG+10*, BLDLOG+11*, BLDLOG+12, BLDLOG+34 |
| MAXL | BLDLOG+1~, BLDLOG+23*, BLDLOG+24, BLDLOG+28*, BLDLOG+29, BLDLOG+30 |
| MSG | PRTMSG+1~, PRTMSG+9, BLDLOG+1~, UPDEXEC+1~ |
| MSG( | PRTMSG+11 |
| MSG(0 | PRTMSG+8* |
| NAME | BLDLOG+2~, BLDLOG+7*, BLDLOG+12 |
| ONEFIL | LIST+2~, LIST+4*, LIST+5, LIST+12 |
| ORD | BLDLOG+2~, BLDLOG+19*, BLDLOG+24, BLDLOG+28*, BLDLOG+30 |
| RFIL | LIST+2~, LIST+10*, LIST+12*, LIST+15, LIST+16 |
| RFILE | BLDLOG+2~, BLDLOG+7*, BLDLOG+10 |
| ROOT | BLDLOG+2~, BLDLOG+12*, BLDLOG+13, BLDLOG+31*, BLDLOG+34*, BLDLOG+35*, BLDLOG+39 |
| RTYPE | BLDLOG+2~, BLDLOG+7*, BLDLOG+10 |
| SB | GETXR+1~, GETXR+3 |
| SB( | GETXR+4*, GETXR+6 |
| SBSC | BLDLOG+2~, BLDLOG+22*, BLDLOG+24, BLDLOG+27*, BLDLOG+28 |
| SBSC( | BLDLOG+24*, BLDLOG+27, BLDLOG+28 |
| SBSC(0 | BLDLOG+38 |
| SCR | LIST~, LIST+9 |
| SET | BLDLOG+2~, BLDLOG+38*, BLDLOG+39*, BLDLOG+41 |
| TXT | LIST+2~, LIST+14*, LIST+15*, LIST+16*, LIST+18, LIST+19, LIST+20! |
| TXT( | LIST+19 |
| TYP | LIST+2~, LIST+10*, LIST+15 |
| U | GETXR+11, GETXR+12, GETXR+14, LIST+1, LIST+4, LIST+10, LIST+11, LIST+14, CHOOSE+5, FSTR+2 , PRTMSG+5, PRTMSG+7, BLDLOG+6, BLDLOG+7, BLDLOG+19, BLDLOG+20, BLDLOG+22, BLDLOG+23, BLDLOG+24, BLDLOG+28 , UPDEXEC+5 |
| UI | LIST+2~, LIST+11*, LIST+14 |
| VAL | BLDLOG+2~, BLDLOG+29*, BLDLOG+30*, BLDLOG+31 |
| WKILL | BLDLOG+2~, BLDLOG+13*, BLDLOG+38*, BLDLOG+43 |
| X | TYPE+1~, CHOOSE+2~ |
| XR | GETXR+1~, GETXR+7*, GETXR+8, GETXR+11, GETXR+12, LIST+2~, LIST+8*, LIST+9, LIST+10, LIST+11 , LIST+14 |
| Y | TYPE+1~, TYPE+14, LIST+2~, LIST+9!*, CHOOSE+2~, CHOOSE+9, CHOOSE+10 |
| Y(0 | LIST+9* |