ICDTLB6 ;ALB/EG/MRY - GROUPER UTILITY FUNCTIONS ; 9/29/03 2:47pm
Source file <ICDTLB6.m>
| Package | Total | Caller Graph | 
|---|---|---|
| DRG Grouper | 3 | ICDTLB2 ICDTLB3 ICDTLB61 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DRG443 | ||
| DRG442 | ||
| DRG445 | ||
| DRG444 | ||
| DRG447 | ||
| DRG446 | ||
| DRG449 | ||
| DRG448 | ||
| DRG540 | ||
| 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) | |
| 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 | ||
| DRG439 | ||
| DRG430 | ||
| DRG431 | ||
| DRG432 | ||
| DRG434 | ||
| DRG435 | ||
| DRG436 | ||
| DRG437 | ||
| DRG427 | ||
| DRG426 | ||
| DRG425 | ||
| DRG424 | ||
| DRG423 | ||
| DRG422 | ||
| DRG421 | ||
| DRG420 | ||
| DRG429 | ||
| DRG428 | ||
| DRG500 | ||
| DRG501 | ||
| DRG502 | ||
| DRG503 | ||
| DRG452 | ||
| DRG453 | ||
| DRG450 | ||
| DRG451 | ||
| DRG454 | ||
| DRG455 | ||
| DRG517 | ||
| DRG516 | ||
| DRG515 | ||
| DRG514 | ; Replaced with DRG535 | |
| DRG519 | ||
| DRG518 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ICD9("AB" | DRG408+1, DRG408+2, DRG408+5, DRG408+6 | 
| Name | Line Occurrences | 
|---|---|
| DRG404 | DRG405 | 
| DRG406 | DRG407 | 
| DRG408 | DRG406+3, DRG412+1 | 
| DRG412 | DRG408+8 | 
| DRG501 | DRG502, DRG503 | 
| DRG516 | DRG517, DRG518, DRG526, DRG527 | 
| DRG519 | DRG520 | 
| DRG521 | DRG522, DRG523 | 
| DRG531 | DRG532 | 
| DRG533 | DRG534 | 
| DRG535 | DRG515, DRG536 | 
| DRG537 | DRG538 | 
| DRG539 | DRG540 | 
| >> | 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+7, DRG413, DRG414, DRG419, DRG420, DRG434, DRG435 , DRG436, DRG437, DRG442, DRG443, DRG444, DRG445, DRG446, DRG449, DRG450, DRG451 , DRG452, DRG453, DRG454, DRG455, DRG463, DRG464, DRG478, DRG479, DRG493+1, DRG494+1 , DRG496, DRG497, DRG498, 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 | 
| ICDE1 | DRG514+1~, DRG514+2*, DRG514+5, DRG514+6, DRG535~, DRG535+1*, DRG535+6, DRG535+7 | 
| ICDE2 | DRG514+1~, DRG514+3*, DRG514+5, DRG514+6, DRG535~, DRG535+2*, DRG535+6, DRG535+7 | 
| ICDE3 | DRG535~, DRG535+3*, DRG535+6, DRG535+7 | 
| >> ICDMAJ | DRG539 | 
| >> ICDODRG(440 | DRG439 | 
| >> ICDOP(" 00.51 | " , DRG535+6, DRG535+7 | 
| >> ICDOP(" 00.52 | " , DRG535+3 | 
| >> ICDOP(" 00.54 | " , DRG535+1, DRG535+2, DRG535+3 | 
| >> ICDOP(" 36.06 | " , DRG516+1 | 
| >> ICDOP(" 36.07 | " , DRG516+3, DRG516+4 | 
| >> ICDOP(" 37.94 | " , DRG514+5, DRG514+6, DRG535+6, DRG535+7 | 
| >> ICDOP(" 37.95 | " , DRG514+2, DRG535+1 | 
| >> ICDOP(" 37.96 | " , DRG514+2, DRG535+1 | 
| >> ICDOP(" 37.97 | " , DRG514+3, DRG535+2 | 
| >> ICDOP(" 37.98 | " , DRG514+3, DRG535+2 | 
| >> ICDOP(" 92.27 | " , DRG516+1 | 
| >> ICDOPCT | DRG408, DRG408+4, DRG408+7, DRG408+8, 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, DRG479, DRG496, DRG497, DRG498, DRG514+8, DRG516, DRG516+1 , DRG516+2, DRG516+3, DRG516+4, DRG519, DRG521, DRG535+9 | 
| >> ICDORNI | DRG403, DRG404, DRG406+1, DRG406+3, DRG411 | 
| >> ICDPD | DRG403, DRG404, DRG406+2, DRG408+7, DRG434, DRG435, DRG436, DRG437, DRG501+1, DRG516+2 , DRG516+3, DRG516+4, DRG535+9, DRG539, DRG539+1 | 
| >> ICDPDRG | DRG475 | 
| >> ICDPDRG(0 | DRG475 | 
| >> ICDRG | DRG403*, DRG404*, DRG406+2*, DRG408, DRG408+1*, DRG408+2*, DRG408+4, DRG408+5*, DRG408+6*, DRG408+7* , 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*, DRG479*, DRG493+1* , DRG494+1*, DRG496*, DRG497*, DRG498*, DRG499*, DRG500*, DRG501+2*, DRG501+3*, DRG501+4*, DRG514+4* , DRG514+5*, DRG514+6*, DRG514+8*, DRG516*, DRG516+1*, DRG516+2*, DRG516+3*, DRG516+4*, DRG519*, DRG521* , DRG531*, DRG533*, DRG535+5*, DRG535+6*, DRG535+7*, DRG535+9*, DRG535+10, DRG537*, DRG539, DRG539+1* | 
| >> ICDRTC | DRG403*, DRG404*, DRG416*, DRG417*, DRG419*, DRG420*, DRG421*, DRG422*, DRG444*, DRG445* , DRG446*, DRG447*, DRG448*, DRG449*, DRG450*, DRG451* | 
| >> ICDSD | DRG408+5, DRG408+6, DRG434, DRG435, DRG436, DRG437, DRG465, DRG466 |