©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
DITR1 ;SFISC/GFT-FIND ENTRY MATCHES ;9:20 AM 15 Jun 2001 [ 04/02/2003 8:25 AM ]
Source file <DITR1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | $$FIND1^DIC OS^DII ^DIK $$IENS^DILF |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ON | ||
| B | ||
| OLD | ||
| MATCHKEY(DIKEY,V,A,DIMATCH) | ; Match Primary Key fields
; DIKEY=IEN of Primary Key, V=IEN of matching record on target file, A set to 1 if errors are encountered. |
|
| I | ||
| DINUM | ||
| I2 | ||
| DA | ||
| Q | ||
| P | ||
| ADD | ||
| WORD | ||
| SUBLN(DIFILE) | ; Return maximum subscript length for "B" index.
|
|
| NEW | ||
| REPLACE | ;
|
|
| I3 | ; Entry point for initial matching on KEY values
|
|
| MATCH | ||
| HAS001 | ; If file has .001 field, .01 and Identifiers/Keys must match
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | DITR1+6, DITR1+9, DITR1+10, DITR1+12, DITR1+15, MATCH, I+1, I2, I3+4, P , MATCHKEY+5, MATCHKEY+6, SUBLN+3, SUBLN+9, SUBLN+10 |
| ^DD("IX" - [#.11] | MATCHKEY+12, SUBLN+2, SUBLN+6, SUBLN+7 |
| ^DD("KEY" - [#.31] | DITR1+7, MATCHKEY+4, MATCHKEY+12 |
| ^DD("OS" - [#.7] | DITR1+22 |
| ^UTILITY("DITR" | I3+2 |
| Name | Line Occurrences |
|---|---|
| $$SUBLN | DITR1+21 |
| ADD | DINUM+1, HAS001+2 |
| B | B+3 |
| DA | DITR1+11, DA, MATCHKEY+13 |
| DINUM | DITR1+10, DITR1+14 |
| HAS001 | DITR1+15 |
| I2 | I+1 |
| I3 | MATCHKEY+8 |
| MATCH | B, B+2, DINUM+3, HAS001+5 |
| MATCHKEY | DITR1+8 |
| NEW | DITR1+18, B, B+1 |
| OLD | DITR1+17, B, B+2, DINUM+2, DINUM+4, HAS001+3, HAS001+6, ON |
| ON | DITR1+6, ON |
| P | I2+1, I3+5 |
| Q | DITR1+6, ADD |
| REPLACE | OLD |
| WORD | DITR1+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | B, B+1, ADD*, I3+2, P+3, P+4, SUBLN+9 |
| ^(0 | B, B+2, ADD* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | DITR1+4*, DA*, I3+1, I3+2*, I3+3*, I3+4, P+1*, P+3, P+6*, MATCHKEY+2~ , MATCHKEY+6*, MATCHKEY+8, MATCHKEY+13*, REPLACE+5~ |
| A | DITR1+4*, DITR1+8*, DITR1+13*, B*, B+2, DINUM*, DINUM+2*, DINUM+3*, HAS001+1*, HAS001+3* , HAS001+4*, HAS001+5*, OLD+1*, MATCH*, I+3!, I3+1*, I3+2, P*, P+1, MATCHKEY~ , MATCHKEY+8~*, MATCHKEY+10*, MATCHKEY+12*, MATCHKEY+15*, MATCHKEY+17*, REPLACE+5~ |
| B | I2+1!, I2+2*, I3+6, P+2, MATCHKEY+2~, MATCHKEY+6*, REPLACE+5~ |
| D0 | DITR1+11*, MATCHKEY+13*, REPLACE+5~ |
| >> D1 | MATCHKEY+13 |
| DA | DITR1+11*, DITR1+13, MATCHKEY+11~, MATCHKEY+13, REPLACE+1~, REPLACE+4* |
| DA( | DA* |
| DDF | REPLACE+5~ |
| DDF( | I3+2, I3+4 |
| DDT | REPLACE+5~ |
| DDT( | DITR1+4, DITR1+6, DITR1+7, DITR1+9, DITR1+10, DITR1+12, DITR1+15, DITR1+21, WORD, MATCH , I+1, I2, MATCHKEY+5, MATCHKEY+14 |
| DFL | DITR1+4, WORD+1*, I3+2, I3+4, I3+7, P+2, MATCHKEY+13, REPLACE+5~ |
| DFR | DITR1+11, MATCHKEY+13, REPLACE+5~ |
| DFR( | WORD+1, P+2 |
| DFR(1 | P+2 |
| DIENS | MATCHKEY+2~, MATCHKEY+11~, MATCHKEY+13*, MATCHKEY+14 |
| DIERR | MATCHKEY+2~, MATCHKEY+11~, MATCHKEY+15 |
| DIFILE | SUBLN~, SUBLN+2, SUBLN+3, SUBLN+6, SUBLN+9, SUBLN+10 |
| DIFL | MATCH+1~, I2*, I3+4*, P, MATCHKEY+2~, MATCHKEY+4*, MATCHKEY+5, MATCHKEY+6, MATCHKEY+8~ |
| >> DIFRDKP | DITR1+4, ADD, WORD |
| >> DIFRDKPD | OLD, REPLACE+7* |
| >> DIFRDKPR | OLD |
| >> DIFRDKPS | REPLACE+3 |
| >> DIFRFILE | DITR1+4, WORD, REPLACE+3 |
| >> DIFRNOAD | DITR1+4*, ADD |
| >> DIFROOT | REPLACE+1, REPLACE+4, REPLACE+7* |
| >> DIFRSA | DITR1+4, WORD, REPLACE+2, REPLACE+3 |
| DIK | REPLACE+1~, REPLACE+4* |
| DIKEY | DITR1+7~*, DITR1+8, DITR1+16, DINUM, DINUM+2, HAS001+1, HAS001+3, I2, I3+4, I3+5 , I3+6, P+5, MATCHKEY~, MATCHKEY+4, MATCHKEY+12 |
| DIMATCH | DITR1+5~*, DITR1+8, OLD, I+3*, MATCHKEY~, MATCHKEY+16* |
| DINUM | DITR1+9!, DITR1+13, DITR1+14!, REPLACE+5~ |
| DIOUT | MATCH+1~, I*, I+1, I+2, I2*, I3+4*, I3+5*, I3+7*, MATCHKEY+2~, MATCHKEY+3* , MATCHKEY+4, MATCHKEY+5*, MATCHKEY+7*, MATCHKEY+10 |
| DIREC | MATCH+1~, I2*, I3+4*, P, MATCHKEY+2~, MATCHKEY+4*, MATCHKEY+5, MATCHKEY+6, MATCHKEY+8~ |
| DISAV0 | REPLACE+1~*, REPLACE+7 |
| DISUBLN | DITR1+20~, DITR1+21*, B, SUBLN+1~, SUBLN+7*, SUBLN+8*, SUBLN+10*, SUBLN+11 |
| DISUBMX | DITR1+20~, DITR1+22* |
| >> DISYS | DITR1+19, DITR1+22 |
| >> DITRCNT | ON* |
| DIVAL | MATCHKEY+2~, MATCHKEY+14 |
| DIVAL( | MATCHKEY+9* |
| DIWHEREB | SUBLN+1~*, SUBLN+2*, SUBLN+3*, SUBLN+4, SUBLN+5, SUBLN+6, SUBLN+7, SUBLN+9 |
| DIZERO | HAS001+4~* |
| >> DKP | WORD+1 |
| >> DMRG | DITR1+4 |
| DTL | DITR1+4, DITR1+6, DITR1+7, DITR1+9, DITR1+10, DITR1+12, DITR1+15, DITR1+21, B, B+1 , B+2, DINUM+1, HAS001+2, HAS001+4, ON, ADD, OLD, OLD+1, WORD, WORD+1* , MATCH, I+1, I2, P+2, MATCHKEY+5, MATCHKEY+14, REPLACE+3, REPLACE+5~ |
| DTN | REPLACE+5~ |
| DTN( | OLD+1* |
| DTO | I3+1, REPLACE+5~ |
| DTO( | B, B+1, B+2, DINUM+1, HAS001+2, HAS001+4, ON, ADD, OLD+1*, WORD+1 , P+2, REPLACE+3 |
| I | MATCH+1*, I+1*, I2, I3+3, MATCHKEY+6*, REPLACE+5~, SUBLN+1~, SUBLN+6*, SUBLN+7, SUBLN+9* , SUBLN+10* |
| KEYN | MATCHKEY+11~, MATCHKEY+12* |
| S | MATCHKEY+2~, MATCHKEY+3*, MATCHKEY+4*, MATCHKEY+9 |
| U | DITR1+4, DITR1+6, DITR1+10, DITR1+12, DITR1+22, B, HAS001+4, ADD, I3+1, P , P+3, MATCHKEY+6, MATCHKEY+12, REPLACE+1, REPLACE+7, SUBLN+7, SUBLN+9 |
| V | DITR1+7*, DITR1+8, DITR1+11*, DITR1+13, DITR1+17, DITR1+19*, B*, B+1*, B+2, DINUM , DINUM+2, DINUM+3*, HAS001+1, HAS001+3, HAS001+4*, ADD, WORD+1, MATCH, MATCH+1, MATCHKEY~ , MATCHKEY+14*, MATCHKEY+16 |
| W | DITR1+4*, DITR1+6, NEW*, ON, I2+1, I2+2, I3+5, I3+6, P+1*, P+2* , P+3*, P+4*, P+6*, MATCHKEY+2~, MATCHKEY+6*, MATCHKEY+7, MATCHKEY+9, REPLACE+5~ |
| X | DITR1+4*, DITR1+6, DITR1+11, DITR1+13*, B, B+2, HAS001+4, ADD, REPLACE+5~ |
| Y | DITR1+4*, DITR1+11*, DITR1+13*, DITR1+14*, DITR1+17*, DA*, DINUM, DINUM+2, DINUM+3, HAS001+1 , HAS001+3, HAS001+4, ON*, ADD, OLD+1, MATCH, MATCH+1*, I3+7*, MATCHKEY+2~, MATCHKEY+13* , REPLACE+3, REPLACE+4, REPLACE+5~ |
| Z | DITR1+4, REPLACE+5~ |