HMPEQ ;SLC/MJK,ASMR/RRB - HMP Freshness Utilities;02-JUL-2014
Source file <HMPEQ.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; -- go to event queue viewer (convenience tag)
|
|
| EVTS(DATA,PARAMS) | ; -- return events for server's last stream in inverse sequence # order
; input: PARAMS("server") := ien of 800000 ; "filter") := event state filter [ P:processed | W:waiting ] ; "domain") := domain of interest or "ALL' ; "dfn") := dfn of desired patient ; "max") := max number events to return |
|
| GETEVTS(RET,PARAMS) | ; -- get events for server's last stream in inverse sequence # order
; RPC: HMPM EVT QUE GET EVTS (future) |
|
| SRVS(DATA) | ; -- loop thru & sort by server names and return summary freshness queue info for each
; output: @DATA@("servers",<n>,"name") := server name ; "server",<n>,"lastUpdate") := date server last updated ; "server",<n>,"repeated") := how many times updated ; "server",<n>,"stream") := stream name ; "server",<n>,"queueEnd") := current end of queue ; "server",<n>,"extracts",<n>,"domain") := domain name ; "server",<n>,"extracts",<n>,"tasks") := tasks waiting to be processed ; "server",<n>,"extracts",<n>,"waiting") := how many seconds waiting ; "server",<n>,"extracts",<n>,"lastCount") := last count retrieved or <finished> |
|
| SRV(DATA,SRV) | ; -- process one server
|
|
| GETSRVS(RET) | ; -- get summary freshness event queue info for all servers
; RPC: HMPM EVT QUE GET SVRS (future) |
|
| GLBS(DATA) | ; -- return summary info on HMP related temp globals
; output: @HMPDATA@( "xtmpNodes",<n>,"server") := server name ; "xtmpNodes",<n>,"rootNode") := ^XTMP root node for server/stream ; "xtmpNodes",<n>,"lastNode") := last sequence in root structure |
|
| GETGLBS(RET) | ; -- get summary info on HMP related temp globals
; RPC: HMPM EVT QUE GET GLBS (future) |
|
| NOROWS(MSG) | ; -- add standard text lines to indicate no rows to display
|
