RA94PST ;Hines OI/GJC - Post-init Driver, patch 94 ;07/24/08 12:13
Source file <RA94PST.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NEW1AD | ;Check to see if the traditional "AD" cross-reference was deleted.
|
|
| CREIXN | ;rebuilds the ""AD"" xref on the PRIMARY DIAGNOSTIC CODE (70.03 - 0;13) field
|
|
| BLDMSG | ;failure: we did not create the cross-reference
|
|
| ; pass the negative results concerning the tasked process
|
| FileNo | Call Tags |
|---|---|
| ^DD("IX" - [#.11] | FIND1^DIC |
| ^DIC(4 - [#4] | GET1^DIQ |
| 70.03 | DELIXN^DDMOD, DELIX^DDMOD |