ICDEXLK3 ;SLC/KER - ICD Extractor - Lookup, Search ;07/15/2015
Source file <ICDEXLK3.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LK(TXT,ROOT,CDT,SYS,VER,OUT) | ; Lookup - Versioned
|
|
| CD(TXT,ROOT,CDT,SYS,VER,OUT) | ; Lookup Code - Versioned
|
|
| LK2() | ; Lookup - Part 2
|
|
| CODE | ; Lookup by Code (Requires TXT and ROOT)
|
|
| TOK(X) | ; Parse Text into Tokens
|
|
| TOKEN(X,ROOT,SYS,ARY) | ; Parse Text into Tokens
|
|
| SS | ; Show Select/Find Global Arrays
|
|
| WORD(X,ROOT,SYS) | ; Word is contained in a Set
|
|
| LS(ROOT,IEN,VDT) | ; Last Status
|
|
| LD(ROOT,IEN,VDT,VER) | ; Last Description
|
|
| ISCODE(X,ROOT) | ; Check if Text is a Code
|
|
| UNQ(X,ROOT) | ; Check if Text is a Unique Code
|
|
| ISORD(X) | ; Check if in $ORDER
|
|
| CDT(X,Y) | ; ICD-10 Code Set Date
|
|
| SYS(ROOT,CDT) | ; System from File and Date
|
|
| SH | ; Show TMP
|
|
| TM(X,Y) | ; Trim Y
|
| Name | Field # of Occurrence |
|---|---|
| $$DTBR^ICDEX | LK2+7 |
| $$FILE^ICDEX | LK2+3 |
| $$ROOT^ICDEX | LK2+2, WORD+38, WORD+40 |
| $$SYS^ICDEX | LK2+5, WORD+38 |
| $$LS^ICDEXLK3 | CODE+27 |
| TXT^ICDEXLK4 | LK2+32 |
| $$EXM^ICDEXLK5 | LK2+19 |
| FND^ICDEXLK5 | LK2+13, LK2+21, CODE+13, CODE+24 |
| IEN^ICDEXLK5 | LK2+12 |
| SEL^ICDEXLK5 | LK2+14, LK2+27, CODE+25 |
| PAR^ICDTOKN | TOK+1 |
| TOKEN^ICDTOKN | TOKEN+1 |
| $$DT^XLFDT | CDT+1 |
| $$UP^XLFSTR | CODE+15, LD+7, ISCODE+11 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ICDS - [#80.4] | LK2+7, WORD+41, WORD+44, WORD+46, WORD+50, ISCODE+5, ISCODE+13, SYS+5 |
| ^ICDS("F" | SYS+4 |
| ^TMP( | LK2+4!, LK2+11, LK2+16, LK2+23, LK2+24, LK2+25!, LK2+26*, LK2+27, LK2+30, LK2+33 , CODE+4, CODE+14, CODE+15, SH+1 |
| ^TMP("ICD9" | LK2+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | TOKEN~, TOKEN+1 |
| CDT | LK~, CD~, LK2+4*, LK2+6, LK2+7*, LK2+12, LK2+13, LK2+19, LK2+21, CODE+3* , CODE+10, CODE+13, CODE+21, CODE+24, CODE+27, LS+1~, LS+2*, LS+3, LD+1~, LD+2* , LD+3, CDT+1~*, SYS~, SYS+3 |
| >> CNT | CODE+12*, CODE+23* |
| CTL | SYS+1~, SYS+3*, SYS+6 |
| >> DIC(0 | LK2+22, LK2+27, CODE+1, CODE+8, CODE+12, CODE+19, CODE+23 |
| EFF | LS+1~, LS+3*, LS+4, LS+6*, LS+7, LD+1~, LD+3*, LD+4, LD+5*, LD+6 |
| ENT | LK2+23~*, LK2+24, LK2+25 |
| EROOT | CODE+3~, CODE+6*, CODE+7, CODE+9, CODE+17*, CODE+18, CODE+20 |
| FDT | SYS+1~, SYS+5*, SYS+6* |
| FI | WORD+40~* |
| FILE | LK2+1~, LK2+3*, SYS+1~, SYS+2*, SYS+4 |
| HIS | LS+1~, LS+4*, LS+5 |
| ICDBYCD | CD+1~* |
| ICDCDT | LK2+12~* |
| ICDI | LK2+19~, LK2+20*, LK2+21 |
| IEN | LK2+1~, LK2+21~*, LK2+23~, LK2+24*, LK2+25, LK2+26, CODE+8*, CODE+9*, CODE+10, CODE+13 , CODE+19*, CODE+20*, CODE+21, CODE+24, CODE+27, LS~, LS+1*, LS+2, LS+3, LS+4 , LS+5, LD~, LD+1*, LD+2, LD+3, LD+5, LD+6, LD+7, UNQ+24~, UNQ+27* , UNQ+28, UNQ+29*, UNQ+35, UNQ+36, UNQ+38, SYS+1~, SYS+4*, SYS+5, SYS+6 |
| IEN1 | LK2+12~ |
| IEN2 | LK2+12~ |
| IENS | UNQ+24~ |
| IENS( | UNQ+33*, UNQ+34 |
| INP1 | LK2+1~, LK2+9*, LK2+11 |
| INP2 | LK2+1~, LK2+9*, LK2+11 |
| KEY | LK2+1~, CODE+3~, CODE+4*, CODE+5, CODE+8, CODE+12, CODE+15*, CODE+16, CODE+19, CODE+23 , ISCODE+1~, ISCODE+2*, ISCODE+3, ISCODE+9, ISCODE+10, ISCODE+11*, ISCODE+12, ISCODE+17, ISCODE+18, UNQ+24~ , UNQ+25*, UNQ+26, UNQ+29, UNQ+31, UNQ+33, ISORD+1, ISORD+2 |
| LAS | ISCODE+1~, UNQ+24~ |
| LDI | LD+1~, LD+6*, LD+7 |
| LDS | LD+1~, LD+7*, LD+8 |
| LOR | LK2+1~, LK2+13, LK2+19~*, LK2+21, LK2+27 |
| NC | SS+1~*, SS+2, SS+4*, SS+5, SH+1~, SH+2*, SH+3 |
| NDT | SYS+1~*, SYS+6 |
| NIEN | UNQ+24~, UNQ+30*, UNQ+32*, UNQ+33, UNQ+34* |
| NN | SS+1~*, SS+2*, SS+3, SS+4*, SS+5*, SS+6, SH+1~, SH+2*, SH+3* |
| NUM | LK2+1~ |
| NXT | LK2+1~, UNQ+24~, UNQ+27*, UNQ+28, UNQ+30*, UNQ+34*, UNQ+36, UNQ+38 |
| OK | LK2+1~ |
| ORD | LK2+1~, CODE+3~, CODE+5*, CODE+7*, CODE+8, CODE+9, CODE+12, CODE+16*, CODE+18*, CODE+19 , CODE+20, CODE+23, ISCODE+1~, ISCODE+6~*, ISCODE+7, ISCODE+14~*, ISCODE+15, UNQ+24~, UNQ+29~*, UNQ+31* , UNQ+32, UNQ+33, ISORD+1, ISORD+2 |
| ORG | ISCODE+1~, ISCODE+3*, ISCODE+6, ISCODE+12*, ISCODE+14, UNQ+24~, UNQ+26*, UNQ+29 |
| OUT | LK~, CD~, LK2+8*, LK2+13, LK2+21, CODE+13, CODE+24, ISCODE+1~, ISCODE+4*, ISCODE+5 , ISCODE+9*, ISCODE+10*, ISCODE+13, ISCODE+17*, ISCODE+18*, ISCODE+19, UNQ+24~, UNQ+27*, UNQ+28, UNQ+35* , UNQ+36*, UNQ+37*, UNQ+38*, UNQ+39 |
| PARS | LK2+1~, TOK+1! |
| PR | LK2+1~ |
| PRV | CODE+3~, CODE+4*, CODE+15* |
| RES | ISCODE+6~, ISCODE+7*, ISCODE+8*, ISCODE+9, ISCODE+10, ISCODE+14~, ISCODE+15*, ISCODE+16*, ISCODE+17, ISCODE+18 |
| ROOT | LK~, CD~, LK2+2*, LK2+3, LK2+4, LK2+6, LK2+13, LK2+14, LK2+19, LK2+21 , LK2+27, LK2+29, CODE+1, CODE+2, CODE+6, CODE+10, CODE+13, CODE+17, CODE+21, CODE+24 , CODE+25, CODE+27, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+39, WORD+47, WORD+48, WORD+49 , WORD+51, LS~, LS+1*, LS+2, LS+3, LS+4, LS+5, LD~, LD+1*, LD+2 , LD+3, LD+5, LD+6, LD+7, ISCODE~, ISCODE+7, ISCODE+15, UNQ~, UNQ+28, UNQ+29 , UNQ+31, UNQ+32, SYS~, SYS+2 |
| SEQ | LK2+1~ |
| SI | ISCODE+1~, ISCODE+4*, ISCODE+5*, ISCODE+7, ISCODE+9, ISCODE+10, ISCODE+13*, ISCODE+15, ISCODE+17, ISCODE+18 , UNQ+24~, UNQ+27*, UNQ+28*, UNQ+29, UNQ+31, UNQ+32, UNQ+37* |
| STA | CODE+10~*, CODE+11, CODE+21~*, CODE+22, CODE+27*, CODE+28, LS+1~, LS+5*, LS+6*, LS+7 |
| SUB | LK2+1~, LK2+4*, LK2+11, LK2+16, LK2+23, LK2+24, LK2+25, LK2+26, LK2+27, LK2+30 , LK2+33, CODE+4, CODE+14, CODE+15, SH+1~*, SH+2 |
| SYS | LK~, CD~, LK2+5*, LK2+6*, LK2+7, LK2+13, LK2+19, LK2+21, CODE+6, CODE+13 , CODE+17, CODE+24, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+41, WORD+42~*, WORD+43, WORD+44 , WORD+45, WORD+46, WORD+47~*, WORD+48, WORD+50, WORD+51, ISCODE+1~, UNQ+24~, CDT+1~*, SYS+1~* , SYS+6*, SYS+7 |
| TDT | LK2+1~ |
| TKN | WORD+38~*, WORD+43, WORD+45, WORD+48, WORD+51 |
| TRT | WORD+40~*, WORD+42, WORD+43, WORD+45 |
| TXT | LK~, CD~, CD+1*, LK2+2*, LK2+9, LK2+18, LK2+19, LK2+23~, LK2+24*, LK2+26 , LK2+29, CODE+1, CODE+2, CODE+4, CODE+15 |
| VCC | LK2+1~ |
| VCD | LK2+1~ |
| VDS | LK2+1~ |
| VDT | LS~, LS+1*, LS+2, LD~, LD+1*, LD+2 |
| VER | LK~, CD~, LK2+5*, LK2+6, LK2+7, LK2+13, LK2+19, LK2+21, CODE+10, CODE+11 , CODE+13, CODE+21, CODE+22, CODE+24, CODE+27, CODE+28, LD~, LD+4, LD+5 |
| VII | LK2+1~ |
| VNM | LK2+1~ |
| VSD | LK2+1~ |
| VST | LK2+1~ |
| X | LK2+19!*, TOK~, TOK+1, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+39, WORD+43*, WORD+45* , WORD+46, WORD+48*, WORD+51*, WORD+52, LS+7*, LS+8, LD+8*, LD+9, ISCODE~, ISCODE+2 , ISCODE+11, UNQ~, UNQ+24, UNQ+25, UNQ+39*, UNQ+40, ISORD~, CDT~, CDT+1, CDT+2 , TM~, TM+2*, TM+3*, TM+4 |
| Y | LK2+1~, LK2+13, LK2+19!, CDT~, CDT+1, TM~, TM+1*, TM+2, TM+3 |
| Y( | LK2+20, LK2+21 |