Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ICDTLB6B

Package: DRG Grouper

Routine: ICDTLB6B


Information

ICDTLB6B ;ALB/EG/MRY - GROUPER UTILITY FUNCTIONS FY 2006; 9/29/03 2:47pm ; 6/28/05 4:06pm

Source Information

Source file <ICDTLB6B.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
DRG Grouper 6 DODRG^ICDDRG0  EN1^ICDDRG5  DRG115^ICDTLB2B  DRG401^ICDTLB5B  DRG412^ICDTLB61  DRG553^ICDTLB6B  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
DRG Grouper 4 ICDDRG0  ICDTLB1B  ICDTLB2B  ICDTLB6B  

Entry Points

Name Comments DBIA/ICR reference
DRG443
DRG442
DRG445
DRG444
DRG447
DRG446
DRG449
DRG448
DRG540
DRG543
DRG544
DRG545
DRG546
DRG547 ; called from DRG106^ICDTLB2B
DRG548
DRG549 ; called from DRG106^ICDTLB2B
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^ICDTLB2B
DRG550
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 ; DRG 516,517,526 and 527 replaced by DRG 555-558 respectively
DRG515
DRG514 ; Replaced with DRG535
MCV ; checks to see if case qualifies as an MCV (major cardiovascular complications or complex conditions)
DRG519
DRG518

External References

Name Field # of Occurrence
DODRG^ICDDRG0 DRG475
EN1^ICDDRG5 DRG443
DRG115^ICDTLB2B DRG535+10
DRG401^ICDTLB5B DRG539
DRG412^ICDTLB61 DRG412+2
DRG553^ICDTLB6B DRG478+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICD9("AB" DRG408+1, DRG408+2, DRG408+5, DRG408+6, DRG408+7

Label References

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+2
DRG556 DRG516+3
DRG557 DRG516+4
MCV DRG547+1, DRG549+1, DRG551+1, DRG553+1, DRG555+1, DRG556+1, DRG557+1

Local Variables

Legend:

>> 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, 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+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
>> 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+6, DRG535+7
>> ICDOP(" 00.52 " , DRG535+3
>> ICDOP(" 00.54 " , DRG535+1, DRG535+2, DRG535+3
>> ICDOP(" 36.06 " , DRG516+3
>> ICDOP(" 36.07 " , DRG516+4
>> ICDOP(" 37.26 " , DRG535+9
>> 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+3
>> 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+9, 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+9, 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+1*, DRG519*, DRG521*, DRG531*, DRG533*, DRG535+5*
, DRG535+6*, DRG535+7*, DRG535+9*, DRG535+10, 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All