Routine: TIUPEVNT

Package	Total	Call Graph
Text Integration Utility	10	$$NOW^TIULC $$FIXCODE^TIULC1 GETTIU^TIULD SETPARM^TIULE ($$DATE,$$NAME)^TIULS (FIELDS,WHOGETS)^TIUPEVN1 BUFPURGE^TIUPUTC $$WHATITLE^TIUPUTU $$READ^TIUU ($$MAKEBUF,FILE)^TIUUPLD
VA Fileman	3	^DIC ^DIE EN^DIWE
Kernel	2	$$REPLACE^XLFSTR (DELETEA,SETUP)^XQALERT

Package	Total	Caller Graph
Text Integration Utility	11	TIUCPFIX TIUFIX1 TIUPEFIX TIUPUTA TIUPUTC TIUPUTC1 TIUPUTD TIUPUTS TIUPUTSX TIURE TIUTSK

Entry Points

Name	Comments	DBIA/ICR reference
ERRMSX
INQRHELP	; Help for Upload Error Inquire to Patient Record prompt
LOG(BUFDA,ETYPE,ECODE,TIUTYPE,EVNTDA,FDA,MSG)	; ---- Register event in ; TIU UPLOAD LOG file ; (#8925.4)
ERRMSG(ETYPE,ECODE,TIUTYPE,FDA,MSG)	; ---- Set error messages
MAIN(BUFDA,ETYPE,ECODE,TIUTYPE,FDA,MSG)	; ---- Controls branching
ALERTDEL(DA)	; ---- Delete alerts associated with a given record
DISPX
WRITEHDR(EVNTDA)	; ---- Write header to screen
ALERT(BUFDA,ERRMSG,EVNTDA)	; ---- Send alerts for filing errors
RESOLVE(EVNTDA,ECHO)	; ---- Indicate resolution of error
DISPLAY	; ---- Alert followup action for filing errors
GETHRCN()	; IHS/ITSC/LJF 02/26/2003 pull chart # from upload header

External References

Name	Field # of Occurrence
^DIC	LOG+5, LOG+35, ERRMSG+7
^DIE	LOG+10, LOG+30, RESOLVE+10
EN^DIWE	DISPLAY+26
$$NOW^TIULC	LOG+5, RESOLVE+3
$$FIXCODE^TIULC1	DISPLAY+12
GETTIU^TIULD	ERRMSG+12
SETPARM^TIULE	DISPLAY+3
$$DATE^TIULS	ERRMSG+15
$$NAME^TIULS	ERRMSG+13
FIELDS^TIUPEVN1	MAIN+6
WHOGETS^TIUPEVN1	ALERT+7
BUFPURGE^TIUPUTC	DISPLAY+37
$$WHATITLE^TIUPUTU	ALERT+5
$$READ^TIUU	DISPLAY+15, DISPLAY+25, DISPLAY+27, DISPLAY+36
$$MAKEBUF^TIUUPLD	LOG+18
FILE^TIUUPLD	DISPLAY+33
$$REPLACE^XLFSTR	GETHRCN+3
DELETEA^XQALERT	ALERTDEL+2
SETUP^XQALERT	ALERT+20

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DISPLAY+15
Function Call: WRITE	Prompt: !!,"Filing error resolution code could not be found for this document type.",!,"Please edit the buffered data directly and refile." Line Location: DISPLAY+20
Function Call: WRITE	Prompt: !!,"You may now edit the buffered upload data in an attempt to resolve error:",!,$P(XQADATA,";",2),! Line Location: DISPLAY+24
Function Call: WRITE	Prompt: !!,"The header of the original, failed record looks like this:",! Line Location: WRITEHDR+5
Function Call: WRITE	Prompt: !,$G(^TIU(8925.4,+EVNTDA,"HEAD",TIUI,0)) Line Location: WRITEHDR+7
Function Call: WRITE	Prompt: !,"Do you wish to be prompted for the data necessary to resolve the filing error?" Line Location: INQRHELP+1
Function Call: WRITE	Prompt: !,"If not, answer NO to proceed and edit the buffered data directly without" Line Location: INQRHELP+2
Function Call: WRITE	Prompt: !,"prompts, or enter '^' to come back and resolve the error later." Line Location: INQRHELP+3
Routine Call	DIE Line Location: LOG+10 LOG+30 RESOLVE+10
Routine Call	DIC Line Location: LOG+5 LOG+35 ERRMSG+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^TIU(8925.4 - [#8925.4]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TIU(8925.2 - [#8925.2]	LOG+4, LOG+15, LOG+21, LOG+23!, LOG+24, LOG+26, LOG+27!, LOG+28, LOG+32*, ALERT+2 , GETHRCN+2
^TIU(8925.4 - [#8925.4]	LOG+13, LOG+15, LOG+16*, WRITEHDR+6, WRITEHDR+7, RESOLVE+7
^TIU(8925.99 - [#8925.99]	ALERT+11, ALERT+12, ALERT+13
^VA(200 - [#200]	ALERTDEL+2

Label References

Name	Line Occurrences
$$ERRMSG	LOG+8
$$GETHRCN	ERRMSG+9
ALERT	LOG+38
ALERTDEL	DISPLAY+31, DISPLAY+37
DISPX	DISPLAY+9, DISPLAY+25
ERRMSX	ERRMSG+2, ERRMSG+6, ERRMSG+11
LOG	MAIN+5
RESOLVE	DISPLAY+19, DISPLAY+32
WRITEHDR	DISPLAY+10

Naked Globals

Name	Field # of Occurrence
^(	GETHRCN+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BUFDA	MAIN~, MAIN+5, LOG~, LOG+4, LOG+15, LOG+23, LOG+24, LOG+26, LOG+27, ALERT~ , ALERT+2, ALERT+15, ALERT+18, GETHRCN+2
BUFREC	LOG+3~, LOG+4, LOG+9, ALERT+1~, ALERT+2
DA	LOG+3~, LOG+8, LOG+10!, LOG+30, ERRMSG+1~, ERRMSG+12~, ALERTDEL~, ALERTDEL+1, ALERTDEL+2, RESOLVE+1~ , RESOLVE+5, RESOLVE+7
DA(1	LOG+33*
DELETE	DISPLAY+35~, DISPLAY+36*, DISPLAY+37
DIC	LOG+3~, LOG+5, LOG+8, LOG+33, LOG+36!, ERRMSG+1~, ERRMSG+7, DISPLAY+1~, DISPLAY+26
DIC(0	LOG+5, LOG+33, ERRMSG+7*
DIE	LOG+3~, LOG+8, LOG+30, ERRMSG+1~, RESOLVE+1~, RESOLVE+4*
>> DIRUT	DISPLAY+16
DLAYGO	LOG+3~, LOG+5, LOG+32, LOG+36!
DR	LOG+3~, LOG+9, LOG+30, RESOLVE+1~, RESOLVE+9*
DT	LOG+13, LOG+21
DUZ(2	LOG+9, ALERT+11
DWPK	DISPLAY+1~, DISPLAY+26*
ECHO	RESOLVE~, RESOLVE+2
ECODE	MAIN~, MAIN+5, LOG~, LOG+8, ERRMSG~, ERRMSG+6, ERRMSG+7
ERRMSG	LOG+3~, LOG+8*, LOG+9, LOG+38, ALERT~, ALERT+16, ALERT+18
ETYPE	MAIN~, MAIN+5, MAIN+6, LOG~, LOG+8, LOG+9, LOG+11, ERRMSG~, ERRMSG+2, ERRMSG+6
EVNTDA	MAIN+1~, MAIN+5, MAIN+6, LOG~, LOG+8, LOG+13, LOG+15, LOG+16, LOG+30, LOG+34 , LOG+38, ALERT~, ALERT+18, DISPLAY+1~, DISPLAY+5, WRITEHDR~, WRITEHDR+6, WRITEHDR+7, RESOLVE~, RESOLVE+5
FDA	MAIN~, MAIN+5, LOG~, LOG+8, ERRMSG~
FDA(8925	ERRMSG+12
I	GETHRCN+1~, GETHRCN+2*
INQUIRE	DISPLAY+1~, DISPLAY+15*, DISPLAY+17, DISPLAY+22
MSG	MAIN~, MAIN+5, MAIN+6, LOG~, LOG+8, ERRMSG~
MSG("DIERR"	ERRMSG+11, ERRMSG+17
NEWBUF	LOG+3~, LOG+18*, LOG+19, LOG+21, LOG+23, LOG+26, LOG+28, LOG+30, LOG+32, LOG+33 , LOG+38
PRFILERR	DISPLAY+2~, DISPLAY+29*
RESCODE	DISPLAY+1!, DISPLAY+12*, DISPLAY+14, DISPLAY+17
RESTIME	RESOLVE+1~, RESOLVE+3*, RESOLVE+9
RETRY	DISPLAY+1~, DISPLAY+27*, DISPLAY+29, DISPLAY+31, DISPLAY+32, DISPLAY+33, DISPLAY+35
TIU	ERRMSG+12~, DISPLAY+1~
TIU("EDT"	ERRMSG+15
TIU("PID"	ERRMSG+15
TIU("PNM"	ERRMSG+13
TIUBLIN	LOG+20~
TIUBUF	DISPLAY+2~, DISPLAY+8*, DISPLAY+26, DISPLAY+31, DISPLAY+33
TIUDAD	ALERT+7~
TIUDONE	DISPLAY+1!, DISPLAY+9, DISPLAY+19
TIUEVNT	DISPLAY+2~, DISPLAY+5*, DISPLAY+9, DISPLAY+10, DISPLAY+19, DISPLAY+32
>> TIUFRST	LOG+14, LOG+22
>> TIUHDR(	ERRMSG+4
>> TIUHDR("TIUTITLE"	ERRMSG+14, ALERT+5
>> TIUHSIG	LOG+24
TIUI	LOG+14, LOG+26, ALERT+1~, ALERT+11, ALERT+12, ALERT+13, WRITEHDR+3~, WRITEHDR+4, WRITEHDR+6, WRITEHDR+7 , RESOLVE+1~
>> TIUINST	LOG+9
TIUJ	LOG+20~, LOG+22, LOG+23, LOG+24, LOG+26, LOG+27
TIUK	LOG+3~, LOG+14*, LOG+15
TIUL	LOG+3~, LOG+14, LOG+15, LOG+16, LOG+20~, LOG+22, LOG+23, LOG+25, LOG+26, LOG+28
>> TIUPRM0	LOG+14, DISPLAY+3
>> TIUPRM1	DISPLAY+3
>> TIUREC("FILE"	ERRMSG+4
>> TIUREC("TYPE"	ALERT+6, ALERT+18
TIUSKIP	DISPLAY+2~, DISPLAY+9, DISPLAY+16*
TIUSUB	ALERT+1~, ALERT+12*, ALERT+13
>> TIUTITLE	ERRMSG+3
TIUTYPE	MAIN~, MAIN+5, LOG~, LOG+8, LOG+9, ERRMSG~, ERRMSG+3, ERRMSG+4, ERRMSG+9, ERRMSG+14* , ERRMSG+15, DISPLAY+1!, DISPLAY+11*, DISPLAY+12
TYPE	ALERT+1~, ALERT+5, ALERT+6, ALERT+7
U	LOG+9, LOG+14, LOG+16, LOG+28, ERRMSG+9, DISPLAY+22, RESOLVE+7
X	LOG+3~, LOG+5, LOG+34, ERRMSG+1~, ERRMSG+7, RESOLVE+1~, GETHRCN+1~, GETHRCN+2, GETHRCN+3
XQA	ALERT+1~, ALERT+7, ALERT+10, ALERT+14, ALERTDEL+1~
XQA(	ALERT+13*
XQADATA	ALERT+1~, ALERT+18*, DISPLAY+5, DISPLAY+8, DISPLAY+11, DISPLAY+24, DISPLAY+37
XQAID	ALERT+1~, ALERT+15, ALERTDEL+1~, ALERTDEL+2*
XQAKILL	ALERT+1~, DISPLAY+1!, ALERTDEL+1~
XQAMSG	ALERT+1~, ALERT+16*, ALERT+17
XQAROU	ALERT+1~, ALERT+19*
XQX1	DISPLAY+22!, DISPX!
Y	LOG+3~, LOG+6, LOG+8, ERRMSG+1~, ERRMSG+2, ERRMSG+9, ERRMSG+13, ERRMSG+15, ERRMSG+17*, ERRMSX , RESOLVE+1~, GETHRCN+1~, GETHRCN+3
Y(" "	GETHRCN+3*
Y(0	ERRMSG+9
Z	GETHRCN+1~, GETHRCN+2, GETHRCN+3*, GETHRCN+4
>> ZTQUEUED	ALERT+17

Customize PDF page

Package: Text Integration Utility

Routine: TIUPEVNT

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: