Routine: TIUSRVP

Package	Total	Call Graph
Text Integration Utility	22	SEND^TIUALRT SENDID^TIUALRT1 (ISCNSLT,ROLLBACK)^TIUCNSLT $$CLASS^TIUCP UPDTIRT^TIUDIRT (DELAUDIT,MERGTEXT)^TIUEDI1 ($$COMMIT,$$DIVISION,$$DOCCLASS)^TIULC1 GETTIU^TIULD $$CANDO^TIULP PATVADPT^TIULV $$ISA^TIULX MAIN^TIUMOVE UNLINK^TIUPRF1 $$ISPFTTL^TIUPRFL QUE^TIUPXAP1 (DELTEXT,DIK)^TIURB2 NEEDJUST^TIUSRVA ($$STATUS,EVENT,STUFREC)^TIUSRVP1 (MAKEADD,SETCOS,SIGN)^TIUSRVP2 RELEASE^TIUT (ANPKGMSG,NOTIFY)^TIUUTL (DEFER,MAIN)^TIUVSIT
VA FileMan	3	$$EZBLD^DIALOG ^DIC (,FILE)^DIE
Kernel	1	$$FMADD^XLFDT

Package	Total	Caller Graph
Text Integration Utility	23	TIU ANCILLARY PACKAGE MESSAGE TIU CREATE ADDENDUM RECORD TIU CREATE RECORD TIU DELETE RECORD TIU LOCK RECORD TIU SIGN RECORD TIU UNLOCK RECORD TIU UPDATE RECORD TIUAPIOK TIUCCRHL7P2 TIUCCRHL7P3 TIUHL7P2 TIUHL7P3 TIUHL7U1 TIUHL7U2 TIUP271 TIUPNAPI TIUPXAP3 TIURD2 TIUSROI TIUSRVP1 TIUSRVP2 TIUSRVPT
Surgery	9	SR100UTL SROARPT SROESAD SROESX SROESX0 SROESXA SROESXP SROHIS SRONIN
Clinical Procedures	7	MDCLIO1 MDCVT1 MDHL7XXX MDRPCNT1 MDRPCOT MDRPCOT2 MDRPCOTH
Order Entry Results Reporting	4	ORPDMPNT ORVIMM ORWPCE ORWPCE1
Imaging	2	MAGGNTI1 MAGGNTI3
Mental Health	2	YTQCONS YTQTIU
VistA Integration Adapter	2	VIABRPC VIABRPC7
Lab Service	1	LRAPRES1

Entry Points

Name	Comments	DBIA/ICR reference
MAKE(SUCCESS,DFN,TITLE,VDT,VLOC,VSIT,TIUX,VSTR,SUPPRESS,NOASF)	; New Document ; SUCCESS = (by ref) TIU DOCUMENT # (PTR to 8925) ; = 0^Explanatory message if no SUCCESS ; DFN = Patient (#2) ; TITLE = TIU Document Definition (#8925.1) ; [VDT] = Date(/Time) of Visit ; [VLOC] = Visit Location (HOSPITAL LOCATION) ; [VSIT] = Visit file ien (#9000010) ; [VSTR] = Visit string (i.e., VLOC;VDT;VTYPE) ; [NOASF] = if 1=Do Not Set ASAVE cross-reference ; TIUX = (by ref) array containing field data and document body
VSTRBLD(VSIT)	; Given Visit ien, build Visit-Descriptor String
SETXT0(TIUDA)	; Set root node of "TEMP" WP-field
MAKEADD(TIUDADD,TIUDA,TIUX,SUPPRESS)	; Create addendum ; For backward compatibility ; Use MAKEADD^TIUSRVP2 now, please
UPDATE(SUCCESS,TIUDA,TIUX,SUPPRESS)	; Update existing Document
SETCOS(TIUDA,TIUX,TIUD0,TIUD12)	; set cosig req ; For backward compatibility ; Use SETCOS^TIUSRVP2 now, please
UPDSTAT(DA,TITLE)	; Update status on commit
GETREC(DFN,TIU,TITLE,TIUNEW)	; Get/create document record
FILE(SUCCESS,TIUDA,TIUX,SUPPRESS,TIUCPF)	; Call FM Filer & commit
SIGN(ERR,TIUDA,TIUX)	; API for /es/ ; For backward compatibility ; Use SIGN^TIUSRVP2 now, please
DELETE(ERR,TIUDA,TIURSN,OVRRIDE)	; delete document
ANPKGMSG(RETURN,TIUDA,TIUACT)	; return ancillary packages' message(s)
LOCK(ERR,TIUDA)	; Bid for lock on a TIU Document record
UNLOCK(ERR,TIUDA)	; Decrement Lock on a TIU Document record

External References

Name	Field # of Occurrence
$$EZBLD^DIALOG	MAKE+32, MAKE+35, DELETE+4
^DIC	GETREC+4
^DIE	UPDATE+44, UPDSTAT+4, GETREC+11
FILE^DIE	FILE+11
SEND^TIUALRT	UPDATE+48
SENDID^TIUALRT1	UPDATE+48
ISCNSLT^TIUCNSLT	UPDATE+26
ROLLBACK^TIUCNSLT	UPDATE+22, UPDATE+27
$$CLASS^TIUCP	UPDATE+18
UPDTIRT^TIUDIRT	MAKE+49, UPDATE+49
DELAUDIT^TIUEDI1	DELETE+11
MERGTEXT^TIUEDI1	MAKE+44, UPDATE+36
$$COMMIT^TIULC1	FILE+17
$$DIVISION^TIULC1	MAKE+31
$$DOCCLASS^TIULC1	UPDATE+25, GETREC+10
GETTIU^TIULD	UPDATE+33, DELETE+5
$$CANDO^TIULP	DELETE+3
PATVADPT^TIULV	MAKE+22
$$ISA^TIULX	UPDATE+18
MAIN^TIUMOVE	MAKE+20, MAKE+26
UNLINK^TIUPRF1	UPDATE+32
$$ISPFTTL^TIUPRFL	UPDATE+29
QUE^TIUPXAP1	MAKE+46
DELTEXT^TIURB2	DELETE+9
DIK^TIURB2	MAKE+43, DELETE+10
NEEDJUST^TIUSRVA	ANPKGMSG+8
$$STATUS^TIUSRVP1	UPDSTAT+1
EVENT^TIUSRVP1	MAKE+30
STUFREC^TIUSRVP1	MAKE+37
MAKEADD^TIUSRVP2	MAKEADD+3
SETCOS^TIUSRVP2	UPDATE+19, SETCOS+3
SIGN^TIUSRVP2	SIGN+3
RELEASE^TIUT	MAKE+48
ANPKGMSG^TIUUTL	ANPKGMSG+10
NOTIFY^TIUUTL	DELETE+12
DEFER^TIUVSIT	MAKE+45
MAIN^TIUVSIT	MAKE+28
$$FMADD^XLFDT	MAKE+17, MAKE+24

Used in RPC

RPC Name	Call Tags
TIU SIGN RECORD	SIGN
TIU UPDATE RECORD	UPDATE
TIU CREATE ADDENDUM RECORD	MAKEADD
TIU CREATE RECORD	MAKE
TIU DELETE RECORD	DELETE
TIU LOCK RECORD	LOCK
TIU UNLOCK RECORD	UNLOCK
TIU ANCILLARY PACKAGE MESSAGE	ANPKGMSG

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	VSTRBLD+2
^SC - [#44]	MAKE+20, MAKE+26
^TIU(8925 - [#8925]	MAKE+38, MAKE+39!, MAKE+40, MAKE+44, MAKE+50!, SETXT0+2, SETXT0+3, SETXT0+4, UPDATE+2, UPDATE+4 , UPDATE+7!, UPDATE+8, UPDATE+10, UPDATE+12*, UPDATE+15, UPDATE+31!, UPDATE+34, UPDATE+35!, UPDATE+37!, UPDATE+40 , UPDATE+48, UPDSTAT+2, FILE+17, FILE+19!, DELETE+6, ANPKGMSG+5, LOCK+1, UNLOCK+1
^TIU(8925.1 - [#8925.1]	ANPKGMSG+10
^TMP("TIUDOCDIS"	ANPKGMSG+13, ANPKGMSG+15, ANPKGMSG+16, ANPKGMSG+17!

Label References

Name	Line Occurrences
$$GETREC	MAKE+34
$$VSTRBLD	MAKE+14
FILE	MAKE+42, UPDATE+30
SETXT0	MAKE+41
UPDSTAT	UPDATE+47

Naked Globals

Name	Field # of Occurrence
^(12	UPDATE+15
^(14	UPDATE+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	UPDATE+42~, UPDATE+44, UPDSTAT~, UPDSTAT+1, UPDSTAT+2, GETREC+1~, GETREC+2, GETREC+6, GETREC+12, FILE+15~ , FILE+16
DFN	MAKE~, MAKE+20, MAKE+22, MAKE+26, MAKE+28, MAKE+30, MAKE+32, MAKE+34, MAKE+37, GETREC~
DIC	GETREC+1~, GETREC+3*
DIC("S"	GETREC+4!
DIC(0	GETREC+3*
DIE	UPDATE+42~, UPDATE+44, UPDSTAT+1~, UPDSTAT+3, GETREC+1~, GETREC+7~*
DLAYGO	GETREC+1~, GETREC+3*
DR	UPDATE+42~, UPDATE+43, UPDSTAT+1~, UPDSTAT+2, GETREC+1~, GETREC+7~, GETREC+10
DT	SETXT0+4, UPDATE+12
DUZ	MAKE+38, FILE+19
ERR	SIGN~, SIGN+3, DELETE~, DELETE+1, DELETE+4, LOCK~, LOCK+1, LOCK+2, UNLOCK~, UNLOCK+1*
FDA	FILE+1~
FDARR	FILE+1~, FILE+2*, FILE+10
FLAGS	FILE+1~, FILE+2*, FILE+11
IENS	FILE+1~, FILE+2*
LDT	MAKE+12~, MAKE+17, MAKE+20, MAKE+24, MAKE+26, MAKE+28
NEWREC	MAKE+12~, MAKE+34
NOASF	MAKE~, MAKE+38
OVRRIDE	DELETE~, DELETE+2
PRFUNLNK	UPDATE+1~, UPDATE+29*, UPDATE+32
RETURN	ANPKGMSG~
RETURN(	ANPKGMSG+14, ANPKGMSG+16
RETURN(0	ANPKGMSG+2, ANPKGMSG+3, ANPKGMSG+6*
SUCCESS	MAKE~, MAKE+13, MAKE+32, MAKE+35, MAKE+36, MAKE+42, MAKE+43, UPDATE~, UPDATE+3, UPDATE+5 , UPDATE+14, UPDATE+30, UPDATE+31, UPDATE+38, FILE~, FILE+12, FILE+13
SUPPRESS	MAKE~, MAKE+42, MAKE+47, MAKEADD~, MAKEADD+3, UPDATE~, UPDATE+14, UPDATE+30, UPDATE+46, FILE~ , FILE+14
TITLE	MAKE~, MAKE+34, MAKE+37, UPDATE+1~, UPDATE+15*, UPDATE+18, UPDATE+26, UPDATE+29, UPDSTAT~, UPDSTAT+1 , GETREC~, GETREC+4
TIU	MAKE+12~, MAKE+20, MAKE+22, MAKE+26, MAKE+28, MAKE+30, MAKE+32, MAKE+34, MAKE+37, MAKE+44 , MAKE+49, UPDATE+1~, UPDATE+33, UPDATE+36, UPDATE+49, GETREC~, DELETE+1~, DELETE+5, DELETE+12
TIU("CAT"	GETREC+9
TIU("INST"	MAKE+31*, GETREC+10
TIU("LOC"	MAKE+31, GETREC+10
TIU("STOP"	MAKE+45
TIU("VISIT"	GETREC+8
TIU("VLOC"	GETREC+10
TIU("VSTR"	MAKE+29, GETREC+9
TIUACT	ANPKGMSG~, ANPKGMSG+1, ANPKGMSG+3, ANPKGMSG+7, ANPKGMSG+9, ANPKGMSG+10
TIUAPKG	ANPKGMSG+11~, ANPKGMSG+13*, ANPKGMSG+14, ANPKGMSG+15, ANPKGMSG+16
TIUBY	UPDATE+42~*, UPDATE+43
TIUC	SETXT0+1~, SETXT0+3, SETXT0+4, UPDATE+1~, UPDATE+9, UPDATE+11, UPDATE+12
TIUCC	UPDATE+1~, UPDATE+21*, UPDATE+22
TIUCMMTX	FILE+1~, FILE+17*, FILE+18
TIUCPF	UPDATE+1~, UPDATE+18*, UPDATE+30, FILE~, FILE+7
TIUD0	UPDATE+1~, UPDATE+15, UPDATE+19, UPDATE+24, UPDATE+47, SETCOS~, SETCOS+3, DELETE+1~, DELETE+6, DELETE+7 , DELETE+12, ANPKGMSG+4~, ANPKGMSG+5*, ANPKGMSG+6, ANPKGMSG+10
TIUD12	UPDATE+1~, UPDATE+15*, UPDATE+19, SETCOS~, SETCOS+3
TIUD14	UPDATE+1~, UPDATE+15*, UPDATE+21
TIUD15	UPDATE+1~, UPDATE+40*, UPDATE+41, UPDATE+42
TIUDA	MAKE+12~, MAKE+34, MAKE+35, MAKE+36, MAKE+37, MAKE+38, MAKE+39, MAKE+40, MAKE+41, MAKE+42 , MAKE+43, MAKE+44, MAKE+45, MAKE+48, MAKE+49, MAKE+50, SETXT0~, SETXT0+2, SETXT0+3, SETXT0+4 , MAKEADD~, MAKEADD+3, UPDATE~, UPDATE+2, UPDATE+4, UPDATE+5, UPDATE+7, UPDATE+8, UPDATE+10, UPDATE+12 , UPDATE+14, UPDATE+15, UPDATE+19, UPDATE+22, UPDATE+27, UPDATE+30, UPDATE+31, UPDATE+32, UPDATE+33, UPDATE+34 , UPDATE+35, UPDATE+36, UPDATE+37, UPDATE+38, UPDATE+40, UPDATE+44, UPDATE+47, UPDATE+48, UPDATE+49, SETCOS~ , SETCOS+3, FILE~, FILE+2, FILE+13, FILE+16, FILE+17, FILE+19, SIGN~, SIGN+3, DELETE~ , DELETE+3, DELETE+5, DELETE+6, DELETE+9, DELETE+10, DELETE+11, DELETE+12, ANPKGMSG~, ANPKGMSG+1, ANPKGMSG+2 , ANPKGMSG+5, ANPKGMSG+6, ANPKGMSG+8, ANPKGMSG+10, LOCK~, LOCK+1, UNLOCK~, UNLOCK+1
TIUDADD	MAKEADD~, MAKEADD+3
TIUDEL	DELETE+1~, DELETE+2, DELETE+3*, DELETE+4
TIUDPRM	GETREC+1~
TIUFLAG	UPDATE+1~, UPDATE+22, UPDATE+27
TIUFPRIV	GETREC+1~, GETREC+2*
TIUHIT	GETREC+1~, GETREC+2*
TIUI	SETXT0+1~, SETXT0+2, SETXT0+3, UPDATE+1~, UPDATE+9, UPDATE+10
TIUJUST	ANPKGMSG+4~, ANPKGMSG+8, ANPKGMSG+9
TIULINE	ANPKGMSG+11~, ANPKGMSG+15*, ANPKGMSG+16
TIUMLINE	ANPKGMSG+11~, ANPKGMSG+12, ANPKGMSG+14, ANPKGMSG+16*
TIUMSG	FILE+1~, FILE+12
TIUMSG("DIERR"	FILE+12
TIUNEW	GETREC~, GETREC+6*
TIURSN	DELETE~, DELETE+8*, DELETE+9
TIUSCAT	GETREC+1~, GETREC+9*, GETREC+10
TIUVISIT	GETREC+7~, GETREC+8*
TIUX	MAKE~, MAKE+37, MAKE+42, MAKEADD~, MAKEADD+3, UPDATE~, UPDATE+19, UPDATE+30, SETCOS~, SETCOS+3 , FILE~, FILE+10, SIGN~, SIGN+3
TIUX(	UPDATE+24, UPDATE+25*, UPDATE+29, UPDATE+47
TIUX(""	UPDATE+14
TIUX("1405"	UPDATE+22
TIUX("TEXT"	MAKE+40!, UPDATE+6, UPDATE+8, UPDATE+13!
TIUX(1202	FILE+3, FILE+7
TIUX(1204	FILE+3*
TIUX(1208	FILE+4*
TIUX(1209	FILE+4
TIUX(1301	FILE+9*
TIUX(1302	FILE+7*
TIUY	VSTRBLD+1~, VSTRBLD+4, VSTRBLD+5, UPDATE+1~, UPDATE+26, UPDATE+27
U	MAKE+20, MAKE+26, VSTRBLD+2, VSTRBLD+3, SETXT0+4, UPDATE+4, UPDATE+12, UPDATE+42, UPDATE+47, UPDSTAT+2 , GETREC+5, GETREC+6, GETREC+9, GETREC+10, FILE+12, DELETE+7, DELETE+12, ANPKGMSG+3, ANPKGMSG+10, ANPKGMSG+14
VDT	MAKE~, MAKE+16, MAKE+17, MAKE+20, MAKE+23, MAKE+24, MAKE+26, MAKE+28, VSTRBLD+1~, VSTRBLD+2* , VSTRBLD+4
VLOC	MAKE~, MAKE+18, MAKE+20, MAKE+23, MAKE+26, MAKE+28, VSTRBLD+1~, VSTRBLD+2, VSTRBLD+4
VSIT	MAKE~, MAKE+14, MAKE+23, VSTRBLD~, VSTRBLD+2
VSIT0	VSTRBLD+1~, VSTRBLD+2*, VSTRBLD+3
VSTR	MAKE~, MAKE+14*, MAKE+15, MAKE+16, MAKE+18, MAKE+22, MAKE+23
VSVCAT	VSTRBLD+1~, VSTRBLD+3*, VSTRBLD+4
X	UPDATE+42~, GETREC+1~, GETREC+4*
Y	UPDATE+42~, GETREC+1~, GETREC+5, GETREC+6, GETREC+10

Customize PDF page

Package: Text Integration Utility

Routine: TIUSRVP

Information

Source Information

Call Graph

Call Graph Total: 26

Caller Graph

Caller Graph Total: 50

Entry Points

External References

Used in RPC

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: