ICDDRG ;ALB/GRR/EG/ADL - Assigns DRG Codes ;04/21/2014
Source file <ICDDRG.m>
| Package | Total | Call Graph | 
|---|---|---|
| DRG Grouper | 4 | ^ICDDRG0 EN1^ICDDRG5 EN1^ICDDRG8 ($$CSI,$$GETDRG,$$ICDDX,$$ISA,$$MDCD,$$MDCT,$$MOR,MDCG)^ICDEX | 
| Package | Total | Caller Graph | 
|---|---|---|
| DRG Grouper | 3 | ICDDRG0 ICDDRGM ICDZENT | 
| Integrated Billing | 1 | IBTRV2 | 
| Registration | 1 | DGPTICD | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ERR | ;   Error Occured | |
| OPS | ; Operation/Procedures | |
| TOP | ; Main Entry Point | |
| PRI | ; Primary Diagnosis Related Variables | |
| SEX | ;   Get sex for DX or Procedure | |
| SEC | ; Secondary Diagnosis ; Is Secondary NCC for Primary | |
| KILL | ;   Clean Environment | |
| TM(X,Y) | ;   Trim Y | 
| Name | Line Occurrences | 
|---|---|
| $$TM | SEC+7, OPS+4 | 
| ERR | TOP+3, TOP+5, TOP+7, TOP+9, TOP+11, PRI+4, PRI+7, PRI+11, PRI+14, PRI+20 , PRI+25, PRI+33 | 
| KILL | PRI+1 | 
| OPS | PRI+32 | 
| SEC | PRI+25 | 
| SEX | PRI+17, PRI+25, PRI+32 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DT | TOP+13 | 
| ICD | KILL+4! | 
| ICD104 | PRI+17*, OPS+18*, KILL+1! | 
| ICDCC | PRI+19*, PRI+26*, SEC+5*, KILL+2! | 
| ICDCC2 | KILL+4! | 
| ICDCC3 | OPS+6~, OPS+7~, KILL+4! | 
| ICDCCT | PRI+19*, PRI+26! | 
| ICDCCT( | SEC+5* | 
| ICDCCT(1 | PRI+26 | 
| >> ICDDATE | TOP+13*, PRI+2, PRI+12, PRI+15, PRI+21, SEC+2, SEC+8, OPS+2, OPS+11, OPS+15 , ERR+1 | 
| >> ICDDMS | TOP+9 | 
| ICDDRG | TOP+1!*, ERR+1* | 
| >> ICDDX( | PRI+20, PRI+21, SEC+3, SEC+5, SEC+8 | 
| >> ICDDX(1 | TOP+3, PRI+2, PRI+9, PRI+12, PRI+15, SEC+3, SEC+5 | 
| ICDDXT | KILL+3! | 
| ICDDXT( | PRI+23* | 
| >> ICDEXP | TOP+5 | 
| ICDF | OPS+16*, KILL+3! | 
| ICDFK | KILL+3! | 
| ICDFX | OPS+16*, KILL+3! | 
| ICDGH | KILL+4! | 
| ICDI | PRI+16*, PRI+19*, PRI+20*, PRI+21, PRI+31*, PRI+32, SEC+3, SEC+5, SEC+8, KILL+3! | 
| ICDIZ | PRI+20*, KILL+3! | 
| ICDJ | KILL+1! | 
| ICDJJ | KILL+1! | 
| ICDK | SEC+11*, KILL+3! | 
| ICDL39 | KILL+4! | 
| ICDMAJ | PRI+29*, OPS+9*, KILL+4! | 
| ICDMCC | PRI+19*, PRI+27*, SEC+3*, KILL+2! | 
| ICDMCCT | PRI+19*, PRI+27! | 
| ICDMCCT( | SEC+3* | 
| ICDMCCT(1 | PRI+27 | 
| ICDMCCT(2 | PRI+27 | 
| ICDMDC | TOP+1!*, PRI+8*, PRI+11, PRI+12, PRI+13*, PRI+14*, OPS+2, OPS+11, OPS+15 | 
| ICDMDC(0 | PRI+13 | 
| ICDMDC(12 | PRI+14, OPS+2, OPS+15 | 
| ICDMDC(13 | PRI+14, OPS+2, OPS+15 | 
| ICDNMDC | KILL+4! | 
| ICDNMDC( | OPS+18* | 
| ICDNOR | PRI+29*, PRI+32*, KILL+1! | 
| ICDNSD | KILL+4! | 
| ICDO24 | KILL+5! | 
| ICDO24( | PRI+32* | 
| ICDO24("N" | PRI+33! | 
| ICDO25 | KILL+5! | 
| ICDOCNT | PRI+29*, OPS+1*, KILL+1! | 
| ICDODRG | KILL+2! | 
| ICDODRG( | OPS+16* | 
| ICDONR | PRI+29*, OPS+3*, KILL+3! | 
| ICDOP | PRI+29*, KILL+2! | 
| ICDOP(" " | OPS+1* | 
| ICDOPCT | PRI+29*, OPS+13*, KILL+3! | 
| ICDOPNR | PRI+29*, OPS+14, OPS+15*, KILL+5! | 
| ICDOR | PRI+29*, OPS+4*, OPS+5, OPS+6*, OPS+7*, KILL+1! | 
| ICDORNA | KILL+4! | 
| ICDORNI | PRI+29*, OPS+3*, KILL+2! | 
| ICDORNI( | OPS+3* | 
| ICDORNR | PRI+29*, OPS+3*, KILL+2! | 
| ICDOTMP | PRI+29~*, OPS+11*, OPS+15, OPS+16 | 
| ICDP15 | KILL+1! | 
| ICDP15( | PRI+24* | 
| ICDP24 | PRI+17*, KILL+2! | 
| ICDP25 | PRI+17*, KILL+2! | 
| ICDPD | PRI+8*, PRI+9*, SEC+10, KILL+2! | 
| ICDPDRG | PRI+15*, PRI+16, KILL+1! | 
| ICDPDRG( | PRI+16* | 
| >> ICDPRC | PRI+31 | 
| >> ICDPRC( | PRI+31, PRI+32 | 
| ICDREF | KILL+4! | 
| ICDRG | PRI+8*, KILL+1! | 
| ICDRG( | PRI+16* | 
| ICDRTC | TOP+1!*, TOP+3*, TOP+5*, TOP+7*, TOP+9*, TOP+11*, PRI+4*, PRI+7*, PRI+11*, PRI+14* , PRI+20, PRI+22*, PRI+25, PRI+31, PRI+33 | 
| ICDS24 | KILL+5! | 
| ICDS24( | SEC+12* | 
| ICDS24("N" | SEC+13! | 
| ICDS25 | KILL+5! | 
| ICDS25( | SEC+12* | 
| ICDS25(0 | SEC+13! | 
| ICDSD | PRI+19*, SEC+7*, SEC+10, KILL+3! | 
| ICDSDRG | SEC+11*, KILL+2! | 
| ICDSDRG( | SEC+11* | 
| ICDSEX | KILL+1! | 
| ICDSEX( | PRI+1*, SEX+1* | 
| >> ICDTMP | PRI+2*, PRI+4, PRI+5, PRI+15*, PRI+21*, PRI+22, PRI+23, PRI+32, SEC+8*, SEC+10 , SEC+11 | 
| >> ICDTRS | TOP+7 | 
| ICDY | PRI+32*, OPS+2, OPS+9, OPS+11, OPS+15, KILL+3! | 
| ICDY(0 | PRI+5*, PRI+7, PRI+8, PRI+13, PRI+17, PRI+23*, PRI+24, PRI+32*, SEC+3, SEC+5 , SEC+7, SEC+10, SEC+12, OPS+1, OPS+3, OPS+4, OPS+5, OPS+7, OPS+12, OPS+18 , SEX+1 | 
| >> SEX | TOP+11, PRI+1, PRI+14 | 
| U | PRI+5, PRI+22, PRI+23, PRI+32 | 
| X | TM~, TM+2*, TM+3*, TM+4 | 
| Y | TM~, TM+1*, TM+2, TM+3 | 
| Name | Field # of Occurrence | 
|---|---|
| $T( | PRI+9 |