©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
LEX10DBR ;ISL/KER - ICD-10 Diagnosis Lookup by Root ;04/21/2014
Source file <LEX10DBR.m>
| Package | Total | Call Graph |
|---|---|---|
| Lexicon Utility | 2 | ($$CODES,ARY)^LEX10DU $$STATCHK^LEXSRC2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETCAT(X,LEXVDT) | ; Get Categories
|
|
| TM(X,Y) | ; Trim Character Y - Default " "
|
|
| GETCOD(X,LEXVDT) | ; Get Codes
|
|
| MAJ(X,LEXA,LEXVDT) | ; Lookup by Root, Major Categories (3 digit/decimal)
|
|
| ST | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LEX(757.01 - [#757.01] | GETCOD+9 |
| ^LEX(757.02 - [#757.02] | GETCOD+2, GETCOD+7 |
| ^LEX(757.033 - [#757.033] | GETCAT+2, GETCAT+7, GETCAT+9, GETCAT+10, GETCAT+11, GETCAT+13, GETCAT+14, GETCAT+15 |
| ^TMP("LEXDX" | GETCAT+18*, GETCOD+10* |
| ^TMP("LEXSCH" | MAJ+1!, MAJ+4! |
| Name | Line Occurrences |
|---|---|
| GETCAT | MAJ+2 |
| GETCOD | MAJ+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| LEX | GETCAT+3~, GETCAT+16*, GETCAT+17*, GETCAT+18, GETCOD+3~ |
| LEXA | MAJ~ |
| LEXA(" " | MAJ+3 |
| LEXA(0 | MAJ+3*, MAJ+4* |
| LEXC | MAJ+1~, MAJ+3*, MAJ+4, GETCAT+1~*, GETCOD+1~* |
| LEXCN | GETCAT+3~, GETCAT+16*, GETCAT+17 |
| LEXCT | MAJ+1~*, MAJ+2, GETCAT+18*, GETCOD+10* |
| LEXCTL | GETCAT+1~*, GETCAT+2, GETCOD+1~*, GETCOD+2 |
| LEXE | GETCAT+3~, GETCAT+7*, GETCAT+8, GETCAT+9, GETCAT+16, GETCOD+3~, GETCOD+6*, GETCOD+8, GETCOD+10 |
| LEXFND | MAJ+1~, MAJ+2* |
| LEXI | GETCAT+3~, GETCAT+9*, GETCAT+10, GETCAT+11, GETCAT+13, GETCAT+14, GETCAT+15, GETCOD+3~, GETCOD+6*, GETCOD+7 , GETCOD+10 |
| LEXIS | GETCAT+3~ |
| LEXN | GETCAT+3~, GETCAT+15*, GETCAT+16, GETCOD+3~, GETCOD+9*, GETCOD+10 |
| LEXNC | ST+1~, ST+2*, ST+3 |
| LEXNE | GETCAT+3~, GETCAT+10*, GETCAT+11, GETCAT+13*, GETCAT+14 |
| LEXNI | GETCAT+3~, GETCAT+11*, GETCAT+12, GETCAT+14*, GETCAT+15 |
| LEXNN | ST+1~, ST+2*, ST+3*, ST+4 |
| LEXO | MAJ+1~, GETCAT+1~*, GETCAT+2*, GETCAT+4, GETCOD+1~*, GETCOD+2*, GETCOD+4 |
| LEXQ | GETCAT+3~, GETCAT+4*, GETCAT+5*, GETCAT+6, GETCAT+7, GETCAT+9, GETCAT+16, GETCAT+18, GETCOD+3~, GETCOD+4* , GETCOD+5, GETCOD+10 |
| LEXSTA | GETCOD+3~, GETCOD+5*, GETCOD+6 |
| LEXT | MAJ+1~, GETCOD+3~, GETCOD+7*, GETCOD+9 |
| LEXTOT | MAJ+1~ |
| LEXVDT | MAJ~, MAJ+2, GETCAT~, GETCAT+8, GETCAT+10, GETCOD~, GETCOD+5, GETCOD+8 |
| X | MAJ~, MAJ+2, GETCAT~, GETCAT+1, GETCOD~, GETCOD+1, TM~, TM+1*, TM+2*, TM+3* , TM+4 |
| Y | TM~, TM+1*, TM+2, TM+3 |