YSBWHIGH ;SLC/DJE - MHA DASHBOARD ; Apr 01, 2021@16:33
Source file <YSBWHIGH.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HIGHRISK(DATAOUT) | ;
|
|
| ERRHND | ; Handle errors & clear stack
|
|
| PRFDATA(DFN,SITES,PRFDATA) | ;
|
|
| GETDUE(RVDT,YSDT) | ;calculate if review is due
|
|
| MHNXTAPP(DFN,YSDT) | ;Get next MH APPT up to a year from today.
|
|
| MHLSTSAF(DFN,SAFHEAD,SAFDCL,SAFREV,SAFSCNO,SAFSCYES) | ||
| FINDDOC(DFN,TIUINVDT,HFCLIST,HDRLIST,TIURET,TIUFND) | ;TIUINVDT is updated and returned by reference to permit recursion or use in V HF indexes
|
|
| SAFDECL(DFN,TIUINVDT,SAFDCL) | ;was safety plan declined?
|
|
| HRACTIVE(DFN) | ;get activation details of high risk flag
|
|
| DONE7(DFN,YSDT,SAFHEAD,SAFDCL,SAFREV,SAFSCNO,SAFSCYES) | ||
| ISMHMV(MVMT) | ;
|
|
| ONTRK(DFN,DCDT,YSDT) | ;
|
|
| LASTCSRE(DFN,CSRENEW,CSREUPD,CSREHEAD) | ;
|
|
| CSSRS(INSTDATA,DFN,YSDT) | ;
|
|
| SAFLST(SAFDCL,SAFREV,SAFSCNO,SAFSCYES,HFCLIST) | ;Take individual healthfactors and create HFCLIST
|
|
| CSRELST(CSRENEW,CSREUPD,HFCLIST) |
| FileNo | Call Tags |
|---|---|
| ^DGPM - [#405] | GET1^DIQ |
| ^DIC(42 - [#42] | GET1^DIQ |
| ^TIU(8925.1 - [#8925.1] | FIND1^DIC |
