Routine: TIURECL1

Customize PDF page

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

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

Information

TIURECL1 ; SLC/PKR,JER - Expand/collapse LM views ;31-Aug-2011 17:38;DU

Source Information

Source file <TIURECL1.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Text Integration Utility	6	$$HASIDKID^TIUGBR $$PREFIX^TIULA2 ($$PERSNAME,$$PNAME,$$PTNAME,DOCPRM)^TIULC1 $$POSSPRNT^TIULP ($$DATE,$$NAME)^TIULS $$HRCN^TIUR2
Kernel	2	$$LOW^XLFSTR $$NS^XUAF4
Registration	2	$$SETFLD^VALM1 MSG^VALM10

Caller Graph

Caller Graph Total: 16

Package	Total	Caller Graph
Text Integration Utility	16	TIUBR TIUBR1 TIUBRWS TIUGR1 TIULQ TIUR2 TIURA2 TIURECL TIURECL2 TIURL1 TIURM1 TIUROR TIURPTT1 TIURTIT1 TIUSRV TIUSRVR2

Entry Points

Name	Comments	DBIA/ICR reference
ISSUB(CLASS1,CLASS2,LEVEL)	;Return true if CLASS2 is sub to CLASS1.
RESOLVE(DA,TSTART,FIRSTPFX,XIDDATA)	; Get document data for insertion ; Receives DA, TSTART, FIRSTPFX ; FIRSTPFX = $$INSPFIX of parent of inserted document. ; Returns line TSTART. ; Receives XIDDATA by ref, finds it, and passes it back.
GETTL(TIUD0,PREFIX)	; Get title column data; put updated prefix
SETTLPT(STRING,DA,PREFIX)	; Set field TITLE or PATIENT into string,
VEXREQ(VALMY)	;Check for valid expand/contract requests. ; A list of documents to expand/contract is invalid if any docmt
IDDATA(TIUDA,TIUD0,TIUD21)	; Return TIUGDATA: ; TIUGDATA = 0 or ; = TIUDA^haskid^IDparent^prmsort, where ; TIUDA = note DA ; haskid = 1 if note has ID kid, else 0 ; IDparent = parent DA if note has ID parent, else 0 ; prmsort = 'TITLE' if entries ordered by title, else 'REFDT'
GETPT(TIUD0,PREFIX)	; Get patient column data; put updated prefix data
RESOLVEX

External References

Name	Field # of Occurrence
$$HASIDKID^TIUGBR	IDDATA+13
$$PREFIX^TIULA2	RESOLVE+13
$$PERSNAME^TIULC1	RESOLVE+38, RESOLVE+39
$$PNAME^TIULC1	GETTL+5, GETTL+6
$$PTNAME^TIULC1	GETPT+5
DOCPRM^TIULC1	IDDATA+17
$$POSSPRNT^TIULP	IDDATA+14
$$DATE^TIULS	RESOLVE+33, RESOLVE+35, RESOLVE+46, RESOLVE+47, RESOLVE+49, RESOLVE+52
$$NAME^TIULS	RESOLVE+40, RESOLVE+43, RESOLVE+44, GETPT+5
$$HRCN^TIUR2	RESOLVE+26
$$SETFLD^VALM1	RESOLVE+63, RESOLVE+65, SETTLPT+11, SETTLPT+15
MSG^VALM10	VEXREQ+33
$$LOW^XLFSTR	RESOLVE+54
$$NS^XUAF4	RESOLVE+58

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TIU(8925 - [#8925]	VEXREQ+28, VEXREQ+30, IDDATA+10, IDDATA+11, RESOLVE+8, RESOLVE+9, RESOLVE+10, RESOLVE+11, GETTL+6, SETTLPT+7
^TIU(8925.6 - [#8925.6]	RESOLVE+54
^TMP("TIUR"	RESOLVE+43, RESOLVE+46
^TMP("TIURIDX"	VEXREQ+27, VEXREQ+29
^XUSEC("TIU VIEWALL"	RESOLVE+28, RESOLVE+29

Name	Line Occurrences
$$GETPT	RESOLVE+19, SETTLPT+9
$$GETTL	RESOLVE+14, SETTLPT+13
$$IDDATA	RESOLVE+12
$$ISSUB	VEXREQ+25
RESOLVEX	RESOLVE+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIND	VEXREQ+8~, VEXREQ+16*, VEXREQ+17
ACTION	VEXREQ+8~
ACTION(	VEXREQ+18, VEXREQ+24, VEXREQ+26, VEXREQ+32
ACTJND	VEXREQ+8~, VEXREQ+22*, VEXREQ+23
ADT	RESOLVE+5~, RESOLVE+33*
AMD	RESOLVE+5~, RESOLVE+38, RESOLVE+40
AUT	RESOLVE+5~, RESOLVE+39, RESOLVE+43, RESOLVE+44*
CIND	VEXREQ+8~
CIND(	VEXREQ+27, VEXREQ+28, VEXREQ+29, VEXREQ+30
CLASS1	ISSUB~, ISSUB+2, ISSUB+5
CLASS2	ISSUB~, ISSUB+2, ISSUB+5
CN	VEXREQ+8~
CN(	VEXREQ+28, VEXREQ+30, VEXREQ+32
DA	RESOLVE~, RESOLVE+8, RESOLVE+9, RESOLVE+10, RESOLVE+11, RESOLVE+12, RESOLVE+13, SETTLPT~, SETTLPT+7
DDT	RESOLVE+5~, RESOLVE+35*
>> DFN	RESOLVE+26*
DIC	RESOLVE+5~
DIQ	RESOLVE+5~
DOC	RESOLVE+6~, RESOLVE+16, SETTLPT+6~, SETTLPT+13, SETTLPT+14*, SETTLPT+15
DR	RESOLVE+5~
DUZ	RESOLVE+28, RESOLVE+29
DUZ(2	RESOLVE+26
EDT	RESOLVE+5~, RESOLVE+46, RESOLVE+47
END	VEXREQ+3~, VEXREQ+5*, VEXREQ+6, VEXREQ+10
FIRSTPFX	RESOLVE~, RESOLVE+13
GETPT	RESOLVE+7~, RESOLVE+19*, RESOLVE+20, RESOLVE+21
GETTL	RESOLVE+7~, RESOLVE+14*, RESOLVE+16
HASIDKID	IDDATA+9~, IDDATA+13*, IDDATA+14, IDDATA+15, IDDATA+20
HRCN	RESOLVE+26~*, RESOLVE+27, RESOLVE+28, RESOLVE+29
>> HUSH	VEXREQ+31
IND	ISSUB+1~, ISSUB+5, ISSUB+6, VEXREQ+8~, VEXREQ+10, VEXREQ+11, VEXREQ+13, VEXREQ+14, VEXREQ+15, VEXREQ+16 , VEXREQ+18, VEXREQ+19, VEXREQ+25, VEXREQ+26, VEXREQ+27, VEXREQ+28, VEXREQ+32
INSTA	RESOLVE+7~, RESOLVE+56, RESOLVE+59, RESOLVE+60*
ISSUB	ISSUB+1~, ISSUB+4, ISSUB+7, ISSUB+8
JND	VEXREQ+8~, VEXREQ+19, VEXREQ+20, VEXREQ+21, VEXREQ+22, VEXREQ+24, VEXREQ+25, VEXREQ+26, VEXREQ+29, VEXREQ+30 , VEXREQ+32
LCT	RESOLVE+5~, RESOLVE+35*
LEVEL	ISSUB~, VEXREQ+8~, VEXREQ+25
LEVEL(	ISSUB+2, ISSUB+6, VEXREQ+11*
MOM	RESOLVE+5~
MSG	VEXREQ+8~, VEXREQ+32*, VEXREQ+33
POSSPRNT	IDDATA+9~, IDDATA+12, IDDATA+14, IDDATA+15
PREFIX	RESOLVE+7~, RESOLVE+13*, RESOLVE+14, RESOLVE+19, GETPT~, GETPT+6, GETTL~, GETTL+7, SETTLPT~, SETTLPT+9 , SETTLPT+13
PRMSORT	IDDATA+9~, IDDATA+18, IDDATA+19, IDDATA+20
PT	RESOLVE+5~, RESOLVE+21, SETTLPT+6~, SETTLPT+9, SETTLPT+10*, SETTLPT+11
RMD	RESOLVE+5~
SDT	RESOLVE+5~, RESOLVE+51, RESOLVE+52
START	VEXREQ+3~, VEXREQ+4*, VEXREQ+6, VEXREQ+10
STATX	RESOLVE+6~, RESOLVE+54*
STRING	SETTLPT~, SETTLPT+11, SETTLPT+15, SETTLPT+16
TEXT	VEXREQ+8~
TEXT(	VEXREQ+15, VEXREQ+16, VEXREQ+18, VEXREQ+21, VEXREQ+22, VEXREQ+24
TIUD0	IDDATA~, IDDATA+10, IDDATA+14, IDDATA+17, RESOLVE+6~, RESOLVE+9, RESOLVE+12, RESOLVE+14, RESOLVE+19, RESOLVE+26 , RESOLVE+33, RESOLVE+35, RESOLVE+51, RESOLVE+54, GETPT~, GETPT+5, GETTL~, GETTL+5, GETTL+6, SETTLPT+6~ , SETTLPT+7*, SETTLPT+9, SETTLPT+13
TIUD12	RESOLVE+6~, RESOLVE+9*, RESOLVE+38, RESOLVE+39, RESOLVE+57, RESOLVE+58
TIUD13	RESOLVE+6~, RESOLVE+10*, RESOLVE+46, RESOLVE+47, RESOLVE+49
TIUD15	RESOLVE+6~, RESOLVE+10*, RESOLVE+51
TIUD21	IDDATA~, IDDATA+11, IDDATA+14, IDDATA+15, IDDATA+16, IDDATA+20, RESOLVE+7~, RESOLVE+11, RESOLVE+12
TIUDA	IDDATA~, IDDATA+10, IDDATA+11, IDDATA+13, IDDATA+20
TIUDPRM	IDDATA+9~, IDDATA+17
TIUDPRM(0	IDDATA+18
TIUFLDS	RESOLVE+6~
TIUFLDS(	RESOLVE+64, RESOLVE+65
TIUFLDS("ADMI	SSION DATE" , RESOLVE+34*
TIUFLDS("ATTENDING"	RESOLVE+41*
TIUFLDS("AUTHOR"	RESOLVE+45*
TIUFLDS("COSIGNER"	RESOLVE+42*
TIUFLDS("DICT	DATE" , RESOLVE+50*
TIUFLDS("DISC	H DATE" , RESOLVE+36*
TIUFLDS("DIVISION"	RESOLVE+61*
TIUFLDS("DOCU	MENT TYPE" , RESOLVE+17*
TIUFLDS("LAST	I/LAST 4" , RESOLVE+32*
TIUFLDS("LINE	COUNT" , RESOLVE+37*
TIUFLDS("PATI	ENT NAME" , RESOLVE+22*
TIUFLDS("REF	DATE" , RESOLVE+48*
TIUFLDS("SIG	DATE" , RESOLVE+53*
TIUFLDS("STATUS"	RESOLVE+55*
TIUFLDS("TITLE"	RESOLVE+18*
TIUGDATA	IDDATA+9~, IDDATA+12, IDDATA+20, IDDATA+21
TIUI	RESOLVE+6~, RESOLVE+62, RESOLVE+64, RESOLVE+65
TIULI	RESOLVE+6~, RESOLVE+20*
TIULST4	RESOLVE+5~, RESOLVE+27, RESOLVE+28
TIUP	RESOLVE+6~
TIUR	RESOLVE+5~
TIUSTN	RESOLVE+7~, RESOLVE+58*, RESOLVE+59
TIUY	RESOLVE+6~, RESOLVE+8, RESOLVE+62, RESOLVE+63, RESOLVE+65, RESOLVEX, GETPT+4~, GETPT+5, GETPT+6, GETPT+7 , GETTL+4~, GETTL+5, GETTL+6, GETTL+7*, GETTL+8
TSTART	RESOLVE~, RESOLVE+63
U	VEXREQ+27, VEXREQ+28, VEXREQ+29, VEXREQ+30, IDDATA+18, IDDATA+20, RESOLVE+16, RESOLVE+21, RESOLVE+26, RESOLVE+33 , RESOLVE+35, RESOLVE+38, RESOLVE+39, RESOLVE+46, RESOLVE+47, RESOLVE+49, RESOLVE+51, RESOLVE+54, RESOLVE+57, RESOLVE+58 , RESOLVE+59, GETPT+5, GETPT+6, GETTL+6, GETTL+7, SETTLPT+10, SETTLPT+14
VALID	VEXREQ+8~, VEXREQ+12, VEXREQ+35, VEXREQ+36
>> VALMAR	VEXREQ+11, VEXREQ+15, VEXREQ+21
>> VALMDDF(	RESOLVE+65
>> VALMDDF("PATI	ENT NAME" , RESOLVE+16, SETTLPT+8
VALMY	VEXREQ~
VALMY(	VEXREQ+14, VEXREQ+20
VALMY(""	VEXREQ+4, VEXREQ+5
XDT	RESOLVE+5~, RESOLVE+49*
XIDDATA	RESOLVE~, RESOLVE+12*

Customize PDF page

Package: Text Integration Utility

Routine: TIURECL1

Call Graph Total: 10

Caller Graph Total: 16