©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DIVC ;SFISC/MKO-VERIFY INDEXES/KEYS ;2:47 PM 23 Jan 1998
Source file <DIVC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VINDEX(DIFILE,DIREC,DIFLD,DIFLAG,DIINDEX,DIKEY) | ;
|
|
| CHK | ;File is a required input parameter
|
|
| VER(DIFILE,DIROOT,DA,DIVCTMP,DIINDEX,DIKEY) | ;
|
|
| LOADVER(FILE,FIELD,TMP) | ;Load indexes into TMP array
|
|
| ERR | ;Set error flag
|
| Name | Field # of Occurrence |
|---|---|
| INIZE^DIEFU | VINDEX+6 |
| SETXARR^DIKC | VER+7 |
| $$GETTMP^DIKC1 | VINDEX+12 |
| LOADFLD^DIKC1 | LOADVER+4 |
| $$FLEV^DIKCU | CHK+25 |
| $$FNUM^DIKCU | CHK+20, CHK+24 |
| $$FROOTDA^DIKCU | CHK+16 |
| $$VDA^DIKCU1 | CHK+8 |
| $$VFLD^DIKCU1 | CHK+11 |
| ERR^DIKCU2 | CHK+1, CHK+2, CHK+18, CHK+27 |
| $$UNIQUE^DIKK2 | VER+17 |
| $$CREF^DILF | CHK+23 |
| $$IENS^DILF | CHK+6, CHK+18, CHK+27 |
| DA^DILF | CHK+7 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("KEY" - [#.31] | VER+16, VER+18, VER+19 |
| Name | Line Occurrences |
|---|---|
| CHK | VINDEX+9 |
| ERR | CHK+1, CHK+2, CHK+8, CHK+11, CHK+16, CHK+18, CHK+20, CHK+24, CHK+25, CHK+27 |
| LOADVER | VINDEX+13 |
| VER | VINDEX+15 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | VER+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | VINDEX+1~, VINDEX+15, VER~, VER+17, CHK+6*, CHK+7, CHK+8, CHK+18, CHK+27 |
| DA( | CHK+17, CHK+26 |
| DICHECK | VER+1~, VER+11*, VER+12 |
| DIFILE | VINDEX~, VINDEX+13, VINDEX+15, VER~, VER+5, VER+6, VER+7, VER+11, VER+17, CHK+1 , CHK+11, CHK+15, CHK+16, CHK+18, CHK+20*, CHK+22, CHK+23, CHK+24*, CHK+25, CHK+27 |
| DIFLAG | VINDEX~, VINDEX+4*, VINDEX+5, VINDEX+6, CHK+1, CHK+2, CHK+8, CHK+11, CHK+16, CHK+18 , CHK+20, CHK+24, CHK+25, CHK+27 |
| DIFLD | VINDEX~, VINDEX+13, CHK+2, CHK+11 |
| DIFM | VINDEX+6~* |
| DIIENS | CHK+5~, CHK+6*, CHK+7* |
| DIINDEX | VINDEX~, VINDEX+15, VER~ |
| DIINDEX( | VER+12* |
| DIKEY | VINDEX~, VINDEX+15, VER~ |
| DIKEY( | VER+20* |
| DILEV | CHK+14~, CHK+16, CHK+17, CHK+19, CHK+25*, CHK+26 |
| DINULL | VER+1~, VER+7, VER+10, VER+17, VER+20 |
| DIQUIET | VINDEX+5~* |
| DIREC | VINDEX~, CHK+6, CHK+7* |
| DIROOT | VINDEX+1~, VINDEX+15, VER~, CHK+16*, CHK+19*, CHK+20, CHK+22*, CHK+23*, CHK+24 |
| DIVCTMP | VINDEX+1~, VINDEX+12*, VINDEX+13, VINDEX+15, VINDEX+16, VER~, VER+5, VER+6, VER+7, VER+11 , VER+17 |
| DIVERR | VINDEX+1~, VINDEX+4*, VINDEX+9, ERR+1* |
| DIXR | VER+1~, VER+5*, VER+6, VER+7, VER+11, VER+12, VER+16, VER+17, VER+18 |
| DIXRNAM | VER+1~, VER+6*, VER+12, VER+20 |
| FIELD | LOADVER~, LOADVER+4 |
| FIL | LOADVER+1~, LOADVER+7*, LOADVER+8, LOADVER+9, LOADVER+10, LOADVER+12, LOADVER+13 |
| FILE | LOADVER~, LOADVER+4 |
| KEY | VER+2~, VER+18*, VER+19 |
| KFIL | VER+2~, VER+19*, VER+20 |
| KL | LOADVER+1~, LOADVER+10*, LOADVER+11, LOADVER+12 |
| KNAM | VER+2~, VER+19*, VER+20 |
| SL | LOADVER+1~, LOADVER+10*, LOADVER+11, LOADVER+12 |
| TMP | LOADVER~, LOADVER+4, LOADVER+7, LOADVER+8, LOADVER+9, LOADVER+10, LOADVER+12, LOADVER+13 |
| U | VER+6, VER+19, LOADVER+9 |
| UNIQ | VER+2~, VER+17*, VER+18 |
| X | VER+1~, VER+7, VER+17 |
| X1 | VER+1~, VER+7* |
| X2 | VER+1~, VER+7* |
| XR | LOADVER+1~, LOADVER+8*, LOADVER+9, LOADVER+10, LOADVER+12, LOADVER+13 |