DIKK2 ;SFISC/MKO-CHECK INPUT PARAMETERS TO INTEG^DIKK ;2:20 PM 15 Jul 1999 [ 04/02/2003 8:25 AM ]
Source file <DIKK2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| IENS(DA) | ;Return IENS from DA array | |
| ERR | ;Set error flag | |
| KEYCHK(DIFIL,DA,DIFLD,DIXREF,DIIENS,DITAR,DINEW) | ;Check whether indexes | |
| CHECK(RFIL,DA,DITAR,DIKKQUIT) | ;Check key integrity for one record | |
| INIT | ;Check and setup | |
| UNIQIX(DIUIR,DIIENSC,DA,DIVAL,DISS,DIEVK) | ; | |
| UNIQUE(DIFILE,DIUINDEX,X,DA,DITMP) | ;Check whether X values are unique | 
| Name | Field # of Occurrence | 
|---|---|
| SETXARR^DIKC | KEYCHK+9 | 
| LOADXREF^DIKC1 | UNIQUE+5 | 
| $$FLEV^DIKCU | INIT+27 | 
| $$FNUM^DIKCU | INIT+22, INIT+26 | 
| $$FROOTDA^DIKCU | INIT+18 | 
| $$VDA^DIKCU1 | INIT+14 | 
| $$VFLAG^DIKCU1 | INIT+33 | 
| $$VFNUM^DIKCU1 | INIT+41 | 
| ERR^DIKCU2 | INIT+8, INIT+20, INIT+29, INIT+38 | 
| XRINFO^DIKCU2 | CHECK+6, UNIQUE+8 | 
| SETK^DIKK | CHECK+21, KEYCHK+11 | 
| SETN^DIKK | CHECK+13 | 
| $$CREF^DILF | INIT+25 | 
| DA^DILF | INIT+12 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD("KEY" - [#.31] | INIT+37, KEYCHK+6, KEYCHK+7 | 
| ^TMP("DIKK" | CHECK+4, CHECK+12, UNIQIX+15 | 
| ^TMP("DIKKTAR" | INIT+4 | 
| Name | Line Occurrences | 
|---|---|
| $$IENS | INIT+11, INIT+20, INIT+29, CHECK+2, UNIQUE+14, UNIQIX+11, KEYCHK+3 | 
| $$UNIQIX | CHECK+21, UNIQUE+20 | 
| $$UNIQUE | KEYCHK+10 | 
| ERR | INIT+8, INIT+14, INIT+18, INIT+20, INIT+22, INIT+26, INIT+27, INIT+29, INIT+33, INIT+38 , INIT+41 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | CHECK+4 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DA | INIT+11*, INIT+12, INIT+13*, INIT+14, INIT+20, INIT+29, CHECK~, CHECK+2, CHECK+21, UNIQUE~ , UNIQUE+14, UNIQUE+20, UNIQIX~, UNIQIX+3, UNIQIX+10*, UNIQIX+11, UNIQIX+24!*, KEYCHK~, KEYCHK+3, KEYCHK+10 , IENS~, IENS+2 | 
| DA( | UNIQIX+10*, IENS+2 | 
| DA(" " | IENS+2 | 
| >> DICTRL | INIT+33, INIT+39, INIT+43 | 
| >> DICTRL("TAR" | INIT+4 | 
| DIDASV | UNIQIX+2~, UNIQIX+3*, UNIQIX+24 | 
| DIEVK | UNIQIX~, UNIQIX+15 | 
| >> DIF | INIT+8, INIT+14, INIT+18, INIT+20, INIT+22, INIT+26, INIT+27, INIT+29, INIT+33, INIT+38 , INIT+41 | 
| DIFIL | KEYCHK~, KEYCHK+6, KEYCHK+8, KEYCHK+9, KEYCHK+10, KEYCHK+11 | 
| DIFILE | INIT+8, INIT+17, INIT+18, INIT+20, INIT+22*, INIT+24, INIT+25, INIT+26*, INIT+27, INIT+29 , INIT+40, UNIQUE~, UNIQUE+17, UNIQUE+19 | 
| DIFLD | KEYCHK~, KEYCHK+6 | 
| DIIENS | INIT+1~, INIT+11*, INIT+12*, INIT+19, INIT+28, UNIQIX+2~, UNIQIX+9*, UNIQIX+10, UNIQIX+11*, UNIQIX+15 , KEYCHK~, KEYCHK+3*, KEYCHK+11 | 
| DIIENSC | UNIQUE+1~, UNIQUE+14*, UNIQUE+20, UNIQIX~, UNIQIX+11 | 
| >> DIKERR | INIT+30, INIT+36, ERR+1* | 
| DIKEY | KEYCHK+2~, KEYCHK+5*, KEYCHK+6*, KEYCHK+7, KEYCHK+11 | 
| >> DIKFIL | INIT+37*, INIT+38, INIT+39*, INIT+40*, INIT+41 | 
| >> DIKKEY | INIT+36, INIT+37 | 
| DIKKQUIT | INIT+43!*, CHECK~, CHECK+4, CHECK+10, CHECK+13, CHECK+21 | 
| DIKKTMP | UNIQUE+3~ | 
| DILEV | INIT+1~, INIT+18, INIT+19, INIT+21, INIT+27*, INIT+28 | 
| DIMAXL | UNIQUE+1~, UNIQUE+8 | 
| DIMAXL( | UNIQUE+16 | 
| DINDX | UNIQIX+2~, UNIQIX+6*, UNIQIX+7*, UNIQIX+9 | 
| DINEW | KEYCHK~, KEYCHK+9 | 
| DINS | UNIQIX+2~, UNIQIX+6*, UNIQIX+7 | 
| DION | UNIQIX+2~, UNIQIX+4* | 
| DIORD | UNIQUE+1~, UNIQUE+15*, UNIQUE+16*, UNIQUE+17, UNIQUE+18, UNIQUE+19 | 
| >> DIREC | INIT+11, INIT+12 | 
| >> DIROOT | INIT+18*, INIT+21*, INIT+22, INIT+24*, INIT+25*, INIT+26 | 
| DIS | UNIQIX+2~, UNIQIX+21*, UNIQIX+22 | 
| DISS | UNIQUE+1~, UNIQUE+20, UNIQIX~ | 
| DISS( | UNIQUE+19*, UNIQIX+21 | 
| DITAR | INIT+4*, INIT+5, CHECK~, CHECK+13, CHECK+21, KEYCHK~, KEYCHK+3, KEYCHK+11, KEYCHK+12 | 
| DITMP | UNIQUE~, UNIQUE+3, UNIQUE+4*, UNIQUE+5, UNIQUE+17, UNIQUE+19 | 
| DIUINDEX | UNIQUE~, UNIQUE+5, UNIQUE+8, UNIQUE+17, UNIQUE+19, KEYCHK+2~, KEYCHK+7*, KEYCHK+8, KEYCHK+9, KEYCHK+10 | 
| DIUIR | UNIQUE+1~, UNIQUE+8, UNIQUE+9*, UNIQUE+10, UNIQUE+20, UNIQIX~, UNIQIX+6, UNIQIX+7, UNIQIX+9 | 
| DIUNIQ | UNIQIX+2~, UNIQIX+6*, UNIQIX+7, UNIQIX+18*, UNIQIX+22*, UNIQIX+25, KEYCHK+2~, KEYCHK+5*, KEYCHK+6, KEYCHK+10* , KEYCHK+11*, KEYCHK+12*, KEYCHK+13 | 
| DIVAL | UNIQUE+1~, UNIQUE+20, UNIQIX~, UNIQIX+18 | 
| DIVAL( | UNIQUE+18*, UNIQIX+21 | 
| DIXREF | KEYCHK~, KEYCHK+8, KEYCHK+9, KEYCHK+10 | 
| FIL | CHECK+1~, CHECK+11*, CHECK+12, CHECK+13 | 
| FLD | CHECK+1~, CHECK+11*, CHECK+12, CHECK+13 | 
| I | UNIQIX+2~, UNIQIX+10*, IENS+1~, IENS+2* | 
| IENS | IENS+1~, IENS+2*, IENS+3 | 
| IENSC | CHECK+1~, CHECK+2*, CHECK+13, CHECK+21 | 
| KEY | CHECK+1~, CHECK+4*, CHECK+21 | 
| L | UNIQIX+2~, UNIQIX+9*, UNIQIX+10 | 
| ML | CHECK+1~, CHECK+11*, CHECK+15 | 
| NULL | CHECK+1~, CHECK+9!, CHECK+13*, CHECK+14, CHECK+17 | 
| RFIL | CHECK~, CHECK+4, CHECK+12, CHECK+21 | 
| S | CHECK+1~, CHECK+10*, CHECK+11, CHECK+12, CHECK+13, CHECK+15, CHECK+16, UNIQUE+1~, UNIQUE+17*, UNIQUE+18 , UNIQUE+19 | 
| SS | CHECK+1~, CHECK+6, CHECK+21 | 
| SS( | CHECK+10, CHECK+11, CHECK+12*, CHECK+13 | 
| U | INIT+37, CHECK+11, UNIQIX+15, KEYCHK+7 | 
| UI | CHECK+1~, CHECK+4*, CHECK+6 | 
| UIR | CHECK+1~, CHECK+6, CHECK+20*, CHECK+21 | 
| VAL | CHECK+1~, CHECK+9!, CHECK+21 | 
| VAL( | CHECK+15* | 
| X | CHECK+1~, CHECK+9!, CHECK+13, CHECK+15, CHECK+16, UNIQUE~, UNIQIX+2~, UNIQIX+21, KEYCHK+2~, KEYCHK+10 | 
| X( | CHECK+16*, UNIQUE+16, UNIQUE+18 |