DIKCR ;SFISC/MKO-API TO CREATE A NEW-STYLE XREF ;9:55 AM 1 Nov 2002 [ 12/09/2003 4:44 PM ]
Source file <DIKCR.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ER202(DIKCP1) | ;;The input variable or parameter that identifies the |1| is missing or invalid.
|
|
RECOMP(DIXR,DIFLG) | ;Recompile templates and xrefs, update triggering fields
|
|
GETNAM(F01,USE) | ;Get next available index name
|
|
SET(DIXR,DIFLG) | ;Execute set logic
|
|
CREIXNX | ;Entry point from DDMOD
|
|
CREIXN(DIKCXREF,DIFLG,DIXR,DIKCOUT,DIKCMSG) | ;Create a new-style index
|
|
EXIT | ;Write and move error messages if necessary
|
|
CHKVAL(DIKCXR,DIKCERR) | ;Check values, build logic for regular indexes
|
|
UPDATE(DIKCXR,DIXR,DIFLG) | ;Call Updater to create index, return DIXR=ien
|
|
CHK(DIKCXR,DIKCERR) | ;Check/default input array
|
Name | Field # of Occurrence |
---|---|
DELIXN^DDMOD | CREIXNX+18 |
MSG^DIALOG | EXIT+2 |
TRIG^DICR | RECOMP+14 |
CHK^DIE | CHK+10, CHK+15 |
UPDATE^DIE | UPDATE+41 |
WP^DIE | UPDATE+46 |
CALLOUT^DIEFU | EXIT+3 |
INIZE^DIEFU | CREIXNX+6 |
INDEX^DIKC | SET+13 |
$$FLEVDIFF^DIKCU | CHK+25, CHKVAL+11 |
$$FROOTDA^DIKCU | CHKVAL+13 |
$$VFNUM^DIKCU1 | CHK+6, CHK+26 |
ERR^DIKCU2 | ER202+1 |
GETFLIST^DIKCUTL | RECOMP+7 |
DIKZ^DIKD | RECOMP+11, RECOMP+20 |
DIEZ^DIKD2 | RECOMP+10, RECOMP+16 |
$$FNO^DILIBF | RECOMP+4, RECOMP+18, SET+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | GETNAM+6, GETNAM+12 |
^DD("IX" - [#.11] | RECOMP+4, GETNAM+5, GETNAM+11, SET+3, SET+4, SET+5 |
Name | Line Occurrences |
---|---|
$$GETNAM | CHK+36 |
CHK | CREIXNX+11 |
CHKVAL | CREIXNX+12 |
ER202 | CHK+5, CHK+9, CHK+25, CHK+30, CHK+31, CHK+32, CHK+40, CHKVAL+28, CHKVAL+37 |
EXIT | CREIXNX+11, CREIXNX+12, CREIXNX+21 |
RECOMP | CREIXNX+27 |
SET | CREIXNX+24 |
UPDATE | CREIXNX+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ASC | GETNAM+1~, GETNAM+3*, GETNAM+4 |
CNT | CHKVAL+1~, CHKVAL+20*, CHKVAL+42 |
DIERR | CREIXNX+5~, CREIXNX+16~, EXIT+1, UPDATE+42, CHKVAL+14 |
DIFLG | CREIXN~, CREIXNX+4*, CREIXNX+5, CREIXNX+17, CREIXNX+21, CREIXNX+24, CREIXNX+27, EXIT+2, UPDATE~, UPDATE+2 , RECOMP~, RECOMP+10, RECOMP+11, RECOMP+16, RECOMP+20, SET~, SET+7 |
DIFM | CREIXNX+6~* |
DIKCDEL | CREIXNX+1~, CREIXNX+7*, CREIXNX+15 |
DIKCDMSG | CREIXNX+1~, CREIXNX+16~ |
DIKCERR | CREIXNX+1~, CREIXNX+11, CREIXNX+12, CREIXNX+21*, EXIT+4, CHK~, CHK+2*, CHK+6*, CHK+10*, CHK+15* , CHK+24, CHK+26*, CHKVAL~, CHKVAL+7*, CHKVAL+10, CHKVAL+14*, CHKVAL+18, CHKVAL+33, CHKVAL+35, ER202+2* |
DIKCFDA | UPDATE+1~ |
DIKCFDA( | UPDATE+5*, UPDATE+6*, UPDATE+7*, UPDATE+8*, UPDATE+9*, UPDATE+10*, UPDATE+11*, UPDATE+12*, UPDATE+13*, UPDATE+14* , UPDATE+15*, UPDATE+16*, UPDATE+17*, UPDATE+18*, UPDATE+24*, UPDATE+25*, UPDATE+27*, UPDATE+29*, UPDATE+30*, UPDATE+31* , UPDATE+32*, UPDATE+33*, UPDATE+35*, UPDATE+36*, UPDATE+37*, UPDATE+38* |
DIKCFLAG | CREIXNX+16~, CREIXNX+17*, CREIXNX+18 |
DIKCFLIS | RECOMP+1~, RECOMP+7, RECOMP+10, RECOMP+14 |
DIKCI | RECOMP+1~, RECOMP+17*, RECOMP+18 |
DIKCIEN | UPDATE+1~ |
DIKCIEN(1 | UPDATE+43 |
DIKCMSG | CREIXN~, CREIXNX+5*, EXIT+3 |
DIKCOUT | CREIXN~, RECOMP+10, RECOMP+11, RECOMP+16, RECOMP+20 |
DIKCP1 | ER202~, ER202+1 |
DIKCRFIL | SET+1~, SET+4*, SET+12 |
DIKCTLIS | RECOMP+1~, RECOMP+14, RECOMP+15, RECOMP+16 |
DIKCTLIS( | RECOMP+17 |
DIKCTOP | RECOMP+1~, RECOMP+4*, RECOMP+11, RECOMP+18*, RECOMP+19, RECOMP+20, SET+1~, SET+3*, SET+12, SET+13 |
DIKCTOP( | RECOMP+11*, RECOMP+18, RECOMP+19* |
DIKCTRL | SET+1~, SET+12*, SET+13 |
DIKCTYP | SET+1~, SET+5*, SET+8 |
DIKCXR | CREIXNX+1~, CREIXNX+8*, CREIXNX+11, CREIXNX+12, CREIXNX+21, UPDATE~, CHK~, CHKVAL~ |
DIKCXR("ACTIVITY" | UPDATE+10, CHK+41* |
DIKCXR("DESCR" | UPDATE+46 |
DIKCXR("EXECUTION" | UPDATE+9, CHKVAL+47* |
DIKCXR("FILE" | CREIXNX+18, UPDATE+5, CHK+5, CHKVAL+3 |
DIKCXR("KILL | CONDITION" , UPDATE+17 |
DIKCXR("KILL" | UPDATE+15, CHKVAL+59* |
DIKCXR("NAME" | CREIXNX+18, EXIT+5, UPDATE+6, CHK+18, CHK+36*, CHKVAL+4 |
DIKCXR("ROOT | FILE" , UPDATE+13, UPDATE+29, CHK+19, CHK+22*, CHKVAL+5, TYPE" , UPDATE+12, CHK+23*, CHK+27* |
DIKCXR("SET C | ONDITION" , UPDATE+16 |
DIKCXR("SET" | UPDATE+14, CHKVAL+58* |
DIKCXR("SHORT | DESCR" , UPDATE+7, CHK+40 |
DIKCXR("TYPE" | UPDATE+8, CHK+9, CHK+11*, CHKVAL+6 |
DIKCXR("USE" | UPDATE+11, CHK+14, CHK+16*, CHK+37* |
DIKCXR("VAL" | UPDATE+21, UPDATE+23, CHKVAL+18, CHKVAL+19!, CHKVAL+23*, CHKVAL+24*, CHKVAL+27, CHKVAL+29, CHKVAL+32* |
DIKCXR("WHOLE | KILL" , UPDATE+18, CHKVAL+60* |
DIKCXREF | CREIXN~, CREIXNX+8 |
DIKCXREF("NAME" | CREIXNX+7 |
DIKTEML | RECOMP+1~ |
DIXR | CREIXN~, CREIXNX+21, CREIXNX+24, CREIXNX+27, EXIT+4*, EXIT+5*, UPDATE~, UPDATE+42!*, UPDATE+43*, UPDATE+46 , RECOMP~, RECOMP+4, RECOMP+7, SET~, SET+3, SET+4, SET+5, SET+13 |
F01 | GETNAM~, GETNAM+5, GETNAM+6, GETNAM+11, GETNAM+12 |
FCNT | CHKVAL+1~, CHKVAL+23*, CHKVAL+47 |
FIL | CHK+1~, CHK+5*, CHK+6, CHK+22, CHK+23, CHK+25, CHK+36, CHKVAL+1~, CHKVAL+3*, CHKVAL+11 , CHKVAL+13 |
I | GETNAM+1~, GETNAM+9*, GETNAM+10 |
IENS | UPDATE+1~, UPDATE+22*, UPDATE+24, UPDATE+25, UPDATE+27, UPDATE+29, UPDATE+30, UPDATE+31, UPDATE+32, UPDATE+33 , UPDATE+35, UPDATE+36, UPDATE+37, UPDATE+38 |
KILL | CHKVAL+1~, CHKVAL+56*, CHKVAL+57*, CHKVAL+59 |
L | CHKVAL+1~, CHKVAL+53* |
LDIF | CHKVAL+1~, CHKVAL+11*, CHKVAL+12*, CHKVAL+13, CHKVAL+53 |
LEV | CHKVAL+1~, CHKVAL+13 |
MAXL | CHKVAL+1~, CHKVAL+41*, CHKVAL+42, CHKVAL+43 |
NAM | CHK+1~, CHK+18*, CHK+30, CHK+31, CHK+36, CHK+37, CHKVAL+1~, CHKVAL+4*, CHKVAL+13 |
NAME | GETNAM+1~, GETNAM+3, GETNAM+4*, GETNAM+5*, GETNAM+6*, GETNAM+7, GETNAM+9, GETNAM+10*, GETNAM+11*, GETNAM+12* , GETNAM+13 |
ORD | UPDATE+1~, UPDATE+21*, UPDATE+23, UPDATE+24, CHKVAL+1~, CHKVAL+18*, CHKVAL+19, CHKVAL+23, CHKVAL+24, CHKVAL+27 , CHKVAL+29, CHKVAL+32, CHKVAL+41*, CHKVAL+43 |
R | UPDATE+1~, UPDATE+23*, UPDATE+25, UPDATE+27, UPDATE+30, UPDATE+31, UPDATE+32, UPDATE+33, UPDATE+35, UPDATE+36 , UPDATE+37, UPDATE+38 |
RFIL | CHK+1~, CHK+19*, CHK+22*, CHK+23, CHK+25, CHK+26, CHKVAL+1~, CHKVAL+5*, CHKVAL+11 |
ROOT | CHKVAL+1~, CHKVAL+13*, CHKVAL+15, CHKVAL+44*, CHKVAL+53*, CHKVAL+54*, CHKVAL+57 |
SBSC | CHKVAL+1~, CHKVAL+27*, CHKVAL+28, CHKVAL+29, CHKVAL+35*, CHKVAL+37, CHKVAL+41 |
SBSC( | CHKVAL+28, CHKVAL+29*, CHKVAL+35, CHKVAL+41 |
SBSC(0 | CHKVAL+56 |
SEQ | UPDATE+1~, UPDATE+21*, UPDATE+22, CHKVAL+1~, CHKVAL+35*, CHKVAL+37 |
SET | CHKVAL+1~, CHKVAL+56*, CHKVAL+57*, CHKVAL+58 |
STRT | GETNAM+1~, GETNAM+2*, GETNAM+4, GETNAM+10 |
TYP | CHK+1~, CHK+9*, CHK+10, CHK+11, CHK+32, CHK+37, CHKVAL+1~, CHKVAL+6*, CHKVAL+10, CHKVAL+38 , CHKVAL+50 |
U | EXIT+5, RECOMP+4, CHK+10, CHK+15, CHKVAL+29, CHKVAL+41, SET+3, SET+4, SET+5 |
USE | CHK+1~, CHK+14*, CHK+15, CHK+16, CHK+30, CHK+31, CHK+32, CHK+36, CHK+37, GETNAM~ , GETNAM+2 |
VAL | CHKVAL+1~, CHKVAL+42*, CHKVAL+43*, CHKVAL+44 |
WKIL | CHKVAL+1~, CHKVAL+15*, CHKVAL+56*, CHKVAL+60 |
X | CREIXNX+1~, UPDATE+1~, UPDATE+31*, UPDATE+32*, UPDATE+33*, UPDATE+35*, UPDATE+36*, UPDATE+37*, UPDATE+38* |
Y | CREIXNX+1~ |