©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
LEX10DX ;ISL/KER - ICD-9 Diagnosis ;04/21/2014
Source file <LEX10DX.m>
| Package | Total | Call Graph |
|---|---|---|
| Lexicon Utility | 2 | LOOK^LEXA CONFIG^LEXSET |
| Kernel | 1 | $$DT^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| TM(X,Y) | ; Trim Character Y - Default " "
|
|
| I9T(X,LEXA,LEXD,LEXL,LEXF) | ; ICD-9 DX Text Lookup (Pruned)
|
|
| NEXT(LEXC,LEXA,LEXD) | ; Next Character
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LEX(757.01 - [#757.01] | I9T+39, I9T+48, I9T+62, I9T+63 |
| ^LEX(757.02 - [#757.02] | I9T+41, I9T+42, I9T+43, I9T+44, I9T+45, I9T+49, I9T+50, I9T+51, I9T+52, I9T+53 , I9T+58, I9T+61 |
| ^TMP("LEXFND" | I9T+21!, I9T+33, I9T+34! |
| ^TMP("LEXHIT" | I9T+21!, I9T+34! |
| ^TMP("LEXSCH" | I9T+21!, I9T+28*, I9T+29*, I9T+30*, I9T+31*, I9T+34! |
| Name | Line Occurrences |
|---|---|
| $$TM | NEXT+14, NEXT+29 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIC | I9T+22~ |
| DIC("S" | I9T+27*, I9T+28* |
| DT | I9T+24 |
| LEX | I9T+22~, I9T+32!, I9T+70! |
| LEX("LIST" | I9T+33, I9T+35, I9T+37 |
| LEX1 | NEXT+13~, NEXT+28~ |
| LEX2 | NEXT+13~, NEXT+28~ |
| LEXA | I9T~, NEXT~ |
| LEXA( | I9T+66*, I9T+67*, NEXT+33, NEXT+34*, NEXT+37* |
| LEXA(" " | I9T+65, I9T+68 |
| LEXA(0 | I9T+68*, I9T+69*, I9T+70* |
| LEXAI | I9T+36~, I9T+65*, I9T+66, I9T+67 |
| LEXC | I9T+50~, I9T+54*, I9T+55, NEXT~, NEXT+14*, NEXT+15*, NEXT+16, NEXT+28~, NEXT+29*, NEXT+31 , NEXT+32, NEXT+35 |
| LEXCDT | I9T+22~, I9T+23*, I9T+24*, I9T+27, I9T+32, I9T+43, I9T+51, NEXT+13~, NEXT+16*, NEXT+30 |
| LEXCHK | NEXT+13~, NEXT+21*, NEXT+22*, NEXT+23, NEXT+31, NEXT+32, NEXT+35 |
| LEXCHR | NEXT+13~, NEXT+32~*, NEXT+33, NEXT+34 |
| LEXCODE | I9T+36~, I9T+40*, I9T+46*, I9T+64*, I9T+65, I9T+66 |
| LEXCT | NEXT+13~, NEXT+26*, NEXT+34*, NEXT+37, NEXT+38 |
| LEXD | I9T~, I9T+23, I9T+42~, I9T+43*, I9T+44, I9T+46, NEXT~, NEXT+16, NEXT+28~, NEXT+30* |
| LEXE | NEXT+13~, NEXT+28~ |
| LEXEF | I9T+57~*, I9T+58, I9T+59 |
| LEXEFF | I9T+36~, I9T+40*, I9T+46*, I9T+59*, I9T+60, I9T+66 |
| LEXEI | I9T+57~, I9T+58*, I9T+59 |
| LEXEIEN | I9T+36~, I9T+37*, I9T+38, I9T+39, I9T+41, I9T+47, I9T+48, I9T+59*, I9T+60, I9T+61 , I9T+62, I9T+63, I9T+67 |
| LEXEXP | I9T+36~, I9T+39*, I9T+62*, I9T+67 |
| LEXF | I9T~, I9T+23 |
| LEXFIL | I9T+22~, I9T+23*, I9T+26*, I9T+27, I9T+28 |
| LEXH | I9T+42~, I9T+44*, I9T+45, I9T+50~, I9T+51*, I9T+52*, I9T+53*, I9T+55 |
| LEXID | NEXT+13~, NEXT+15*, NEXT+24*, NEXT+33, NEXT+34, NEXT+37 |
| LEXL | I9T~, I9T+25 |
| LEXLEN | I9T+22~, I9T+25*, I9T+32, I9T+33, NEXT+13~, NEXT+16*, NEXT+17, NEXT+18, NEXT+20, NEXT+21 , NEXT+22, NEXT+24 |
| LEXLI | I9T+22~, I9T+35*, I9T+37 |
| LEXMC | I9T+48~*, I9T+49 |
| LEXNC | NEXT+13~, NEXT+26*, NEXT+27 |
| LEXND | I9T+36~, I9T+42~*, I9T+43, I9T+46, I9T+50~*, I9T+54, I9T+61*, I9T+64 |
| LEXNN | NEXT+13~, NEXT+25*, NEXT+27*, NEXT+29, NEXT+30, NEXT+36* |
| LEXOR | NEXT+14~, NEXT+19*, NEXT+20*, NEXT+25, NEXT+35*, NEXT+36 |
| LEXPR | I9T+22~, I9T+25*, I9T+33*, I9T+70 |
| LEXPRE | NEXT+14~ |
| LEXS | I9T+42~, I9T+45*, I9T+46, I9T+50~, NEXT+14~, NEXT+28~ |
| LEXSA | I9T+48~ |
| LEXSA( | I9T+55* |
| LEXSA(" " | I9T+54 |
| LEXSA(0 | I9T+55*, I9T+56 |
| LEXSA(1 | I9T+56, I9T+57 |
| LEXSI | I9T+36~, I9T+40*, I9T+41*, I9T+42, I9T+43, I9T+44, I9T+45, I9T+46, I9T+48~, I9T+49* , I9T+50, I9T+51, I9T+52, I9T+53, I9T+55, I9T+57~*, I9T+58, I9T+59 |
| LEXSIEN | I9T+36~, I9T+40*, I9T+42, I9T+46*, I9T+47, I9T+59*, I9T+60, I9T+61, I9T+66 |
| LEXSO | NEXT+14~, NEXT+15*, NEXT+19, NEXT+20, NEXT+26, NEXT+31 |
| LEXSRC | I9T+36~, I9T+64* |
| LEXVDT | I9T+22~ |
| LEXX | I9T+22~, I9T+23*, I9T+32 |
| X | I9T~, I9T+23, TM~, TM+1*, TM+2*, TM+3*, TM+4 |
| Y | TM~, TM+1*, TM+2, TM+3 |