Routine: TIULA2

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Text Integration Utility	11	($$HASIDDAD,$$HASIDKID)^TIUGBR $$PATIENT^TIULA TITLPICK^TIULA4 ($$HASADDEN,$$PERSNAME,$$PNAME)^TIULC1 ($$PERSDOC,SETPARM)^TIULE ($$CANDO,$$CANPICK)^TIULP ($$DATE,$$NAME)^TIULS $$ISA^TIULX $$URGENCY^TIURM LIST^TIUSRVLL $$READ^TIUU
VA Fileman	3	^DIC MIX^DIC1 ^DIR
Authorization Subscription	1	$$ISA^USRLM

Package	Total	Caller Graph
Text Integration Utility	23	TIUAPIOK TIUBRWS TIUEDI2 TIUEDI4 TIUEDITR TIUFIX TIUGEDIT TIULA3 TIUPNAPI TIUPRD TIUR2 TIURC1 TIURD1 TIURECL TIURECL1 TIURECL2 TIURL1 TIURM1 TIUROR TIURPTT1 TIURTIT1 TIUSRVLO TIUUPEDT

Package

Total

Caller Graph

Text Integration Utility

TIUAPIOK  TIUBRWS  TIUEDI2  TIUEDI4  TIUEDITR  TIUFIX  TIUGEDIT  TIULA3
TIUPNAPI  TIUPRD  TIUR2  TIURC1  TIURD1  TIURECL  TIURECL1  TIURECL2
TIURL1  TIURM1  TIUROR  TIURPTT1  TIURTIT1  TIUSRVLO  TIUUPEDT

Entry Points

Name	Comments	DBIA/ICR reference
CHOOSE(Y,PROMPT,LO,HI,PAUSE)	; Call reader for pause or list selection
ASKTYPX
PREFIX(DA,IDKID)	; Return addendum, urgency, ID indicators. ; I $G(IDKID)=1, include '>' if note is ID kid.
ITMCNT(CLASS)	; Count the number of members of a class or document class
DOCPICK(TIUCLASS,DFLT,ADDSCRN)	; Ask for document, given a class or document class
SAMPLE(DFN,CLASS)	; Quick sample for range and count
ASKTYP(TIUCLASS,DFLT,SCREEN,PROMPT,NOLOINC)	; Call ^DIC to select single type
DOCSPICK(TIUY,TIUCLASS,PARM,DFLT,PROMPT,ADDSCRN)	; Ask for TITLE(S) ; with pick-list
AUTHOR(TERMOK)	; Get author
SELPAT(TIURTN,TIUTYP,DFN,TIUASK)	; Select a patient's document

External References

Name	Field # of Occurrence
^DIC	ASKTYP+8
MIX^DIC1	ASKTYP+16
^DIR	CHOOSE+4
$$HASIDDAD^TIUGBR	PREFIX+6
$$HASIDKID^TIUGBR	PREFIX+5
$$PATIENT^TIULA	SELPAT+7
TITLPICK^TIULA4	DOCSPICK+8
$$HASADDEN^TIULC1	PREFIX+7
$$PERSNAME^TIULC1	SELPAT+52, AUTHOR+2
$$PNAME^TIULC1	SELPAT+45, SELPAT+46
$$PERSDOC^TIULE	ASKTYP+11
SETPARM^TIULE	SAMPLE+2
$$CANDO^TIULP	SAMPLE+7
$$CANPICK^TIULP	ITMCNT+3
$$DATE^TIULS	SELPAT+16, SELPAT+17, SELPAT+28, SELPAT+50, SELPAT+53, SELPAT+54
$$NAME^TIULS	SELPAT+52
$$ISA^TIULX	ASKTYP+12
$$URGENCY^TIURM	PREFIX+8
LIST^TIUSRVLL	SELPAT+36
$$READ^TIUU	SELPAT+10, SELPAT+14, SELPAT+22, SELPAT+29, SELPAT+32, AUTHOR+5
$$ISA^USRLM	AUTHOR+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No ",TIUPNOUN," on file for ",$P(^DPT(+DFN,0),U) Line Location: SELPAT+9
Function Call: WRITE	Prompt: "" Line Location: SELPAT+10
Function Call: WRITE	Prompt: !!,"No ",TIUPNOUN," available for ",$P(^DPT(+DFN,0),U),! Line Location: SELPAT+13
Function Call: WRITE	Prompt: "" Line Location: SELPAT+14
Function Call: WRITE	Prompt: !!,"Available ",TIUPNOUN,": ",$P(TIUEDT,U,2) Line Location: SELPAT+18
Function Call: WRITE	Prompt: " thru ",$P(TIULDT,U,2)," (",TIUTOT,")" Line Location: SELPAT+19
Function Call: WRITE	Prompt: !!,"Please specify a date range from which to select ",TIUPNOUN_":" Line Location: SELPAT+24
Function Call: WRITE	Prompt: ! Line Location: SELPAT+32
Function Call: WRITE	Prompt: !,TIUI,?4,$$DATE^TIULS(+TIUD13,"MM/DD/CCYY HR:MIN") Line Location: SELPAT+50
Function Call: WRITE	Prompt: ?22,TIUDOC Line Location: SELPAT+51
Function Call: WRITE	Prompt: ?60,$E($$NAME^TIULS($$PERSNAME^TIULC1(+$P(TIUD12,U,2)),"LAST,FI"),1,19) Line Location: SELPAT+52
Function Call: WRITE	Prompt: !?$S($P(TIUD0,U,13)="H":24,1:22),$S($P(TIUD0,U,13)="H":"Adm: ",1:"Visit: "),$$DATE^TIULS($P(TIUD0,U,7),"MM/DD/CCYY") Line Location: SELPAT+53
Function Call: WRITE	Prompt: ?41,"Dis: ",$$DATE^TIULS($P(TIUD0,U,8),"MM/DD/CCYY") Line Location: SELPAT+54
Function Call: WRITE	Prompt: !,"SUBJECT: ",$E(TIUD17,1,70) Line Location: SELPAT+55
Function Call: WRITE	Prompt: !!,"One ",$S(TIUTYP=3:"note",TIUTYP=244:"summary",1:"document") Line Location: SELPAT+59
Function Call: WRITE	Prompt: " found within date range..." Line Location: SELPAT+60
Routine Call	DIC Line Location: ASKTYP+8
Routine Call	DIR Line Location: CHOOSE+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SELPAT+9, SELPAT+13
^TIU(8925 - [#8925]	SELPAT+8, SELPAT+42, SELPAT+44, SELPAT+46, SELPAT+69, SAMPLE+4, SAMPLE+6, SAMPLE+8
^TIU(8925.1 - [#8925.1]	ASKTYP+4, ASKTYP+5, ASKTYP+7, ITMCNT+2, ITMCNT+3
^TMP("TIULIDX"	SELPAT+3!
^TMP("TIULIST"	SELPAT+3!
^TMP("TIUYLIST"	SELPAT+4!, SELPAT+37, SELPAT+39, SELPAT+42, SELPAT+44, SELPAT+48, SELPAT+58, SELPAT+69, SELPAT+70!

Name	Line Occurrences
$$ASKTYP	ASKTYP+6, DOCPICK+3, DOCSPICK+12
$$ITMCNT	ASKTYP+2
$$PREFIX	SELPAT+48
$$SAMPLE	SELPAT+11
ASKTYPX	ASKTYP+3
CHOOSE	SELPAT+56, SELPAT+62

Name	Field # of Occurrence
^(12	SELPAT+42
^(17	SELPAT+44

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADDSCRN	DOCPICK~, DOCPICK+2, DOCSPICK~, DOCSPICK+7, DOCSPICK+10
ATTCHID	DOCSPICK+2~, DOCSPICK+7*, DOCSPICK+8
CLASS	ITMCNT~, ITMCNT+2, ITMCNT+3, SAMPLE~, SAMPLE+4, SAMPLE+6
D	ASKTYP+1~, ASKTYP+15*
DA	PREFIX~, PREFIX+5, PREFIX+6, PREFIX+7, PREFIX+8
DFLT	ASKTYP~, ASKTYP+6, ASKTYP+11, ASKTYP+12, ASKTYP+13, DOCPICK~, DOCPICK+3, DOCSPICK~, DOCSPICK+3, DOCSPICK+11 , DOCSPICK+12, AUTHOR+1~, AUTHOR+2*, AUTHOR+5
DFN	SELPAT~, SELPAT+7*, SELPAT+8, SELPAT+9, SELPAT+11, SELPAT+13, SELPAT+36, SAMPLE~, SAMPLE+4, SAMPLE+6
DIC	ASKTYP+1~, ASKTYP+2*
DIC("A"	ASKTYP+10*
DIC("B"	ASKTYP+13*
DIC("S"	ASKTYP+14*, ASKTYP+16!
DIC(0	ASKTYP+7, ASKTYP+9
DIR	CHOOSE+1~
DIR("A"	CHOOSE+3*
DIR(0	CHOOSE+2*
>> DIROUT	CHOOSE+5
DIRUT	SELPAT+30, SELPAT+33, CHOOSE+1~
DTOUT	CHOOSE+1~, CHOOSE+5
DUOUT	CHOOSE+1~, CHOOSE+5
DUZ	ASKTYP+11, AUTHOR+2
EARLY	SAMPLE+1~, SAMPLE+3, SAMPLE+11, SAMPLE+12
HI	CHOOSE~, CHOOSE+2
IDKID	PREFIX~, PREFIX+6
IDKIDFLG	PREFIX+2~, PREFIX+4*, PREFIX+7
ITMCNT	ASKTYP+1~, ASKTYP+2*, ASKTYP+3, ASKTYP+5, ASKTYP+7
LATE	SAMPLE+1~, SAMPLE+3, SAMPLE+9, SAMPLE+12
LO	CHOOSE~, CHOOSE+2
NOLOINC	ASKTYP~, ASKTYP+15
PARM	DOCSPICK~, DOCSPICK+4*, DOCSPICK+8
PAUSE	CHOOSE~, CHOOSE+5
PREFIX	SELPAT+40~, SELPAT+48, PREFIX+2~, PREFIX+3, PREFIX+5, PREFIX+6, PREFIX+7, PREFIX+8, PREFIX+9*, PREFIX+10
PROMPT	ASKTYP~, ASKTYP+6, ASKTYP+10, DOCPICK+1~, DOCPICK+3, DOCSPICK~, DOCSPICK+9, DOCSPICK+12, CHOOSE~, CHOOSE+3
SCREEN	ASKTYP~, ASKTYP+6, ASKTYP+14, DOCPICK+1~, DOCPICK+2, DOCPICK+3, DOCSPICK+2~, DOCSPICK+10, DOCSPICK+12
TERMOK	AUTHOR~, AUTHOR+1*
TIUA	SELPAT+1~, SELPAT+29, SELPAT+30, SELPAT+33, SELPAT+34, SELPAT+36
TIUASK	SELPAT~, SELPAT+20
TIUCLASS	ASKTYP~, ASKTYP+2, ASKTYP+4, ASKTYP+5, ASKTYP+6, ASKTYP+7, ASKTYP+11, ASKTYP+12, DOCPICK~, DOCPICK+1 , DOCPICK+3, DOCSPICK~, DOCSPICK+8, DOCSPICK+9, DOCSPICK+12
TIUCNT	ITMCNT+1~, ITMCNT+4, ITMCNT+5
TIUCONT	SELPAT+2~, SELPAT+20, SELPAT+22*
TIUD0	SELPAT+40~, SELPAT+42*, SELPAT+45, SELPAT+46, SELPAT+49, SELPAT+53, SELPAT+54
TIUD12	SELPAT+40~, SELPAT+42*, SELPAT+52
TIUD13	SELPAT+40~, SELPAT+44*, SELPAT+50
TIUD17	SELPAT+40~, SELPAT+44*, SELPAT+55
TIUDOC	SELPAT+40~, SELPAT+45, SELPAT+46, SELPAT+48, SELPAT+49, SELPAT+51
TIUEDFLT	SELPAT+2~, SELPAT+26, SELPAT+27, SELPAT+28*, SELPAT+29
TIUEDT	SELPAT+1~, SELPAT+16*, SELPAT+18, SELPAT+26, SELPAT+27, SELPAT+29, SELPAT+32
TIUFPRIV	ASKTYP+1~*
TIUI	ITMCNT+1~, ITMCNT+2, ITMCNT+3, ITMCNT+5, SELPAT+1~, SELPAT+39, SELPAT+42, SELPAT+44, SELPAT+48, SELPAT+50 , SELPAT+56, SELPAT+66, SELPAT+67, SELPAT+69, SAMPLE+1~, SAMPLE+3, SAMPLE+4, SAMPLE+6, SAMPLE+9, SAMPLE+10
TIUJ	SELPAT+2~, SELPAT+67, SELPAT+69, SAMPLE+1~, SAMPLE+5, SAMPLE+6*, SAMPLE+7, SAMPLE+8, SAMPLE+10
TIUK	SELPAT+63~, SELPAT+64, SELPAT+65, SELPAT+66
TIUL	SAMPLE+1~, SAMPLE+3, SAMPLE+10, SAMPLE+11
TIULAST	SELPAT+2~, SELPAT+44*, SELPAT+62
TIULDA	SAMPLE+1~, SAMPLE+3, SAMPLE+10, SAMPLE+13
TIULDT	SELPAT+1~, SELPAT+17*, SELPAT+19, SELPAT+29, SELPAT+32
TIULIST	SELPAT+2~, SELPAT+61*, SELPAT+62, SELPAT+67
TIULIST(	SELPAT+65, SELPAT+66
TIUPNOUN	SELPAT+2~, SELPAT+6*, SELPAT+9, SELPAT+13, SELPAT+18, SELPAT+24, SELPAT+25, SELPAT+62
>> TIUPRM0	SAMPLE+2, SAMPLE+7
TIUPRMT	SELPAT+1~, SELPAT+21~, SELPAT+22, SELPAT+25, SELPAT+29, SELPAT+31, SELPAT+32, AUTHOR+1~, AUTHOR+3, AUTHOR+5
TIUQRY	SELPAT+1~
TIUREC	SELPAT+1~
TIURTN	SELPAT~, SELPAT+23, SELPAT+64, SELPAT+69*
TIURTN(	SELPAT+69*
TIURTN(1	SELPAT+23, SELPAT+58
TIURTYP	AUTHOR+1~, AUTHOR+3*, AUTHOR+5
TIUSCRN	AUTHOR+1~, AUTHOR+4*, AUTHOR+5
TIUSMPL	SELPAT+2~, SELPAT+11*, SELPAT+12, SELPAT+15, SELPAT+16, SELPAT+17, SELPAT+23
TIUSTOP	SELPAT+1~, SELPAT+39, SELPAT+56, SELPAT+61
TIUTMP	SELPAT+2~, SELPAT+34*
TIUTOT	SELPAT+1~, SELPAT+15*, SELPAT+19, SELPAT+23
TIUTYP	SELPAT~, SELPAT+5*, SELPAT+6, SELPAT+8, SELPAT+11, SELPAT+36, SELPAT+59
TIUY	ITMCNT+1~, ITMCNT+5, ITMCNT+6, DOCSPICK~, DOCSPICK+8, DOCSPICK+12, DOCSPICK+13, SELPAT+2~, SELPAT+36, SELPAT+56 , SELPAT+58, SAMPLE+1~, SAMPLE+12, SAMPLE+13, SAMPLE+14, AUTHOR+1~, AUTHOR+5*, AUTHOR+6
TIUY("NODFLT"	DOCSPICK+11
TIUY(1	DOCSPICK+13*
TIUZ	SELPAT+1~, SELPAT+32, SELPAT+34, SELPAT+36
TOTAL	SAMPLE+1~, SAMPLE+3, SAMPLE+10, SAMPLE+12, SAMPLE+13
U	ASKTYP+4, ASKTYP+5, ASKTYP+7, ASKTYP+8, ASKTYP+11, ITMCNT+5, DOCSPICK+13, SELPAT+9, SELPAT+13, SELPAT+15 , SELPAT+16, SELPAT+17, SELPAT+18, SELPAT+19, SELPAT+23, SELPAT+26, SELPAT+27, SELPAT+32, SELPAT+46, SELPAT+49 , SELPAT+52, SELPAT+53, SELPAT+54, SELPAT+56, SAMPLE+7, SAMPLE+12, SAMPLE+13
X	ASKTYP+1~, ASKTYP+7*, CHOOSE+1~
Y	ASKTYP+1~, ASKTYP+6, ASKTYP+8, ASKTYPX, DOCSPICK+2~, CHOOSE~, CHOOSE+5*

Customize PDF page

Package: Text Integration Utility

Routine: TIULA2

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 23

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: