DG53351 ;ALB/JAN - Post-Install to clean Enrollment Status ; 6-22-2001
Source file <DG53351.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;
; Post-install set up checkpoint and tracking global... |
|
| EN | ; begin processing...
|
|
| EN1 | ; begin cleanup
|
|
| DGLOOP | ;
; write message to installation device and to INSTALL file (#9.7) |
|
| KILL1 | ; Cleanup those entries in "AENRC" x-ref in the PATIENT file that have
; multiple entries |
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | POST+14 |
| MAIL^DG53351M | EN1+3 |
| $$STATUS^DGENA | DGLOOP+20 |
| KILL1^DGENDD | KILL1+5 |
| $$DT^XLFDT | POST+15 |
| $$FMTE^XLFDT | EN1+5, DGLOOP+7 |
| $$NOW^XLFDT | EN1+5, DGLOOP+7 |
| $$COMCP^XPDUTL | EN1+4 |
| $$NEWCP^XPDUTL | POST+7, POST+9 |
| $$PARCP^XPDUTL | DGLOOP+15 |
| $$UPCP^XPDUTL | DGLOOP+26, DGLOOP+27 |
| $$VERCP^XPDUTL | POST+6, POST+8, EN+3 |
| BMES^XPDUTL | EN1+5, DGLOOP+2, DGLOOP+7 |
| MES^XPDUTL | DGLOOP+3, DGLOOP+4, DGLOOP+5, DGLOOP+6 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGEN(27.15 - [#27.15] | DGLOOP+24 |
| ^DPT - [#2] | KILL1+2 |
| ^DPT("AENRC" | DGLOOP+18, DGLOOP+19, DGLOOP+21, DGLOOP+23, DGLOOP+25* |
| ^XTMP("DG-" | POST+13, POST+15* |
| ^XTMP("DG-AENRC" | POST+2!, EN1+6!, KILL1+3* |
| ^XTMP("DG-DTC" | POST+2!, POST+16*, EN+3*, EN1+6!, KILL1+4* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | POST+3~, POST+7*, POST+9*, EN+1~, EN+3*, EN+4*, EN+5, EN1+4*, DGLOOP+26*, DGLOOP+27* |
| DGDFN | DGLOOP+10~, DGLOOP+15*, DGLOOP+19*, DGLOOP+20, DGLOOP+21, DGLOOP+23, DGLOOP+25, KILL1+2, KILL1+3, KILL1+5 |
| DGENR | DGLOOP+17~, DGLOOP+22*, DGLOOP+24*, KILL1+3 |
| DGPAT | DGLOOP+17~, KILL1+2*, KILL1+3 |
| DGSSN | DGLOOP+17~, KILL1+2*, KILL1+3 |
| DGSTATUS | DGLOOP+10~, DGLOOP+20*, DGLOOP+21, DGLOOP+23, DGLOOP+25 |
| DT | POST+14 |
| I | POST+3~, POST+12*, POST+13, POST+15 |
| IEN | DGLOOP+10~ |
| STATUS | DGLOOP+10~, DGLOOP+14*, DGLOOP+15*, DGLOOP+18*, DGLOOP+19, DGLOOP+21, DGLOOP+23, DGLOOP+24, KILL1+3 |
| U | POST+15, DGLOOP+24, KILL1+2 |
| X | POST+3~, POST+15 |
| X1 | POST+3~, POST+14* |
| X2 | POST+3~, POST+14* |
| >> XDPNM | DGLOOP+26 |
| >> XPDNM | POST+4, POST+16, EN+3, EN1+4, DGLOOP+14, DGLOOP+15, DGLOOP+27 |
