©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
XUSFACHK ;ISF/RWF - FAILED ACCESS ATTEMPTS LOG MONITOR ;10/15/2003 15:25
Source file <XUSFACHK.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHKIT | ;check to see if number of attempts on any one port is over KEEP THRESHOLD, if so save it.
|
|
| SET | ;set ^XTMP("XUSFACHK" global.
|
|
| TXT(S) | ;Add text to ^TMP("XM",$J
|
|
| FAILED | ;FAILED ACCESS ATTEMPTS SCAN PROGRAM
|
|
| EXIT | ||
| CLEAN | ;clean up ^XTMP("XUSFACHK" global, If no new failed attempts remove.
|
|
| BULL | ;send bulletin to irm. if after hours, send to aod and have irm paged.
|
|
| NBH(DATE) | ;FIND OUT IF NOW IS DURING NORMAL BUSINESS HOURS.
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZUA(3.05 - [#3.05] | FAILED+13, FAILED+14 |
| ^HOLIDAY - [#40.5] | NBH+5 |
| ^TMP("XM" | TXT+1* |
| ^TMP($J | FAILED+5!, FAILED+15*, CHKIT+3, CHKIT+4, CHKIT+5, CLEAN+3, SET+1, BULL+9 |
| ^XTMP("XUSFACHK" | FAILED+6*, CHKIT+6, CHKIT+7, CLEAN+2, CLEAN+4!, SET+1*, BULL+10 |
| Name | Line Occurrences |
|---|---|
| $$NBH | CHKIT+1 |
| BULL | CHKIT+11 |
| CLEAN | CHKIT+9 |
| SET | CHKIT+5 |
| TXT | BULL+8, BULL+10, BULL+12, BULL+13, BULL+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | FAILED+3~, NBH+2~ |
| %Y | FAILED+3~, NBH+2~, NBH+3*, NBH+4 |
| AODBUL | FAILED+4~, CHKIT+2*, CHKIT+7*, CHKIT+11, BULL+5, BULL+14 |
| AODLM | FAILED+4~, CHKIT+1*, CHKIT+7 |
| DA | FAILED+3~, FAILED+8* |
| DATE | NBH~, NBH+3, NBH+5, NBH+6 |
| DIC | FAILED+3~ |
| DIE | FAILED+3~, FAILED+8* |
| DIK | FAILED+3~ |
| DIX | BULL+15~ |
| DIY | BULL+15~ |
| DO | BULL+15~ |
| DR | FAILED+3~, FAILED+8* |
| DTE | BULL+1~, BULL+7*, BULL+8 |
| I | BULL+1~ |
| IRMBUL | FAILED+4~, CHKIT+2*, CHKIT+6*, CHKIT+11 |
| IRMLM | FAILED+4~, CHKIT+1*, CHKIT+6 |
| LAST | FAILED+4~ |
| NOW | FAILED+4~, FAILED+6*, FAILED+8, CHKIT+1 |
| NUM | FAILED+4~, FAILED+12*, FAILED+13*, FAILED+14, BULL+1~, BULL+9*, BULL+10 |
| S | TXT~, TXT+1 |
| TCI | FAILED+3~, FAILED+10*, CHKIT+6, CHKIT+7 |
| TCNT | FAILED+4~, CHKIT+2*, CHKIT+4*, CHKIT+6, CHKIT+7, BULL+8 |
| WORK | FAILED+3~, CHKIT+1*, CHKIT+6, CHKIT+7 |
| X | BULL+1~ |
| XKT | FAILED+3~, FAILED+9*, CHKIT+5, BULL+9 |
| XLST | FAILED+4~, FAILED+8*, FAILED+12, BULL+7 |
| XMDUZ | BULL+1~, BULL+3* |
| XMSUB | BULL+1~, BULL+2* |
| XMTEXT | BULL+1~, BULL+3* |
| XMY | BULL+1~, BULL+6 |
| XMY( | BULL+4*, BULL+5*, BULL+6* |
| XMZ | BULL+1~ |
| Y | BULL+1~, BULL+4*, BULL+5* |
| ZCNT | FAILED+3~, BULL+1~, BULL+3*, TXT+1* |
| ZNUM | CLEAN+1~, CLEAN+2*, CLEAN+3, CLEAN+4 |
| ZTIO | FAILED+4~, FAILED+14*, FAILED+15, CHKIT+3*, CHKIT+4, CHKIT+5, CHKIT+6, CHKIT+7, SET+1 |
| ZZNUM | CLEAN+1~ |