ICDTBL0C ;ALB/MJB - GROUPER UTILITY FUNCTIONS;08/09/2010
Source file <ICDTBL0C.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
|
|
| DRG15 | ;
|
|
| DRG14 | ;LINE TAG FOR 014,015
|
|
| 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^ICDTBL9C | 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 | DRG66+1 |
| >> ICDDXT("784.3" | DRG66+1 |
| >> ICDMAJ | DRG4, DRG27+1 |
| >> ICDMCC | DRG2+1, DRG4+1, DRG6, DRG13+2, DRG22+1, DRG24+4, DRG24+5, DRG24+6, DRG24+7, DRG27+3 , DRG30+2, DRG33+1, DRG36+1, DRG39+1, DRG39+2, DRG39+3, DRG42+1, 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 |
| >> 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 | " , DRG15+2 |
| >> ICDOP(" 41.01 | " , DRG15+3 |
| >> ICDOP(" 41.04 | " , DRG15+4 |
| >> ICDOP(" 41.07 | " , DRG15+5 |
| >> ICDOP(" 41.09 | " , DRG15+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 | " , 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* , DRG15+1*, DRG15+2*, DRG15+3*, DRG15+4*, DRG15+5*, DRG15+6*, DRG22+1*, DRG24+3*, DRG24+4*, DRG24+5* , DRG24+6*, DRG24+7*, 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*, 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 |