Routine: TIUPUTCN

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
Text Integration Utility	11	SENDADD^TIUALRT $$CLASS^TIUCNSLT AUDIT^TIUEDI1 $$GETRECNW^TIUEDI3 ($$CHKSUM,$$IDATE,$$NOW)^TIULC ($$DIVISION,$$DOCCLASS,$$PNAME,$$WHOCOSIG,$$WHOSIGNS,DOCPRM)^TIULC1 MAIN^TIUMOVE $$WHATITLE^TIUPUTU QUE^TIUPXAP1 RELEASE^TIUT MAIN^TIUVSIT
Consult Request Tracking	2	$$CPPAT^GMRCCP GET^GMRCTIU
VA Fileman	2	^DIC (,FILE)^DIE
Kernel	1	$$FMADD^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
DELTEXT(DA)	; Delete existing text in preparation for replacement
LOOKUPX
CANEDIT(DA)	; Check if document is not released yet
WHATYPX
WHATITX
WHATYPE(X)	; Identify document type ; Receives: X=Document Definition Name ; Returns: Y=Document Definition IFN
FOLLOWUP(TIUDA)	; Post-filing code for CONSULTS
LOOKUP	; Lookup Method for Consults document definition ; Required: TIUSSN, TIUVDT,TIUCNNBR
WHATITLE(X)	; Identify document title ; Receives: X=Document Definition Name ; Returns: Y=Document Definition IFN
ILOC(LOCATION)	; Get pointer to file 44
STUFREC(DA,PARENT)	; Stuff look-up header data, etc. ; Stuff look-up data, data derived from look-up data, and all other
MAKEADD()	; Create an addendum record

External References

Name	Field # of Occurrence
^DIC	ILOC+2, MAKEADD+5, WHATYPE+6, WHATITLE+7
^DIE	MAKEADD+7, DELTEXT+2
FILE^DIE	STUFREC+31, FOLLOWUP+6, FOLLOWUP+8
$$CPPAT^GMRCCP	LOOKUP+21
GET^GMRCTIU	FOLLOWUP+16
SENDADD^TIUALRT	LOOKUP+36
$$CLASS^TIUCNSLT	WHATITLE+4
AUDIT^TIUEDI1	FOLLOWUP+10
$$GETRECNW^TIUEDI3	LOOKUP+24
$$CHKSUM^TIULC	FOLLOWUP+10
$$IDATE^TIULC	LOOKUP+10, LOOKUP+18, STUFREC+28
$$NOW^TIULC	STUFREC+13, STUFREC+25
$$DIVISION^TIULC1	LOOKUP+9
$$DOCCLASS^TIULC1	MAKEADD+7
$$PNAME^TIULC1	LOOKUP+23, FOLLOWUP+13
$$WHOCOSIG^TIULC1	FOLLOWUP+5
$$WHOSIGNS^TIULC1	FOLLOWUP+3
DOCPRM^TIULC1	LOOKUP+22
MAIN^TIUMOVE	LOOKUP+15
$$WHATITLE^TIUPUTU	MAKEADD+3
QUE^TIUPXAP1	FOLLOWUP+26
RELEASE^TIUT	FOLLOWUP+9
MAIN^TIUVSIT	LOOKUP+16, FOLLOWUP+24
$$FMADD^XLFDT	LOOKUP+10, FOLLOWUP+21

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$PNAME^TIULC1(+$G(^TIU(8925,+TIUDA,0)))," #: ",TIUDA Line Location: FOLLOWUP+13
Function Call: WRITE	Prompt: " now Linked to Consult Request #: ",TIUCDA,".",! Line Location: FOLLOWUP+14
Routine Call	DIC Line Location: ILOC+2 MAKEADD+5 WHATYPE+6 WHATITLE+7
Routine Call	DIE Line Location: MAKEADD+7 DELTEXT+2
Routine Call	DIE Line Location: STUFREC+31 FOLLOWUP+6 FOLLOWUP+8

Name	Line Occurrences (* Changed, ! Killed)
^SC - [#44]	LOOKUP+8, LOOKUP+14
^TIU(8925 - [#8925]	LOOKUP+30, CANEDIT+1, STUFREC+18, STUFREC+19, STUFREC+21, STUFREC+22, STUFREC+23, STUFREC+24, FOLLOWUP+4, FOLLOWUP+7 , FOLLOWUP+11, FOLLOWUP+12, FOLLOWUP+13, FOLLOWUP+19

Name	Line Occurrences
$$CANEDIT	LOOKUP+29
$$ILOC	LOOKUP+7
$$MAKEADD	LOOKUP+32
$$WHATITLE	LOOKUP+12
DELTEXT	LOOKUP+30
LOOKUPX	LOOKUP+3, LOOKUP+5, LOOKUP+6, LOOKUP+8, LOOKUP+17, LOOKUP+18, LOOKUP+21, LOOKUP+25
STUFREC	LOOKUP+35

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	LOOKUP+2~, CANEDIT~, CANEDIT+1, MAKEADD+1~, MAKEADD+6*, MAKEADD+7, MAKEADD+9, STUFREC~, STUFREC+7, DELTEXT~ , FOLLOWUP+12~
DFN	LOOKUP+2~, LOOKUP+15, LOOKUP+16, LOOKUP+17, LOOKUP+21, LOOKUP+24, STUFREC+9, FOLLOWUP+1~, FOLLOWUP+20*, FOLLOWUP+23 , FOLLOWUP+24
DIC	ILOC+1~, ILOC+2, MAKEADD+1~, MAKEADD+4, MAKEADD+7, WHATYPE+3~, WHATYPE+4, WHATITLE+3~, WHATITLE+4
DIC("S"	WHATYPE+5, WHATYPE+6!, WHATITLE+6, WHATITLE+7!
DIC(0	ILOC+2, MAKEADD+4, WHATYPE+4, WHATITLE+4
DIE	MAKEADD+1~, MAKEADD+7, DELTEXT+1~, DELTEXT+2
DLAYGO	MAKEADD+1~, MAKEADD+4*
DR	MAKEADD+1~, MAKEADD+7, DELTEXT+1~, DELTEXT+2
FDA	STUFREC+6~, FOLLOWUP+1~
FDARR	STUFREC+6~, STUFREC+7, STUFREC+9, STUFREC+10, STUFREC+11, STUFREC+12, STUFREC+13, STUFREC+14, STUFREC+16, STUFREC+18 , STUFREC+19, STUFREC+20, STUFREC+21, STUFREC+22, STUFREC+23, STUFREC+24, STUFREC+25, STUFREC+26, STUFREC+27, STUFREC+28 , STUFREC+29, STUFREC+30, FOLLOWUP+1~, FOLLOWUP+2, FOLLOWUP+3, FOLLOWUP+5, FOLLOWUP+8
FLAGS	STUFREC+6~, STUFREC+7, STUFREC+31, FOLLOWUP+1~, FOLLOWUP+2, FOLLOWUP+6, FOLLOWUP+8
IENS	STUFREC+6~, STUFREC+7, FOLLOWUP+1~, FOLLOWUP+2
LOCATION	ILOC~, ILOC+2
PARENT	STUFREC~, STUFREC+8, STUFREC+17, STUFREC+18, STUFREC+19, STUFREC+20, STUFREC+21, STUFREC+22, STUFREC+23, STUFREC+24
SCREEN	WHATITLE+3~, WHATITLE+5*, WHATITLE+6
TIU	LOOKUP+2~, LOOKUP+15, LOOKUP+16, LOOKUP+17, LOOKUP+24, FOLLOWUP+1~, FOLLOWUP+24
TIU("EDT"	LOOKUP+18, STUFREC+11
TIU("INST"	STUFREC+27
TIU("LDT"	STUFREC+12
TIU("LOC"	STUFREC+14, STUFREC+26
TIU("SVC"	STUFREC+16
TIU("VISIT"	STUFREC+9
TIU("VLOC"	STUFREC+14
TIU("VSTR"	FOLLOWUP+17, FOLLOWUP+25
TIUATYP	MAKEADD+1~, MAKEADD+3*, MAKEADD+4, MAKEADD+7
TIUCDA	FOLLOWUP+12~*, FOLLOWUP+14, FOLLOWUP+16
TIUCLASS	WHATITLE+3~, WHATITLE+4*, WHATITLE+5
>> TIUCNNBR	LOOKUP+6, LOOKUP+21
TIUD0	FOLLOWUP+18~, FOLLOWUP+19*, FOLLOWUP+20
TIUD12	FOLLOWUP+18~, FOLLOWUP+19*, FOLLOWUP+21, FOLLOWUP+22
TIUDA	FOLLOWUP~, FOLLOWUP+2, FOLLOWUP+3, FOLLOWUP+4, FOLLOWUP+5, FOLLOWUP+7, FOLLOWUP+9, FOLLOWUP+10, FOLLOWUP+11, FOLLOWUP+12 , FOLLOWUP+13, FOLLOWUP+16, FOLLOWUP+19
TIUDAD	LOOKUP+2~, LOOKUP+32*, LOOKUP+35, LOOKUP+36
>> TIUDDT	STUFREC+28
TIUDPRM	LOOKUP+2~, LOOKUP+22, LOOKUP+24
TIUEDIT	LOOKUP+2~, LOOKUP+29*, LOOKUP+30, LOOKUP+32
TIUEDT	LOOKUP+2~, LOOKUP+10, LOOKUP+11, LOOKUP+15, LOOKUP+16, FOLLOWUP+18~, FOLLOWUP+20, FOLLOWUP+21, FOLLOWUP+23, FOLLOWUP+24
TIUFPRIV	MAKEADD+1~, WHATYPE+3~, WHATITLE+3~*
>> TIUHDR(	LOOKUP+39!, MAKEADD+8!
>> TIUHDR(1301	LOOKUP+39!
TIUHLOC	FOLLOWUP+18~, FOLLOWUP+21*, FOLLOWUP+22
>> TIUINST	LOOKUP+9*
TIULDT	LOOKUP+2~, LOOKUP+10, LOOKUP+15, LOOKUP+16, FOLLOWUP+18~, FOLLOWUP+21, FOLLOWUP+23, FOLLOWUP+24
>> TIULOC	LOOKUP+7*, LOOKUP+8, LOOKUP+9, LOOKUP+14, LOOKUP+15, LOOKUP+16
TIUMSG	STUFREC+6~, FOLLOWUP+1~
TIUNEW	LOOKUP+2~, LOOKUP+24, LOOKUP+28
>> TIUSSN	LOOKUP+3, LOOKUP+4*, LOOKUP+5, LOOKUP+15, LOOKUP+16
>> TIUTITLE	LOOKUP+12
>> TIUTYP(1	LOOKUP+23*, LOOKUP+24
TIUTYPE	LOOKUP+2~, LOOKUP+12*, LOOKUP+13, LOOKUP+22, LOOKUP+23
>> TIUVDT	LOOKUP+3, LOOKUP+10, LOOKUP+18
TIUVLOC	FOLLOWUP+18~, FOLLOWUP+22*, FOLLOWUP+23, FOLLOWUP+24
TIUXCRP	LOOKUP+2~
U	LOOKUP+14, LOOKUP+23, CANEDIT+1, STUFREC+9, STUFREC+11, STUFREC+12, STUFREC+14, STUFREC+16, STUFREC+18, STUFREC+19 , STUFREC+21, STUFREC+22, STUFREC+23, STUFREC+24, STUFREC+26, STUFREC+27, FOLLOWUP+4, FOLLOWUP+7, FOLLOWUP+11, FOLLOWUP+12 , FOLLOWUP+20, FOLLOWUP+21, FOLLOWUP+22
X	ILOC+1~, ILOC+2, MAKEADD+1~, MAKEADD+4, DELTEXT+1~, WHATYPE~, WHATITLE~
Y	LOOKUP+3, LOOKUP+5, LOOKUP+6, LOOKUP+8, LOOKUP+11, LOOKUP+13, LOOKUP+17, LOOKUP+18, LOOKUP+21, LOOKUP+24 , LOOKUP+25, LOOKUP+29, LOOKUP+30, LOOKUP+32*, LOOKUP+33, LOOKUP+35, LOOKUP+36, ILOC+1~, ILOC+3, MAKEADD+1~ , MAKEADD+6, DELTEXT+1~, WHATYPE+3~, WHATYPX, WHATITLE+3~, WHATITX

Customize PDF page

Package: Text Integration Utility

Routine: TIUPUTCN

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: