Routine: TIUPUTPF

Package	Total	Call Graph
Text Integration Utility	11	SENDADD^TIUALRT AUDIT^TIUEDI1 ($$EXIST,$$GETRECNW)^TIUEDI3 ($$CHKSUM,$$IDATE,$$NOW)^TIULC ($$DIVISION,$$DOCCLASS,$$PNAME,$$WHOCOSIG,$$WHOSIGNS,DOCPRM)^TIULC1 MAIN^TIUMOVE ($$LINK,$$SELECT)^TIUPRF1 ($$AVAILACT,$$ISPFTTL)^TIUPRFL ENQ^TIUPXAP1 RELEASE^TIUT MAIN^TIUVSIT
Kernel	2	($$FMADD,$$NOW)^XLFDT $$STRIP^XLFSTR
VA Fileman	2	^DIC (,FILE)^DIE
Registration	1	$$GETHTIU^DGPFAPI1

Entry Points

Name	Comments	DBIA/ICR reference
DELTEXT(DA)	; Delete existing text in preparation for replacement
LOOKUPX
CANEDIT(DA)	; Check whether or not document is released
WHATYPX
STUFREC(DA,PARENT)	; Stuff fixed field data
ONEACTX	;
WHATITX
WHATYPE(X)	; Identify document type ; Receives: X=Document Definition Name ; Returns: Y=Document Definition IFN
FOLLOWUP(TIUDA)	; Post-filing code for PRF
LOOKUP	; Look-up code used by router/filer ; Required: TIUSSN, TIUVDT ; -- Selected flag action is set in LOOKUP & in GETCHECK^TIUPFFIX; ; Action is used in post-file code to link note. ; Kill it before setting it:
WHATITLE(X)	; Identify document title ; Receives: X=Document Definition Name ; Returns: Y=Document Definition IFN
ONEACT(DFN,TIUTYPE)	; If there is exactly one Assigment History Action ; available for pat DFN & Title TIUTYPE, return ASSGNIEN^ACTIEN; ; else return 0
ILOC(LOCATION)	; Get pointer to file 44
MAKEADD()	; Create an addendum record

External References

Name	Field # of Occurrence
$$GETHTIU^DGPFAPI1	ONEACT+8
^DIC	ILOC+2, MAKEADD+4, WHATYPE+6, WHATITLE+6
^DIE	MAKEADD+6, DELTEXT+2
FILE^DIE	STUFREC+27, FOLLOWUP+6, FOLLOWUP+8
SENDADD^TIUALRT	LOOKUP+49
AUDIT^TIUEDI1	FOLLOWUP+10
$$EXIST^TIUEDI3	LOOKUP+30
$$GETRECNW^TIUEDI3	LOOKUP+39
$$CHKSUM^TIULC	FOLLOWUP+10
$$IDATE^TIULC	LOOKUP+18, LOOKUP+29, STUFREC+23
$$NOW^TIULC	STUFREC+8, STUFREC+20
$$DIVISION^TIULC1	LOOKUP+17
$$DOCCLASS^TIULC1	MAKEADD+6
$$PNAME^TIULC1	LOOKUP+38
$$WHOCOSIG^TIULC1	FOLLOWUP+5
$$WHOSIGNS^TIULC1	FOLLOWUP+3
DOCPRM^TIULC1	LOOKUP+24
MAIN^TIUMOVE	LOOKUP+26
$$LINK^TIUPRF1	FOLLOWUP+13
$$SELECT^TIUPRF1	LOOKUP+33
$$AVAILACT^TIUPRFL	ONEACT+11
$$ISPFTTL^TIUPRFL	LOOKUP+23
ENQ^TIUPXAP1	FOLLOWUP+24
RELEASE^TIUT	FOLLOWUP+9
MAIN^TIUVSIT	LOOKUP+27, FOLLOWUP+22
$$FMADD^XLFDT	LOOKUP+18, FOLLOWUP+19
$$NOW^XLFDT	STUFREC+25
$$STRIP^XLFSTR	LOOKUP+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	LOOKUP+16, LOOKUP+25
^TIU(8925 - [#8925]	LOOKUP+45, CANEDIT+1, STUFREC+13, STUFREC+14, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, FOLLOWUP+4, FOLLOWUP+7 , FOLLOWUP+12, FOLLOWUP+17
^TMP("TIUPRF"	LOOKUP+35!
^TMP("TIUPRFH"	ONEACTX+1!
^TMP("TIUPRFUP"	LOOKUP+5!, LOOKUP+36*, LOOKUP+37, FOLLOWUP+11, FOLLOWUP+13, FOLLOWUP+14!

Label References

Name	Line Occurrences
$$CANEDIT	LOOKUP+44
$$ILOC	LOOKUP+15
$$MAKEADD	LOOKUP+46
$$ONEACT	LOOKUP+35
$$WHATITLE	LOOKUP+20, MAKEADD+2
DELTEXT	LOOKUP+45
LOOKUPX	LOOKUP+10, LOOKUP+13, LOOKUP+16, LOOKUP+28, LOOKUP+29, LOOKUP+37, LOOKUP+40
ONEACTX	ONEACT+9
STUFREC	LOOKUP+48

Naked Globals

Name	Field # of Occurrence
^(12	FOLLOWUP+4, FOLLOWUP+7, FOLLOWUP+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAYNM	ONEACT+6~, ONEACT+7*, ONEACT+8, ONEACT+10, ONEACT+11
DA	LOOKUP+6~, CANEDIT~, CANEDIT+1, MAKEADD+1~, MAKEADD+5*, MAKEADD+6, MAKEADD+8, STUFREC~, STUFREC+2, DELTEXT~
DFN	LOOKUP+6~, LOOKUP+26, LOOKUP+27, LOOKUP+28, LOOKUP+30, LOOKUP+33, LOOKUP+35, LOOKUP+39, ONEACT~, ONEACT+8 , STUFREC+4, FOLLOWUP+1~, FOLLOWUP+18*, FOLLOWUP+21, FOLLOWUP+22
DIC	ILOC+1~, ILOC+2, MAKEADD+1~, MAKEADD+3, MAKEADD+6, WHATYPE+3~, WHATYPE+4, WHATITLE+3~, WHATITLE+4
DIC("S"	WHATYPE+5, WHATYPE+6!, WHATITLE+5, WHATITLE+6!
DIC(0	ILOC+2, MAKEADD+3, WHATYPE+4, WHATITLE+4
DIE	MAKEADD+1~, MAKEADD+6, DELTEXT+1~, DELTEXT+2
DLAYGO	MAKEADD+1~, MAKEADD+3*
DR	MAKEADD+1~, MAKEADD+6, DELTEXT+1~, DELTEXT+2
DUZ	LOOKUP+30
FDA	STUFREC+1~, FOLLOWUP+1~
FDARR	STUFREC+1~, STUFREC+2, STUFREC+4, STUFREC+5, STUFREC+6, STUFREC+7, STUFREC+8, STUFREC+9, STUFREC+11, STUFREC+13 , STUFREC+14, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, STUFREC+20, STUFREC+21, STUFREC+22, STUFREC+23 , STUFREC+24, STUFREC+25, STUFREC+26, FOLLOWUP+1~, FOLLOWUP+2, FOLLOWUP+3, FOLLOWUP+5, FOLLOWUP+8
FLAGS	STUFREC+1~, STUFREC+2, STUFREC+27, FOLLOWUP+1~, FOLLOWUP+2, FOLLOWUP+6, FOLLOWUP+8
IENS	STUFREC+1~, STUFREC+2, FOLLOWUP+1~, FOLLOWUP+2
LOCATION	ILOC~, ILOC+2
ONEIEN	ONEACT+6~, ONEACT+11
PARENT	STUFREC~, STUFREC+3, STUFREC+12, STUFREC+13, STUFREC+14, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19
>> PRFILERR	LOOKUP+33, LOOKUP+35
RESULT	ONEACT+6~, ONEACT+7, ONEACT+11, ONEACTX+2
TIU	LOOKUP+6~, LOOKUP+26, LOOKUP+27, LOOKUP+28, LOOKUP+39, FOLLOWUP+1~, FOLLOWUP+22
TIU("EDT"	LOOKUP+29, STUFREC+6
TIU("INST"	STUFREC+22
TIU("LDT"	STUFREC+7
TIU("LOC"	STUFREC+9, STUFREC+21
TIU("SVC"	STUFREC+11
TIU("VISIT"	STUFREC+4
TIU("VLOC"	STUFREC+9
TIU("VSTR"	LOOKUP+30, STUFREC+25, FOLLOWUP+15, FOLLOWUP+23
TIUASACT	LOOKUP+7~, LOOKUP+33, LOOKUP+35, LOOKUP+36
TIUASSGN	ONEACT+6~, ONEACT+10*, ONEACT+11
TIUATYP	MAKEADD+1~, MAKEADD+2*, MAKEADD+3, MAKEADD+6
TIUD0	FOLLOWUP+16~, FOLLOWUP+17*, FOLLOWUP+18
TIUD12	FOLLOWUP+16~, FOLLOWUP+17*, FOLLOWUP+19, FOLLOWUP+20
TIUDA	FOLLOWUP~, FOLLOWUP+2, FOLLOWUP+3, FOLLOWUP+4, FOLLOWUP+5, FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+10, FOLLOWUP+12, FOLLOWUP+13 , FOLLOWUP+17
TIUDAD	LOOKUP+6~, LOOKUP+46*, LOOKUP+48, LOOKUP+49
>> TIUDDT	STUFREC+23
TIUDFN	FOLLOWUP+12~*, FOLLOWUP+13
TIUDG	ONEACT+6~, ONEACT+8*, ONEACT+9
TIUDPRM	LOOKUP+7~, LOOKUP+24, LOOKUP+39
TIUEDIT	LOOKUP+6~, LOOKUP+44*, LOOKUP+45, LOOKUP+46
TIUEDT	LOOKUP+6~, LOOKUP+18, LOOKUP+19, LOOKUP+26, LOOKUP+27, FOLLOWUP+16~, FOLLOWUP+18, FOLLOWUP+19, FOLLOWUP+21, FOLLOWUP+22
TIUEXIST	LOOKUP+7~, LOOKUP+8, LOOKUP+30, LOOKUP+37
TIUFPRIV	MAKEADD+1~, WHATYPE+3~, WHATITLE+3~*
>> TIUHDR(	LOOKUP+50!, MAKEADD+7!
>> TIUHDR(1301	LOOKUP+50!
TIUHLOC	FOLLOWUP+16~, FOLLOWUP+19*, FOLLOWUP+20
>> TIUINST	LOOKUP+17*
TIULDT	LOOKUP+6~, LOOKUP+18, LOOKUP+26, LOOKUP+27, FOLLOWUP+16~, FOLLOWUP+19, FOLLOWUP+21, FOLLOWUP+22
>> TIULOC	LOOKUP+15*, LOOKUP+16, LOOKUP+17, LOOKUP+25, LOOKUP+26, LOOKUP+27
TIUMSG	STUFREC+1~, FOLLOWUP+1~
TIUNEW	LOOKUP+7~, LOOKUP+39, LOOKUP+43
>> TIUSSN	LOOKUP+10, LOOKUP+11, LOOKUP+12, LOOKUP+13, LOOKUP+26, LOOKUP+27
TIUTEMP	FOLLOWUP+1~, FOLLOWUP+13*
>> TIUTITLE	LOOKUP+20
>> TIUTYP(1	LOOKUP+38*, LOOKUP+39
TIUTYPE	LOOKUP+6~, LOOKUP+20*, LOOKUP+21, LOOKUP+23, LOOKUP+24, LOOKUP+30, LOOKUP+33, LOOKUP+35, LOOKUP+38, ONEACT~ , ONEACT+8
>> TIUVDT	LOOKUP+10, LOOKUP+18, LOOKUP+29
TIUVLOC	FOLLOWUP+16~, FOLLOWUP+20*, FOLLOWUP+21, FOLLOWUP+22
TIUXCRP	LOOKUP+6~
U	LOOKUP+25, LOOKUP+38, ONEACT+11, CANEDIT+1, STUFREC+4, STUFREC+6, STUFREC+7, STUFREC+9, STUFREC+11, STUFREC+13 , STUFREC+14, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, STUFREC+21, STUFREC+22, FOLLOWUP+4, FOLLOWUP+7, FOLLOWUP+12 , FOLLOWUP+13, FOLLOWUP+18, FOLLOWUP+19, FOLLOWUP+20
X	ILOC+1~, ILOC+2, MAKEADD+1~, MAKEADD+3, DELTEXT+1~, WHATYPE~, WHATITLE~
Y	LOOKUP+10, LOOKUP+13, LOOKUP+16, LOOKUP+19, LOOKUP+21, LOOKUP+23, LOOKUP+28, LOOKUP+29, LOOKUP+37, LOOKUP+39 , LOOKUP+40, LOOKUP+44, LOOKUP+45, LOOKUP+46*, LOOKUP+47, LOOKUP+48, LOOKUP+49, ILOC+1~, ILOC+3, MAKEADD+1~ , MAKEADD+5, DELTEXT+1~, WHATYPE+3~, WHATYPX, WHATITLE+3~, WHATITX

Customize PDF page

Package: Text Integration Utility

Routine: TIUPUTPF

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: