Routine: HMPDTIU

Package	Total	Call Graph
Text Integration Utility	7	($$CLASS,ISCNSLT)^TIUCNSLT (CPCLASS,ISCP)^TIUCP EXTRACT^TIULQ $$ISA^TIULX ($$CLASS,ISSURG)^TIUSROI ($$RESOLVE,CONTEXT)^TIUSRVLO TGET^TIUSRVR1
Enterprise Health Management Platform	4	($$ESC,$$FAC,$$VUID)^HMPD (RPT1,RPTS)^HMPDLRA (RPT1,RPTS)^HMPDMC (RPT1,RPTS)^HMPDRA
Kernel	1	($$LOW,$$UP)^XLFSTR
Radiology Nuclear Medicine	1	EN1^RAO7PC1
VA FileMan	1	($$GET1,GETS)^DIQ

Package	Total	Caller Graph
Enterprise Health Management Platform	7	HMPDJ08 HMPDLRA HMPDMC HMPDRA HMPDSR HMPDVSIT HMPEVNT

Entry Points

Name	Comments	DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID)	; -- find patient's documents
ENQ	; end
EN1(HMPX,DOC)	; -- return a document in DOC("attribute")=value ; Expects DFN, HMPX=IEN^$$RESOLVE^TIUSRVLO(IEN)
CATG(DA)	; -- Return a code for document type #8925.1 DA
LR()	; -- Return ien of Lab class
SIG(X)	; -- Return Signature Block Name_Title
RPT(HMPY,IFN)	; -- Return text of document in @HMPY@(n)
TEXT(IFN)	; -- Get document IFN text, return temp array name
XML(DOC)	; -- Return patient documents as XML
LOOP()	; -- build sub-items string from NAMES and X
ADD(X)	; Add a line @HMP@(n)=X
SETUP	; -- convert FILTER("attribute") = value to TIU criteria ; Expects: FILTER("category") = code (see $$CATG) ; FILTER("loinc") = LOINC ; FILTER("status") = 'all','completed','unsigned' ; Returns CLASS,[SUBCLASS,TITLE,SERVICE,SUBJECT,STATUS]
MATCH(DOC,SBCLSS,SRVC,SBJCT,NTSBJ)	; Boolean function, Return 1 or 0, if document matches search criteria ; DOC - IEN in TIU DOCUMENT file (#8925) ; SBCLSS - subclass ; SRVC - service ; two pointers to TIU LOINC SUBJECT MATTER DOMAIN (#8926.2): ; SBJCT - subject to include, NTSUBJ - subject to exclude
MQ

Name	Field # of Occurrence
$$GET1^DIQ	EN1+12, MATCH+13, MATCH+17, MATCH+20, MATCH+21
GETS^DIQ	EN1+14
$$ESC^HMPD	XML+14, XML+16, LOOP+2
$$FAC^HMPD	EN1+27
$$VUID^HMPD	EN1+19
RPT1^HMPDLRA	EN+8
RPTS^HMPDLRA	EN+20
RPT1^HMPDMC	EN+7
RPTS^HMPDMC	EN+18
RPT1^HMPDRA	EN+11
RPTS^HMPDRA	EN+19
EN1^RAO7PC1	EN+10
$$CLASS^TIUCNSLT	SETUP+16
ISCNSLT^TIUCNSLT	CATG+2
CPCLASS^TIUCP	SETUP+30
ISCP^TIUCP	CATG+10
EXTRACT^TIULQ	EN1+11
$$ISA^TIULX	CATG+3, CATG+4, CATG+5, CATG+6, CATG+7, CATG+9, CATG+12, MATCH+16
$$CLASS^TIUSROI	SETUP+29
ISSURG^TIUSROI	CATG+11
$$RESOLVE^TIUSRVLO	EN1+7
CONTEXT^TIUSRVLO	EN+23
TGET^TIUSRVR1	RPT+2, TEXT+2
$$LOW^XLFSTR	SETUP+11
$$UP^XLFSTR	SETUP+7

FileNo	Call Tags
^TIU(8925 - [#8925]	GET1^DIQ
^TIU(8925.1 - [#8925.1]	GET1^DIQ
^TIU(8926.1 - [#8926.1]	GET1^DIQ, GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^SC("B"	EN1+26
^TIU(8925.1 - [#8925.1]	LR+1, LR+2
^TMP("HMPD"	EN+26
^TMP("HMPTEXT"	ENQ+1!, EN1+3!, TEXT+3*, TEXT+4
^TMP($J	EN+12!
^VA(200 - [#200]	SIG+1

Name	Line Occurrences
$$CATG	EN1+21
$$LOOP	XML+9, XML+17
$$LR	CATG+12, SETUP+55
$$MATCH	EN+25
$$SIG	EN1+39, EN1+42
$$TEXT	EN1+34
ADD	XML+2, XML+3, XML+5, XML+9, XML+10, XML+13, XML+14, XML+15, XML+18
EN1	EN+13, EN+27
ENQ	EN+6, EN+9, EN+13
MQ	MATCH+8, MATCH+10, MATCH+12, MATCH+14, MATCH+18, MATCH+20, MATCH+22, MATCH+23
SETUP	EN+17
XML	EN+7, EN+8, EN+11, EN+13, EN+28

Name	Field # of Occurrence
^(0	LR+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ATT	XML+1~, XML+3*, XML+4, XML+5, XML+6, XML+7, XML+8, XML+9, XML+10, XML+11 , XML+12, XML+16, XML+17
BEG	EN~, EN+3, EN+10, EN+18, EN+19, EN+20, EN+23
CLASS	EN+16~, EN+18, EN+19, EN+20, EN+21, SETUP+8, SETUP+15, SETUP+16, SETUP+18, SETUP+19* , SETUP+20, SETUP+21, SETUP+22, SETUP+23, SETUP+26, SETUP+29, SETUP+31, SETUP+33, SETUP+36, SETUP+39 , SETUP+42, SETUP+45, SETUP+48, SETUP+51, SETUP+55, SETUP+58, SETUP+61*
CLS	EN+16~, EN+21*, EN+23
CP	SETUP+6~, SETUP+30, SETUP+31, SETUP+33, SETUP+36, SETUP+39, SETUP+42, SETUP+45, SETUP+48, SETUP+51
CTXT	EN+16~, EN+22*, EN+23, MATCH+12
DA	EN1+6~, EN1+7, CATG~, CATG+2, CATG+3, CATG+4, CATG+5, CATG+6, CATG+7, CATG+9 , CATG+10, CATG+11, CATG+12, MATCH+6~, MATCH+8, MATCH+13
DFN	EN~, EN+2*, EN+7, EN+8, EN+10, EN+11, EN+18, EN+19, EN+20, EN+23
DOC	EN1~, EN1+3!, XML~, MATCH~, MATCH+8, MATCH+10, MATCH+12
DOC(	XML+3, XML+4, XML+6, XML+7, XML+11
DOC("category"	EN1+21*
DOC("clinician"	EN1+36, EN1+39, EN1+42*
DOC("content"	EN1+34*
DOC("documentClass"	EN1+22*
DOC("encounter"	EN1+33*
DOC("facility"	EN1+27*
DOC("id"	EN1+10*
DOC("images"	EN1+29*
DOC("localTitle"	EN1+10*
DOC("loinc"	EN1+20*
DOC("nationalTitle"	EN1+15, EN1+19
DOC("parent"	EN1+32*
DOC("referenceDateTime"	EN1+23*
DOC("status"	EN1+28*
DOC("subject"	EN1+30*
DOC("type"	EN1+21*
END	EN~, EN+3, EN+10, EN+18, EN+19, EN+20, EN+23
ES	EN1+2~, EN1+37*
ES(1501	EN1+37, EN1+39
ES(1502	EN1+39
ES(1507	EN1+40, EN1+42
ES(1508	EN1+42
>> FILTER("category"	SETUP+7
>> FILTER("loinc"	EN1+20, SETUP+7
>> FILTER("status"	SETUP+11
FNUM	EN1+13~, EN1+18*, EN1+19
>> HMP	ADD+2
HMPC	EN+16~, EN+21*
HMPCNT	EN+1~, EN+17, EN+21, EN+22, EN+24, EN+28
>> HMPI	ADD+1*, ADD+2
HMPITM	EN+1~, EN+7, EN+8, EN+11, EN+13, EN+27!, EN+28
HMPN	EN+1~, EN+24*, EN+25
HMPS	EN+16~, EN+22*
>> HMPTEXT	EN1+34
HMPTIU	EN1+2~
HMPTIU(	EN1+21, EN1+33, EN1+37
>> HMPTOTL	XML+2*
HMPX	EN+1~, EN+25, EN+26, EN+27, EN1~, EN1+4, EN1+5, EN1+6, EN1+7, EN1+8 , EN1+9, EN1+23, EN1+24, EN1+28, EN1+29, EN1+30, EN1+32, EN1+36
HMPY	EN+1~, EN+23, EN+24, EN+25, EN+29, EN1+2~, RPT~, RPT+2, TEXT+1~, TEXT+2 , TEXT+3
HMSBJMD	MATCH+6~, MATCH+21*, MATCH+22, MATCH+23
I	EN1+2~, EN1+16, EN1+17, EN1+18, EN1+19, EN1+36, EN1+38, EN1+39, EN1+41, EN1+42 , RPT+1~, TEXT+1~, XML+1~, XML+6, XML+7, XML+14, MATCH+15~, MATCH+16*
ID	EN~, EN+6, EN+7, EN+8, EN+9, EN+10, EN+11, EN+13
IEN	EN1+2~, EN1+4*, EN1+10, EN1+11, EN1+12, EN1+21, EN1+33, EN1+34, EN1+37
IENS	EN1+13~, EN1+14*, EN1+15, EN1+17, EN1+19
IFN	RPT~, RPT+2, TEXT~, TEXT+2*, TEXT+3, TEXT+4
J	RPT+1~, TEXT+1~
LOC	EN1+26~*, EN1+27
LOCAL	MATCH+6~, MATCH+13*, MATCH+16, MATCH+17
LOINC	SETUP+6~, SETUP+7*, SETUP+16, SETUP+18, SETUP+23, SETUP+26, SETUP+29, SETUP+32, SETUP+35, SETUP+38 , SETUP+41, SETUP+44, SETUP+47, SETUP+50, SETUP+55, SETUP+58, SETUP+61
MAX	EN~, EN+3*, EN+18, EN+19, EN+20, EN+21, EN+22, EN+23, EN+24
NAME	EN1+2~, EN1+9*, EN1+10
NAMES	XML+1~, XML+7, XML+8, XML+17*, LOOP+2
NATL	MATCH+6~, MATCH+17*, MATCH+18, MATCH+20, MATCH+21
NOTSUBJ	EN+16~, EN+25, SETUP+8, SETUP+49
NTSBJ	MATCH~, MATCH+23
OK	MATCH+6~, MATCH+14, MATCH+15, MATCH+16
P	LOOP+1~, LOOP+2*
SBCLSS	MATCH~, MATCH+14, MATCH+16
SBJCT	MATCH~, MATCH+22
SERVICE	EN+16~, EN+25, SETUP+8, SETUP+18, SETUP+34, SETUP+37, SETUP+40, SETUP+43, SETUP+46, SETUP+48 , SETUP+52*
SHOWADD	EN1+6~*
SRVC	MATCH~, MATCH+20
STATUS	EN+16~, EN+22, SETUP+8, SETUP+12, SETUP+31, SETUP+55, MATCH+10
STR	LOOP+1~, LOOP+2, LOOP+3
STS	SETUP+6~, SETUP+11*, SETUP+12
SUBCLASS	EN+16~, EN+25, SETUP+8, SETUP+16, SETUP+19, SETUP+20, SETUP+21, SETUP+22, SETUP+23*
SUBJECT	EN+16~, EN+25, SETUP+8, SETUP+34, SETUP+37, SETUP+40, SETUP+43, SETUP+46
TAG	LOOP+1~, LOOP+2*
TITLE	EN+16~, SETUP+8*, MATCH+18
TIU	EN1+13~
TIU(	EN1+15, EN1+17, EN1+19
TYPE	XML+1~, SETUP+6~, SETUP+7*, SETUP+15, SETUP+16, SETUP+19, SETUP+20, SETUP+21, SETUP+22, SETUP+23 , SETUP+26, SETUP+29, SETUP+31, SETUP+55, SETUP+58, SETUP+61
U	EN+21, EN+22, EN1+7, EN1+8, EN1+9, EN1+15, EN1+18, EN1+19, EN1+20, EN1+23 , EN1+24, EN1+28, EN1+29, EN1+30, EN1+32, EN1+36, EN1+39, EN1+42, LR+2, SIG+2 , LOOP+2, MATCH+10, MATCH+12, MATCH+16, MATCH+18, MATCH+20, MATCH+22, MATCH+23
X	EN1+2~, EN1+12, EN1+14, EN1+21, EN1+22, EN1+24, EN1+26, EN1+28, EN1+36, CATG+1~ , CATG+2, CATG+10, CATG+11, SIG~, SIG+1, XML+1~, XML+7, XML+11, XML+14, XML+16 , XML+17, LOOP+2, ADD~, ADD+2, MATCH+15~, MATCH+16
X20	SIG+1~*, SIG+2
Y	EN1+13~, EN1+17, EN1+19, LR+1~, LR+2, LR+3, SIG+1~, SIG+2, SIG+3, TEXT+1~ , TEXT+4, TEXT+5, XML+1~, XML+3, XML+4, XML+9, XML+11, XML+12, XML+13, XML+14* , XML+16, XML+17, MATCH+6~, MATCH+8, MATCH+24, MQ

Customize PDF page

Package: Enterprise Health Management Platform

Routine: HMPDTIU

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 7

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: