AICDZMDC ;IHS/OIT/FBD - CLEAN UP MDC PTRS IN ICD FILES
Source file <AICDZMDC.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ICDPX | ;CLEAN UP FILE 80.1 (ICD OPERATION/PROCEDURE) | |
| INIT | ;PRIMARY MODULE INITIALIZATION | |
| MAIN | ;PRIMARY MODULE EXECUTION | |
| CLEANUP | ;PRIMARY MODULE CLEANUP | |
| ICDDX | ;CLEAN UP FILE 80 (ICD DIAGNOSIS) | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AICDZMDC | INIT+2! | 
| ^AICDZMDC("ICD0" | MAIN+4, ICDPX+8*, ICDPX+10* | 
| ^AICDZMDC("ICD9" | MAIN+3, ICDDX+6*, ICDDX+8* | 
| ^ICD0 - [#80.1] | ICDPX+2, ICDPX+4, ICDPX+5, ICDPX+9* | 
| ^ICD9 - [#80] | ICDDX+2, ICDDX+3, ICDDX+7* | 
| Name | Line Occurrences | 
|---|---|
| CLEANUP | AICDZMDC+9 | 
| ICDDX | MAIN+1 | 
| ICDPX | MAIN+2 | 
| INIT | AICDZMDC+7 | 
| MAIN | AICDZMDC+8 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> AICDCNT | ICDDX+1*, ICDDX+6*, ICDDX+8, ICDPX+1*, ICDPX+8*, ICDPX+10 | 
| >> AICDIEN | ICDDX+1*, ICDDX+2*, ICDDX+3, ICDDX+6, ICDDX+7, ICDPX+1*, ICDPX+2*, ICDPX+4, ICDPX+5, ICDPX+8 , ICDPX+9 | 
| >> AICDMDC | ICDDX+3*, ICDDX+4, ICDDX+5, ICDDX+6, ICDDX+7, ICDPX+5*, ICDPX+6, ICDPX+7, ICDPX+8, ICDPX+9 | 
| >> AICDMLT | ICDPX+3*, ICDPX+4*, ICDPX+5, ICDPX+8, ICDPX+9 | 
| U | INIT+1*, ICDDX+3, ICDDX+7, ICDPX+5, ICDPX+9 | 
| >> ZTSK | MAIN+3, MAIN+4 |