Routine: HMPDJFS

Package	Total	Call Graph
Enterprise Health Management Platform	5	SETERR^HMPDJFS GETSUB^HMPDJFSG HLTHCHK^HMPDJFSM $$PUTSUB^HMPDJFSP $$SYS^HMPUTILS
VA FileMan	2	^DIE ^DIK
Kernel	1	($$DT,$$FMADD,$$FMDIFF,$$HDIFF,$$HTFM)^XLFDT
Master Patient Index VistA	1	($$GETDFN,$$GETICN)^MPIF001
Toolkit	1	($$GET,PUT)^XPAR

Package	Total	Caller Graph
Enterprise Health Management Platform	17	HMPAT HMPCAC HMPCRPC1 HMPDJ00 HMPDJFS HMPDJFS API HMPDJFS DELSUB HMPDJFS1 HMPDJFSG HMPDJFSM HMPDJFSP HMPDJFSQ HMPEVNT HMPMETA HMPROS8 HMPUTIL1 HMPUTIL2

Entry Points

Name	Comments	DBIA/ICR reference
API(HMPFRSP,ARGS)	;
XAPI	; end select case
LOGREQ(SRV,ARGS)	; Log the request
LOGRSP(SRV)	; Log the response
DELSUB(RSP,ARGS)	; cancel a subscription ; DELETE with: /hmp/subscription/{hmpSrvId}/patient/{pid} ; remove patient from HMP SUBSCRIPTION file ; remove ^XTMP(HMPX and ^XTMP(HMPH nodes ; look ahead (from lastId) and remove any nodes for the patient
DELPT(DFN,SRV)	; delete patient DFN for server SRV
POST(DFN,TYPE,ID,ACT,SERVER,NODES)	; adds new freshness item, return DT-seq ; if initializing use: ^XTMP("HMPFH-hmpserverid-dfn",seq#) -hold ; otherwise use: ^XTMP("HMPFS-hmpserverid-date",seq#) -stream
NEWXTMP(NODE,DAYS,DESC)	; Set a new node in ^XTMP
PIDS(DFN)	; return string containing patient id's ready for JSON ; expects HMPFSYS, HMPFHMP
PID(DFN)	; return most likely PID (ICN or SYS;DFN)
DFN(PID)	; return the DFN given the PID (ICN or SYS;DFN)
PROGRESS(LASTITM)	; set the node in REF with progress properties ; expects HMPFHMP,HMPSYS
SETERR(MSG)	; create error object in ^TMP("HMPFERR",$J) and set HMPFERR
DEBUG(MSG)	;
RESETSVR(ARGS)	;
CLEARDOM(SVR,PAT)	;
CLEARPAT(SVR,PAT)	;
HMPSET(DA,NEW)	;
HMPKILL(DA,OLD)	;
HMPOSET(DA,NEW)	;
HMPOKILL(DA)	;
KILL	; clear out all ^XTMP nodes
KILLSVR(SVR)	; clear out for specific machine

External References

Name	Field # of Occurrence
^DIE	RESETSVR+7
^DIK	DELPT+5, RESETSVR+11
SETERR^HMPDJFS	API+29
GETSUB^HMPDJFSG	API+30
HLTHCHK^HMPDJFSM	API+36
$$PUTSUB^HMPDJFSP	API+14, API+26
$$SYS^HMPUTILS	API+7, PID+2, DFN+7
$$GETDFN^MPIF001	DFN+4
$$GETICN^MPIF001	PIDS+8
$$DT^XLFDT	POST+9, PROGRESS+17, PROGRESS+18
$$FMADD^XLFDT	PROGRESS+22
$$FMDIFF^XLFDT	PROGRESS+19
$$HDIFF^XLFDT	LOGREQ+2
$$HTFM^XLFDT	NEWXTMP+2
$$GET^XPAR	API+5, LOGREQ+1, LOGREQ+3
PUT^XPAR	LOGREQ+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,X Line Location: KILL+2
Function Call: WRITE	Prompt: !,X Line Location: KILLSVR+3
Routine Call	DIE Line Location: RESETSVR+7

Used in RPC

RPC Name	Call Tags
HMPDJFS API	API
HMPDJFS DELSUB	DELSUB

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^HMP(800000 - [#800000]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HMP(800000 - [#800000]	API+9, API+24, API+25, DELPT+2, POST+10, POST+12, POST+13, PROGRESS+3, PROGRESS+8, PROGRESS+9 , PROGRESS+16, RESETSVR+3, RESETSVR+5, RESETSVR+11, RESETSVR+17, HMPSET+2, HMPSET+3, HMPSET+4, HMPKILL+2, HMPKILL+3! , HMPOSET+2, HMPOSET+3, HMPOSET+4, HMPOKILL+2, HMPOKILL+3!
^TMP("HMPDEBUG"	DEBUG+1, DEBUG+2, DEBUG+3*
^TMP("HMPF"	API+2!, API+4, API+15, API+27, API+34*, LOGRSP+1, DELSUB+6!, SETERR+2
^TMP("HMPFERR"	SETERR+5*
^XTMP(	API+23, POST+17, POST+18, POST+19, POST+20, POST+21, POST+22, NEWXTMP+1!, NEWXTMP+2*, PROGRESS+21 , RESETSVR+13, RESETSVR+14!, KILL+2!, KILLSVR+2, KILLSVR+3!
^XTMP("HMPDJFSG "	API+29, API+31
^XTMP("HMPFH~"	DELSUB+15!
^XTMP("HMPFLOG"	LOGREQ+1, LOGREQ+2, LOGREQ+6, LOGREQ+7, LOGREQ+10, LOGREQ+11, LOGRSP+1*
^XTMP("HMPFP"	DELSUB+12, DELSUB+18!, DELSUB+20, RESETSVR+16!, CLEARPAT+1, CLEARPAT+3!, KILLSVR+4, KILLSVR+5!
^XTMP("HMPFX~"	DELSUB+14!

Label References

Name	Line Occurrences
$$DFN	DELSUB+9
$$PID	PIDS+5
$$PROGRESS	API+15
DELPT	DELSUB+19
LOGREQ	API+6
LOGRSP	XAPI+2
NEWXTMP	LOGREQ+5, POST+17
RESETSVR	API+33
SETERR	API+8, API+9, API+38, DELSUB+12, DFN+5, DFN+7
XAPI	API+12, API+16, API+28, API+32, API+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACNT	API+1~
ACT	POST~, POST+20
ARGS	API~, API+6, API+14, API+26, API+30, API+33, API+36, LOGREQ~, LOGREQ+11, DELSUB~ , RESETSVR~
ARGS("command"	API+12, API+16, API+28, API+32, API+35
ARGS("hmpSrvId"	DELSUB+10
ARGS("localId"	API+18*
ARGS("pid"	DELSUB+9
ARGS("server"	API+3, RESETSVR+2
BATCH	DELSUB+5~, DELSUB+11*
CNT	API+1~, POST+8~, POST+13, POST+15, POST+19, PROGRESS+2~, PROGRESS+4, PROGRESS+8, PROGRESS+10, PROGRESS+19* , PROGRESS+21*, PROGRESS+23
CURRDT	PROGRESS+15~, PROGRESS+18*, PROGRESS+19
DA	DELPT+1~, DELPT+3, RESETSVR+1~, RESETSVR+3, RESETSVR+4, RESETSVR+8, RESETSVR+11, HMPSET~, HMPKILL~, HMPOSET~ , HMPOKILL~, HMPOKILL+2
DA(1	DELPT+2, DELPT+4, RESETSVR+8, RESETSVR+10, RESETSVR+11, HMPKILL+2
DATE	POST+8~, POST+9*, POST+16, POST+24
DAYS	NEWXTMP~, NEWXTMP+2
DESC	NEWXTMP~, NEWXTMP+2
DFN	DELSUB+5~, DELSUB+9, DELSUB+11, DELSUB+12, DELSUB+14, DELSUB+15, DELSUB+18, DELSUB+19, DELSUB+20, DELPT~ , DELPT+3, POST~, POST+10, POST+12, POST+13, POST+16, POST+20, PIDS~, PIDS+2, PIDS+5 , PIDS+7, PIDS+8, PID~, PID+1, PID+3, DFN+1~, DFN+3, DFN+4, DFN+5, PROGRESS+2~ , PROGRESS+9*, PROGRESS+11
DIE	RESETSVR+1~, RESETSVR+7*
DIK	DELPT+1~, DELPT+4, RESETSVR+1~, RESETSVR+10
DR	RESETSVR+1~, RESETSVR+7*
ELAPSED	LOGREQ+2~*, LOGREQ+3
FIRST	PROGRESS+2~, PROGRESS+6, PROGRESS+11, PROGRESS+12
HMPFERR	API+1~, DELSUB+9, SETERR+6*
HMPFHMP	API+1~, API+3*, API+6, API+8, API+9, API+20, API+24, API+29, API+31, XAPI+2 , PROGRESS+3, PROGRESS+20
HMPFLOG	API+1~, API+5*, API+6, XAPI+2
HMPFLOG("seq"	LOGREQ+12*, LOGRSP+1
HMPFRSP	API~, API+4, API+30, DELSUB+8, SETERR+2*, SETERR+4
HMPIEN	PROGRESS+2~, PROGRESS+3*, PROGRESS+8, PROGRESS+9, PROGRESS+16
HMPSRV	DELSUB+5~, DELSUB+10, DELSUB+11, DELSUB+12, DELSUB+14, DELSUB+15, DELSUB+18, DELSUB+19, DELSUB+20, POST+8~ , POST+10, POST+11, POST+12, POST+13, POST+16
HMPSRVID	DELSUB+5~
>> HMPSYS	API+7, PIDS+6, PID+2, PID+3, PROGRESS+11
HMPUID	API+22~, API+24*, API+25
HMPX2	API+17~, API+20*, API+23
ID	POST~, POST+15, POST+20
IEN	RESETSVR+1~, HMPSET+1~, HMPSET+2, HMPSET+3, HMPSET+4, HMPOSET+1~, HMPOSET+2, HMPOSET+3
INIT	POST+8~, POST+13, POST+14, POST+16, POST+24
LASTITM	PROGRESS~, PROGRESS+16, PROGRESS+17, PROGRESS+18
LOC	API+13~, API+14, API+15, API+17~, API+23, API+25, API+26, API+27
MSG	SETERR~, SETERR+4, SETERR+5, DEBUG~, DEBUG+2, DEBUG+3
NAME	HMPSET+1~, HMPSET+3, HMPSET+4, HMPKILL+1~, HMPKILL+2, HMPKILL+3, HMPOSET+1~, HMPOSET+3, HMPOSET+4, HMPOKILL+1~ , HMPOKILL+2, HMPOKILL+3
NEW	HMPSET~, HMPOSET~, HMPOSET+4
NEW(1	HMPSET+4
NEW(2	HMPSET+4
NODE	NEWXTMP~, NEWXTMP+1, NEWXTMP+2
NODES	POST~
NODES(	POST+24*
OLD	HMPKILL~
OLD(1	HMPKILL+3
PAT	CLEARDOM~, CLEARPAT~, CLEARPAT+1, CLEARPAT+3
PID	DFN~, DFN+2*, DFN+3, DFN+4, DFN+7, DFN+8
RSLT	PROGRESS+2~, PROGRESS+4, PROGRESS+7, PROGRESS+11, PROGRESS+13, PROGRESS+23*, PROGRESS+24
RSP	DELSUB~, DELSUB+21*
SEQ	LOGREQ+9~, LOGREQ+10, LOGREQ+11, LOGREQ+12, POST+8~, POST+19, POST+20, POST+21, POST+24, PROGRESS+18* , PROGRESS+21, PROGRESS+22*
SERVER	POST~, POST+11
SRV	LOGREQ~, LOGREQ+8, LOGREQ+10, LOGREQ+11, LOGRSP~, LOGRSP+1, DELPT~, DELPT+2, RESETSVR+1~, RESETSVR+2 , RESETSVR+3, RESETSVR+14, RESETSVR+16
SRVIEN	RESETSVR+1~, RESETSVR+4*, RESETSVR+5, RESETSVR+17
STREAM	POST+8~, POST+16*, POST+17, POST+18, POST+19, POST+20, POST+21, POST+22, POST+24
STRM	PROGRESS+15~, PROGRESS+20*, PROGRESS+21
STRMDT	PROGRESS+15~, PROGRESS+18, PROGRESS+19, PROGRESS+20, PROGRESS+22
STS	PROGRESS+2~, PROGRESS+5*, PROGRESS+7, PROGRESS+8, PROGRESS+9
SVR	CLEARDOM~, CLEARPAT~, CLEARPAT+1, CLEARPAT+3, KILLSVR~, KILLSVR+3, KILLSVR+5
TS	PROGRESS+2~, PROGRESS+8*, PROGRESS+9
TYPE	POST~, POST+14, POST+15, POST+20
U	API+25, POST+20, POST+24, NEWXTMP+2, PROGRESS+16, HMPSET+3, HMPKILL+2, HMPOSET+3, HMPOKILL+2
X	PIDS+4~, PIDS+5, PIDS+6, PIDS+7, PIDS+8, PIDS+9, RESETSVR+1~, RESETSVR+13, RESETSVR+14, KILL+1~ , KILL+2, KILLSVR+1~, KILLSVR+2, KILLSVR+3, KILLSVR+4, KILLSVR+5

Customize PDF page

Package: Enterprise Health Management Platform

Routine: HMPDJFS

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 17

Entry Points

External References

Interaction Calls

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: