©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
LEX10CX3 ;ISL/KER - ICD-10 Cross-Over - Target (find) ;04/21/2014
Source file <LEX10CX3.m>
| Package | Total | Call Graph |
|---|---|---|
| Lexicon Utility | 6 | PAR^LEX10CX4 ($$RN,$$SO,$$TY,SEGS)^LEX10CX5 LOOK^LEXA CONFIG^LEXSET $$STATCHK^LEXSRC2 $$IMPDATE^LEXU |
| Kernel | 2 | ($$DT,$$FMADD)^XLFDT $$UP^XLFSTR |
| DRG Grouper | 1 | ($$CODEC,$$LA,$$OD,$$VLTD)^ICDEX |
| VA Fileman | 1 | ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FIND2(X,LEXSRC,LEXTGT) | ; Find by margin
|
|
| FIND1(X,LEXSRC,LEXTGT) | ; Find ICD-10 Codes based on Text Lookup
|
|
| FIND3(LEXSRC,LEXA) | ; Source Array from Lookup
|
|
| FIND2C | ; Find by margin based on single Keyword
|
|
| FIND2B | ; Find by margin based on Keyword #n
|
|
| TM(X,Y) | ; Trim Y
|
|
| EC(X,Y) | ; Expression Code for SAB
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | FIND3+39 |
| $$CODEC^ICDEX | FIND2B+8, FIND2C+9 |
| $$LA^ICDEX | FIND2B+5, FIND2C+6 |
| $$OD^ICDEX | FIND2B+2, FIND2C+3 |
| $$VLTD^ICDEX | FIND2B+7, FIND2C+8 |
| PAR^LEX10CX4 | FIND3+21 |
| $$RN^LEX10CX5 | FIND2B+13 |
| $$SO^LEX10CX5 | FIND3+42 |
| $$TY^LEX10CX5 | FIND2B+14 |
| SEGS^LEX10CX5 | FIND2+12 |
| LOOK^LEXA | FIND1+36 |
| CONFIG^LEXSET | FIND1+32, FIND3+35 |
| $$STATCHK^LEXSRC2 | FIND2B+19, FIND2C+12 |
| $$IMPDATE^LEXU | FIND1+26, FIND2+9, FIND3+27 |
| $$DT^XLFDT | FIND1+27, FIND2+10, FIND3+28 |
| $$FMADD^XLFDT | FIND1+26, FIND2+9, FIND2B+6, FIND2C+7, FIND3+27 |
| $$UP^XLFSTR | FIND1+38, FIND1+39, FIND1+48, FIND2+8, FIND2B+7, FIND2B+12, FIND2C+8 |
| FileNo | Call Tags |
|---|---|
| ^LEX(757.01 - [#757.01] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LEX(757.01 - [#757.01] | FIND1+38, FIND1+48, FIND2B+21, FIND2C+14, FIND3+41, EC+2 |
| ^LEX(757.02 - [#757.02] | FIND2B+20, FIND2C+13, EC+3, EC+9, EC+10 |
| ^LEX(757.03 - [#757.03] | FIND3+29, FIND3+30, FIND3+31, EC+5, EC+7 |
| ^TMP("LEXFND" | FIND1+24!, FIND1+72!, FIND3+34!, FIND3+44! |
| ^TMP("LEXHIT" | FIND1+24!, FIND1+72!, FIND3+34!, FIND3+44! |
| ^TMP("LEXSCH" | FIND1+23!, FIND1+33*, FIND1+35*, FIND1+72!, FIND3+34!, FIND3+36*, FIND3+37*, FIND3+44! |
| ^TMP("LEXTMP" | FIND1+24!, FIND1+43*, FIND1+55*, FIND1+60*, FIND1+62, FIND1+64, FIND1+71!, FIND2+19!, FIND2+20, FIND2+21! , FIND2+24, FIND2+25, FIND2+30, FIND2+32, FIND2+34, FIND2B+24*, FIND2B+25*, FIND2C+17*, FIND2C+18* |
| Name | Line Occurrences |
|---|---|
| $$EC | FIND1+42, FIND1+47, FIND1+54, FIND1+59 |
| $$TM | FIND1+51, FIND1+53 |
| FIND2B | FIND2+19, FIND2+23 |
| FIND2C | FIND2+23 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | FIND1+21~, FIND1+23!, FIND1+29~, FIND3+9~, FIND3+38* |
| DIC("A" | FIND3+32* |
| DIC("S" | FIND1+34*, FIND1+35, FIND3+33*, FIND3+37 |
| DIC(0 | FIND3+38* |
| DO | FIND1+21~, FIND1+23!, FIND3+9~ |
| LEX | FIND1+21~, FIND1+36!, FIND1+61! |
| LEX("LIST" | FIND1+37, FIND1+38, FIND1+41, FIND1+45, FIND1+46, FIND1+56, FIND1+58 |
| >> LEX0FND | FIND1+37*, FIND3+14, FIND3+17 |
| LEXA | FIND3~, FIND3+32!, FIND3+40! |
| LEXA(0 | FIND3+43*, FIND3+45 |
| LEXA(1 | FIND3+43* |
| LEXAI | FIND1+21~, FIND1+28*, FIND1+31 |
| LEXC | EC+1~, EC+8*, EC+10, EC+12*, EC+13 |
| LEXCDT | FIND3+9~, FIND3+27*, FIND3+28*, FIND3+35, FIND3+42 |
| LEXCO | FIND2+6~, FIND2+27*, FIND2+29, FIND2+31 |
| LEXCT | FIND2+6~, FIND2B+11~, FIND2B+13*, FIND2B+14* |
| LEXCTL | FIND2+6~ |
| LEXCTR | FIND1+21~, FIND1+61*, FIND1+67*, FIND1+68, FIND2+6~, FIND2+29*, FIND2+35*, FIND2+36 |
| LEXE | EC+1~, EC+2*, EC+3, EC+9 |
| LEXEFF | FIND3+9~ |
| LEXEI | FIND2B+18~, FIND2B+20*, FIND2B+21, FIND2B+22, FIND2B+24, FIND2B+25, FIND2C+11~, FIND2C+13*, FIND2C+14, FIND2C+15 , FIND2C+17, FIND2C+18 |
| LEXEX | FIND2B+18~, FIND2B+21*, FIND2B+22, FIND2C+11~, FIND2C+14*, FIND2C+15, FIND3+9~, FIND3+40~, FIND3+41*, FIND3+43 |
| LEXF | FIND2+6~, FIND2+29*, FIND2+30*, FIND2+31, FIND2+32, FIND2+34, FIND2B+3~, FIND2B+9*, FIND2B+13*, FIND2B+14* , FIND2B+15*, FIND2B+17, FIND2B+24, FIND2B+25, FIND2C+4~, FIND2C+9*, FIND2C+10, FIND2C+17, FIND2C+18 |
| LEXH | FIND3+9~ |
| LEXHDR1 | FIND3+9~, FIND3+13!* |
| LEXHDR1(1 | FIND3+15*, FIND3+16*, FIND3+18*, FIND3+19*, FIND3+22 |
| LEXHDR1(2 | FIND3+16*, FIND3+19*, FIND3+23 |
| LEXHDR2 | FIND3+9~, FIND3+13!*, FIND3+15*, FIND3+18*, FIND3+21 |
| LEXHDR2(1 | FIND3+13*, FIND3+20*, FIND3+21, FIND3+24 |
| LEXHDR2(2 | FIND3+25 |
| LEXHDR2(3 | FIND3+26 |
| LEXHI | FIND2+6~, FIND2+25* |
| LEXI | FIND2+6~, FIND2+13*, FIND2+14, FIND2+31~*, FIND2+32*, FIND2+34, FIND2B+3~, FIND2C+4~, FIND3+9~ |
| LEXICDD | FIND1+21~, FIND1+26*, FIND1+27*, FIND1+30, FIND2+6~, FIND2+9*, FIND2+10*, FIND2B+5, FIND2B+19, FIND2C+6 , FIND2C+12 |
| LEXIEN | FIND2+6~, FIND2B+3~, FIND2B+4*, FIND2B+5, FIND2B+7, FIND2B+8, FIND2C+4~, FIND2C+5*, FIND2C+6, FIND2C+8 , FIND2C+9, FIND3+10~, FIND3+40~*, FIND3+41, FIND3+42, FIND3+43 |
| LEXIIEN | FIND1+21~, FIND1+41~, FIND1+46~, FIND1+57~ |
| LEXILA | FIND3+10~ |
| LEXKEY | FIND2+6~, FIND2+18*, FIND2+22*, FIND2+23, FIND2B+1, FIND2B+2, FIND2B+11, FIND2C+2*, FIND2C+3 |
| LEXLA | FIND2+7~, FIND2B+3~, FIND2B+5*, FIND2B+6*, FIND2B+7, FIND2C+4~, FIND2C+6*, FIND2C+7*, FIND2C+8, FIND3+10~ |
| LEXLO | FIND2+7~, FIND2+24*, FIND2+28*, FIND2+29* |
| LEXMAX | FIND1+21~, FIND1+23*, FIND1+68, FIND2+7~, FIND2+11*, FIND2+36 |
| LEXMX | FIND2+7~, FIND2+26*, FIND2+27, FIND2+28, FIND2B+3~, FIND2B+9*, FIND2B+10, FIND2C+4~ |
| LEXN | FIND2+33~*, FIND2+37, EC+1~, EC+10~*, EC+11, EC+12 |
| >> LEXNASKM | FIND1+23, FIND2+11, FIND2+36 |
| LEXNOM | FIND3+10~, FIND3+31*, FIND3+32 |
| LEXO | FIND1+21~, FIND1+61*, FIND1+70*, FIND1+73 |
| LEXOK | FIND1+21~, FIND1+29~, FIND1+40*, FIND1+42*, FIND1+45*, FIND1+54*, FIND1+56 |
| LEXOR | FIND2+7~, FIND2+8*, FIND2B+14 |
| LEXORD | FIND2+7~, FIND2B+1~*, FIND2B+2*, FIND2B+4, FIND2C+2~*, FIND2C+3*, FIND2C+5 |
| LEXP | FIND1+22~, FIND1+46~, FIND1+50* |
| LEXQUIET | FIND3+10~, FIND3+13* |
| LEXS | FIND1+22~, FIND1+46~, FIND1+50*, FIND1+51*, FIND1+52, FIND3+10~, EC+1~, EC+8*, EC+9*, EC+10 |
| LEXSAB | FIND3+29*, FIND3+33, FIND3+35, FIND3+36, FIND3+42, EC+1~, EC+4*, EC+5, EC+6, EC+7 |
| LEXSEG | FIND2+7~, FIND2+12~ |
| LEXSEG( | FIND2+13, FIND2+14 |
| LEXSG | FIND2+7~, FIND2+14~*, FIND2+16, FIND2B+11~, FIND2B+12*, FIND2B+13, FIND2B+15 |
| LEXSGI | FIND2B+3~, FIND2B+10*, FIND2B+12, FIND2C+4~ |
| LEXSI | FIND2+7~, FIND2+11*, FIND2+15*, FIND2+16, FIND2+20, FIND2B+18~, FIND2B+20*, FIND2C+11~, FIND2C+13* |
| LEXSO | FIND1+22~, FIND1+25*, FIND2+7~, FIND2B+3~, FIND2B+8*, FIND2B+19, FIND2B+22, FIND2C+4~, FIND2C+9*, FIND2C+12 , FIND2C+15, FIND3+10~, FIND3+40~, FIND3+42*, FIND3+43 |
| LEXSRC | FIND1~, FIND2~, FIND3~, EC+1~, EC+5*, EC+6, EC+7*, EC+8, EC+11 |
| LEXSRC( | FIND1+28, FIND1+31 |
| LEXSRC("SEG" | FIND2+11, FIND2+15, FIND2+16*, FIND2+17, FIND2+18, FIND2+22, FIND2+26, FIND2B+9, FIND2B+11, FIND2B+12 , FIND2C+1, FIND2C+2 |
| LEXSRC("SOURCE" | FIND3+11, FIND3+12 |
| LEXSRC(0 | FIND1+25, FIND3+15, FIND3+18 |
| LEXSRCC | FIND3+9~, FIND3+11*, FIND3+16, FIND3+19, FIND3+20 |
| LEXSRCS | FIND3+9~, FIND3+12*, FIND3+16, FIND3+19, FIND3+20 |
| LEXSRCT | FIND3+10~, FIND3+12*, FIND3+20 |
| LEXSRI | FIND3+10~, FIND3+29*, FIND3+30, FIND3+31 |
| LEXSTA | FIND2B+18~, FIND2B+19*, FIND2B+20, FIND2C+11~, FIND2C+12*, FIND2C+13, FIND3+10~ |
| LEXT | FIND2+33~, FIND2+34*, FIND2+35, FIND2+37, FIND2B+18~*, FIND2B+22*, FIND2B+23, FIND2B+24, FIND2C+11~*, FIND2C+15* , FIND2C+16, FIND2C+17 |
| LEXTD | FIND1+22~, FIND1+27*, FIND2+8~, FIND2+10*, FIND3+11~, FIND3+28* |
| LEXTGT | FIND1~, FIND1+61!, FIND2~, FIND2+17!, FIND2+18! |
| LEXTGT( | FIND1+69*, FIND2+37* |
| LEXTGT(" " | FIND1+67, FIND2+33 |
| LEXTGT(0 | FIND1+70*, FIND2+37*, FIND2+38 |
| LEXTX | FIND2+8~, FIND2B+3~, FIND2B+7*, FIND2B+13, FIND2B+14, FIND2B+15, FIND2C+4~, FIND2C+8*, FIND3+11~ |
| LEXU | FIND1+22~, FIND1+46~, FIND1+48*, FIND1+49*, FIND1+52*, FIND1+53* |
| LEXU1 | FIND1+22~, FIND1+29~, FIND1+38*, FIND1+40 |
| LEXUI | FIND1+22~, FIND1+29~, FIND1+39*, FIND1+40, FIND1+44*, FIND1+50 |
| LEXVDT | FIND1+22~, FIND1+29~, FIND1+30*, FIND1+32, FIND1+36, FIND3+11~, FIND3+45! |
| LEXX | FIND1+22~, FIND1+29~, FIND1+31*, FIND1+36, FIND1+39, FIND2+8~*, FIND2+12 |
| LEXXC | FIND1+22~, FIND1+29~, FIND1+41~, FIND1+42*, FIND1+43, FIND1+46~, FIND1+47*, FIND1+54*, FIND1+55, FIND1+57~ , FIND1+59*, FIND1+60, FIND1+61*, FIND1+62*, FIND1+64, FIND1+69 |
| LEXXE | FIND1+22~, FIND1+29~, FIND1+41~*, FIND1+42, FIND1+43, FIND1+46~*, FIND1+47, FIND1+48, FIND1+54, FIND1+55 , FIND1+57~, FIND1+58*, FIND1+59, FIND1+60, FIND1+63~, FIND1+64*, FIND1+65, FIND1+69 |
| LEXXI | FIND1+23~, FIND1+29~, FIND1+45*, FIND1+46, FIND1+56*, FIND1+58, FIND1+63~, FIND1+67*, FIND1+69, FIND1+70 |
| LEXXT | FIND1+23~, FIND1+63~, FIND1+65*, FIND1+66*, FIND1+69 |
| LEXY | FIND3+40~*, FIND3+43 |
| X | FIND1~, FIND1+25, FIND1+29~, FIND1+31*, FIND1+73*, FIND1+74, FIND2~, FIND2+8, FIND2+38*, FIND2+39 , FIND3+11~, FIND3+38!, FIND3+39*, FIND3+45*, FIND3+46, EC~, EC+2, EC+13*, EC+14, TM~ , TM+1*, TM+2*, TM+3*, TM+4 |
| Y | FIND1+23~, FIND1+29~, FIND3+11~, FIND3+39, FIND3+40*, FIND3+43*, EC~, EC+4, TM~, TM+1* , TM+2, TM+3 |