Routine: TIUPUTPF

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Naked Globals
Local Variables

Information

TIUPUTPF ; SLC/JER - PRF Look-up Method - ;04-Jun-2012 16:22;DU

Source Information

Source file <TIUPUTPF.m>

Call Graph

Call Graph Total: 16

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!

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

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

Call Graph Total: 16