ICDTBL0G ;ALB/JDG - GROUPER UTILITY FUNCTIONS;08/09/2010
Source file <ICDTBL0G.m>
Package | Total | Call Graph |
---|---|---|
DRG Grouper | 2 | DRG206^ICDTBL2G DRG914^ICDTBL9F |
Name | Comments | DBIA/ICR reference |
---|---|---|
DRG1 | ;line tag for 001,002
|
|
DRG2 | ;
|
|
DRG3 | ;S ICDRG=3 Q
|
|
DRG4 | ||
DRG5 | ;line tag for 005,006
|
|
DRG6 | ||
DRG7 | ||
DRG8 | ||
DRG9 | ||
DRG10 | ||
DRG11 | ;line tag for 011,012,013
|
|
DRG12 | ;
|
|
DRG13 | ;
|
|
DRG14 | ;LINE TAG FOR 014,015,16,17
|
|
DRG15 | ;
|
|
DRG16 | ;line tag for 016, 017
|
|
DRG17 | ;
|
|
DRG20 | ;line tag for 020,021,022
|
|
DRG21 | ;
|
|
DRG22 | ;
|
|
DRG23 | ;line tag for 023,024
|
|
DRG24 | ;
|
|
DRG25 | ;line tag for 025,026,027
|
|
DRG26 | ;
|
|
DRG27 | ;
|
|
DRG28 | ;line tag for 028,029,030
|
|
DRG29 | ;
|
|
DRG30 | ;S ICDRG=$S((ICDMAJ["B")&ICDMCC=2:28,(ICDMAJ["B")&ICDMCC=1:29,ICDMAJ["B":30,1:ICDRG) D Q
|
|
DRG31 | ;line tag for 031,032,033
|
|
DRG32 | ;
|
|
DRG33 | ;
|
|
DRG34 | ;line tag for 034,035,036
|
|
DRG35 | ;
|
|
DRG36 | ;
|
|
DRG37 | ;line tag for 037,038,039
|
|
DRG38 | ;
|
|
DRG39 | ;
|
|
DRG40 | ;line tag for 040,041,042
|
|
DRG41 | ;
|
|
DRG42 | ;
|
|
DRG52 | ;line tag for 052,053
|
|
DRG53 | ;
|
|
DRG54 | ;line tag for 054,055
|
|
DRG55 | ;
|
|
DRG56 | ;line tag for 056,057
|
|
DRG57 | ;
|
|
DRG58 | ;line tag for 058,059,060
|
|
DRG59 | ;
|
|
DRG60 | ;
|
|
DRG61 | ;line tag for 061,062,063
|
|
DRG62 | ;
|
|
DRG63 | ;
|
|
DRG64 | ;line tag for 064,065,066
|
|
DRG65 | ;
|
|
DRG66 | ;
|
|
DRG67 | ;line tag for 067,068
|
|
DRG68 | ;
|
|
DRG69 | ||
DRG70 | ;line tag for 070,071,072
|
|
DRG71 | ;
|
|
DRG72 | ;
|
|
DRG73 | ;line tag for 073,074
|
|
DRG74 | ;
|
|
DRG75 | ;line tag for 075,076
|
|
DRG76 | ;
|
|
DRG77 | ;line tag for 077,078,079
|
|
DRG78 | ;
|
|
DRG79 | ;
|
|
DRG80 | ;line tag for 080,081
|
|
DRG81 | ;
|
|
DRG82 | ;line tag for 082,083,084
|
|
DRG83 | ;
|
|
DRG84 | ;
|
|
DRG85 | ;line tag for 085,086,087
|
|
DRG86 | ;
|
|
DRG87 | ;
|
|
DRG88 | ;line tag for 088,089,090
|
|
DRG89 | ;
|
|
DRG90 | ;
|
|
DRG91 | ;line tag for 091,092,093
|
|
DRG92 | ;
|
|
DRG93 | ;
|
|
DRG94 | ;line tag for 094,095,096
|
|
DRG95 | ;
|
|
DRG96 | ;
|
|
DRG97 | ;line tag for 097,098,099
|
|
DRG98 | ;
|
|
DRG99 | ;
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> ICDDX(1 | DRG27+3, DRG42+6, DRG63+2, DRG66+1, DRG66+3 |
>> ICDDXT("344.1" | DRG42+6 |
>> ICDDXT("427.5" | DRG66+1 |
>> ICDDXT("780.03" | DRG66+1 |
>> ICDDXT("784.3" | DRG63+2, DRG66+3 |
>> ICDDXT("799.1" | DRG27+3 |
>> ICDDXT("V45.88" | DRG66+2 |
>> ICDEXP | DRG27+3, DRG66+1 |
>> ICDMAJ | DRG4, DRG27+1 |
>> ICDMCC | DRG2+1, DRG4+1, DRG6, DRG13+4, DRG17+2, DRG17+3, DRG17+4, DRG17+5, DRG17+6, DRG22+1 , DRG24+5, DRG24+6, DRG24+7, DRG24+8, DRG24+9, DRG27+3*, DRG27+4, DRG30+2, DRG33+1, DRG36+1 , DRG39+1, DRG39+2, DRG39+3, DRG42+1, DRG42+6, DRG53+1, DRG55+1, DRG57+1, DRG60+1, DRG63+2 , DRG63+3, DRG66+1*, DRG66+3, DRG66+4, DRG66+6, DRG66+7, DRG68+1, DRG72+1, DRG74+1, DRG76+1 , DRG79+1, DRG81+1, DRG84+2, DRG87+2, DRG90+1, DRG93+1, DRG96+1, DRG99+1 |
>> ICDOP(" 00.10 | " , DRG24+4 |
>> ICDOP(" 00.61 | " , DRG39+2, DRG39+3, DRG39+4 |
>> ICDOP(" 00.62 | " , DRG27+5 |
>> ICDOP(" 00.63 | " , DRG39+2, DRG39+3, DRG39+4 |
>> ICDOP(" 00.65 | " , DRG27+5 |
>> ICDOP(" 01.20 | " , DRG24+6 |
>> ICDOP(" 02.93 | " , DRG24+6, DRG24+7, DRG24+8 |
>> ICDOP(" 03.93 | " , DRG30+3, DRG30+4, DRG30+5, DRG30+6 |
>> ICDOP(" 04.92 | " , DRG42+2, DRG42+3, DRG42+4, DRG42+5 |
>> ICDOP(" 30.3" | , DRG13+3 |
>> ICDOP(" 30.4" | , DRG13+3 |
>> ICDOP(" 31.1" | , DRG13+3 |
>> ICDOP(" 31.21 | " , DRG13+3 |
>> ICDOP(" 31.29 | " , DRG13+3 |
>> ICDOP(" 37.72 | " , DRG87+1 |
>> ICDOP(" 37.83 | " , DRG87+1 |
>> ICDOP(" 41.00 | " , DRG17+2 |
>> ICDOP(" 41.01 | " , DRG17+3 |
>> ICDOP(" 41.04 | " , DRG17+4 |
>> ICDOP(" 41.07 | " , DRG17+5 |
>> ICDOP(" 41.09 | " , DRG17+6 |
>> ICDOP(" 46.97 | " , DRG6+1 |
>> ICDOP(" 86.94 | " , DRG30+3, DRG42+2 |
>> ICDOP(" 86.95 | " , DRG24+7, DRG30+4, DRG42+3 |
>> ICDOP(" 86.97 | " , DRG30+5, DRG42+4 |
>> ICDOP(" 86.98 | " , DRG24+8, DRG30+6, DRG42+5 |
>> ICDOR | DRG22+1, DRG24+2, DRG24+5, DRG33+1, DRG66+4, DRG66+5 |
>> ICDPD | DRG13+1, DRG22+1, DRG24+1, DRG24+2, DRG24+5, DRG84+1 |
>> ICDPDRG | DRG66+2 |
>> ICDPDRG(13 | DRG13+2 |
>> ICDPDRG(206 | DRG13+2 |
>> ICDPDRG(69 | DRG63+1 |
>> ICDRG | DRG2+1*, DRG4*, DRG4+1*, DRG6*, DRG6+1*, DRG7*, DRG8*, DRG9*, DRG10*, DRG13+4* , DRG17+1*, DRG17+2*, DRG17+3*, DRG17+4*, DRG17+5*, DRG17+6*, DRG22+1*, DRG24+4*, DRG24+5*, DRG24+6* , DRG24+7*, DRG24+8*, DRG24+9*, DRG27+2, DRG27+4*, DRG27+5*, DRG30+2*, DRG30+3*, DRG30+4*, DRG30+5* , DRG30+6*, DRG33+1*, DRG36+1*, DRG39+1*, DRG39+2*, DRG39+3*, DRG39+4*, DRG42+1*, DRG42+2*, DRG42+3* , DRG42+4*, DRG42+5*, DRG42+6*, DRG53+1*, DRG55+1*, DRG57+1*, DRG60+1*, DRG63+2*, DRG63+3*, DRG66+2* , DRG66+3*, DRG66+4*, DRG66+6*, DRG66+7*, DRG68+1*, DRG69*, DRG72+1*, DRG74+1*, DRG76+1*, DRG79+1* , DRG81+1*, DRG84+2*, DRG87+2*, DRG90+1*, DRG93+1*, DRG96+1*, DRG99+1* |
>> ICDSD | DRG24+1, DRG84+1 |