©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
ICDTOKN ;DLS/DEK - Parse Text ;04/21/2014
Source file <ICDTOKN.m>
| Package | Total | Call Graph |
|---|---|---|
| DRG Grouper | 1 | ($$ROOT,$$SYS)^ICDEX |
| Kernel | 1 | $$UP^XLFSTR |
| Package | Total | Caller Graph |
|---|---|---|
| DRG Grouper | 4 | ICDEX ICDEXLK3 ICDEXLK4 ICDIDX |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CT(SEG,ROOT,SYS) | ; Count Usage
|
|
| SW(X,SEG1,SEG2) | ; Swap text SEG1 for SEG2 in X
; ; Input ; ; X Text string ; SEG1 Word to remove in string (replace) ; SEG2 Word to insert in string (with) ; ; Output ; ; X Text string without SEG1 ; |
|
| TOK(X) | ; Parse Text into Tokens in array PARS()
|
|
| TOKEN(X,ROOT,SYS,ARY) | ; Parse Text into Tokens
|
|
| EXC(X) | ; Exclusions
|
|
| PAR(X,ARY,FLG) | ; Parse
|
|
| SWAP(X) | ; Special Case Word Swap
|
| Name | Line Occurrences |
|---|---|
| $$CT | TOKEN+38 |
| $$EXC | PAR+12 |
| $$SW | SWAP+10, SWAP+12 |
| $$SWAP | PAR+8 |
| PAR | TOK+1, TOKEN+35 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABBR | TOKEN+35~, TOKEN+38*, TOKEN+41 |
| ABR | CT+2~*, CT+8*, CT+15*, CT+16* |
| ARY | TOKEN~, TOKEN+35!, TOKEN+42!, PAR~, PAR+9! |
| ARY( | TOKEN+45*, TOKEN+46*, TOKEN+47, PAR+14*, PAR+15*, PAR+16, PAR+18 |
| ARY(" " | TOKEN+45, PAR+14 |
| ARY("B" | PAR+13, PAR+14*, PAR+15*, PAR+16! |
| ARY(0 | TOKEN+47*, PAR+17*, PAR+18* |
| BEG | PAR+8~, PAR+9*, PAR+11* |
| CHR | PAR+8~, PAR+10*, SW+12~, SW+16~* |
| CNT | CT+2~*, CT+6*, CT+13*, CT+16*, CT+17 |
| EFF | CT+6~*, CT+7, CT+8, CT+13~*, CT+14, CT+15 |
| END | PAR+8~, PAR+9*, PAR+10, PAR+11 |
| EROOT | CT+2~, CT+3*, CT+4, CT+5, CT+6, CT+7, CT+8, CT+9, CT+11, CT+12 , CT+13, CT+14, CT+15 |
| FLG | PAR~, PAR+14, PAR+17 |
| I | PAR+8~, PAR+13~, PAR+14*, PAR+15*, PAR+18~* |
| IEN | TOKEN+35~, TOKEN+36*, TOKEN+37, TOKEN+47*, CT+2~, CT+5~*, CT+6, CT+7, CT+8, CT+10~ , CT+12*, CT+15 |
| INC | TOKEN+44~, TOKEN+45*, TOKEN+46 |
| LEAD | SW+12~, SW+18*, SW+21, SW+24 |
| NOT | SW+12~, SW+14* |
| NUM | TOKEN+35~, TOKEN+37~, TOKEN+39*, TOKEN+40, TOKEN+41, TOKEN+43~*, TOKEN+44, TOKEN+46, PAR+8~, PAR+13~* , PAR+15, PAR+16*, PAR+18 |
| ORD | TOKEN+35~!, TOKEN+36!, TOKEN+47!, CT+10~*, CT+11*, CT+12 |
| ORD( | TOKEN+39, TOKEN+40*, TOKEN+41*, TOKEN+42, TOKEN+43, TOKEN+44, TOKEN+46 |
| PARS | TOK+1! |
| PIE | PAR+8~, PAR+11*, PAR+12, PAR+13, PAR+14, PAR+15 |
| REP | SW+19~, SW+20~, SW+21*, SW+22, SW+23, SW+24*, SW+25, SW+26 |
| ROOT | TOKEN~, TOKEN+35*, TOKEN+38, CT~, CT+1*, CT+3 |
| SEG | TOKEN+37~*, TOKEN+38, TOKEN+40, TOKEN+44~*, TOKEN+45, CT~, CT+1*, CT+4, CT+5, CT+6 , CT+7, CT+8, CT+9, CT+10, CT+11, CT+13, CT+14, CT+15, SWAP+8~, SWAP+9* , SWAP+10, SWAP+11*, SWAP+12 |
| SEG1 | SW~, SW+12*, SW+13, SW+14, SW+15, SW+16, SW+17, SW+21, SW+24 |
| SEG2 | SW~, SW+13*, SW+14, SW+17, SW+21, SW+24 |
| SYS | TOKEN~, TOKEN+35*, TOKEN+38, CT~, CT+1*, CT+3 |
| TIEN | CT+7~*, CT+8, CT+14~*, CT+15 |
| TMP | TOKEN+35~!, TOKEN+47! |
| TMP( | TOKEN+36, TOKEN+37 |
| TOKEN | TOKEN+35~ |
| TRAIL | SW+12~, SW+19*, SW+21 |
| TXT | PAR+8~*, PAR+9, PAR+10, PAR+11, SWAP+7~*, SWAP+8*, SWAP+10*, SWAP+12*, SWAP+13, SW+12~* , SW+13, SW+14, SW+15, SW+16, SW+17*, SW+22, SW+23*, SW+25, SW+26*, SW+27 |
| USAGE | TOKEN+35~, TOKEN+38*, TOKEN+39, TOKEN+40, TOKEN+41, TOKEN+42*, TOKEN+43, TOKEN+44, TOKEN+46 |
| WIT | SW+19~, SW+20~, SW+21*, SW+23, SW+24*, SW+26 |
| X | TOK~, TOK+1, TOKEN~, TOKEN+35, PAR~, PAR+8, EXC~, EXC+1, EXC+2, EXC+3 , EXC+4, EXC+5, EXC+6, EXC+7, EXC+8, EXC+9, EXC+10, EXC+11, EXC+12, EXC+13 , SWAP~, SWAP+7*, SWAP+8*, SWAP+13*, SWAP+14, SW~, SW+12*, SW+13, SW+14*, SW+27* , SW+28 |