©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
XU8P469 ;ISF/RWF - Patch XU*8*469 post-init ;1/30/08 09:08
Source file <XU8P469.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| F200 | ;Only remove if the pointed to files have been removed.
|
|
| QAR | ;Delete all QAR data from the NPF
|
|
| EN1 | ;Change $N in file 200, field 9 to $O
|
|
| EN2 | ;Now queue the removal of QAR fields and data.
|
|
| SLOG | ;Clean up any long last signon nodes.
|
|
| DONE | ||
| F19 | ;File 19 Field 24.
|
|
| POST | ;Post-init to clean-up files
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(19 | F19+2 |
| ^DD(200 | EN1+4, EN1+7*, F200+6, F200+8, F200+12 |
| ^DIC(747.25 | F200+1 |
| ^DIC(747.7 | F200+1 |
| ^VA(200 - [#200] | SLOG+2, SLOG+3*, QAR+3, QAR+5, QAR+6! |
| Name | Line Occurrences |
|---|---|
| DONE | F19+2 |
| EN1 | POST+2 |
| EN2 | POST+2 |
| F19 | POST+2 |
| SLOG | POST+2 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | F200+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | SLOG+1~*, SLOG+2*, SLOG+3, F200+2~, F200+12*, QAR+1~, QAR+2*, QAR+3*, QAR+5, QAR+6 , F19+3~, F19+4* |
| DA(1 | F200+12*, F19+4* |
| >> DIC( | F200+1 |
| DIK | F200+2~, F200+12*, F19+3~, F19+4* |
| DIU | F200+2~, F200+8* |
| DIU(0 | F200+7* |
| FLD | F200+2~, F200+4*, F200+6*, F200+8, F200+11*, F200+12* |
| ITRANS | EN1+2~, EN1+4*, EN1+5, EN1+6*, EN1+7 |
| ND | QAR+1~, QAR+4*, QAR+5*, QAR+6 |
| PIECE | EN1+2~, EN1+3*, EN1+5, EN1+6 |
| U | EN1+4, EN1+7, SLOG+2, SLOG+3, F200+8 |
| ZTDESC | EN2+2~, EN2+3* |
| ZTDTH | EN2+2~, EN2+3* |
| ZTIO | EN2+2~, EN2+3* |
| ZTRTN | EN2+2~, EN2+3* |
| ZTSK | EN2+2~, EN2+5 |