Routine: TIUPUTA

Package	Total	Call Graph
Text Integration Utility	10	$$PATIENT^TIULA $$POSTFILE^TIULC1 SETPARM^TIULE ($$NAME,$$SSN)^TIULO ($$NAME,$$STRIP)^TIULS $$TRNSFRM^TIUPEFIX (ALERTDEL,MAIN,RESOLVE)^TIUPEVNT BUFPURGE^TIUPUTC $$WHATYPE^TIUPUTU $$READ^TIUU
VA Fileman	3	^DIC FILE^DIE EN^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
FILE(SUCCESS,AMIEDA,TIUX,RTYPE)	; Call FM Filer to commit updates to DB
FIXX
LOOKUPX
FIX	; Filing error resolution code for C&P's
LOADTIUX(TIUARR,TIUBUF)	; Load TIUX array with header and text
ADDTEXT(AMIEDA,TIUX)	; File Text
CALLDIC(TIUX)	; Call ^DIC
LOOKUP	; Look-up code used by router/filer ; Required: TIUCPFN, TIUSSN
FOLLOWUP(TIUDA)	; Post-filing code for C&P's
DICW(TIUDA)	; Write identifiers

External References

Name	Field # of Occurrence
^DIC	CALLDIC+2, FIX+12
FILE^DIE	FOLLOWUP+4, FILE+4
EN^DIQ	FIX+13
$$PATIENT^TIULA	LOOKUP+8
$$POSTFILE^TIULC1	FIX+23
SETPARM^TIULE	LOADTIUX+1
$$NAME^TIULO	DICW+3
$$SSN^TIULO	DICW+3
$$NAME^TIULS	DICW+3
$$STRIP^TIULS	LOADTIUX+7, LOADTIUX+21
$$TRNSFRM^TIUPEFIX	LOADTIUX+22
ALERTDEL^TIUPEVNT	FIXX
MAIN^TIUPEVNT	LOADTIUX+8, FILE+7
RESOLVE^TIUPEVNT	FIXX+1
BUFPURGE^TIUPUTC	FIXX+2
$$WHATYPE^TIUPUTU	LOADTIUX+7
$$READ^TIUU	FIX+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"YOU MUST EDIT THE UPLOAD BUFFER TO FIX THE FILING ERROR" Line Location: FIX+3
Function Call: WRITE	Prompt: ! Line Location: FIX+9
Function Call: WRITE	Prompt: ! Line Location: FIX+13
Function Call: WRITE	Prompt: "Done." Line Location: FIXX+3
Function Call: WRITE	Prompt: ?10,$$NAME^TIULS($$NAME^TIULO(+DVBCPR0),"LAST,FIRST MI")," ",?37,$$SSN^TIULO(+DVBCPR0)," ",?52,$P(^DVB(396.6,+$P(DVBCP0,U,3),0),U,2) Line Location: DICW+3
Routine Call	DIC Line Location: CALLDIC+2 FIX+12
Routine Call	DIE Line Location: FOLLOWUP+4 FILE+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DVB(396.3	LOOKUP+13, DICW+2
^DVB(396.4	LOOKUP+9, DICW+2, ADDTEXT+1, ADDTEXT+3, ADDTEXT+4
^DVB(396.6	DICW+3
^TIU(8925.1 - [#8925.1]	LOADTIUX+9, LOADTIUX+16, LOADTIUX+18, LOADTIUX+20, FILE+7
^TIU(8925.2 - [#8925.2]	LOADTIUX+3, LOADTIUX+4, LOADTIUX+13, LOADTIUX+14, LOADTIUX+28, LOADTIUX+30

Label References

Name	Line Occurrences
$$CALLDIC	LOOKUP+15
ADDTEXT	FIX+20
FILE	FIX+22
LOADTIUX	FIX+18
LOOKUPX	LOOKUP+3, LOOKUP+5, LOOKUP+10, LOOKUP+12, LOOKUP+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	FIX+5~
A	FIX+8~
AMIEDA	FIX+5~, FIX+13*, FIX+15, FIX+20, FIX+22, FIX+24, ADDTEXT~, ADDTEXT+1, ADDTEXT+3, ADDTEXT+4 , FILE~, FILE+2, FILE+8
>> BUFDA	FIX+17
CPDFN	LOOKUP+2~, LOOKUP+13*, LOOKUP+14
D0	FIX+8~
DA	CALLDIC+1~, FIX+8~, FIX+13*
DFN	LOOKUP+2~, LOOKUP+8*, LOOKUP+14
DIC	CALLDIC+1~, CALLDIC+2, FIX+8~, FIX+9
DIC("A"	FIX+11*
DIC("W"	FIX+10*
DIC(0	CALLDIC+2, FIX+9
>> DIROUT	FIX+7, FIX+15
DK	FIX+8~
DL	FIX+8~
DT	LOADTIUX+31, ADDTEXT+4
>> DTOUT	FIX+15
>> DUOUT	FIX+7, FIX+15
DVBCP0	DICW+1~, DICW+2*, DICW+3
DVBCPR0	DICW+1~, DICW+2*, DICW+3
DX	FIX+8~
>> ERRDA	FIXX+1
FDA	FOLLOWUP+1~, FILE+1~, FILE+7
FDARR	FOLLOWUP+1~, FOLLOWUP+2, FOLLOWUP+3, FILE+1~, FILE+2, FILE+3
FLAGS	FOLLOWUP+1~, FOLLOWUP+2, FOLLOWUP+4, FILE+1~, FILE+2, FILE+4
IENS	FOLLOWUP+1~, FOLLOWUP+2, FILE+1~, FILE+2
RTYPE	FILE~, FILE+7
S	FIX+8~
SUCCESS	FIX+5~, FIX+22, FIXX+4, FILE~, FILE+6, FILE+8
TIU	FOLLOWUP+1~
TIU25070	LOOKUP+2~, LOOKUP+9*, LOOKUP+12
TIU2507R	LOOKUP+2~, LOOKUP+9*, LOOKUP+10, LOOKUP+13
TIUARR	LOADTIUX~
TIUARR(	LOADTIUX+21, LOADTIUX+22, LOADTIUX+23*, LOADTIUX+24!
TIUARR("TEXT"	LOADTIUX+30, LOADTIUX+31
TIUBGN	LOADTIUX+1~, LOADTIUX+2*, LOADTIUX+11, LOADTIUX+14, LOADTIUX+25
TIUBUF	FIX+5~, FIX+17*, FIX+18, FIXX, FIXX+2, LOADTIUX~, LOADTIUX+3, LOADTIUX+4, LOADTIUX+8, LOADTIUX+13 , LOADTIUX+14, LOADTIUX+28, LOADTIUX+30, FILE+7
TIUCAP	LOADTIUX+12~, LOADTIUX+15*, LOADTIUX+16
>> TIUCPFN	LOOKUP+3, LOOKUP+9, LOOKUP+15
TIUD1	LOADTIUX+6~, LOADTIUX+9*
TIUD4	LOADTIUX+6~, LOADTIUX+9*
TIUDA	FOLLOWUP~, FOLLOWUP+2, DICW~, DICW+2
>> TIUDONE	FIXX+4*
TIUFLD	LOADTIUX+12~, LOADTIUX+18*, LOADTIUX+19, LOADTIUX+21, LOADTIUX+22, LOADTIUX+23, LOADTIUX+24
>> TIUHDR(	LOOKUP+6!
TIUHSIG	LOADTIUX+1~, LOADTIUX+2*, LOADTIUX+5
TIUI	LOADTIUX+1~, LOADTIUX+3, LOADTIUX+4, LOADTIUX+11, LOADTIUX+13, LOADTIUX+14, LOADTIUX+27, LOADTIUX+28, LOADTIUX+30, ADDTEXT+1~ , ADDTEXT+2*, ADDTEXT+3
TIUJ	LOADTIUX+26~, LOADTIUX+29, LOADTIUX+30, LOADTIUX+31, ADDTEXT+1~, ADDTEXT+3, ADDTEXT+4
TIULINE	LOADTIUX+1~, LOADTIUX+4, LOADTIUX+5, LOADTIUX+7, LOADTIUX+11, LOADTIUX+14, LOADTIUX+15, LOADTIUX+21, LOADTIUX+25
TIUMSG	FOLLOWUP+1~, FILE+1~, FILE+5, FILE+7
TIUMSG(1	FILE+6
TIUN	LOADTIUX+12~, LOADTIUX+16*, LOADTIUX+17, LOADTIUX+18, LOADTIUX+20
TIUOUT	FIX+5~, FIX+7, FIX+12, FIX+14
>> TIUPOST	FIX+23*, FIX+25
TIUPRM0	FIX+5~, LOADTIUX+1, LOADTIUX+2
TIUPRM1	FIX+5~
>> TIUREC("#"	FIX+24*
TIUREQ	LOADTIUX+12~, LOADTIUX+20, LOADTIUX+23
>> TIUSSN	LOOKUP+3, LOOKUP+4*, LOOKUP+5, LOOKUP+8
>> TIUTYPE	FIX+22, FIX+23
TIUX	CALLDIC~, CALLDIC+2, FIX+5~, FIX+18, FIX+20, FIX+22, ADDTEXT~, FILE~, FILE+3
TIUX("TEXT"	FIX+21!, ADDTEXT+2, ADDTEXT+3
TYPE	LOADTIUX+1~, LOADTIUX+10*, LOADTIUX+16, LOADTIUX+18, LOADTIUX+20, LOADTIUX+22
U	LOOKUP+9, LOOKUP+12, DICW+2, DICW+3, LOADTIUX+2, LOADTIUX+18, LOADTIUX+20, LOADTIUX+31, ADDTEXT+1, ADDTEXT+4 , FILE+6, FILE+7
VA	DICW+1~
VADM	DICW+1~
VAERR	DICW+1~
X	CALLDIC+1~, CALLDIC+2, FIX+8~, DICW+1~, LOADTIUX+1~, LOADTIUX+7, LOADTIUX+8
>> XQADATA	FIX+17, FIXX+1
Y	LOOKUP+3, LOOKUP+5, LOOKUP+10, LOOKUP+12, LOOKUP+14, LOOKUP+15, CALLDIC+1~, CALLDIC+3, FIX+8~, FIX+12 , FIX+13, DICW+1~, LOADTIUX+1~, LOADTIUX+7*, LOADTIUX+8, LOADTIUX+9, LOADTIUX+10

Customize PDF page

Package: Text Integration Utility

Routine: TIUPUTA

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: