NAME | SCMC PCMM NIGHTLY TASK |
DESCRIPTION | This option should be scheduled once a day. It reviews Patient team assignmentsand flaggs them for inactivation if their assignment is NEW and they have not been seen in the last year. It also flaggs ESTABLISHED patients if they have not been seen more than two years. If there are not appointments within 30 days since flagging the related patients are inactivated on the closest 15th or the end of month process. Messages are generated both on the 15th and on the last day of a month. |
CREATOR | USER,ONE |
E ACTION PRESENT | YES |
ENTRY ACTION | S ^XTMP("SCMCTSK2-"_$$HTFM^XLFDT($H,1),0)=$$HTFM^XLFDT($H+7,1)_U_$$HTFM^XLFDT($H,1)_U_$J,^XTMP("SCMCTSK2-"_$$HTFM^XLFDT($H,1),$J,"START")=$$HTE^XLFDT($H) |
EXIT ACTION | N DTT S DTT=+$D(^XTMP("SCMCTSK2-"_$$HTFM^XLFDT($H,1),$J,"START")) N DT1 S DT1=$S(DTT>0:$$HTFM^XLFDT($H,1),1:$$HTFM^XLFDT($H-1,1)) S ^XTMP("SCMCTSK2-"_DT1,$J,"STOP")=$$HTE^XLFDT($H) |
LOCK | SC PCMM SETUP |
MENU TEXT | PCMM NIGHTLY TASK |
OUT OF ORDER MESSAGE | This functionality is now accomplished by the PCMM Web Application. |
ROUTINE | NIGHT^SCMCTSK2 |
TYPE | run routine |
UPPERCASE MENU TEXT | PCMM NIGHTLY TASK |
X ACTION PRESENT | YES |