Routine: TIUCPFIX

Package	Total	Call Graph
Text Integration Utility	12	MERGTEXT^TIUEDI1 $$GETRECNW^TIUEDI3 $$ASKTITLE^TIULA3 ($$IDATE,$$NOW)^TIULC ($$PNAME,$$POSTFILE,DOCPRM)^TIULC1 GETTIU^TIULD SETPARM^TIULE $$STRIP^TIULS (ALERTDEL,MAIN,RESOLVE)^TIUPEVNT BUFPURGE^TIUPUTC ($$CHKCN,$$CHKCP)^TIUPUTCP ($$CANEDIT,$$WHATITLE,$$WHATYPE)^TIUPUTU
VA FileMan	3	$$EZBLD^DIALOG ^DIC (FILE,VAL)^DIE
Kernel	1	$$NOW^XLFDT
List Manager	1	EN^VALM

Package	Total	Caller Graph
Text Integration Utility	1	TIUPUTCP

Name	Comments	DBIA/ICR reference
MAKE(SUCCESS,DFN,TITLE,TIU,TIUBUF,TIUPLDA)	; File new TIU Document ; SUCCESS = (by ref) SUCCESS Returns TIU DOCUMENT # (PTR to 8925) ; = 0^Explanatory message if no SUCCESS ; DFN = Patient (#2) ; TITLE = Pointer to TIU Document Definition (#8925.1) ; TIU = Array of demographic and visit attributes ; TIUBUF = Record number (ien) of entry in TIU Buffer file (#8925.2) ; TIUPLDA = Record number (ien) of entry in TIU Document file (#8925) (Optional)
MAKEX
MAKEQ
LOADTIUX(TIUARR,TIUBUF)	; Load TIUX array with header and text
STUFREC(DA,DFN,PARENT,TIU,TIUPSC,TIUDTP,TIUPLDA)	; Stuff fixed field data
REQVER(VPARM)	; Evaluate whether verification is required
MAKEADD(TIUDADD,TIUDA,TIUBUF)	; Create an addendum record
FILE(SUCCESS,TIUDA,TIUX,RTYPE)	; Call FM Filer to commit updates to DB
TRNSFRM(RTYPE,FLD,X)	; Executes Transform code for a given header field
TRNSFRMX

Name	Field # of Occurrence
$$EZBLD^DIALOG	MAKE+15, MAKE+42, MAKE+45, MAKE+52
^DIC	MAKEADD+6
FILE^DIE	STUFREC+41, FILE+4
VAL^DIE	STUFREC+36, STUFREC+39
MERGTEXT^TIUEDI1	MAKE+65, MAKEADD+16
$$GETRECNW^TIUEDI3	MAKE+51
$$ASKTITLE^TIULA3	MAKE+21
$$IDATE^TIULC	STUFREC+28
$$NOW^TIULC	STUFREC+8, STUFREC+31
$$PNAME^TIULC1	MAKEADD+10
$$POSTFILE^TIULC1	MAKE+66, MAKEADD+17
DOCPRM^TIULC1	MAKE+26
GETTIU^TIULD	MAKEX+5, MAKEADD+9
SETPARM^TIULE	LOADTIUX+1
$$STRIP^TIULS	LOADTIUX+7, LOADTIUX+21
ALERTDEL^TIUPEVNT	MAKEX
MAIN^TIUPEVNT	LOADTIUX+8, FILE+7
RESOLVE^TIUPEVNT	MAKEX+1
BUFPURGE^TIUPUTC	MAKEX+2
$$CHKCN^TIUPUTCP	MAKE+42
$$CHKCP^TIUPUTCP	MAKE+45
$$CANEDIT^TIUPUTU	MAKE+53
$$WHATITLE^TIUPUTU	MAKEADD+4
$$WHATYPE^TIUPUTU	LOADTIUX+7
EN^VALM	MAKEX+6
$$NOW^XLFDT	STUFREC+25

Name	Line Occurrences
Function Call: WRITE	Prompt: "Done." Line Location: MAKEX+3
Routine Call	DIALOG Line Location: MAKE+15 MAKE+42 MAKE+45 MAKE+52
Routine Call	DIC Line Location: MAKEADD+6
Routine Call	DIE Line Location: STUFREC+41 FILE+4
Routine Call	DIE Line Location: STUFREC+36 STUFREC+39
Routine Call	VALM Line Location: MAKEX+6

FileNo	Call Tags
^TIU(8925 - [#8925]	VAL^DIE

Name	Line Occurrences (* Changed, ! Killed)
^TIU(8925 - [#8925]	MAKE+24, MAKE+34, MAKE+61!, MAKE+63, MAKEX+3!, MAKEX+4, STUFREC+15, STUFREC+16, STUFREC+20, STUFREC+21 , STUFREC+22, STUFREC+23, STUFREC+24, STUFREC+38, MAKEADD+3, MAKEADD+13!, MAKEADD+14, MAKEADD+20!
^TIU(8925.1 - [#8925.1]	MAKE+17, MAKE+18, LOADTIUX+9, LOADTIUX+16, LOADTIUX+18, LOADTIUX+20, FILE+7, TRNSFRM+2, TRNSFRM+4
^TIU(8925.2 - [#8925.2]	LOADTIUX+3, LOADTIUX+4, LOADTIUX+13, LOADTIUX+14, LOADTIUX+28, LOADTIUX+30

Name	Line Occurrences
$$REQVER	STUFREC+12, STUFREC+17
$$TRNSFRM	LOADTIUX+22
FILE	MAKE+64, MAKEADD+15
LOADTIUX	MAKE+30, MAKEADD+12
MAKEADD	MAKE+54
MAKEQ	MAKE+14, MAKE+42, MAKE+45, MAKE+52
MAKEX	MAKE+53
STUFREC	MAKE+57, MAKEADD+11
TRNSFRMX	TRNSFRM+3, TRNSFRM+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	STUFREC~, STUFREC+2, STUFREC+36, STUFREC+39, MAKEADD+1~
DFN	MAKE~, MAKE+15, MAKE+42, MAKE+51, MAKE+57, STUFREC~, STUFREC+5, MAKEADD+11
DIC	MAKEADD+1~, MAKEADD+5*
DIC(0	MAKEADD+5*
DIE	MAKEADD+1~
DLAYGO	MAKEADD+1~, MAKEADD+5*
DR	MAKEADD+1~
DUZ(2	STUFREC+10
>> ERRDA	MAKEX+1
FDA	STUFREC+1~, FILE+1~, FILE+7
FDARR	STUFREC+1~, STUFREC+2, STUFREC+5, STUFREC+6, STUFREC+7, STUFREC+8, STUFREC+9, STUFREC+10, STUFREC+11, STUFREC+12 , STUFREC+13, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+18, STUFREC+19, STUFREC+20, STUFREC+21, STUFREC+22, STUFREC+23 , STUFREC+24, STUFREC+25, STUFREC+32, STUFREC+34, STUFREC+35, STUFREC+37, STUFREC+40, FILE+1~, FILE+2, FILE+3
FLAGS	STUFREC+1~, STUFREC+2, STUFREC+41, FILE+1~, FILE+2, FILE+4
FLD	TRNSFRM~, TRNSFRM+2*, TRNSFRM+3, TRNSFRM+4
HAPPY	MAKE+11~, MAKE+64
IENS	STUFREC+1~, STUFREC+2, FILE+1~, FILE+2
LDT	MAKE+11~
NEWREC	MAKE+11~, MAKE+51
PARENT	STUFREC~, STUFREC+3, STUFREC+14, STUFREC+15, STUFREC+16, STUFREC+18, STUFREC+20, STUFREC+21, STUFREC+22, STUFREC+23 , STUFREC+24
RTYPE	FILE~, FILE+7, TRNSFRM~, TRNSFRM+2, TRNSFRM+4
SUCCESS	MAKE~, MAKE+13, MAKE+15, MAKE+42, MAKE+45, MAKE+52, MAKE+54, MAKE+55, MAKEADD+15, FILE~ , FILE+6, FILE+8*
TITLE	MAKE~, MAKE+21, MAKE+22, MAKE+24, MAKE+25, MAKE+26, MAKE+66
TIU	MAKE~, MAKE+15, MAKE+51, MAKE+57, MAKE+65, MAKEX+5~, STUFREC~, MAKEADD+1~, MAKEADD+9, MAKEADD+11 , MAKEADD+16
TIU("AD#"	STUFREC+7
TIU("DOCTYP"	MAKEADD+10*
TIU("EDT"	STUFREC+6, STUFREC+19, STUFREC+30
TIU("INST"	STUFREC+10
TIU("LDT"	STUFREC+13, STUFREC+19, STUFREC+26, STUFREC+27
TIU("LOC"	STUFREC+9
TIU("SVC"	STUFREC+11
TIU("TS"	STUFREC+7
TIU("VISIT"	STUFREC+5
TIU("VLOC"	STUFREC+9
TIU("VSTR"	STUFREC+30
>> TIUADD	MAKE+54
TIUARR	LOADTIUX~
TIUARR(	LOADTIUX+21, LOADTIUX+22, LOADTIUX+23*, LOADTIUX+24!
TIUARR("TEXT"	LOADTIUX+30*
TIUATYP	MAKEADD+1~, MAKEADD+4*, MAKEADD+5, MAKEADD+10, MAKEADD+15
TIUBGN	LOADTIUX+1~, LOADTIUX+2*, LOADTIUX+11, LOADTIUX+14, LOADTIUX+25
TIUBUF	MAKE~, MAKE+30, MAKE+54, MAKEX, MAKEX+2, LOADTIUX~, LOADTIUX+3, LOADTIUX+4, LOADTIUX+8, LOADTIUX+13 , LOADTIUX+14, LOADTIUX+28, LOADTIUX+30, MAKEADD~, MAKEADD+12, FILE+7
TIUCAN	MAKEADD+1~
TIUCAP	LOADTIUX+12~, LOADTIUX+15*, LOADTIUX+16
TIUCLASS	MAKE+11~, MAKE+19*, MAKE+20, MAKE+21
TIUCNNBR	MAKE+12~, MAKE+34, MAKE+36, MAKE+42, MAKE+45
TIUD1	LOADTIUX+6~, LOADTIUX+9*
TIUD4	LOADTIUX+6~, LOADTIUX+9*
TIUDA	MAKE+11~, MAKE+49, MAKE+51, MAKE+52, MAKE+53, MAKE+54, MAKE+57, MAKE+61, MAKE+63, MAKE+64 , MAKE+65, MAKE+67, MAKEX+3, MAKEX+4, MAKEX+5, MAKEADD~, MAKEADD+3, MAKEADD+9, MAKEADD+11, FILE~ , FILE+2, FILE+8
TIUDADD	MAKEADD~, MAKEADD+7, MAKEADD+8, MAKEADD+11, MAKEADD+13, MAKEADD+14, MAKEADD+15, MAKEADD+16, MAKEADD+18, MAKEADD+20
TIUDFLT	MAKE+12~, MAKE+20*, MAKE+21
TIUDICDT	STUFREC+28, STUFREC+29, STUFREC+30, STUFREC+31, STUFREC+33!
TIUDNB	MAKE+12~, MAKE+42, MAKE+45
TIUDPRM	MAKE+11~, MAKE+26, MAKE+51
TIUDPRM(0	STUFREC+12, STUFREC+17
TIUDTP	MAKE+12~, MAKE+39*, MAKE+57, STUFREC~, STUFREC+39
TIUDTPI	STUFREC+1~, STUFREC+39, STUFREC+40
TIUDTTL	MAKEADD+2~, MAKEADD+3*, MAKEADD+17
TIUDTYP	MAKE+11~, MAKE+18*, MAKE+19
TIUFLD	LOADTIUX+12~, LOADTIUX+18*, LOADTIUX+19, LOADTIUX+21, LOADTIUX+22, LOADTIUX+23, LOADTIUX+24
TIUFPRIV	MAKEADD+1~*
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
TIUJ	LOADTIUX+26~, LOADTIUX+29, LOADTIUX+30
TIULINE	LOADTIUX+1~, LOADTIUX+4, LOADTIUX+5, LOADTIUX+7, LOADTIUX+11, LOADTIUX+14, LOADTIUX+15, LOADTIUX+21, LOADTIUX+25
TIUMSG	STUFREC+1~, FILE+1~, FILE+5, FILE+7
TIUMSG("DIERR"	FILE+6
TIUN	LOADTIUX+12~, LOADTIUX+16*, LOADTIUX+17, LOADTIUX+18, LOADTIUX+20
TIUPLDA	MAKE~, MAKE+14, MAKE+24, MAKE+33, MAKE+34, MAKE+37*, MAKE+42, MAKE+45, MAKE+48, MAKE+49 , MAKE+57, STUFREC~, STUFREC+4, STUFREC+34, STUFREC+38
TIUPOST	MAKE+11~, MAKE+66, MAKE+68, MAKEADD+2~, MAKEADD+17, MAKEADD+19
>> TIUPRM0	LOADTIUX+1, LOADTIUX+2
TIUPSC	MAKE+12~, MAKE+38*, MAKE+57, STUFREC~, STUFREC+36
TIUPSCI	STUFREC+1~, STUFREC+36, STUFREC+37
TIUQUIT	MAKE+12~, MAKE+14, MAKE+15, MAKE+17, MAKE+22*
TIURDT	STUFREC+1~, STUFREC+26, STUFREC+31, STUFREC+34
TIUREC	MAKE+12~, MAKEADD+2~
TIUREC("#"	MAKE+67, MAKEADD+18
TIUREQ	LOADTIUX+12~, LOADTIUX+20, LOADTIUX+23
TIUTYP	MAKE+11~, MAKE+25*, MAKE+64
TIUTYP(1	MAKE+25*, MAKE+51
>> TIUTYPE	MAKE+15, MAKE+17, MAKE+18, MAKE+19, MAKE+20, STUFREC+32
TIUX	MAKE+11~, MAKE+30, MAKE+64, MAKEADD+1~, MAKEADD+12, MAKEADD+15, FILE~, FILE+3
TIUX(	MAKE+37, MAKE+61!, MAKE+62!
TIUX("TEXT"	MAKE+63!, MAKEADD+14!
TIUX(1205	MAKE+62!
TIUX(1211	MAKE+62!
TIUX(1405	MAKE+36
TIUX(70201	MAKE+38, MAKE+62!
TIUX(70202	MAKE+39, MAKE+62!
TYPE	LOADTIUX+1~, LOADTIUX+10*, LOADTIUX+16, LOADTIUX+18, LOADTIUX+20, LOADTIUX+22
U	MAKE+18, MAKE+25, MAKE+34, LOADTIUX+2, LOADTIUX+18, LOADTIUX+20, STUFREC+5, STUFREC+6, STUFREC+7, STUFREC+9 , STUFREC+10, STUFREC+11, STUFREC+12, STUFREC+13, STUFREC+15, STUFREC+16, STUFREC+17, STUFREC+19, STUFREC+20, STUFREC+21 , STUFREC+22, STUFREC+23, STUFREC+24, STUFREC+30, STUFREC+38, MAKEADD+10, FILE+6, FILE+7
VPARM	REQVER~, REQVER+1
X	LOADTIUX+1~, LOADTIUX+7, LOADTIUX+8, MAKEADD+1~, MAKEADD+5, TRNSFRM~, TRNSFRMX
XFORM	TRNSFRM+1~, TRNSFRM+4*, TRNSFRM+5, TRNSFRM+6
>> XQADATA	MAKEX+1
Y	LOADTIUX+1~, LOADTIUX+7*, LOADTIUX+8, LOADTIUX+9, LOADTIUX+10, MAKEADD+1~, MAKEADD+7, MAKEADD+8

Customize PDF page

Package: Text Integration Utility

Routine: TIUCPFIX

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: