ICDTLB6C ;ALB/EG/MRY - GROUPER UTILITY FUNCTIONS FY 2007; 9/29/03 2:47pm ; 6/28/05 4:06pm
Source file <ICDTLB6C.m>
| Package | Total | Caller Graph | 
|---|---|---|
| DRG Grouper | 3 | ICDTLB1C ICDTLB2C ICDTLB6C | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DRG575 | ||
| DRG574 | ||
| DRG577 | ||
| DRG576 | ||
| DRG571 | ||
| DRG570 | ||
| DRG573 | ||
| DRG572 | ||
| DRG579 | ||
| DRG578 | ||
| DRG443 | ||
| DRG442 | ||
| DRG445 | ||
| DRG444 | ||
| DRG447 | ||
| DRG446 | ||
| DRG449 | ||
| DRG448 | ||
| DRG540 | ||
| DRG543 | ||
| DRG544 | ||
| DRG545 | ||
| DRG546 | ||
| DRG547 | ; called from DRG106^ICDTLB2C | |
| DRG548 | ||
| DRG549 | ; called from DRG106^ICDTLB2C | |
| DRG478 | ||
| DRG479 | ||
| DRG475 | ||
| DRG471 | ||
| DRG496 | ||
| DRG497 | ||
| DRG494 | ;I (ICD-1),'ICDCC S ICDCC=$S($D(^ICD9("ACC",ICDDX(1),ICDDX(1))):1,1:0) | |
| DRG495 | ||
| DRG493 | ;I (ICDI-1)=1,'ICDCC S ICDCC=$S($D(^ICD9("ACC",ICDDX(1),ICDDX(1))):1,1:0) | |
| DRG559 | ;I DGDX(1)["433.01"!(DGDX(1)["433.11")!(DGDX(1)["433.21")!(DGDX(1)["433.31")!(DGDX(1)["433.81")!(DGDX(1)["433.91")!(DGDX(1)["434.01")!(DGDX(1)["434.11")!(DGDX(1)["434.91") S ICDRG=559 | |
| DRG558 | ||
| DRG557 | ; called from DRG516 | |
| DRG556 | ; called from DRG516 | |
| DRG555 | ; called from DRG516 | |
| DRG554 | ||
| DRG553 | ; called from DRG478 | |
| DRG552 | ||
| DRG498 | ||
| DRG499 | ||
| DRG463 | ||
| DRG462 | ||
| DRG467 | ||
| DRG466 | ||
| DRG465 | ||
| DRG464 | ||
| DRG522 | ||
| DRG523 | ||
| DRG520 | ||
| DRG521 | ||
| DRG526 | ||
| DRG527 | ||
| DRG418 | ||
| DRG419 | ||
| DRG416 | ||
| DRG417 | ||
| DRG414 | ||
| DRG412 | ;S ICDRG=$S(ICDOR["O"!(ICDORNI["O"):408,ICDOR["N"&($D(ICDPDRG(412))):412,$D(ICDPDRG(411)):411,ICDCC:413,1:414) | |
| DRG413 | ||
| DRG411 | ||
| DRG539 | ||
| DRG538 | ||
| DRG531 | ||
| DRG533 | ||
| DRG532 | ||
| DRG535 | ||
| DRG534 | ||
| DRG537 | ||
| DRG536 | ||
| DRG408 | ||
| DRG405 | ||
| DRG404 | ||
| DRG407 | ||
| DRG406 | ; | |
| DRG403 | ||
| DRG551 | ; called from DRG115^ICDTLB2C | |
| DRG550 | ||
| DRG439 | ||
| DRG430 | ||
| DRG431 | ||
| DRG432 | ||
| DRG434 | ||
| DRG435 | ||
| DRG436 | ||
| DRG437 | ||
| DRG427 | ||
| DRG426 | ||
| DRG425 | ||
| DRG424 | ||
| DRG423 | ||
| DRG422 | ||
| DRG421 | ||
| DRG420 | ||
| DRG429 | ||
| DRG428 | ||
| DRG500 | ||
| DRG501 | ||
| DRG502 | ||
| DRG503 | ||
| DRG566 | ||
| DRG567 | ||
| DRG564 | ||
| DRG565 | ||
| DRG562 | ||
| DRG563 | ||
| DRG560 | ||
| DRG561 | ||
| DRG568 | ||
| DRG569 | ||
| DRG452 | ||
| DRG453 | ||
| DRG450 | ||
| DRG451 | ||
| DRG454 | ||
| DRG455 | ||
| DRG517 | ||
| DRG516 | ; DRG 516,517,526 and 527 replaced by DRG 555-558 respectively ; ICD*18*30 DRG551 is higher in surgical hierarchy | |
| DRG515 | ||
| DRG514 | ; Replaced with DRG535 | |
| MCV | ; checks to see if case qualifies as an MCV (major cardiovascular complications or complex conditions) | |
| DRG519 | ||
| DRG518 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ICD9("AB" | DRG408+1, DRG408+2, DRG408+5, DRG408+6, DRG408+7 | 
| Name | Line Occurrences | 
|---|---|
| DRG404 | DRG405 | 
| DRG406 | DRG407 | 
| DRG408 | DRG406+3, DRG412+1 | 
| DRG412 | DRG408+9 | 
| DRG478 | DRG479 | 
| DRG496 | DRG497, DRG498 | 
| DRG501 | DRG502, DRG503 | 
| DRG516 | DRG517, DRG518, DRG526, DRG527, DRG558 | 
| DRG519 | DRG520 | 
| DRG521 | DRG522, DRG523 | 
| DRG531 | DRG532 | 
| DRG533 | DRG534 | 
| DRG535 | DRG515, DRG536 | 
| DRG537 | DRG538 | 
| DRG539 | DRG540 | 
| DRG547 | DRG548 | 
| DRG549 | DRG550 | 
| DRG553 | DRG554 | 
| DRG555 | DRG516+4 | 
| DRG556 | DRG516+5 | 
| DRG557 | DRG516+6 | 
| MCV | DRG547+1, DRG549+1, DRG551+1, DRG553+1, DRG555+1, DRG556+1, DRG557+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> AGE | DRG403, DRG404, DRG416, DRG417, DRG419, DRG420, DRG421, DRG422, DRG444, DRG445 , DRG446, DRG447, DRG448, DRG449, DRG450, DRG451 | 
| >> ICDCC | DRG403, DRG404, DRG406+2, DRG408+8, DRG413, DRG414, DRG419, DRG420, DRG434, DRG435 , DRG436, DRG437, DRG442, DRG443, DRG444, DRG445, DRG446, DRG449, DRG450, DRG451 , DRG452, DRG453, DRG454, DRG455, DRG463, DRG464, DRG478, DRG493+1, DRG494+1, DRG496 , DRG499, DRG500, DRG501+2, DRG501+3, DRG519, DRG521, DRG531, DRG533, DRG537, DRG539+1 | 
| >> ICDCC3 | DRG443 | 
| >> ICDDX(1 | DRG408, DRG408+1, DRG408+2, DRG408+4, DRG408+5, DRG408+6, DRG408+7, DRG423, DRG559+1, MCV+7 , MCV+10 | 
| >> ICDDXT("411.1" | MCV+11 | 
| >> ICDDXT("411.81" | MCV+11 | 
| >> ICDDXT("426.0" | MCV+8 | 
| >> ICDDXT("426.53" | MCV+8 | 
| >> ICDDXT("426.54" | MCV+8 | 
| >> ICDDXT("737.40" | DRG496+2 | 
| >> ICDDXT("737.41" | DRG496+2 | 
| >> ICDDXT("737.42" | DRG496+2 | 
| >> ICDDXT("737.43" | DRG496+2 | 
| ICDE1 | DRG514+1~, DRG514+2*, DRG514+5, DRG514+6, DRG535~, DRG535+1*, DRG535+7, DRG535+8 | 
| ICDE2 | DRG514+1~, DRG514+3*, DRG514+5, DRG514+6, DRG535~, DRG535+2*, DRG535+7, DRG535+8 | 
| ICDE3 | DRG535~, DRG535+3*, DRG535+7, DRG535+8 | 
| ICDE4 | DRG535~, DRG535+5*, DRG535+7, DRG535+8 | 
| >> ICDMAJ | DRG539 | 
| >> ICDMCV | DRG547+2, DRG549+2, DRG551+2, DRG553+2, DRG555+2, DRG556+2, DRG557+2, MCV+1*, MCV+4*, MCV+5* | 
| >> ICDMCV1 | DRG547+2, DRG549+2, DRG553+2, DRG555+2, DRG556+2, DRG557+2, MCV+1*, MCV+7*, MCV+8* | 
| >> ICDMCV2 | DRG551+2, MCV+1*, MCV+10*, MCV+11* | 
| >> ICDODRG(440 | DRG439 | 
| >> ICDOP(" 00.10 | " , DRG543 | 
| >> ICDOP(" 00.51 | " , DRG535+7, DRG535+8 | 
| >> ICDOP(" 00.52 | " , DRG535+3 | 
| >> ICDOP(" 00.54 | " , DRG535+1, DRG535+2, DRG535+3, DRG535+5 | 
| >> ICDOP(" 00.61 | " , DRG533 | 
| >> ICDOP(" 00.63 | " , DRG533 | 
| >> ICDOP(" 02.93 | " , DRG543 | 
| >> ICDOP(" 36.06 | " , DRG516+5 | 
| >> ICDOP(" 36.07 | " , DRG516+6 | 
| >> ICDOP(" 37.26 | " , DRG535+10 | 
| >> ICDOP(" 37.74 | " , DRG535+5 | 
| >> ICDOP(" 37.94 | " , DRG514+5, DRG514+6, DRG535+7, DRG535+8 | 
| >> ICDOP(" 37.95 | " , DRG514+2, DRG535+1 | 
| >> ICDOP(" 37.96 | " , DRG514+2, DRG535+1, DRG535+5 | 
| >> ICDOP(" 37.97 | " , DRG514+3, DRG535+2 | 
| >> ICDOP(" 37.98 | " , DRG514+3, DRG535+2, DRG535+5 | 
| >> ICDOP(" 86.95 | " , DRG543 | 
| >> ICDOP(" 92.27 | " , DRG516+5 | 
| >> ICDOP(" 96.72 | " , DRG416 | 
| >> ICDOPCT | DRG408, DRG408+4, DRG408+8, DRG408+9, DRG412+1 | 
| >> ICDOR | DRG403, DRG404, DRG411, DRG416, DRG417, DRG418, DRG419, DRG420, DRG421, DRG422 , DRG423, DRG424, DRG425, DRG426, DRG427, DRG428, DRG429, DRG430, DRG431, DRG432 , DRG434, DRG435, DRG436, DRG437, DRG462, DRG463, DRG464, DRG465, DRG466, DRG467 , DRG471, DRG475, DRG478, DRG496, DRG514+8, DRG519, DRG521, DRG535+10, DRG543 | 
| >> ICDORNI | DRG403, DRG404, DRG406+1, DRG406+3, DRG411 | 
| >> ICDPD | DRG403, DRG404, DRG406+2, DRG408+8, DRG434, DRG435, DRG436, DRG437, DRG496+1, DRG501+1 , DRG535+10, DRG539, DRG539+1, DRG543, MCV+4 | 
| >> ICDPDRG | DRG475 | 
| >> ICDPDRG(0 | DRG475 | 
| >> ICDRG | DRG403*, DRG404*, DRG406+2*, DRG408, DRG408+1*, DRG408+2*, DRG408+4, DRG408+5*, DRG408+6*, DRG408+7* , DRG408+8*, DRG411*, DRG413*, DRG414*, DRG416*, DRG417*, DRG418*, DRG419*, DRG420*, DRG421* , DRG422*, DRG423*, DRG424*, DRG425*, DRG426*, DRG427*, DRG428*, DRG429*, DRG430*, DRG431* , DRG432*, DRG434*, DRG435*, DRG436*, DRG437*, DRG439*, DRG442*, DRG443*, DRG444*, DRG445* , DRG446*, DRG447*, DRG448*, DRG449*, DRG450*, DRG451*, DRG452*, DRG453*, DRG454*, DRG455* , DRG462*, DRG463*, DRG464*, DRG465*, DRG466*, DRG467*, DRG471*, DRG475*, DRG478*, DRG478+1 , DRG493+1*, DRG494+1*, DRG496*, DRG496+1*, DRG496+2*, DRG499*, DRG500*, DRG501+2*, DRG501+3*, DRG501+4* , DRG514+4*, DRG514+5*, DRG514+6*, DRG514+8*, DRG516+2, DRG516+3*, DRG519*, DRG521*, DRG531*, DRG533* , DRG535+6*, DRG535+7*, DRG535+8*, DRG535+10*, DRG535+11, DRG537*, DRG539, DRG539+1*, DRG543*, DRG547+2* , DRG549+2*, DRG551+2*, DRG553+2*, DRG555+2*, DRG556+2*, DRG557+2*, DRG557+3*, DRG559+1* | 
| >> ICDRTC | DRG403*, DRG404*, DRG416*, DRG417*, DRG419*, DRG420*, DRG421*, DRG422*, DRG444*, DRG445* , DRG446*, DRG447*, DRG448*, DRG449*, DRG450*, DRG451* | 
| >> ICDSD | DRG408+5, DRG408+6, DRG408+7, DRG434, DRG435, DRG436, DRG437, DRG465, DRG466, MCV+4 , MCV+5 |