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