ICDTLB6A ;ALB/EG/MRY/KUM - GROUPER UTILITY FUNCTIONS FY 2005;9/29/03 2:47pm
Source file <ICDTLB6A.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
DRG Grouper | 3 | ICDTLB1A ICDTLB2A ICDTLB3A |
Name | Comments | DBIA/ICR reference |
---|---|---|
DRG403 | ||
DRG404 | ||
DRG405 | ||
DRG406 | ;
|
|
DRG407 | ||
DRG408 | ||
DRG411 | ||
DRG412 | ;S ICDRG=$S(ICDOR["O"!(ICDORNI["O"):408,ICDOR["N"&($D(ICDPDRG(412))):412,$D(ICDPDRG(411)):411,ICDCC:413,1:414)
|
|
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 | ;I (ICDI-1)=1,'ICDCC S ICDCC=$S($D(^ICD9("ACC",ICDDX(1),ICDDX(1))):1,1:0)
|
|
DRG494 | ;I (ICD-1),'ICDCC S ICDCC=$S($D(^ICD9("ACC",ICDDX(1),ICDDX(1))):1,1:0)
|
|
DRG495 | ||
DRG496 | ||
DRG497 | ||
DRG498 | ||
DRG499 | ||
DRG500 | ||
DRG501 | ||
DRG502 | ||
DRG503 | ||
DRG514 | ; Replaced with DRG535
|
|
DRG515 | ||
DRG516 | ||
DRG517 | ||
DRG518 | ||
DRG519 | ||
DRG520 | ||
DRG521 | ||
DRG522 | ||
DRG523 | ||
DRG526 | ||
DRG527 | ||
DRG531 | ||
DRG532 | ||
DRG533 | ||
DRG534 | ||
DRG535 | ||
DRG536 | ||
DRG537 | ||
DRG538 | ||
DRG539 | ||
DRG540 | ||
DRG543 |
>> | 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.10 | " , DRG543 |
>> 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, DRG543 |
>> 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, DRG543 |
>> 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* , DRG543* |
>> 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 |