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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: HMPEVNT

Package: Enterprise Health Management Platform

Routine: HMPEVNT


Information

HMPEVNT ;SLC/MKB,ASMR/JD,RRB,CPC,MBS -- VistA event listeners;Aug 29, 2016 20:06:27

Source Information

Source file <HMPEVNT.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Enterprise Health Management Platform 3 (API,POST)^HMPDJFS  $$CATG^HMPDTIU  LOGDPT^HMPLOG  
Kernel 2 ^%ZTLOAD  $$FMADD^XLFDT  
Registration 2 IN5^VADPT  $$SITE^VASITE  
Toolkit 2 $$GET^XPAR  $$GETURL^XTHC10  
Pharmacy Data Management 1 $$ORDRNUM^PSSUTLA2  
VA FileMan 1 $$GET1^DIQ  

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: 10

Package Total Caller Graph
Enterprise Health Management Platform 4 HMPAT  HMPDJ1  HMPDJ2  HMPEHL7  
Authorization Subscription 2 USRCLASS  USRRULA  
Consult Request Tracking 1 GMRCGUIB  
Medicine 1 MCESEDT  
Registration 1 DG10  
Text Integration Utility 1 TIUDDX  

Entry Points

Name Comments DBIA/ICR reference
DG(DGDA,DGFIELD,DGFILE) ; -- DG FIELD MONITOR protocol listener /DE2818
FLD(X) ; --Return 1 or 0, if X is a field tracked by HMP
DGPM(DGPMA,DGPMDA,DGPMP,DGPMT) ; -- DGPM MOVEMENT EVENTS protocol listener /DE2818
; [expects DFN,DGPM* variables]
NEWINPT() ; -- is DFN newly admitted?
PCMMT(SCPTTMAF,SCPTTMB4) ; -- SCMC PATIENT TEAM CHANGES protocol listener /DE2818
PCMMTP(SCPTTPAF,SCPTTPB4) ; -- SCMC PATIENT TEAM POSITION CHANGES protocol listener /DE2818
SDAM(SDATA) ; -- SDAM APPOINTMENT EVENTS protocol listener /DE2818
PCE ; -- PXK VISIT DATA EVENT protocol listener, used by HMP PCE EVENTS protocol
PCE2 ; DE4195 - run in taskman
NAME(X) ; -- return object name for V-files
ZPCE ; -- old PXK VISIT DATA EVENT protocol listener [not in use]
XQOR(MSG) ; -- messaging listener (update meds, labs, xrays, consults)
RESULT() ; -- Return 1 or 0, if message broadcasts a result
; [may modify PKGIFN for use in POST]
RQ
LRTIU(DFN,ORPK) ; -- Return 1 or 0, if LR report is in TIU
NA(MSG) ; -- messaging listener (new backdoor orders)
TYPE(NAME) ; -- Returns type name for XML
PID() ; -- Returns patient from PID segment in current msg
PV1() ; -- Returns patient class from PV1 segment in current msg
GMRA(ACT) ; -- GMRA SIGN-OFF ON DATA protocol listener
; also GMRA ENTERED IN ERROR [ACT=@]
GMPL(DFN,IEN) ; -- GMPL EVENT protocol listener
GMRV(DFN,IEN,ERR) ; -- Vital Measurement file #120.5 AHMP index
MDC(OBS) ; -- MDC OBSERVATION UPDATE protocol listener
CP(DFN,ID,ACT) ; -- CP Transaction file #702 AHMP index
SR(DFN,IEN,ACT) ; -- Surgery [SROERR] update
TIU(DFN,IEN) ; -- TIU Document file #8925 AHMP index
DOCDEF ;
DOCITEM ;
USR ;
PSB(PSBIEN) ; -- HMP PSB EVENTS protocol listener (BCMA) /DE2818
XU(IEN,ACT) ; -- XU USER ADD/CHANGE/TERMINATE option listener
POST(DFN,TYPE,ID,ACT) ; -- track updated patient data
POSTX(TYPE,ID,ACT) ; -- track updated reference items
NEXT() ; -- Return next sequential number in ^XTMP(HMPDT,n)
HTTP(URL,DFN,TYPE,ID) ; -- send message that TYPE/ID has been updated [not in use]
DGREG ; register a newly registered patient in eHMP during the initial registration - Sep 29, 2015 - Phil Burkhalter

External References

Name Field # of Occurrence
^%ZTLOAD PCE+13
$$GET1^DIQ PCMMTP+5, PV1+4, TIU+9, TIU+11, TIU+20, TIU+21
API^HMPDJFS DGREG+15
POST^HMPDJFS POST+8, POSTX+7
$$CATG^HMPDTIU TIU+9
LOGDPT^HMPLOG SDAM+3
$$ORDRNUM^PSSUTLA2 PSB+5
IN5^VADPT DGPM+23
$$SITE^VASITE HTTP+3
$$FMADD^XLFDT NEXT+3
$$GET^XPAR DGREG+8
$$GETURL^XTHC10 HTTP+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] GET1^DIQ
^SCPT(404.42 - [#404.42] GET1^DIQ
^TIU(8925 - [#8925] GET1^DIQ
^TIU(8925.1 - [#8925.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVSIT("AAH" DGPM+25
^DGPM - [#405] DGPM+12
^DGPM("APMV" DGPM+9
^DGPM("ATID1" DGPM+8
^DPT - [#2] DG+6, NEWINPT+2, LRTIU+4, DGREG+2
^HMP(800000 - [#800000] DG+9, DGPM+5, SDAM+4, PCE+5, ZPCE+6, XQOR+6, NA+6, POST+4, DGREG+11, DGREG+14
^HMPROSTR("AD" DGPM+15
^LR - [#63] LRTIU+5
^OR(100 - [#100] XQOR+16, XQOR+24
^PSB(53.79 - [#53.79] PSB+3
^TMP("PXKCO" PCE+2, PCE+3, PCE+9, ZPCE+2, ZPCE+3, ZPCE+5, ZPCE+8, ZPCE+9
^XTMP( NEXT+1, NEXT+2, NEXT+3, NEXT+4
^XTMP("HMP" HTTP+7*
^XTMP("HMP-off" POST+3, POSTX+3

Label References

Name Line Occurrences
$$FLD DG+9
$$LRTIU XQOR+20
$$NAME PCE2+8
$$PID XQOR+6, NA+6
$$RESULT XQOR+17
$$TYPE XQOR+5, NA+5
POST DG+9, DGPM+5, DGPM+27, PCMMT+3, PCMMTP+6, SDAM+6, PCE2+2, PCE2+8, ZPCE+4, ZPCE+7
ZPCE+8, ZPCE+9, XQOR+18, XQOR+19, XQOR+20, XQOR+22, XQOR+23, XQOR+25, NA+11, NA+12
, GMRA+4, GMPL+3, GMRV+3, MDC+5, MDC+6, CP+2, CP+3, SR+2, TIU+7, TIU+13
, TIU+23, PSB+6
POSTX DG+6, DG+7, DGPM+15, XU+2, DGREG+9, DGREG+15
RQ RESULT+3, RESULT+4, RESULT+5, RESULT+6

Naked Globals

Name Field # of Occurrence
^( PSB+3
^("BEFORE" PCE+3
^(0 NEXT+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACT DGPM+2~, DGPM+4*, DGPM+5, DGPM+18~, DGPM+26*, DGPM+27, PCE+1~, PCE+7*, PCE2+2, PCE2+7*
PCE2+8, GMRA~, GMRA+4, GMRV+2~*, GMRV+3, MDC+1~, MDC+4*, MDC+5, MDC+6, CP~
, CP+2, CP+3, SR~, SR+2, TIU+1~, TIU+2*, TIU+6*, TIU+7, XU~, XU+2
, POST~, POST+8, POSTX~, POSTX+7
ADM DGPM+2~*, DGPM+3*, DGPM+5, DGPM+8, DGPM+9, DGPM+11, DGPM+18~, DGPM+19*, DGPM+20*, DGPM+21
, DGPM+23*, DGPM+24
ADMX DGPM+7~, DGPM+8*
ARGS DGREG+15, DGREG+16!
ARGS("command" DGREG+12*
ARGS("localId" DGREG+12*
ARGS("server" DGREG+14*
DA PCE+1~, PCE2+1~, PCE2+6*, PCE2+7, PCE2+8, ZPCE+1~, ZPCE+8*, ZPCE+9*
DAD TIU+1~, TIU+3*, TIU+4
DADNAME TIU+19~, TIU+21*, TIU+22
DADTYPE TIU+19~, TIU+20*, TIU+21
DATE SDAM+2~, SDAM+5*, SDAM+6
DFN DG+2~*, DG+6, DG+7, DG+9, DGPM+5, DGPM+8, DGPM+9, DGPM+11, DGPM+25, DGPM+27
, NEWINPT+2, PCMMT+2~*, PCMMT+3, PCMMTP+2~, PCMMTP+5*, PCMMTP+6, SDAM+2~, SDAM+3*, SDAM+4, SDAM+6
PCE+1~, PCE+4*, PCE+5, PCE2+2, PCE2+8, ZPCE+1~, ZPCE+4, ZPCE+6*, ZPCE+7, ZPCE+8
ZPCE+9, XQOR+1~, XQOR+6*, XQOR+18, XQOR+19, XQOR+20, XQOR+22, XQOR+23, XQOR+25, LRTIU~
, LRTIU+1, LRTIU+4, NA+1~, NA+6*, NA+11, NA+12, GMRA+2~, GMRA+3*, GMRA+4, GMPL~
, GMPL+1*, GMPL+3, GMRV~, GMRV+1*, GMRV+3, MDC+1~, MDC+2*, MDC+5, MDC+6, CP~
, CP+1*, CP+2, CP+3, SR~, SR+1*, SR+2, TIU~, TIU+2*, TIU+7, TIU+13
, TIU+23, PSB+1~, PSB+3*, PSB+4, PSB+5, PSB+6, POST~, POST+1*, POST+2, POST+4
, POST+8, HTTP~, HTTP+2*, HTTP+4, HTTP+7, DGREG+1, DGREG+2, DGREG+9, DGREG+11, DGREG+12
DGREG+15
DGDA DG~, DG+2
DGFIELD DG~, DG+4, DG+6, DG+7, DG+9
DGFILE DG~, DG+1
DGPMA DGPM~, DGPM+3, DGPM+4, DGPM+13, DGPM+19, DGPM+26, NEWINPT+2
DGPMDA DGPM~, DGPM+2, DGPM+9, DGPM+22, NEWINPT+2
DGPMP DGPM~, DGPM+3, DGPM+10, DGPM+20, NEWINPT+2
DGPMT DGPM~, DGPM+3, DGPM+10, DGPM+21, NEWINPT+2
DIV HTTP+1~, HTTP+3*, HTTP+4
DT POST+5, POSTX+4, NEXT+3
ERR GMRV~, GMRV+2
>> GMRAPA GMRA+3
>> GMRAPA(0 GMRA+3
HLOC SDAM+2~, SDAM+5*, SDAM+6
HMPDT POST+5~*, POSTX+4~*, NEXT+1, NEXT+2, NEXT+3, NEXT+4
HMPMSG XQOR+1~, XQOR+2*, XQOR+3, XQOR+4, XQOR+5, XQOR+7, XQOR+9, NA+1~, NA+2*, NA+3
, NA+4, NA+5, NA+7, NA+9, PID+2, PID+3, PV1+2, PV1+3
HMPPKG XQOR+1~, XQOR+5*, XQOR+18, XQOR+19, XQOR+20, RESULT+3, RESULT+4, RESULT+5, RESULT+6, NA+1~
, NA+5*, NA+12
HMPPXK PCE+1~, PCE+9*
HMPPXK( PCE2+6, PCE2+7
HMPX HTTP+1~
I DGPM+15*, PID+1~*, PID+2*, PID+3, PV1+1~*, PV1+2*, PV1+3
ID DGPM+18~, DGPM+25*, DGPM+27, MDC+1~, MDC+3*, MDC+5, MDC+6, CP~, CP+1*, CP+2
, CP+3, POST~, POST+1*, POST+2, POST+8, POSTX~, POSTX+1*, POSTX+2, POSTX+7, HTTP~
, HTTP+6
IDT DGPM+18~, DGPM+24*, DGPM+25, LRTIU+3~, LRTIU+4*, LRTIU+5
IEN PCE+1~, PCE+2*, PCE+3, PCE2+2, PCE2+6, PCE2+7, ZPCE+1~, ZPCE+2*, ZPCE+3, ZPCE+4
ZPCE+5, ZPCE+7, ZPCE+8, ZPCE+9, GMRA+2~, GMRA+3*, GMRA+4, GMPL~, GMPL+1*, GMPL+3
, GMRV~, GMRV+1*, GMRV+3, SR~, SR+1*, SR+2, TIU~, TIU+2*, TIU+4*, TIU+7
, TIU+9, TIU+11, TIU+20, PSB+1~, PSB+2*, PSB+3, XU~, XU+1*, XU+2
LRDFN LRTIU+3~, LRTIU+4*, LRTIU+5
MSG XQOR~, XQOR+2, NA~, NA+2
MSH XQOR+1~, XQOR+3*, XQOR+4, XQOR+5, XQOR+7, NA+1~, NA+3*, NA+4, NA+5, NA+7
, PID+1, PV1+1
MVTX DGPM+7~, DGPM+9*, DGPM+11*, DGPM+12
NAME TYPE~, TYPE+1, TYPE+2, TYPE+3, TYPE+4, TYPE+5, TYPE+6, TYPE+7, TYPE+8
NEW DGPM+7~, DGPM+13*, DGPM+14
NODES POST+7~, POST+8, POSTX+6~, POSTX+7
OBS MDC~
OBS("DOMAIN" MDC+6
OBS("OBS_ID" MDC+3
OBS("PATIENT_ID" MDC+2
OBS("STATUS" MDC+4
OLD DGPM+7~, DGPM+13*, DGPM+14
ORC XQOR+1~, XQOR+7*, XQOR+9*, XQOR+13, NA+1~, NA+7*, NA+9*, NA+11
ORDCNTRL XQOR+8~, XQOR+9*, XQOR+12, XQOR+21, RESULT+5, NA+8~, NA+9*, NA+10
ORIFN XQOR+8~, XQOR+13*, XQOR+16, XQOR+21, XQOR+22, XQOR+24, RESULT+4, NA+8~, NA+11*, NA+12
, PV1+4, PSB+1~, PSB+5*, PSB+6
ORIG XQOR+24~*, XQOR+25
ORPK LRTIU~, LRTIU+1, LRTIU+2, LRTIU+4, PSB+1~, PSB+3*, PSB+4, PSB+5
PKGIFN XQOR+8~, XQOR+13*, XQOR+18, XQOR+19, XQOR+20, RESULT+3*, RESULT+4*, RESULT+5, RESULT+6*
PORIFN XQOR+8~, XQOR+16*, XQOR+23
PREV DGPM+7~, DGPM+10*, DGPM+12*, DGPM+13
PROV SDAM+2~, SDAM+5*, SDAM+6
PSBIEN PSB~, PSB+2
PSBIEN(1 PSB+2
PTF DGPM+18~, DGPM+19*, DGPM+20*, DGPM+23*
PX0 ZPCE+1~, ZPCE+3*, ZPCE+4, ZPCE+6
PX0A PCE+1~, PCE+3*, PCE+4, PCE+7
PX0B PCE+1~, PCE+3*, PCE+4
PX150 ZPCE+1~, ZPCE+5*
REASON SDAM+2~, SDAM+5*, SDAM+6
REPCASE TIU+11~*, TIU+12*, TIU+13
REPCAT TIU+1~, TIU+9*, TIU+10
RSLT DGREG+15, DGREG+16!
SCPTTMAF PCMMT~, PCMMT+2
SCPTTMB4 PCMMT~, PCMMT+2
SCPTTPAF PCMMTP~, PCMMTP+3
SCPTTPB4 PCMMTP~, PCMMTP+3
SDATA SDAM~, SDAM+1, SDAM+3, SDAM+5
SEG PID+1~, PID+2*, PV1+1~, PV1+2*
STATUS TIU+19~
STS SDAM+2~, TIU+1~, TIU+3*
SUB PCE2+1~, PCE2+5*, PCE2+6, PCE2+7, PCE2+8, LRTIU+3~, LRTIU+4*, LRTIU+5
TM PCMMTP+2~, PCMMTP+3*, PCMMTP+5
TYPE PSB+1~, PSB+4*, PSB+5, POST~, POST+1*, POST+2, POST+3, POST+8, POSTX~, POSTX+1*
, POSTX+2, POSTX+3, POSTX+7, HTTP~, HTTP+5
U DG+4, FLD+1, DGPM+3, DGPM+13, DGPM+19, DGPM+20, SDAM+3, SDAM+5, SDAM+6, PCE+4
ZPCE+3, ZPCE+5, ZPCE+6, XQOR+9, XQOR+13, XQOR+16, XQOR+24, NA+9, NA+11, PSB+3
, NEXT+3, HTTP+3
URL HTTP~, HTTP+4*, HTTP+5*, HTTP+6*, HTTP+8
VAIP DGPM+22~
VAIP("E" DGPM+22*
VAIP(12 DGPM+23
VAIP(13 DGPM+23
WARD DGPM+7~, DGPM+14*, DGPM+15
X FLD~, FLD+1*, FLD+2, FLD+3, FLD+4, FLD+5, FLD+7, FLD+8, FLD+9, FLD+10
, FLD+11, FLD+12, NAME~, NAME+2, NAME+3, NAME+4, NAME+5, NAME+6, NAME+7, NAME+8
, HTTP+1~, HTTP+8*, DGREG+8*, DGREG+9, DGREG+10, DGREG+17!
X(2 TIU+3
X(3 TIU+3
>> X2(1 TIU+6
Y NEWINPT+1~*, NEWINPT+2*, NEWINPT+3, NAME+1~*, NAME+2*, NAME+3*, NAME+4*, NAME+5*, NAME+6*, NAME+7*
, NAME+8*, NAME+9, RESULT+2~*, RESULT+3*, RESULT+4*, RESULT+5*, RESULT+6*, RQ, PID+1~, PID+3*
, PID+5, PV1+1~*, PV1+3*, PV1+4*, PV1+5, NEXT+2~*, NEXT+5
ZTDESC PCE+1~, PCE+12*
ZTDTH PCE+1~, PCE+11*
ZTIO PCE+1~, PCE+11*
ZTRTN PCE+1~, PCE+11*
ZTSAVE PCE+1~
ZTSAVE("ACT" PCE+11*
ZTSAVE("DFN" PCE+11*
ZTSAVE("HMPPXK(" PCE+11*
ZTSAVE("IEN" PCE+11*
ZTSK PCE+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All