LEXU2 ;ISL/KER - Miscellaneous Lexicon Utilities ;04/21/2014
Source file <LEXU2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CSDATA(CODE,CSYS,CDT,ARY) | ; Get Information about a Code | |
| MS(X,CDT,LEXS) | ; Modifier Strings | |
| MODS | ; CPT Modifiers | |
| CS | ; CS Segment if CS is NULL | |
| ICDOP | ; ICD OP CS array | |
| LEX | ; Lexicon | |
| TM(X,Y) | ;   Trim Character Y - Default " " | |
| CPTCPC | ; CPT-4/HCPCS | |
| ICDDX | ; ICD DX CS array | |
| LX | ; Lexicon Segment | 
| Name | Field # of Occurrence | 
|---|---|
| $$ICDD^ICDEX | ICDDX+14, ICDOP+14 | 
| $$ICDDX^ICDEX | ICDDX+2 | 
| $$ICDOP^ICDEX | ICDOP+2 | 
| $$MOR^ICDEX | ICDOP+12 | 
| MD^ICDEX | ICDDX+5, ICDOP+4 | 
| $$CPT^ICPTCOD | CPTCPC+2 | 
| $$CPTD^ICPTCOD | CPTCPC+5 | 
| MODA^ICPTMOD | MS+1 | 
| $$STATCHK^LEXSRC2 | LEX+1 | 
| $$CSYS^LEXU | CSDATA+96, CSDATA+97 | 
| VDT^LEXU3 | CSDATA+98 | 
| $$SYSC^LEXU4 | CSDATA+96 | 
| $$DT^XLFDT | MODS+1, MS+1 | 
| $$TITLE^XLFSTR | LEX+22 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ICPT - [#81] | MODS+2, MODS+3 | 
| ^LEX(757.01 - [#757.01] | LEX+6, LEX+17, LEX+19, LEX+21, LEX+27, LEX+28 | 
| ^LEX(757.02 - [#757.02] | LEX+1, LEX+3 | 
| ^LEX(757.1 - [#757.1] | LEX+8, LEX+9 | 
| ^LEX(757.11 - [#757.11] | LEX+11 | 
| ^LEX(757.12 - [#757.12] | LEX+12 | 
| ^TMP("ICPTD" | CPTCPC+4!, CPTCPC+6, CPTCPC+7!, CPTCPC+9, CPTCPC+10, CPTCPC+11! | 
| Name | Line Occurrences | 
|---|---|
| $$TM | ICDDX+10, ICDOP+9, CPTCPC+6, MS+6, MS+8 | 
| CPTCPC | CSDATA+101 | 
| CS | CSDATA+102 | 
| ICDDX | CSDATA+99 | 
| ICDOP | CSDATA+100 | 
| LEX | CSDATA+98 | 
| LX | CSDATA+102 | 
| MS | MODS+4 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ARY | CSDATA~, MODS+4! | 
| ARY("LEX" | CSDATA+103, LEX+4*, LEX+5*, LEX+6*, LEX+13, LEX+14*, LEX+15*, LEX+16*, LEX+21*, LEX+23* , LEX+26, LEX+27*, LEX+28*, LEX+29*, LX+1*, LX+2*, LX+3*, LX+4*, LX+5*, LX+6* , LX+7, LX+8*, LX+9*, LX+10*, LX+11, LX+12*, LX+13*, LX+14*, LX+15*, LX+16* , LX+17* | 
| ARY("SYS" | CSDATA+103, ICDDX+3*, ICDDX+4*, ICDDX+9*, ICDDX+10*, ICDDX+11*, ICDDX+12*, ICDDX+13*, ICDDX+16*, ICDOP+3* , ICDOP+8*, ICDOP+9*, ICDOP+10*, ICDOP+11*, ICDOP+13*, ICDOP+17*, CPTCPC+3*, CPTCPC+4*, CPTCPC+10*, CS+2* , CS+3*, CS+4*, CS+5*, CS+6*, CS+7, CS+8*, CS+9*, CS+10*, CS+11*, CS+12* , CS+13*, CS+14*, CS+15*, CS+16*, CS+17*, CS+18, CS+19*, CS+20*, CS+22!*, CS+24!* , CS+25!*, CS+26!*, CS+28!*, CS+29!*, CS+30!*, CS+31!*, CS+32!*, CS+33*, CS+34* | 
| CDT | CSDATA~, CSDATA+98, MS~, MS+1 | 
| CODE | CSDATA~, CSDATA+95, MODS+1~, MODS+3*, MODS+4 | 
| CSYS | CSDATA~, CSDATA+95 | 
| IEN | MODS+1~, MODS+2*, MODS+3 | 
| LEN | MODS+1~ | 
| LEX | MS+1~ | 
| LEX("A" | MS+2 | 
| LEX0 | LEX+18~, LEX+19* | 
| LEX1 | LEX+18~, LEX+19* | 
| LEXC | LEX+9~, LEX+10*, LEX+11, LEX+14, ICDDX+1~, ICDDX+15~*, ICDDX+16*, ICDOP+1~, ICDOP+16~*, ICDOP+17* , CPTCPC+1~, CPTCPC+9~*, CPTCPC+10*, CS+1~, CS+7*, CS+8*, CS+9, CS+10, CS+18*, CS+19* , CS+20, LX+1~, LX+7*, LX+8*, LX+9, LX+11*, LX+12*, LX+13, LX+14, LX+15 , LX+16 | 
| LEXCE | LEX+9~, LEX+11*, LEX+15 | 
| LEXCT | MS+1~, MS+2*, MS+3*, MS+4, MS+6* | 
| LEXDAT | ICDDX+1~, ICDDX+2*, ICDDX+3, ICDDX+4, ICDDX+12, ICDDX+13, ICDOP+1~, ICDOP+2*, ICDOP+3, ICDOP+11 , CPTCPC+1~, CPTCPC+2*, CPTCPC+3, CPTCPC+4 | 
| LEXDD | ICDDX+1~, ICDDX+14!, ICDOP+1~, ICDOP+14!, CPTCPC+1~ | 
| LEXDD( | ICDDX+15, ICDDX+16, ICDOP+16, ICDOP+17 | 
| LEXDRG | ICDDX+1~, ICDDX+8~*, ICDDX+10, ICDOP+1~, ICDOP+7~*, ICDOP+9, CPTCPC+1~ | 
| LEXDT | MS+1~* | 
| LEXE | LEX+21~*, LEX+22 | 
| LEXEFF | CSDATA+94~, LEX+2*, LEX+4, LEX+5 | 
| LEXEIEN | CSDATA+94~, LEX+3*, LEX+6, LEX+25 | 
| LEXF | LEX+18~, LEX+19*, LEX+20 | 
| LEXFLG | LEX+7~, LEX+17*, LEX+20*, LEX+29 | 
| LEXFY | ICDDX+1~, ICDDX+6*, ICDDX+7, ICDDX+8, ICDOP+1~, ICDOP+5*, ICDOP+6, ICDOP+7, CPTCPC+1~ | 
| LEXH | LEX+21~, LEX+22*, LEX+23 | 
| LEXI | LEX+9~, LEX+13*, LEX+14, LEX+15, LEX+26~*, LEX+27, ICDDX+1~, ICDDX+9*, ICDDX+10, ICDDX+11 , ICDDX+15~*, ICDDX+16, ICDOP+1~, ICDOP+8*, ICDOP+9, ICDOP+10, ICDOP+16~*, ICDOP+17, CPTCPC+1~, CPTCPC+9~* , CPTCPC+10, CS+1~, CS+7*, CS+18*, LX+1~, LX+7*, LX+11*, MS+5~*, MS+6, MS+8~* | 
| LEXLEXI | ICDDX+1~, ICDDX+8~, ICDOP+1~, ICDOP+7~, CPTCPC+1~ | 
| LEXM | MS+1~, MS+2*, MS+3 | 
| LEXMC | LEX+7~, LEX+17*, LEX+24*, LEX+28 | 
| LEXMD | ICDDX+1~, ICDDX+5, ICDOP+1~, ICDOP+4, CPTCPC+1~ | 
| LEXMD( | ICDDX+6, ICDDX+7, ICDDX+8, ICDOP+5, ICDOP+6, ICDOP+7 | 
| LEXMDC | ICDDX+1~, ICDDX+7*, ICDDX+8, ICDDX+9, ICDOP+1~, ICDOP+6*, ICDOP+7, ICDOP+8, CPTCPC+1~ | 
| LEXMIEN | CSDATA+94~, LEX+3*, LEX+8, LEX+17 | 
| LEXMOD | MS+1~, MS+2*, MS+3*, MS+6*, MS+7, MS+8 | 
| LEXMOR | ICDOP+1~, ICDOP+12*, ICDOP+13, CPTCPC+1~ | 
| LEXN | LEX+9~*, LEX+10 | 
| LEXNDC | ICDDX+7~, ICDOP+6~ | 
| LEXOUT | ICDDX+1~, ICDDX+14*, ICDOP+1~, ICDOP+14*, ICDOP+15, CPTCPC+1~, CPTCPC+5*, CPTCPC+6, CPTCPC+7, CPTCPC+8 | 
| LEXS | MS~, MS+1! | 
| LEXS( | MS+6*, MS+8* | 
| LEXS(" " | MS+5, MS+8 | 
| LEXSAB | CSDATA+94~, CSDATA+95*, CSDATA+96, CSDATA+97*, CSDATA+98, LEX+1 | 
| LEXSCK | CSDATA+94~, LEX+1*, LEX+2 | 
| LEXSDO | ICDDX+1~, ICDDX+2*, ICDDX+3, ICDDX+5, ICDOP+1~, ICDOP+2*, ICDOP+3, ICDOP+4, ICDOP+12, CPTCPC+1~ , CPTCPC+2*, CPTCPC+3 | 
| LEXSIEN | CSDATA+94~, LEX+2*, LEX+3, LEX+4, LEX+5 | 
| LEXSM | LEX+7~, LEX+8*, LEX+9 | 
| LEXSO | CSDATA+94~, CSDATA+95*, CSDATA+96, LEX+1, ICDDX+2, ICDDX+14, ICDOP+2, ICDOP+14, CPTCPC+2, CPTCPC+5 , MS+1~* | 
| LEXSRC | CSDATA+94~, CSDATA+96*, CSDATA+97, CSDATA+99, CSDATA+100, CSDATA+101, ICDDX+2, ICDDX+14, ICDOP+2, ICDOP+14 , CS+1*, CS+21, CS+23, CS+27 | 
| LEXSTA | CSDATA+94~, LEX+2*, LEX+4, LEX+5 | 
| LEXT | LEX+9~, LEX+10*, LEX+12, LEX+14, LEX+18~, LEX+19*, LEX+20, LEX+24, LEX+25 | 
| LEXTE | LEX+9~, LEX+12*, LEX+15 | 
| LEXTIEN | LEX+7~, LEX+17*, LEX+19, LEX+21, LEX+24, LEX+25, LEX+27 | 
| LEXVDT | CSDATA+94~, CSDATA+98*, LEX+1, ICDDX+2, ICDDX+5, ICDDX+14, ICDOP+2, ICDOP+4, ICDOP+14, CPTCPC+2 , CPTCPC+5 | 
| MAX | MODS+1~* | 
| OUT | MODS+1~* | 
| STR | MODS+1~ | 
| TD | MODS+1~*, MODS+4 | 
| X | MS~, MS+1, TM~, TM+1*, TM+2*, TM+3*, TM+4 | 
| Y | TM~, TM+1*, TM+2, TM+3 |