AICDPRTD ; IHS/OHPRD/ACC - PROGRAM TO PRINT ICD DIAGNOSIS FILE IN CODE ORDER ;
Source file <AICDPRTD.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PCODE | ; | |
| EN | ; ENTRY POINT - FROM TASKMAN FOR QUEUED PRINTING | |
| QUE | ||
| NOQUE | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ICD9 - [#80] | PCODE+1 | 
| ^ICD9("BA" | EN+4 | 
| Name | Line Occurrences | 
|---|---|
| EN | NOQUE | 
| PCODE | EN+4 | 
| QUE | AICDPRTD+6 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | EN+4 | 
| ^(0 | PCODE+1 | 
| ^(1 | PCODE+1 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %ZIS | AICDPRTD+5!* | 
| >> AICDCODE | EN+4*, PCODE+1 | 
| AICDDFN | EN+4*, EN+7!, PCODE+1 | 
| >> AICDI | EN+4* | 
| DT | QUE+1 | 
| IO | AICDPRTD+5!*, EN+1 | 
| IO("Q" | AICDPRTD+6 | 
| IO(0 | AICDPRTD+5 | 
| IOF | EN+2, EN+5, PCODE+3 | 
| IOM | PCODE+2 | 
| ION | QUE+1 | 
| IOP | AICDPRTD+5! | 
| IOSL | PCODE+3 | 
| IOST | EN+2, EN+5, PCODE+3 | 
| >> POP | AICDPRTD+5 | 
| U | PCODE+1 | 
| >> X | PCODE+1*, PCODE+2* | 
| ZTDESC | QUE+1*, QUE+4! | 
| ZTDTH | QUE+1*, QUE+4! | 
| ZTIO | QUE+1*, QUE+4! | 
| ZTRTN | QUE+1*, QUE+4! | 
| ZTSAVE | QUE!, QUE+4! | 
| ZTSK | AICDPRTD+4!, QUE+4! |