DG714 ;ALB/GAH - Deceased Patient Means Test Cleanup ; 18-SEP-2006 15:41
Source file <DG714.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;Start process
|
|
| QUEUE(ZTDTH) | ||
| QTIME() | ; Get the run time for queuing
|
|
| TEST(START,END,PROCESS) | ;Entry point for testing
; There is a range given so no need for the old data in ^XTMP |
|
| QUE | ||
| SETUPX(EXPDAYS) | ;
; requires EXPDAYS - number of days to keep XTMP around |
|
| STOP() | ||
| ACTIVE(ZTSK) | ||
| NAMSPC() | ;
|
|
| CLEAN(TESTING) | ; Loop through veterans to compare data
|
|
| MAIL(STARTTM,ENDTIME,DELRECS,TOTRECS,COMPLETE) |
| Name | Field # of Occurrence |
|---|---|
| NOW^%DTC | QTIME+2 |
| HOME^%ZIS | QUEUE+10 |
| ^%ZTLOAD | QUEUE+6 |
| $$S^%ZTLOAD | STOP+7 |
| STAT^%ZTLOAD | ACTIVE+4 |
| $$OK2DEL^DGMTDELS | CLEAN+22 |
| DELMT^DGMTDELS | CLEAN+27 |
| $$FMADD^XLFDT | SETUPX+6 |
| $$FMTE^XLFDT | MAIL+13, MAIL+14, MAIL+23, MAIL+24 |
| $$NOW^XLFDT | QUE+8, QUE+14, SETUPX+5, CLEAN+5 |
| ^XMD | MAIL+29 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.31 - [#408.31] | TEST+5, TEST+6, CLEAN+14 |
| ^TMP( | MAIL+10*, MAIL+11*, MAIL+12*, MAIL+13*, MAIL+14*, MAIL+15*, MAIL+16*, MAIL+19*, MAIL+20*, MAIL+21* , MAIL+22*, MAIL+23*, MAIL+24*, MAIL+25*, MAIL+26*, MAIL+27*, MAIL+30! |
| ^XTMP( | START+4, QUEUE+7!, QUEUE+8*, QUEUE+9*, TEST+2!, QUE+6, QUE+9*, QUE+12, QUE+15*, QUE+17! , QUE+18, SETUPX+7*, SETUPX+8*, STOP+7, STOP+8!, ACTIVE+3, ACTIVE+11*, CLEAN+6, CLEAN+11!, CLEAN+17* , CLEAN+20*, CLEAN+25*, CLEAN+32*, CLEAN+34, CLEAN+38*, MAIL+27 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | QTIME+1~, QTIME+3 |
| %H | QTIME+1~ |
| %I | QTIME+1~ |
| BEGTIME | SETUPX+2~, SETUPX+5*, SETUPX+6, SETUPX+7 |
| COMPLETE | QUE+1~, MAIL~, MAIL+9, MAIL+18 |
| CRF | CLEAN+1~ |
| DATA | CLEAN+1~, CLEAN+6*, CLEAN+34*, CLEAN+35*, CLEAN+36*, CLEAN+37*, CLEAN+38 |
| DELRECS | CLEAN+1~, CLEAN+4*, CLEAN+30*, CLEAN+32, CLEAN+35, MAIL~, MAIL+16, MAIL+26 |
| DFN | CLEAN+1~, CLEAN+7*, CLEAN+8*, CLEAN+14*, CLEAN+15, CLEAN+17, CLEAN+20, CLEAN+22, CLEAN+25 |
| DGMTI | CLEAN+1~, CLEAN+22, CLEAN+25, CLEAN+27 |
| DUZ | MAIL+7 |
| END | TEST~, TEST+6*, CLEAN+7*, CLEAN+15 |
| ENDTIME | MAIL~, MAIL+14, MAIL+24 |
| EXPDAYS | SETUPX~, SETUPX+6 |
| HIT | CLEAN+1~, CLEAN+21*, CLEAN+23*, CLEAN+30 |
| NAMSPC | START+1~, START+3*, START+4, QUEUE+1~, QUEUE+2*, QUEUE+3, QUEUE+4, QUEUE+7, QUEUE+8, QUEUE+9 , QUE+1~, QUE+3*, QUE+6, QUE+9, QUE+12, QUE+15, QUE+17, QUE+18, SETUPX+2~, SETUPX+4* , SETUPX+7, SETUPX+8, STOP+1~, STOP+3*, STOP+7, STOP+8, ACTIVE+1~, ACTIVE+2*, ACTIVE+3, ACTIVE+11 , CLEAN+1~, CLEAN+2*, CLEAN+6, CLEAN+11, CLEAN+17, CLEAN+20, CLEAN+25, CLEAN+32, CLEAN+34, CLEAN+38 , MAIL+2*, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+15, MAIL+16, MAIL+19, MAIL+20 , MAIL+21, MAIL+22, MAIL+23, MAIL+24, MAIL+25, MAIL+26, MAIL+27, MAIL+30 |
| PROCESS | TEST~, CLEAN+27 |
| PURGDT | SETUPX+2~, SETUPX+6*, SETUPX+7 |
| REC11 | CLEAN+1~ |
| REC12 | CLEAN+1~ |
| REC132 | CLEAN+1~ |
| START | TEST~, TEST+3*, TEST+5*, CLEAN+8 |
| STARTTM | CLEAN+1~, CLEAN+5*, CLEAN+36, MAIL~, MAIL+13, MAIL+23 |
| STAT | ACTIVE+1~, ACTIVE+6*, ACTIVE+7*, ACTIVE+8*, ACTIVE+11, ACTIVE+12 |
| STATUS | CLEAN+1~ |
| STOP | CLEAN+9~, CLEAN+10*, CLEAN+14, CLEAN+15* |
| TASK | START+1~, START+4*, START+5 |
| TESTING | TEST+7*, QUE+4~*, QUE+11, QUE+17!, CLEAN~, CLEAN+7, CLEAN+8, CLEAN+25, CLEAN+27, CLEAN+32 |
| TOTRECS | CLEAN+1~, CLEAN+14*, CLEAN+29, CLEAN+32, CLEAN+37, MAIL~, MAIL+15, MAIL+25 |
| U | START+1~, START+2*, START+4, QUE+1~, QUE+2*, QUE+7, QUE+8, QUE+13, QUE+14, QUE+16 , SETUPX+2~, SETUPX+3*, SETUPX+7, SETUPX+8, STOP+1~, STOP+2*, ACTIVE+11, CLEAN+1~, CLEAN+3*, CLEAN+17 , CLEAN+20, CLEAN+35, CLEAN+36, CLEAN+37, MAIL+3*, MAIL+27 |
| X | QTIME+1~, QUE+1~, QUE+5*, QUE+6*, QUE+7*, QUE+8*, QUE+9, QUE+12*, QUE+13*, QUE+14* , QUE+15, QUE+16, STOP+1~ |
| XMDUZ | MAIL+1~, MAIL+5* |
| XMSUB | MAIL+1~, MAIL+8* |
| XMTEXT | MAIL+1~, MAIL+17*, MAIL+28* |
| XMY | MAIL+1~ |
| XMY( | MAIL+7* |
| Y | ACTIVE+1~, ACTIVE+5*, ACTIVE+6, ACTIVE+7, ACTIVE+8 |
| ZTDESC | QUEUE+1~, QUEUE+4* |
| ZTDTH | QUEUE~ |
| ZTIO | QUEUE+1~, QUEUE+5* |
| ZTRTN | QUEUE+1~, QUEUE+3* |
| ZTSK | QUEUE+1~, QUEUE+8, QUEUE+9, ACTIVE~, ACTIVE+3* |
| ZTSK(1 | ACTIVE+5 |
| ZTSTOP | QUE+1~, QUE+11*, QUE+13, QUE+16, STOP+1~, STOP+4*, STOP+9*, STOP+10, CLEAN+1~, CLEAN+4* , CLEAN+14, CLEAN+29*, CLEAN+39 |
| Name | Field # of Occurrence |
|---|---|
| $T( | NAMSPC+1 |