©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
RA94PST ;Hines OI/GJC - Post-init Driver, patch 94 ;07/24/08 12:13
Source file <RA94PST.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ; pass the negative results concerning the tasked process
|
||
| CREIXN | ;rebuilds the ""AD"" xref on the PRIMARY DIAGNOSTIC CODE (70.03 - 0;13) field
|
|
| NEW1AD | ;Check to see if the traditional "AD" cross-reference was deleted.
|
|
| BLDMSG | ;failure: we did not create the cross-reference
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | NEW1AD+98 |
| CREIXN^DDMOD | CREIXN+21 |
| DELIX^DDMOD | NEW1AD+40 |
| DELIXN^DDMOD | NEW1AD+72 |
| $$FIND1^DIC | NEW1AD+65 |
| $$GET1^DIQ | BLDMSG+2 |
| $$FMADD^XLFDT | NEW1AD+96 |
| $$NOW^XLFDT | NEW1AD+96 |
| ^XMD | MAIL+9 |
| $$GOTLOCAL^XMXAPIG | MAIL+5 |
| MES^XPDUTL | NEW1AD+45, NEW1AD+52, NEW1AD+71, NEW1AD+82, NEW1AD+101 |
| $$KSP^XUPARAM | BLDMSG+2 |
| FileNo | Call Tags |
|---|---|
| ^DD("IX" - [#.11] | FIND1^DIC |
| ^DIC(4 - [#4] | GET1^DIQ |
| 70.03 | DELIXN^DDMOD, DELIX^DDMOD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(70.03 | NEW1AD+36 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | MAIL+2~ |
| D0 | MAIL+2~ |
| D1 | MAIL+2~ |
| D2 | MAIL+2~ |
| DG | MAIL+2~ |
| DIC | MAIL+2~ |
| DICR | MAIL+2~ |
| DIERR | NEW1AD+18~, CREIXN+2! |
| DIW | MAIL+2~ |
| DUZ | MAIL+6 |
| RAERR | NEW1AD+18~, CREIXN+2! |
| RAERR("DIERR" | NEW1AD+41, NEW1AD+78, NEW1AD+81, BLDMSG+1, BLDMSG+5 |
| RAIRM | BLDMSG+6~*, BLDMSG+7, BLDMSG+8 |
| RANODE | NEW1AD+18~, NEW1AD+36*, NEW1AD+37 |
| RARSLT | CREIXN+2~, CREIXN+21, BLDMSG+1 |
| RATXT | NEW1AD+18~, NEW1AD+45, NEW1AD+49!, NEW1AD+52, NEW1AD+67!, NEW1AD+71, NEW1AD+77!, NEW1AD+78*, NEW1AD+82, NEW1AD+98! , NEW1AD+101, CREIXN+2! |
| RATXT( | NEW1AD+45*, NEW1AD+70* |
| RATXT(0 | BLDMSG+13 |
| RATXT(1 | NEW1AD+42*, NEW1AD+44*, NEW1AD+50*, NEW1AD+68*, NEW1AD+79*, NEW1AD+98*, BLDMSG+2* |
| RATXT(2 | NEW1AD+43*, NEW1AD+51*, NEW1AD+69*, NEW1AD+80*, NEW1AD+99*, NEW1AD+100*, BLDMSG+2* |
| RATXT(3 | NEW1AD+70*, NEW1AD+81*, BLDMSG+3* |
| RATXT(4 | BLDMSG+4* |
| RATXT(5 | BLDMSG+5*, BLDMSG+7 |
| RATXT(6 | BLDMSG+7*, BLDMSG+8* |
| RATXT(7 | BLDMSG+8* |
| RAVALUE | NEW1AD+18~, NEW1AD+65 |
| RAVALUE(1 | NEW1AD+62* |
| RAVALUE(2 | NEW1AD+62* |
| RAXIT | NEW1AD+18~, NEW1AD+36*, NEW1AD+41*, NEW1AD+49 |
| RAXREF | CREIXN+2~, CREIXN+21 |
| RAXREF("ACTIVITY" | CREIXN+5* |
| RAXREF("DESCR" | CREIXN+7*, CREIXN+8*, CREIXN+9*, CREIXN+10*, CREIXN+11*, CREIXN+12*, CREIXN+13* |
| RAXREF("EXECUTION" | CREIXN+4* |
| RAXREF("FILE" | CREIXN+3* |
| RAXREF("KILL | CONDITION" , CREIXN+14* |
| RAXREF("KILL" | CREIXN+15* |
| RAXREF("NAME" | CREIXN+3* |
| RAXREF("ROOT | FILE" , CREIXN+4* |
| RAXREF("SET C | ONDITION" , CREIXN+16* |
| RAXREF("SET" | CREIXN+17* |
| RAXREF("SHORT | DESCR" , CREIXN+6* |
| RAXREF("TYPE" | CREIXN+3* |
| RAXREF("USE" | CREIXN+4* |
| RAXREF("VAL" | CREIXN+13* |
| RAY | NEW1AD+18~, NEW1AD+36*, NEW1AD+37*, NEW1AD+39, NEW1AD+40, NEW1AD+65*, NEW1AD+67, NEW1AD+77 |
| XMDUN | MAIL+2~ |
| XMDUZ | MAIL+2~, MAIL+3* |
| XMSUB | MAIL+2~, MAIL+4* |
| XMTEXT | MAIL+2~, MAIL+3* |
| XMY | MAIL+2~ |
| XMY( | MAIL+6* |
| XMY("G.RAD HL | 7 MESSAGES" , MAIL+7* |
| XMY("VAOITVHITRadDevIssues@va.gov" | MAIL+8* |
| ZTDESC | NEW1AD+95~, NEW1AD+97* |
| ZTDTH | NEW1AD+95~, NEW1AD+96* |
| ZTIO | NEW1AD+95~* |
| >> ZTREQ | BLDMSG+11* |
| ZTRTN | NEW1AD+95~* |
| ZTSK | NEW1AD+95~, NEW1AD+99, NEW1AD+100 |