LEX10DLS ;ISL/KER - ICD-10 Diagnosis Lookup Selection ;04/21/2014
Source file <LEX10DLS.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | ^DIR ^DIWP |
| Kernel | 1 | $$UP^XLFSTR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PR(LEX,X) | ; Parse Array
|
|
| X(X,LEX) | ; Set X and Outpot Array
|
|
| CL | ; Clear
|
|
| ONE(X,LEX) | ; One Entry Found
|
|
| SEL(LEX,X) | ; Select from List
|
|
| ASK(LEX,X) | ; Ask for Selection
|
|
| MUL(LEX,Y) | ; Multiple Entries Found
|
|
| TM(X,Y) | ; Trim Character Y - Default " "
|
|
| CONT(X,Y) | ; Ask to Continue
|
|
| MULS(X,Y,LEX) | ; Select from Multiple Entries
|
|
| MULSH | ; Select from Multiple Entries Help
|
|
| MULQ | ; Quit Multiple
|
|
| COH | ; Continue Help
|
|
| MULW | ; Write Multiple
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^UTILITY($J | PR+2!, PR+7, PR+8, PR+9! |
| Name | Line Occurrences |
|---|---|
| $$ASK | SEL+42 |
| $$MUL | ASK+3 |
| $$MULS | MUL+8, MUL+10 |
| $$ONE | ASK+3 |
| $$TM | PR+8 |
| $$X | ONE+15, MULQ+2 |
| MULQ | MUL+4, MUL+11 |
| MULW | MUL+6 |
| PR | ONE+7, MULW+5, CONT+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DIR | ONE+1~, MULS+1~, MULS+16!, CONT+1~ |
| DIR("?" | MULS+12*, CONT+12* |
| DIR("??" | MULS+12*, CONT+12* |
| DIR("A" | ONE+7*, ONE+8*, ONE+9*, ONE+10*, ONE+11*, MULS+5*, MULS+6*, MULS+8*, CONT+9*, CONT+10* , CONT+11* |
| DIR("B" | ONE+11*, CONT+11* |
| DIR("PRE" | MULS+11*, CONT+13* |
| DIR(0 | ONE+11*, MULS+13*, CONT+12* |
| DIRB | MULS+1~ |
| DIROUT | ASK+4, ONE+12, MULS+14, CONT+1!, CONT+14 |
| DIRUT | CONT+1!, CONT+14 |
| DIW | PR+1~ |
| DIWF | PR+1~, PR+4* |
| DIWI | PR+1~ |
| DIWL | PR+1~, PR+4* |
| DIWR | PR+1~ |
| DIWT | PR+1~ |
| DIWTC | PR+1~ |
| DIWX | PR+1~ |
| DN | PR+1~ |
| DTOUT | ASK+4, ONE+12, ONE+13, MULS+14, MULS+15, MULS+16, CONT+1!, CONT+14 |
| DUOUT | ASK+4, ONE+12, MULS+14, CONT+1!, CONT+14 |
| LEX | SEL~, SEL+42, ASK~, ASK+3, ONE~, ONE+14!, ONE+15, MUL~, MUL+8, MUL+10 , MULS~, MULQ+2, X~, X+9!, PR~, PR+2, PR+3, PR+6!, PR+9* |
| LEX( | MULW+1, MULW+2, MULW+3, MULW+4, MULS+4, MULS+7, X+3, X+4, PR+5, PR+8* |
| LEX(" " | ASK+2, MUL+3, PR+3 |
| LEX(0 | ONE+2, MULS+3, X+2 |
| LEX(1 | ONE+3, ONE+4, ONE+5 |
| LEXC | ONE+1~, ONE+2~, ONE+5*, ONE+6, ONE+8*, ONE+9*, ONE+10*, CONT+1~, CONT+8*, CONT+9* , CONT+10*, PR+1~, PR+3*, PR+6*, PR+8*, PR+9 |
| LEXE | MUL+1~, MUL+5*, MUL+6, MUL+7, MUL+8, MUL+9, MUL+10, MULW+1, MULW+2, MULW+3 , MULW+4, MULW+5 |
| LEXEX | ONE+1~, ONE+4*, ONE+6, MULW+1~, MULW+3*, MULW+4, X+1~, X+3*, X+5 |
| LEXFI | ONE+1~, ONE+2*, MULS+1~, MULS+3*, X+1~, X+2* |
| LEXFQ | CONT+1~, CONT+2*, CONT+4 |
| LEXHLP | MULS+1~, MULS+9*, MULS+10*, MULSH+1 |
| LEXI | MULW+1~, MULW+6*, CONT+1~, CONT+8*, CONT+9, PR+1~, PR+4*, PR+5*, PR+6*, PR+7* , PR+8 |
| LEXIEN | X+1~, X+4*, X+5 |
| LEXIT | ASK+1~, ASK+2*, ONE+1~, ONE+13*, ONE+14, MUL+1, MUL+2*, MUL+5, MUL+8*, MUL+10* , MULS+2, MULS+15*, MULQ+2, CL+1! |
| LEXL | ASK+1~*, ASK+3, MUL+1~, MUL+2*, MUL+6, MUL+7, MUL+8, MUL+9, PR+1~, PR+2* , PR+4 |
| LEXLAST | MULS+1~, MULS+2*, MULS+4, MULS+7 |
| LEXMAX | MUL+1~, MUL+2*, MUL+7*, MUL+8, MUL+10, MULS+1~, MULS+2*, MULS+3, MULS+6, MULS+8 , MULS+10, MULS+13 |
| LEXN | X+1~ |
| LEXNC | ONE+1~, ONE+3*, ONE+4*, ONE+6, MULW+1~, MULW+2*, MULW+4, X+1~, X+6*, X+7 , X+9*, X+10 |
| LEXNN | X+1~, X+6*, X+7*, X+8, X+9*, X+10*, X+11 |
| LEXRN | X+1~, X+8*, X+11* |
| LEXS | MULS+1~, X+1~, X+2*, X+3, X+4, X+6, X+9 |
| LEXSO | ONE+1~, ONE+3*, ONE+6, MULW+1~*, MULW+3, MULW+4, X+1~, X+3*, X+4 |
| LEXSP | ONE+2~*, ONE+9 |
| LEXSS | MUL+1~, MUL+2*, MUL+3*, MUL+5, MUL+8*, MUL+9, MUL+10*, MULQ+1, MULQ+2 |
| LEXT | MULW+1~, MULW+6* |
| LEXTOT | ASK+1~, ASK+2*, ASK+3 |
| LEXTX | ONE+2~, ONE+7, MULW+1~, MULW+5 |
| LEXTX( | MULW+6 |
| LEXTX(1 | ONE+6*, ONE+8, MULW+3*, MULW+4*, MULW+5 |
| LEXTX(2 | ONE+8, ONE+9 |
| LEXW | CONT+1~, CONT+8 |
| LEXW( | CONT+8, CONT+9 |
| LEXW(1 | CONT+3* |
| LEXW(2 | CONT+4* |
| LEXW(3 | CONT+5* |
| LEXW(4 | CONT+6* |
| LEXW(5 | CONT+7* |
| LEXX | MUL+1~, MUL+3*, MUL+4, MUL+5, CONT+1~, CONT+2*, CONT+3, CONT+7, COH+1, COH+3 , COH+6 |
| U | MUL+2*, MULS+16 |
| X | SEL~, SEL+42*, SEL+43, ASK~, ASK+1, ASK+3!*, ASK+4*, ASK+5, ONE~, ONE+13 , ONE+14, ONE+15*, ONE+16, MUL+1~, MUL+12, MULS~, MULS+2, MULS+15*, MULS+16, MULQ+2* , MULQ+3, X~, X+2, X+5*, X+12, CONT~, CONT+2, CONT+14*, CONT+15, PR~ , PR+2, PR+5*, TM~, TM+1*, TM+2*, TM+3*, TM+4 |
| Y | ONE+2~, ONE+12, ONE+15, MUL~, MUL+2, MULS~, MULS+2, MULS+14, MULS+17, CONT~ , CONT+2, CONT+14, TM~, TM+1*, TM+2, TM+3 |
| Z | PR+1~ |