DIKD2 ;SFISC/MKO-DELETE A NEW-STYLE INDEX ;4JAN2012
Source file <DIKD2.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 |
Package | Total | Caller Graph |
---|---|---|
VA FileMan | 2 | DDMOD DIKCR |
Name | Comments | DBIA/ICR reference |
---|---|---|
DELIXN(DIFIL,DIXR,DIFLG,DIKDOUT,DIKDMSG) | ;Delete new-style index
|
|
DELIXNX | ;Come here from DELIXN^DDMOD
|
|
END | ;Move error message if necessary and quit
|
|
DELDEF(DIXR) | ;Delete index definition
|
|
DIEZ(DIFLIST,DIFLG,DIKDOUT) | ;Recompile input templates containing field
|
|
CHK | ;Check input parameters
|
|
QUIT | ;Set flag to quit
|
|
KILL(DITOP,DIINDEX,DIFLG) | ;Delete index data
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | DELIXNX+8 |
^DD("IX" - [#.11] | CHK+3, CHK+8 |
Name | Field # of Occurrence |
---|---|
^("UP" | DELIXNX+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | DELIXNX+1~ |
DA | DELDEF+1~, DELDEF+3* |
DIC | DELIXNX+1~ |
DICTRL | KILL+1~, KILL+13*, KILL+15 |
DICTRL("LOGIC" | KILL+14* |
DIF | DELIXNX+1~, DELIXNX+6*, CHK+1, CHK+5, CHK+6 |
DIFIL | DELIXN~, DELIXNX+8, DIEZ+1~, DIEZ+2*, DIEZ+3, DIEZ+4, CHK+1, CHK+3, CHK+8, KILL+1~ , KILL+4*, KILL+5, KILL+6, KILL+13 |
DIFLD | DIEZ+1~, DIEZ+3*, DIEZ+4 |
DIFLG | DELIXN~, DELIXNX+5*, DELIXNX+6, DELIXNX+7, DELIXNX+13, DELIXNX+17, DELIXNX+18, DELDEF+2, DIEZ~, DIEZ+4 , CHK+6, KILL~, KILL+8 |
DIFLIST | DELIXNX+1~, DELIXNX+9, DELIXNX+17, DIEZ~ |
DIFLIST( | DIEZ+2, DIEZ+3 |
DIFM | DELIXNX+4~* |
DIINDEX | DELIXNX+1~, DELIXNX+13, KILL~, KILL+3 |
DIINDEX( | KILL+5, KILL+6 |
DIINDEX(0 | KILL+4 |
DIK | DELDEF+1~, DELDEF+3* |
DIKDMSG | DELIXN~, END+1 |
DIKDOUT | DELIXN~, DELIXNX+17, DELIXNX+18, DIEZ~, DIEZ+4 |
DIKTEML | DIEZ+1~, DIEZ+4 |
DIQUIT | DELIXNX+1~, DELIXNX+7, CHK+7, QUIT+1* |
DITOP | DELIXNX+1~, DELIXNX+8*, DELIXNX+13, DELIXNX+18, KILL~, KILL+13, KILL+15 |
DITYP | KILL+1~, KILL+6*, KILL+9 |
DIXR | DELIXN~, DELIXNX+9, DELIXNX+10, DELIXNX+16, DELDEF~, DELDEF+3, CHK+2, CHK+3, CHK+4!, CHK+5 , CHK+8*, CHK+9, KILL+1~, KILL+5*, KILL+6, KILL+15 |
I | CHK+3~*, CHK+4 |
U | KILL+6 |
X | DELIXNX+1~ |
Y | DELIXNX+1~ |