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~ |