©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
DG53296 ;ALB/JAT DG*5.3*296 POST-INSTALL TO MAILMAN MSG;01 JUNE 2000
Source file <DG53296.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | ($$DT,$$FMTE,$$NOW)^XLFDT ($$COMCP,$$NEWCP,$$PARCP,$$UPCP,$$VERCP,BMES,MES)^XPDUTL |
| Registration | 2 | $$EN^DG53296D MAIL^DG53296M |
| VA Fileman | 1 | C^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; begin processing...
|
|
| DGDTE | ;Loop through dates by patient.
|
|
| COUNT(DATE) | ; update process tracking mechanisms
; Input: ; DATE = inverse date from 408.31 |
|
| PREDEL | ;Validate records to delete
|
|
| EN1 | ; begin purge...
; write message to installation device and to INSTALL file (#9.7) |
|
| DELETE(IEN1) | ;Delete non-primary test with source of DCD or Other Facility.
; Input: ; IEN1 = Internal Entry Number from 408.31 |
|
| POST | ;
; post-install set up checkpoints and tracking global... |
|
| DGIEN | ;Loop through IEN numbers by patient and date.
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | POST+16 |
| $$EN^DG53296D | DELETE+3 |
| MAIL^DG53296M | EN1+23 |
| $$DT^XLFDT | POST+17 |
| $$FMTE^XLFDT | EN1+8, EN1+25 |
| $$NOW^XLFDT | EN1+8, EN1+25 |
| $$COMCP^XPDUTL | EN1+24 |
| $$NEWCP^XPDUTL | POST+6, POST+8 |
| $$PARCP^XPDUTL | EN1+14 |
| $$UPCP^XPDUTL | EN1+21, DGDTE+5 |
| $$VERCP^XPDUTL | POST+5, POST+7, EN+3 |
| BMES^XPDUTL | EN1+2, EN1+8 |
| MES^XPDUTL | EN1+3, EN1+4, EN1+5, EN1+6, EN1+7, EN1+25 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.31 - [#408.31] | EN1+17, DGDTE+2, DGIEN+2, DGIEN+4, PREDEL+2, PREDEL+12 |
| ^XTMP( | POST+13 |
| ^XTMP("DG-" | POST+17*, POST+18* |
| ^XTMP("DG-AMTERR" | PREDEL+22* |
| ^XTMP("DG-AMTIY" | COUNT+6* |
| Name | Line Occurrences |
|---|---|
| COUNT | DELETE+6 |
| DELETE | PREDEL+20 |
| DGDTE | EN1+20 |
| DGIEN | DGDTE+4 |
| EN1 | EN+5 |
| PREDEL | DGIEN+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | POST+2~, POST+6*, POST+8*, EN+1~, EN+3*, EN+4*, EN+5, EN1+21*, EN1+24*, DGDTE+5* , COUNT+4~ |
| DATE | COUNT~, COUNT+5 |
| DGCNT | POST+2~, DGIEN+1*, DGIEN+4, PREDEL+6* |
| DGDFN | EN1+11~, EN1+13*, EN1+14*, EN1+17*, EN1+21, DGDTE+2, DGIEN+2, DGIEN+4, PREDEL+12 |
| DGDTE | EN1+11~, EN1+14*, DGDTE+1*, DGDTE+2*, DGDTE+5, DGIEN+2, DGIEN+4, PREDEL+12, DELETE+6 |
| DGIEN | EN1+11~, DGIEN+1*, DGIEN+2*, DGIEN+4, PREDEL+2, PREDEL+8, PREDEL+10, PREDEL+12 |
| DGPCT | POST+2~, DGIEN+1*, PREDEL+10*, PREDEL+14 |
| DGPRIM | POST+2~, PREDEL+2*, PREDEL+4, PREDEL+8 |
| DGSRC | POST+2~, PREDEL+2*, PREDEL+4, PREDEL+8, PREDEL+10 |
| DT | POST+14 |
| ERRS | EN1+11~, EN1+19~, PREDEL+22 |
| ERRS( | DELETE+4* |
| I | POST+2~, POST+12*, POST+13, POST+17, POST+18 |
| IEN | POST+2~, PREDEL+15*, PREDEL+16*, PREDEL+19*, PREDEL+20* |
| IEN1 | DELETE~, DELETE+3, DELETE+4 |
| IY | COUNT+4~, COUNT+5*, COUNT+6 |
| MTIEN | EN1+11~ |
| SRC | POST+2~, PREDEL+14*, PREDEL+16, PREDEL+18*, PREDEL+20 |
| TMP | PREDEL+24! |
| TMP( | PREDEL+8*, PREDEL+10, PREDEL+14, PREDEL+16!, PREDEL+18, PREDEL+20 |
| U | POST+17, PREDEL+2 |
| X | POST+2~, POST+17 |
| X1 | POST+2~, POST+14* |
| X2 | POST+2~, POST+15* |
| >> XPDNM | POST+3, EN+3, EN1+13, EN1+21, EN1+24, DGDTE+5 |