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~ |