DIKKUTL1 ;SFISC/MKO-KEY CREATION ;10:08 AM 12 Jan 2001 [ 04/02/2003 8:25 AM ]
Source file <DIKKUTL1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
NAMERR(MSG) | ;Invalid Index Name error
|
|
KEYID(KEY,TOP,FILE) | ;Return string of text that identifies the key
|
|
NAME(DIKKFILE) | ;Get next available Key name
|
|
ADDCRV(DIXR,DIKKFLD,DIKKERR) | ;Add fields to Cross-Reference Values multiple
|
|
GETFLD(KEY,FLD) | ;Get list fields in key
|
|
STUFF(DIXR,DIKKF01,DIKKFILE,DIKKNAM,DIKKFLD,DIKKID) | ;Stuff other values into
|
|
ADDUI(DIKKFILE,DIKKNAM,DIXR) | ;Add new entry to Index file
|
|
UIMOD(DIXR,DIKKEY,DIKKTOP,DIKKFILE) | ;Modify the UI to match the Key
|
|
CREATE(DIKKTOP,DIKKFILE) | ;Create a new key
|
|
DELCRV(DIXR) | ;Delete all entries in CRV multiple
|
|
UICREATE(DIKKEY,DIKKTOP,DIKKFILE,DIKKNO) | ;Create a new UI for key
|
|
BLDLOG(DIKKF01,DIKKFILE,DIKKNAM,DIKKFLD,DIKKSET,DIKKILL,DIKKWKIL) | ;
|
Name | Field # of Occurrence |
---|---|
MSG^DIALOG | CREATE+11, UICREATE+25, ADDUI+5, STUFF+19, ADDCRV+17 |
FILE^DICN | ADDCRV+8 |
FILE^DIE | UICREATE+25, STUFF+18, ADDCRV+16 |
UPDATE^DIE | CREATE+11, ADDUI+5 |
^DIK | DELCRV+3 |
LOADXREF^DIKC1 | UIMOD+9, UIMOD+23, UICREATE+31 |
$$FLEVDIFF^DIKCU | BLDLOG+6 |
$$FROOTDA^DIKCU | BLDLOG+8 |
WRAP^DIKCU2 | UICREATE+10 |
GETFLIST^DIKCUTL | UIMOD+8, UIMOD+22, UICREATE+30 |
$$NAME^DIKCUTL1 | UICREATE+15 |
KSC^DIKCUTL3 | UIMOD+24, UICREATE+32 |
EDIT^DIKKUTL | CREATE+14 |
^DIR | NAME+11 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | ADDCRV+3 |
^DD("IX" - [#.11] | UIMOD+15, DELCRV+3 |
^DD("KEY" - [#.31] | CREATE+10, GETFLD+9, GETFLD+10, GETFLD+11, GETFLD+12, GETFLD+13, NAME+4, NAME+12, KEYID+1 |
Name | Line Occurrences |
---|---|
$$KEYID | UIMOD+2, UICREATE+5 |
$$NAME | CREATE+4 |
ADDCRV | UIMOD+17, UICREATE+21 |
ADDUI | UICREATE+19 |
BLDLOG | STUFF+5 |
DELCRV | UIMOD+16 |
GETFLD | UIMOD+12, UICREATE+16 |
NAMERR | NAME+13 |
STUFF | UIMOD+15, UICREATE+20 |
Name | Field # of Occurrence |
---|---|
^(0 | UIMOD+15, KEYID+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | ADDCRV+1~, ADDCRV+8!, DELCRV+1~, DELCRV+3*, GETFLD+7~, GETFLD+12*, GETFLD+13 |
DA(1 | ADDCRV+6*, DELCRV+2* |
DD | ADDCRV+1~, ADDCRV+8! |
DIC | ADDCRV+1~, ADDCRV+6*, ADDCRV+8! |
DIC("P" | ADDCRV+3* |
DIC(0 | ADDCRV+6* |
DIERR | CREATE+11, UICREATE+2~, UICREATE+25, ADDUI+5, STUFF+2~, STUFF+19, ADDCRV+1~, ADDCRV+17 |
DIK | DELCRV+1~, DELCRV+2* |
DIKKERR | UIMOD+1~, UICREATE+2~, UICREATE+21, ADDCRV~, ADDCRV+4, ADDCRV+9*, ADDCRV+17* |
DIKKEY | CREATE+1~, CREATE+13*, CREATE+14, UIMOD~, UIMOD+2, UIMOD+12, UICREATE~, UICREATE+5, UICREATE+16, UICREATE+24 |
DIKKF01 | STUFF~, STUFF+5, STUFF+13, BLDLOG~, BLDLOG+6, BLDLOG+8 |
DIKKFDA | CREATE+1~, UICREATE+2~, UICREATE+26!, ADDUI+1~, STUFF+2~, ADDCRV+1~ |
DIKKFDA( | CREATE+8*, CREATE+9*, CREATE+10*, UICREATE+24*, ADDUI+3*, ADDUI+4*, STUFF+8*, STUFF+9*, STUFF+10*, STUFF+11* , STUFF+12*, STUFF+13*, STUFF+14*, STUFF+15*, STUFF+16*, STUFF+17*, ADDCRV+12*, ADDCRV+13*, ADDCRV+14*, ADDCRV+15* |
DIKKFILE | CREATE~, CREATE+4, CREATE+8, CREATE+10, CREATE+14, UIMOD~, UIMOD+2, UIMOD+9, UIMOD+15, UIMOD+23 , UICREATE~, UICREATE+5, UICREATE+15, UICREATE+19, UICREATE+20, UICREATE+31, ADDUI~, ADDUI+3, STUFF~, STUFF+5 , STUFF+13, STUFF+14, BLDLOG~, BLDLOG+6, NAME~, NAME+4, NAME+12 |
DIKKFLD | UIMOD+1~, UIMOD+12, UIMOD+15, UIMOD+17, UICREATE+16, UICREATE+20, UICREATE+21, STUFF~, STUFF+5, STUFF+10 , ADDCRV~, BLDLOG~, BLDLOG+3, BLDLOG+13 |
DIKKFLD( | ADDCRV+4, ADDCRV+14, ADDCRV+15, BLDLOG+12 |
DIKKFLIS | UIMOD+1~, UIMOD+8, UIMOD+22, UIMOD+24, UICREATE+2~, UICREATE+30, UICREATE+32 |
DIKKID | UIMOD+1~, UIMOD+2*, UIMOD+15, UICREATE+2~, UICREATE+5*, UICREATE+9, UICREATE+20, STUFF~, STUFF+8 |
DIKKIEN | CREATE+1~, CREATE+13!, ADDUI+1~ |
DIKKIEN(1 | CREATE+13, ADDUI+6 |
DIKKILL | STUFF+2~, STUFF+5, STUFF+16, BLDLOG~, BLDLOG+3*, BLDLOG+20* |
DIKKLDIF | BLDLOG+2~, BLDLOG+6*, BLDLOG+7*, BLDLOG+8, BLDLOG+16 |
DIKKMSG | UIMOD+1~, UICREATE+2~, UICREATE+8!, UICREATE+10, UICREATE+12! |
DIKKMSG( | UICREATE+11 |
DIKKMSG(0 | UICREATE+9* |
DIKKNAM | UICREATE+2~, UICREATE+15*, UICREATE+19, UICREATE+20, ADDUI~, ADDUI+4, STUFF~, STUFF+5, BLDLOG~, BLDLOG+8 |
DIKKNAME | CREATE+1~, CREATE+4*, CREATE+7, CREATE+9, NAME+1~, NAME+4*, NAME+5*, NAME+9 |
DIKKNEW | UIMOD+1~, UIMOD+24, UICREATE+2~, UICREATE+32 |
DIKKNO | UICREATE~, UICREATE+4!, UICREATE+15*, UICREATE+19*, UICREATE+21*, UICREATE+25* |
DIKKOLD | UIMOD+1~, UIMOD+24 |
DIKKROOT | BLDLOG+2~, BLDLOG+8*, BLDLOG+9, BLDLOG+13*, BLDLOG+16*, BLDLOG+17*, BLDLOG+20 |
DIKKSET | STUFF+2~, STUFF+5, STUFF+15, BLDLOG~, BLDLOG+3*, BLDLOG+20* |
DIKKSS | ADDCRV+1~, ADDCRV+4*, ADDCRV+7, ADDCRV+12, ADDCRV+13, ADDCRV+14, ADDCRV+15, BLDLOG+2~, BLDLOG+12*, BLDLOG+13 |
DIKKTOP | CREATE~, CREATE+14, UIMOD~, UIMOD+2, UIMOD+24, UICREATE~, UICREATE+5, UICREATE+32 |
DIKKWKIL | STUFF+2~, STUFF+5, STUFF+17, BLDLOG~, BLDLOG+3*, BLDLOG+9* |
DINUM | ADDCRV+1~, ADDCRV+7*, ADDCRV+8! |
DIR | NAME+2~ |
DIR("A" | NAME+8* |
DIR("B" | NAME+9* |
DIR(0 | NAME+7* |
DIROUT | NAME+2~ |
DIRUT | NAME+2~, NAME+10, NAME+11, NAME+14 |
DIXR | UIMOD~, UIMOD+8, UIMOD+9, UIMOD+15, UIMOD+16, UIMOD+17, UIMOD+22, UIMOD+23, UICREATE+2~, UICREATE+19 , UICREATE+20, UICREATE+21, UICREATE+24, UICREATE+30, UICREATE+31, ADDUI~, ADDUI+6*, STUFF~, STUFF+8, STUFF+9 , STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+14, STUFF+15, STUFF+16, STUFF+17, ADDCRV~, ADDCRV+6 , ADDCRV+12, ADDCRV+13, ADDCRV+14, ADDCRV+15, DELCRV~, DELCRV+2, DELCRV+3 |
DO | ADDCRV+1~, ADDCRV+8! |
DTOUT | NAME+2~ |
DUOUT | NAME+2~ |
FD | GETFLD+7~, GETFLD+10*, GETFLD+11, GETFLD+12, GETFLD+14 |
FI | GETFLD+7~, GETFLD+11*, GETFLD+12, GETFLD+14 |
FILE | KEYID~, KEYID+1 |
FLD | GETFLD~, GETFLD+8!*, GETFLD+14* |
FLD( | GETFLD+14* |
I | UICREATE+2~, UICREATE+11*, UICREATE+12! |
KEY | GETFLD~, GETFLD+9, GETFLD+10, GETFLD+11, GETFLD+12, GETFLD+13, KEYID~, KEYID+1 |
L | BLDLOG+2~, BLDLOG+16* |
MSG | NAMERR~, NAMERR+1 |
SQ | GETFLD+7~, GETFLD+8*, GETFLD+9*, GETFLD+10, GETFLD+11, GETFLD+12 |
TOP | KEYID~, KEYID+1 |
U | UIMOD+15, ADDCRV+3, ADDCRV+14, ADDCRV+15, GETFLD+14, KEYID+1 |
X | ADDCRV+1~, ADDCRV+7*, NAME+2~, NAME+10, NAME+12, NAME+14, NAMERR+2! |
Y | ADDCRV+1~, ADDCRV+9, NAME+2~ |