Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: HMPHTTP

Package: Enterprise Health Management Platform

Routine: HMPHTTP


Information

HMPHTTP ;SLC/MKB,ASMR/BL,RRB,CK - HTTP interface;Aug 29, 2016 20:06:27

Source Information

Source file <HMPHTTP.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 2 ^%ZIS  (,$$ASKSTOP,$$S,STAT)^%ZTLOAD  
Toolkit 2 $$GET^XPAR  $$GETURL^XTHC10  
Enterprise Health Management Platform 1 $$SYS^HMPUTILS  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Enterprise Health Management Platform 1 HMPPATS  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- manage the background job
STS() ; -- get the status of ZTSK
STOP() ; -- stop the task?
START() ; -- [re]start the task?
QUE ; -- create the background task: returns ZTSK
POKE ; -- background job to poke the client when new data is available
; ^XTMP("HMP",DFN,TYPE,ID) = new data since last update
SEND(LIST) ; send each list ID to its URL
HANG ; -- wait #seconds
KILL ; -- kill/reset ^HMP(800000) for testing

External References

Name Field # of Occurrence
^%ZIS QUE+2, POKE+3
^%ZTLOAD QUE+5
$$ASKSTOP^%ZTLOAD EN+7
$$S^%ZTLOAD POKE+15
STAT^%ZTLOAD STS+1
^DIR STOP+6, START+7
$$SYS^HMPUTILS SEND+2
$$GET^XPAR HANG+1
$$GETURL^XTHC10 SEND+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?24,"--- HMP Patient Data Monitor ---"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !!,"Task"_$S(ZTSK:" #"_ZTSK,1:"")_" is "_$P(STS,U,2)_".",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,$P(X,U,2),!
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!,"Starting HMP Patient Data Monitor ... "
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: "task #"_ZTSK_" started.",!
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !,"ERROR: task NOT created. Try again later.",!
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,"Null Device Not Found"
  • Line Location: QUE+2
Routine Call
  • %ZIS
  • Line Location:
    • QUE+2
    • POKE+3
Routine Call
  • DIR
  • Line Location:
    • STOP+6
    • START+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HMP(800000 - [#800000] POKE+11, SEND+5, KILL+1!, KILL+2*
^XTMP("HMP" EN+2, EN+14*, POKE+5, POKE+6, POKE+7, POKE+8, POKE+9
^XTMP("HMPX" POKE+13*

Label References

Name Line Occurrences
$$START EN+10
$$STOP EN+6
$$STS EN+2
HANG POKE+16
QUE EN+11
SEND POKE+14

Naked Globals

Name Field # of Occurrence
^( POKE+5, POKE+8!*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS QUE+1~, QUE+2*
DA POKE+2~, POKE+11*, POKE+12, SEND+1~, SEND+5*
DATA POKE+2~, POKE+7!*, POKE+13
DFN POKE+2~, POKE+5*, POKE+6, POKE+7, POKE+8, POKE+9, POKE+11, POKE+13
DIR STOP+1~, START+1~
DIR("?" STOP+3*, STOP+4*, STOP+5*, START+4*, START+5*, START+6*
DIR("A" STOP+2*, START+3*
DIR("B" STOP+2*, START+2*
DIR(0 STOP+2*, START+2*
DIV POKE+2~
ID POKE+2~, POKE+4*, POKE+12, SEND+1~, SEND+4*, SEND+5, SEND+6
IO QUE+1~
IOP QUE+1~, QUE+2*, POKE+2~, POKE+3*
LIST SEND~
LIST( SEND+4
NEW POKE+2~, POKE+14
NEW( POKE+12*
>> POP QUE+2
STS EN+1~, EN+2*, EN+4, EN+6, START+3, START+4
SYS SEND+1~, SEND+2*, SEND+6
TOKEN POKE+2~, POKE+12*, POKE+13
U EN+4, EN+8, STS+2
URL SEND+1~, SEND+5*, SEND+6*, SEND+7
X EN+7~*, EN+8, STOP+1~, START+1~, POKE+2~, POKE+8*, SEND+1~, SEND+7*, HANG+1~*, HANG+2
Y STS+2~*, STS+3, STOP+1~, STOP+6*, STOP+7, START+1~, START+7*, START+8
ZTCPU QUE+1~
ZTDESC QUE+1~, QUE+3*
ZTDTH QUE+1~, QUE+3*
ZTIO QUE+1~, QUE+3*
ZTKIL QUE+1~
ZTPRI QUE+1~
ZTREQ POKE+2!, POKE+15*, POKE+16*
ZTRTN QUE+1~, QUE+4*
ZTSAVE QUE+1~
ZTSK EN+1~, EN+2*, EN+4, EN+6, EN+7, EN+12, EN+14, QUE+4!
ZTSK(1 STS+2
ZTSK(2 STS+2
ZTSTOP POKE+2!, POKE+15*
ZTSYNC QUE+1~
ZTUCI QUE+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All