HMPEQLM ;SLC/MJK,ASMR/RRB - Event Queue Manager;30-JUN-2014
Source file <HMPEQLM.m>
| Package | Total | Call Graph |
|---|---|---|
| Enterprise Health Management Platform | 4 | ($$GETSRV,EVNTYPS)^HMPDJFSM (EVTS,NOROWS)^HMPEQ EN^HMPEQLM1 EN^HMPEQLM2 |
| List Manager | 4 | EN^VALM ($$SETFLD,FULL,PAUSE)^VALM1 KILL^VALM10 EN^VALM2 |
| VA FileMan | 4 | ^DIC WAIT^DICD $$GET1^DIQ ^DIR |
| Kernel | 3 | ($$FMTH,$$HTE)^XLFDT DISP^XQORM1 $$PROD^XUPROD |
| Registration | 1 | DEM^VADPT |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- main entry point for HMPM EVT QUE MGR
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| BUILD | ; -- build list
|
|
| SET(X,IDX) | ; -- set the ListMan array and indexes
|
|
| KILL | ; -- kill off build data
|
|
| MSG | ; -- set default message
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
; -- save user criteria fro 7 days |
|
| DFLTS | ; -- get user defaults
|
|
| EXPND | ; -- expand code
|
|
| REFRESH | ; -- refresh display
; protocol: HMPM EVT QUE REFRESH |
|
| CS | ; -- change server
; protocol: HMPM EVT QUE CHANGE SERVER |
|
| CD | ; -- change domain
; protocol: HMPM EVT QUE CHANGE DOMAIN |
|
| LIMIT() | ; -- get freshness events display limit
; -- set high testing in order to see many event types |
|
| FILTER | ; -- allows user to filter list
; protocol: HMPM EVT QUE FILTER |
|
| SELPT | ; select patient
; protocol" HMPM EVT QUE SELECT PATIENT |
|
| CM | ; change max
; protocol: HMPM EVT QUE CHANGE MAX LISTED |
|
| DETAIL | ; -- detailed display
; protocol: HMPM EVT QUE DISPLAY DETAILS |
|
| GETIME(DATE,SECS) | ; -- get time
|
|
| PAT(HMPZ,DFN) | ; -- get patient info
|
|
| MED(HMPZ,ORDER) | ; -- display order info
|
|
| TIU(HMPZ,IEN) | ; -- get TIU document type
|
|
| USER(HMPZ,IEN) | ; -- get user name
|
|
| ROSTER(HMPZ,IEN) | ; -- get roster name
|
|
| AUX(HMPZ,IEN) | ; -- get auxiliary uid
|
|
| DIAG(HMPZ,IEN) | ; -- get diagnosis uid
|
|
| ROAD(HMPZ,IEN) | ; -- get roadtrip uid
|
|
| TASK(HMPZ,IEN) | ; -- get task uid
|
|
| CONSULT(HMPZ,IEN) | ; -- get consult date
|
|
| VISIT(HMPZ,IEN) | ; -- get visit date/time
|
|
| ADM(HMPZ,IEN) | ; -- get admission date/time
|
|
| APPT(HMPZ,MAP) | ; -- get appointment data/time and clinic
|
|
| RENDER | ; -- write info
|
|
| SHOWHMPN | ; -- show HMP global nodes
; protocol: HMPM EVT QUE SHOW TEMP GLOBALS |
|
| FSHRPT | ; -- show overall freshness report
; protocol: HMPM EVT QUE FRESHNESS REPORT |
|
| EMERSTOP | ; -- stop freshness
; protocol: HMPM EVT QUE EMERGENCY STOP (not distributed) |
|
| RSTRTFR | ; -- re-start freshness
; protocol: HMPM EVT QUE RESTART FRESHNESS (not distributed) |
|
| GETSRV(DFLT) | ; Return the IEN for the server to monitor
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | SELPT+6, GETSRV+4 |
| WAIT^DICD | REFRESH+2 |
| $$GET1^DIQ | TIU+3, USER+3, ROSTER+3, AUX+3, DIAG+3, ROAD+3, TASK+3, CONSULT+3, VISIT+3, ADM+3 , APPT+5, APPT+7 |
| ^DIR | CD+15, FILTER+11, CM+7 |
| $$GETSRV^HMPDJFSM | CS+4 |
| EVNTYPS^HMPDJFSM | CD+4 |
| EVTS^HMPEQ | BUILD+11 |
| NOROWS^HMPEQ | BUILD+28 |
| EN^HMPEQLM1 | FSHRPT+3 |
| EN^HMPEQLM2 | SHOWHMPN+3 |
| DEM^VADPT | PAT+3 |
| EN^VALM | EN+10 |
| $$SETFLD^VALM1 | BUILD+22, BUILD+23, BUILD+24, BUILD+25 |
| FULL^VALM1 | CS+2, CD+3, FILTER+3, SELPT+2, CM+2, DETAIL+4, SHOWHMPN+2, FSHRPT+2, EMERSTOP+2, RSTRTFR+2 |
| PAUSE^VALM1 | DETAIL+59 |
| KILL^VALM10 | KILL+3 |
| EN^VALM2 | DETAIL+5 |
| $$FMTH^XLFDT | GETIME+2 |
| $$HTE^XLFDT | GETIME+3 |
| DISP^XQORM1 | HELP+1 |
| $$PROD^XUPROD | LIMIT+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^DPT - [#2] | Classic Fileman Calls |
| 2.98 | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGPM - [#405] | GET1^DIQ |
| ^HMP(800000 - [#800000] | Classic Fileman Calls |
| ^HMP(800000.1 - [#800000.1] | GET1^DIQ |
| ^HMPROSTR(800001.2 - [#800001.2] | GET1^DIQ |
| ^TIU(8925 - [#8925] | GET1^DIQ |
| ^TIU(8925.1 - [#8925.1] | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DISV( | EXIT+5!, EXIT+6*, DFLTS+4, DFLTS+5 |
| ^HMP(800000 - [#800000] | HDR+3, GETSRV+3 |
| ^OR(100 - [#100] | MED+4 |
| ^ORD(101.43 - [#101.43] | MED+7 |
| ^TMP("HMPM EVT QUE MGR" | BUILD+2 |
| ^XTMP( | HDR+9 |
| ^XTMP("HMP-off" | HDR+14 |
| Name | Line Occurrences |
|---|---|
| $$GETIME | DETAIL+15, DETAIL+21 |
| $$GETSRV | EN+5 |
| $$LIMIT | INIT+1, CM+5 |
| ADM | DETAIL+43 |
| APPT | DETAIL+46 |
| AUX | DETAIL+53 |
| BUILD | INIT+2, REFRESH+3 |
| CONSULT | DETAIL+34 |
| DFLTS | EN+3 |
| DIAG | DETAIL+54 |
| HDR | INIT+3, REFRESH+4 |
| KILL | BUILD+15 |
| MED | DETAIL+33 |
| MSG | INIT+4, REFRESH+5 |
| PAT | DETAIL+30, DETAIL+31 |
| REFRESH | CS+6, CD+17, FILTER+15, SELPT+8, CM+9, SHOWHMPN+4, FSHRPT+4, EMERSTOP+4, RSTRTFR+4 |
| RENDER | DETAIL+16, DETAIL+25, DETAIL+30, DETAIL+31, DETAIL+33, DETAIL+34, DETAIL+43, DETAIL+44, DETAIL+46, DETAIL+48 , DETAIL+50, DETAIL+53, DETAIL+54, DETAIL+55, DETAIL+56 |
| ROAD | DETAIL+55 |
| ROSTER | DETAIL+50 |
| SET | BUILD+26 |
| TASK | DETAIL+56 |
| USER | DETAIL+48 |
| VISIT | DETAIL+44 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DFLTS+5, MED+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | MED+1~, MED+3*, MED+5*, MED+6, MED+7 |
| DATE | GETIME~, GETIME+2 |
| DFLT | GETSRV~, GETSRV+3 |
| DFN | PAT~ |
| DIC | SELPT+3~, SELPT+4*, GETSRV+1~, GETSRV+2* |
| DIC("A" | GETSRV+2* |
| DIC("B" | GETSRV+3* |
| DIC(0 | SELPT+5*, GETSRV+2* |
| DIR | CD+2~, FILTER+2~, CM+3~ |
| DIR("A" | CD+13*, FILTER+9*, CM+6* |
| DIR("B" | CD+14*, FILTER+10*, CM+5* |
| DIR(0 | CD+12*, FILTER+8*, CM+4* |
| DOMAIN | DETAIL+2~, DETAIL+28*, DETAIL+31, DETAIL+33, DETAIL+34, DETAIL+40, DETAIL+46, DETAIL+48, DETAIL+50, DETAIL+53 , DETAIL+54, DETAIL+55, DETAIL+56 |
| DOMAINS | CD+2~ |
| DOMAINS( | CD+8*, CD+11, CD+16 |
| DOMAINS(999 | CD+9* |
| DUZ | EXIT+2, EXIT+5, EXIT+6, DFLTS+1, DFLTS+4, DFLTS+5 |
| FILLER | HDR+1~, HDR+2*, HDR+5, HDR+8 |
| HMPCNT | BUILD+1~, BUILD+16*, BUILD+20*, BUILD+22, SET+4, SET+5 |
| HMPCSTRM | EN+1~, HDR+9, HDR+11, BUILD+12*, DETAIL+15, DETAIL+21 |
| HMPDASH | DETAIL+2~, DETAIL+3*, DETAIL+10, DETAIL+58 |
| HMPDATA | DETAIL+2~, DETAIL+13!, DETAIL+19! |
| HMPDATA( | RENDER+2 |
| HMPDATA(1 | DETAIL+14*, DETAIL+15*, DETAIL+20*, DETAIL+21* |
| HMPDATA(2 | DETAIL+23*, DETAIL+24* |
| HMPDFN | EN+1~, HDR+16, BUILD+8, SELPT+7* |
| HMPDOM | EN+1~, EN+8*, HDR+14, BUILD+6, CD+16* |
| HMPEVTS | BUILD+1~, BUILD+2*, BUILD+3, BUILD+11, BUILD+12, BUILD+17, BUILD+18, BUILD+19, BUILD+31 |
| HMPFIL | EN+1~, EN+9*, HDR+13, BUILD+7, FILTER+12*, FILTER+13*, FILTER+14* |
| HMPI | BUILD+17*, BUILD+18, BUILD+19, DETAIL+2~, DETAIL+6*, DETAIL+7, DETAIL+9 |
| HMPLIM | EN+1~, HDR+15, INIT+1*, BUILD+9, CM+8* |
| HMPREF | DETAIL+2~, DETAIL+8*, DETAIL+30, DETAIL+31, DETAIL+33, DETAIL+34, DETAIL+43, DETAIL+44, DETAIL+46, DETAIL+48 , DETAIL+50, DETAIL+53, DETAIL+54, DETAIL+55, DETAIL+56 |
| HMPSRV | EN+1~, EN+5*, EN+6, HDR+3, BUILD+5, CS+5*, SHOWHMPN+3, FSHRPT+3 |
| HMPWAIT | EN+1~, BUILD+14*, BUILD+23*, MSG+2 |
| HMPY | PAT+1~ |
| HMPZ | PAT~, PAT+4, PAT+5, PAT+6, MED~, MED+2, MED+6, MED+7, TIU~, TIU+1 , TIU+2, TIU+3, USER~, USER+1, USER+2, USER+3, ROSTER~, ROSTER+1, ROSTER+2, ROSTER+3 , AUX~, AUX+1, AUX+2, AUX+3, DIAG~, DIAG+1, DIAG+2, DIAG+3, ROAD~, ROAD+1 , ROAD+2, ROAD+3, TASK~, TASK+1, TASK+2, TASK+3, CONSULT~, CONSULT+1, CONSULT+2, CONSULT+3 , VISIT~, VISIT+1, VISIT+2, VISIT+3, ADM~, ADM+1, ADM+2, ADM+3, APPT~, APPT+3 , APPT+4, APPT+5, APPT+6, APPT+7 |
| I | CD+2~, CD+5*, CD+7*, CD+8*, CD+11*, RENDER+1~, RENDER+2* |
| IDX | SET~, SET+4, SET+5 |
| IEN | DETAIL+41~, DETAIL+42*, DETAIL+43, DETAIL+44, MED+1~, MED+3*, MED+4*, TIU~, TIU+3, USER~ , USER+3, ROSTER~, ROSTER+3, AUX~, AUX+3, DIAG~, DIAG+3, ROAD~, ROAD+3, TASK~ , TASK+3, CONSULT~, CONSULT+3, VISIT~, VISIT+3, ADM~, ADM+3 |
| IENS | APPT+1~, APPT+2*, APPT+5, APPT+7 |
| LASTUP | HDR+1~, HDR+4*, HDR+5 |
| LIST | CD+2~, CD+4 |
| LIST( | CD+5 |
| MAP | APPT~, APPT+2 |
| NODE | EXIT+3~, EXIT+4*, EXIT+5, EXIT+6, DFLTS+2~, DFLTS+3*, DFLTS+4, DFLTS+5 |
| ORDABLE | MED+1~, MED+4*, MED+7 |
| ORDER | MED~, MED+4 |
| PARAMS | BUILD+1~, BUILD+11 |
| PARAMS("dfn" | BUILD+8* |
| PARAMS("domain" | BUILD+6* |
| PARAMS("filter" | BUILD+7* |
| PARAMS("max" | BUILD+9* |
| PARAMS("server" | BUILD+5* |
| POST | DETAIL+2~, DETAIL+9*, DETAIL+11, DETAIL+12, DETAIL+15, DETAIL+18, DETAIL+21, DETAIL+22, DETAIL+28, DETAIL+30 , DETAIL+31, DETAIL+33, DETAIL+34, DETAIL+42, DETAIL+46, DETAIL+48, DETAIL+50, DETAIL+53, DETAIL+54, DETAIL+55 , DETAIL+56 |
| REPEAT | HDR+1~, HDR+4*, HDR+6 |
| SECS | GETIME~, GETIME+2 |
| SEQ | BUILD+1~, BUILD+19*, BUILD+24 |
| SEQNODE | BUILD+1~, BUILD+18*, BUILD+23, BUILD+25, BUILD+26 |
| SRV | CS+3~, CS+4*, CS+5 |
| SRV0 | HDR+1~, HDR+3*, HDR+4 |
| SRVNM | HDR+1~, HDR+4*, HDR+5 |
| VA | PAT+1~ |
| VA("BID" | PAT+6 |
| >> VALMAR | SET+3, SET+4, SET+5, KILL+1, DETAIL+9 |
| VALMBCK | REFRESH+6*, DETAIL+61!, DETAIL+62* |
| VALMBG | BUILD+29!, BUILD+30* |
| VALMCNT | BUILD+16*, BUILD+28, SET+1!, SET+2*, SET+3, SET+4 |
| VALMHDR | HDR+1! |
| VALMHDR(1 | HDR+7* |
| VALMHDR(2 | HDR+10* |
| VALMHDR(3 | HDR+11* |
| VALMHDR(4 | HDR+17* |
| VALMSG | MSG+1!, MSG+2* |
| VALMY | DETAIL+2~ |
| VALMY("" | DETAIL+6 |
| VAROOT | PAT+1~, PAT+2* |
| X | HDR+1~, HDR+5*, HDR+6*, HDR+7, HDR+8*, HDR+9*, HDR+10, HDR+12*, HDR+13*, HDR+14* , HDR+15*, HDR+16*, HDR+17, BUILD+1~, BUILD+21*, BUILD+22*, BUILD+23*, BUILD+24*, BUILD+25*, BUILD+26 , SET~, SET+3, HELP+1*, EXIT+3~, EXIT+6*, DFLTS+2~, DFLTS+5*, CD+2~, CD+6*, CD+7* , CD+8*, CD+10*, CD+11*, CD+12, FILTER+2~, FILTER+4*, FILTER+5*, FILTER+6*, FILTER+7*, FILTER+8 , GETIME+1~, GETIME+2*, GETIME+3 |
| >> XQORNOD(0 | DETAIL+5 |
| Y | CD+2~, CD+16, FILTER+2~, FILTER+12, FILTER+13, FILTER+14, SELPT+3~, SELPT+7, CM+8, GETSRV+1~ , GETSRV+5 |
| Y( | CD+5*, CD+6*, CD+8 |