ICDTBL0A ;ALB/EG/MRY - GROUPER UTILITY FUNCTIONS;11/5/07 11:07am
Source file <ICDTBL0A.m>
| 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 | ;
|
|
| 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 taf 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 |
|---|---|
| >> ICDMAJ | DRG27+1 |
| >> ICDMCC | DRG2+1, DRG4+1, DRG6, DRG13+1, DRG22+1, DRG24+3, DRG24+4, DRG27+3, DRG30+1, 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+3, DRG66+4, DRG68+1, DRG72+1, DRG74+1, DRG76+1, DRG79+1, DRG81+1, DRG84+2 , DRG87+1, DRG90+1, DRG93+1, DRG96+1, DRG99+1 |
| >> ICDOP(" 00.10 | " , DRG24+2 |
| >> 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(" 02.93 | " , DRG24+4 |
| >> ICDOP(" 03.93 | " , DRG30+2, DRG30+3, DRG30+4, DRG30+5 |
| >> ICDOP(" 04.92 | " , DRG42+2, DRG42+3, DRG42+4, DRG42+5 |
| >> ICDOP(" 46.97 | " , DRG6+1 |
| >> ICDOP(" 86.94 | " , DRG30+2, DRG42+2 |
| >> ICDOP(" 86.95 | " , DRG24+4, DRG30+3, DRG42+3 |
| >> ICDOP(" 86.97 | " , DRG30+4, DRG42+4 |
| >> ICDOP(" 86.98 | " , DRG30+5, DRG42+5 |
| >> ICDOR | DRG4, DRG22+1, DRG24+3, DRG33+1, DRG66+1, DRG66+2, DRG66+3, DRG66+4 |
| >> ICDPD | DRG22+1, DRG24+1, DRG24+3 |
| >> ICDPDRG(69 | DRG63+1 |
| >> ICDRG | DRG2+1*, DRG4*, DRG4+1*, DRG6*, DRG6+1*, DRG7*, DRG8*, DRG9*, DRG10*, DRG13+1* , DRG22+1*, DRG24+2*, DRG24+3*, DRG24+4*, DRG27+2, DRG27+3*, DRG27+4*, DRG30+1*, DRG30+2*, DRG30+3* , DRG30+4*, DRG30+5*, 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+3* , DRG66+4*, DRG68+1*, DRG69*, DRG72+1*, DRG74+1*, DRG76+1*, DRG79+1*, DRG81+1*, DRG84+2*, DRG87+1* , DRG90+1*, DRG93+1*, DRG96+1*, DRG99+1* |
| >> ICDSD | DRG24+1, DRG84+1 |
