LEX10PR ;ISL/KER - ICD-10 Procedure Code ;04/21/2014
Source file <LEX10PR.m>
| Package | Total | Call Graph | 
|---|---|---|
| DRG Grouper | 1 | $$IMP^ICDEX | 
| Kernel | 1 | ($$DT,$$FMTE)^XLFDT | 
| Lexicon Utility | 1 | $$IMPDATE^LEXU | 
| VA Fileman | 1 | ^DIWP | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FIN(X,LEXVDT,ARY) | ; Fragment Info | |
| PR(LEX,X) | ;   Parse Array | |
| IS(X) | ; Is a Root Code | |
| NEXT(LEXC,LEXA,LEXD) | ; Next Allowable Character | |
| TM(X,Y) | ;   Trim Character Y - Default " " | |
| NAM(X) | ; Name | |
| INF(X) | ; | |
| SN(X,EFF) | ; Short Name | 
| 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 | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^LEX(757.02 - [#757.02] | IS+3 | 
| ^LEX(757.033 - [#757.033] | NAM+2, NAM+3, SN+3, SN+4, SN+5, FIN+34, FIN+38, FIN+39, FIN+40, FIN+44 , FIN+45, FIN+46, FIN+49, FIN+50, FIN+51, FIN+54, FIN+55, FIN+56, FIN+59, FIN+60 , FIN+61, FIN+62, INF+3 | 
| ^UTILITY($J | PR+2!, PR+7, PR+8, PR+9! | 
| Name | Line Occurrences | 
|---|---|
| $$FIN | INF+4 | 
| $$IS | NEXT+32 | 
| $$NAM | NEXT+34, NEXT+38, NEXT+41 | 
| $$SN | NAM+4 | 
| $$TM | NEXT+14, NEXT+28, FIN+62, PR+8 | 
| PR | INF+12, INF+17, INF+22, INF+26 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ARY | FIN~, FIN+32!, INF+1~!, INF+4! | 
| ARY(0 | FIN+40*, FIN+41* | 
| ARY(1 | FIN+42*, FIN+43*, INF+7 | 
| ARY(2 | FIN+47*, FIN+48*, INF+10 | 
| ARY(3 | FIN+52*, FIN+53*, INF+15 | 
| ARY(4 | FIN+57*, FIN+58*, INF+20 | 
| ARY(5 | FIN+63*, INF+25, INF+26 | 
| C1 | INF+1~*, INF+5, INF+9, INF+12, INF+13, INF+14, INF+17, INF+18, INF+19, INF+22 , INF+23, INF+24, INF+26, INF+28, INF+29 | 
| C2 | INF+1~*, INF+6, INF+9 | 
| CDT | SN+1~*, SN+2*, SN+3, FIN+32~, FIN+36*, FIN+37*, FIN+38, FIN+44, FIN+49, FIN+54 , FIN+59, INF+1~, INF+2*, INF+4* | 
| 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~ | 
| EFF | SN~, SN+1~, SN+3*, SN+4, FIN+32~, FIN+38*, FIN+39, FIN+44*, FIN+45, FIN+49* , FIN+50, FIN+54*, FIN+55, FIN+59*, FIN+60, INF+7*, INF+8, INF+9 | 
| ENT | FIN+32~, FIN+35* | 
| FRAG | INF+1~, INF+2*, INF+3, INF+5, INF+6 | 
| FRG | FIN+32~, FIN+35* | 
| HIS | SN+1~, SN+4*, SN+5 | 
| I | INF+12~, INF+14*, INF+17~, INF+19*, INF+22~, INF+24*, INF+29* | 
| IEN | SN+1~*, SN+3, SN+4, SN+5, FIN+32~, FIN+33*, FIN+34, FIN+38, FIN+39, FIN+40 , FIN+44, FIN+45, FIN+46, FIN+49, FIN+50, FIN+51, FIN+54, FIN+55, FIN+56, FIN+59 , FIN+60, FIN+61, FIN+62, INF+1~, INF+3*, INF+4 | 
| IMP | SN+1~, SN+2*, FIN+32~, FIN+36*, FIN+37, INF+1~, INF+2*, INF+4 | 
| INC | INF+25~*, INF+27*, INF+28 | 
| INI | INF+25~*, INF+26 | 
| INT | INF+26~ | 
| INT( | INF+29 | 
| INT(1 | INF+26*, INF+27, INF+28 | 
| LEX | PR~, PR+2, PR+3, PR+6!, PR+9* | 
| LEX( | PR+5, PR+8* | 
| LEX(" " | PR+3 | 
| LEX1 | NEXT+13~, NEXT+27~, NEXT+40*, NEXT+41 | 
| LEX2 | NEXT+13~, NEXT+27~ | 
| LEXA | NEXT~ | 
| LEXA( | NEXT+33, NEXT+35*, NEXT+38*, NEXT+42* | 
| LEXC | NEXT~, NEXT+14*, NEXT+15, NEXT+27~, NEXT+28*, NEXT+30, NEXT+31, NEXT+36, NAM+1~*, NAM+2 , NAM+3, IS+1~*, IS+2, IS+3, IS+4, PR+1~, PR+3*, PR+6*, PR+8*, PR+9 | 
| LEXCDT | NEXT+13~, NEXT+15*, NEXT+29, NAM+2 | 
| LEXCHK | NEXT+13~, NEXT+21*, NEXT+22, NEXT+30, NEXT+31, NEXT+36 | 
| LEXCHR | NEXT+13~, NEXT+31~*, NEXT+32, NEXT+33, NEXT+34, NEXT+35 | 
| LEXCIEN | NAM+1~, NAM+3*, NAM+4 | 
| LEXCT | NEXT+13~, NEXT+25*, NEXT+35*, NEXT+43 | 
| LEXD | NEXT~, NEXT+15, NEXT+27~, NEXT+29* | 
| LEXE | NEXT+13~, NEXT+27~ | 
| LEXEFF | NAM+1~, NAM+2*, NAM+3 | 
| LEXFUL | NEXT+31~, NEXT+32* | 
| LEXI | PR+1~, PR+4*, PR+5*, PR+6*, PR+7*, PR+8 | 
| LEXID | NEXT+13~, NEXT+14*, NEXT+23*, NEXT+32, NEXT+33, NEXT+34, NEXT+35, NEXT+38, NEXT+39, NEXT+40 , NEXT+41 | 
| LEXL | IS+1~*, IS+2, IS+3, IS+4, PR+1~, PR+2*, PR+4 | 
| LEXLEN | NEXT+13~, NEXT+15*, NEXT+16, NEXT+18, NEXT+20, NEXT+21, NEXT+23 | 
| LEXN | IS+1~, IS+3*, IS+4 | 
| LEXNAM | NEXT+14~, NEXT+34~*, NEXT+35, NEXT+38*, NEXT+41*, NEXT+42, NAM+1~, NAM+4* | 
| LEXNC | NEXT+13~, NEXT+25*, NEXT+26 | 
| LEXNN | NEXT+13~, NEXT+24*, NEXT+26*, NEXT+28, NEXT+29, NEXT+37*, NEXT+41~*, NEXT+42 | 
| LEXO | IS+1~, IS+2*, IS+3* | 
| LEXOR | NEXT+14~, NEXT+19*, NEXT+20*, NEXT+24, NEXT+36*, NEXT+37, IS+3 | 
| LEXPRE | NEXT+14~ | 
| LEXS | NEXT+14~, NEXT+27~ | 
| LEXSO | NEXT+14~*, NEXT+19, NEXT+20, NEXT+25, NEXT+30 | 
| LEXVDT | SN+1, FIN~, FIN+36, INF+2 | 
| N0 | FIN+32~, FIN+34*, FIN+35, FIN+40 | 
| NOD | FIN+32~, FIN+40*, FIN+42, FIN+46*, FIN+47, FIN+48, FIN+51*, FIN+52, FIN+53, FIN+56* , FIN+57, FIN+58, FIN+62*, FIN+63 | 
| NODC | FIN+32~, FIN+61*, FIN+63* | 
| NODI | FIN+32~, FIN+61*, FIN+62 | 
| REC | FIN+32~, FIN+39*, FIN+40, FIN+45*, FIN+46, FIN+50*, FIN+51, FIN+55*, FIN+56, FIN+60* , FIN+61, FIN+62 | 
| SAB | FIN+32~, FIN+35* | 
| SRC | FIN+32~, FIN+35*, FIN+36 | 
| >> STA | INF+7*, INF+8, INF+9 | 
| >> TMP | INF+7*, INF+10*, INF+11, INF+12, INF+15*, INF+16, INF+17, INF+20*, INF+21, INF+22 | 
| TXT | INF+12~, INF+17~, INF+22~ | 
| TXT( | INF+14, INF+19, INF+24 | 
| TXT(1 | INF+12*, INF+13, INF+17*, INF+18, INF+22*, INF+23 | 
| U | FIN+33*, FIN+35 | 
| X | NEXT+16, NEXT+17*, NAM~, NAM+1, NAM+4*, NAM+5, SN~, SN+1, SN+5*, SN+6 , IS~, IS+1, FIN~, FIN+33, INF~, INF+2, INF+4*, PR~, PR+2, PR+5* , TM~, TM+1*, TM+2*, TM+3*, TM+4 | 
| Y | TM~, TM+1*, TM+2, TM+3 | 
| Z | PR+1~ |