Routine: TIUADCL

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
Text Integration Utility	7	$$PATIENT^TIU144 (EN,HDR,INIT)^TIUADCL1 EN^TIUAUDIT FIXLSTNW^TIULM $$CANDO^TIULP $$DOCRES^TIULRR $$READ^TIUU
Registration	4	EN^VALM ($$FDATE,$$SETSTR,CLEAR,FULL)^VALM1 (CLEAN,SET)^VALM10 RE^VALM4
VA Fileman	4	^%DT ^DIC $$GET1^DIQ ^DIR
Kernel	1	($$FMTE,$$HTE,$$NOW)^XLFDT

Package	Total	Caller Graph
Text Integration Utility	8	TIU UNK ADDENDA MENU TIU189 TIU199 TIUADCL1 TIUBR TIUPUTC TIUSRVG TIUSRVR1

Package

Total

Caller Graph

Text Integration Utility

TIU UNK ADDENDA MENU TIU189 TIU199 TIUADCL1 TIUBR TIUPUTC TIUSRVG TIUSRVR1

Entry Points

Name	Comments	DBIA/ICR reference
DATE(TIUDT,TIUSEQ)	; if date is year entry only, appends Jan 01/Dec 31@2400 respectively
EN	; main entry point for TIU UNK ADDENDA CLEANUP
HDR	; sets header
ONEDOC()	;
BROWSE	; browse document
INIT	; finds unknown addenda & creates list
ACTIONS	; user selectable actions
DTRANGE(DTRANGE)	; prompts user for date range input
CHKFILE(FILE,NAME,SCREEN)	; checks entry in file and returns IEN ; VMP/RJT - *233 - added Forget Lookup Value flag to DIC call since its affecting the value in the ^DISV global (spacebar return function)
XQORM	; default action for list manager
CHNGVIEW	; allows user to change search parameters
EXIT	;
DETDISP	; detailed display
MULTI(TIUCHK)	;
FNDPRNT	; executes LM for TIU UNK ADDENDA ATTACH
SELECT(ACTION)	; selects document(s) and calls ACTION
HELP	; help code

External References

Name	Field # of Occurrence
^%DT	DTRANGE+7
^DIC	CHKFILE+2
$$GET1^DIQ	INIT+12, INIT+13, SELECT+27
^DIR	HELP+9, ACTIONS+16, SELECT+10
$$PATIENT^TIU144	INIT+10
EN^TIUADCL1	FNDPRNT+2
HDR^TIUADCL1	CHNGVIEW+8
INIT^TIUADCL1	CHNGVIEW+8
EN^TIUAUDIT	DETDISP+14
FIXLSTNW^TIULM	DETDISP+15
$$CANDO^TIULP	DETDISP+6
$$DOCRES^TIULRR	DETDISP+10
$$READ^TIUU	ACTIONS+20, ACTIONS+24, DETDISP+9, DETDISP+13, SELECT+20, SELECT+25
EN^VALM	EN+3, BROWSE+2
$$FDATE^VALM1	INIT+12
$$SETSTR^VALM1	HDR+3, INIT+9, INIT+10, INIT+11, INIT+12, INIT+13, INIT+14, INIT+17, FNDPRNT+7
CLEAR^VALM1	DETDISP+5
FULL^VALM1	HELP+3, CHNGVIEW+1, SELECT+2
CLEAN^VALM10	CHNGVIEW+5, CHNGVIEW+8
SET^VALM10	INIT+15, INIT+17, FNDPRNT+8
RE^VALM4	FNDPRNT+9
$$FMTE^XLFDT	HDR+2
$$HTE^XLFDT	DTRANGE+6
$$NOW^XLFDT	DTRANGE+2, DTRANGE+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The following actions are available:" Line Location: HELP+4
Function Call: WRITE	Prompt: !,"Browse a Document - View a selected document (if authorized)" Line Location: HELP+5
Function Call: WRITE	Prompt: !,"Change View - Modify search criteria" Line Location: HELP+6
Function Call: WRITE	Prompt: !,"Detailed Display - View detailed display of a document (if authorized)" Line Location: HELP+7
Function Call: WRITE	Prompt: !,"Find Parent - Find available OPERATION REPORTS to assign as parent",! Line Location: HELP+8
Function Call: WRITE	Prompt: TIU("IOCUOFF") Line Location: INIT+3
Function Call: WRITE	Prompt: !!,"Searching for the documents." Line Location: INIT+4
Function Call: WRITE	Prompt: !!,"You may only attach addenda to one parent at a time." Line Location: ACTIONS+18
Function Call: WRITE	Prompt: !,"Select only one parent for this action.",! Line Location: ACTIONS+19
Function Call: WRITE	Prompt: !!,"You may only view one document at a time." Line Location: ACTIONS+22
Function Call: WRITE	Prompt: !,"Select only one document for this action.",! Line Location: ACTIONS+23
Function Call: WRITE	Prompt: @IOF Line Location: CHNGVIEW+2
Function Call: WRITE	Prompt: @IOF Line Location: DTRANGE+3
Function Call: WRITE	Prompt: !!,?42,"Future dates are not allowed.",! Line Location: DTRANGE+10
Function Call: WRITE	Prompt: !!,$C(7),$P(TIUVIEW,U,2),! Line Location: DETDISP+8
Function Call: WRITE	Prompt: !!,$C(7),"Ok, no harm done...",! Line Location: DETDISP+12
Function Call: WRITE	Prompt: !,"No documents to select." Line Location: SELECT+3
Function Call: WRITE	Prompt: !!,"You may not select multiple OPERATION Reports to view or attach addenda to." Line Location: SELECT+18
Function Call: WRITE	Prompt: !,"Select only one document to view or attach addenda.",! Line Location: SELECT+19
Function Call: WRITE	Prompt: !!,"You may only view one document at a time." Line Location: SELECT+23
Function Call: WRITE	Prompt: !,"Select only one document for this action.",! Line Location: SELECT+24
Routine Call	VALM Line Location: EN+3 BROWSE+2
Routine Call	DIC Line Location: CHKFILE+2
Routine Call	DIR Line Location: HELP+9 ACTIONS+16 SELECT+10

FileNo	Call Tags
^TIU(8925 - [#8925]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^ORD(101 - [#101]	XQORM+1
^TIU(8925 - [#8925]	INIT+6, INIT+10, FNDPRNT+6

Name	Line Occurrences
$$CHKFILE	INIT+5
$$DATE	DTRANGE+9, DTRANGE+10
$$MULTI	ACTIONS+17, ACTIONS+21, SELECT+17, SELECT+22
$$ONEDOC	BROWSE+1, DETDISP+2
@(	ACTIONS+28, SELECT+29
DTRANGE	EN+2, CHNGVIEW+4, CHNGVIEW+7
HDR	CHNGVIEW+5
INIT	CHNGVIEW+5
XQORM	EXIT+1, HDR+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DTRANGE+1~, DTRANGE+2*
%DT("A"	DTRANGE+5*
%DT("B"	DTRANGE+6*
%DT(0	DTRANGE+2, DTRANGE+9
ACTION	ACTIONS+1~, ACTIONS+2, ACTIONS+26, ACTIONS+27, ACTIONS+28, ACTIONS+29, SELECT~, SELECT+22, SELECT+29
ADDENDUM	INIT+1~, INIT+5*, INIT+6
CNT	DTRANGE+1~, DTRANGE+4, DTRANGE+5, DTRANGE+6, DTRANGE+8, DTRANGE+9, DTRANGE+10*
D0	DETDISP+1~
DIC	CHKFILE+2~*
DIC("S"	CHKFILE+2*
DIC(0	CHKFILE+2*
DIR	HELP+1~, ACTIONS+3~, SELECT+7~
DIR("?"	ACTIONS+11, ACTIONS+12, ACTIONS+13, ACTIONS+14, ACTIONS+15*
DIR("A"	HELP+2, HELP+9, ACTIONS+5, SELECT+8*
DIR("B"	ACTIONS+6*
DIR("L"	ACTIONS+7, ACTIONS+8, ACTIONS+9, ACTIONS+10
DIR(0	HELP+2, ACTIONS+4, SELECT+9*
DIROUT	DETDISP+1~
DIRUT	ACTIONS+3~, ACTIONS+16, SELECT+10
DISPLAY	INIT+7~, INIT+9, INIT+10, INIT+11, INIT+12, INIT+13, INIT+14, INIT+15
DTR1	EN+1~, EN+2, CHNGVIEW+4
DTR1("BEGDT"	HDR+2, INIT+5
DTR1("ENDDT"	HDR+2, INIT+6
>> DTR2	CHNGVIEW+7
DTRANGE	DTRANGE~
DTRANGE("BEGDT"	DTRANGE+9*
DTRANGE("ENDDT"	DTRANGE+10*
FILE	CHKFILE~, CHKFILE+2
HDR	HDR+1~, HDR+2*, HDR+3
IOF	CHNGVIEW+2, DTRANGE+3
IOM	HDR+3, INIT+17
NAME	CHKFILE~, CHKFILE+2
PARENT	FNDPRNT+1~, FNDPRNT+6*, FNDPRNT+7
POP	ACTIONS+3~, DTRANGE+1~
RSTRCTD	DETDISP+1~, DETDISP+10*, DETDISP+11
SCREEN	CHKFILE~, CHKFILE+2
STRTDT	INIT+1~, INIT+5, INIT+6
TIU	INIT+1~
TIU("IOCUOFF"	INIT+2*, INIT+3
TIU("IOCUON"	INIT+2*
TIUCHK	MULTI~, MULTI+3
TIUCNT	MULTI+1~, MULTI+2, MULTI+3, MULTI+4, SELECT+14~, SELECT+15*
TIUCONT	ACTIONS+1~, ACTIONS+16, ACTIONS+25*, ACTIONS+28
TIUD	DETDISP+1~
TIUDA	INIT+1~, INIT+5, INIT+6, INIT+10, INIT+11, INIT+12, INIT+13, INIT+15, BROWSE+1~, DETDISP+1~ , DETDISP+2, DETDISP+6, DETDISP+10
TIUDATA	DETDISP+1~
TIUDISP	FNDPRNT+1~, FNDPRNT+5, FNDPRNT+7, FNDPRNT+8
TIUDOCS	SELECT+1~, SELECT+27*, SELECT+28
TIUDOCS(	FNDPRNT+4, FNDPRNT+6, FNDPRNT+8, ONEDOC+3, ONEDOC+4, SELECT+15, SELECT+16, SELECT+27!
TIUDOCS(1	SELECT+6*
TIUDT	DATE~, DATE+1, DATE+2, DATE+3
TIUGDATA	DETDISP+1~
TIUI	DETDISP+1~
TIUQUIT	EN+1~, EN+2, CHNGVIEW+3, CHNGVIEW+4, CHNGVIEW+6, CHNGVIEW+7, DTRANGE+8, DETDISP+1~, DETDISP+15, SELECT+1~ , SELECT+5, SELECT+10
TIUSEL	DETDISP+1~, SELECT+1~, SELECT+4, SELECT+5, SELECT+11, SELECT+12*, SELECT+13, SELECT+15, SELECT+16
TIUSEQ	DATE~, DATE+1, DATE+2
TIUTMP	FNDPRNT+1~, FNDPRNT+3, FNDPRNT+4, FNDPRNT+5, FNDPRNT+6, FNDPRNT+8, MULTI+1~, MULTI+2, MULTI+3, ONEDOC+1~ , ONEDOC+2, ONEDOC+3, ONEDOC+4
TIUVIEW	DETDISP+4~, DETDISP+6*, DETDISP+7, DETDISP+8
U	INIT+6, INIT+10, XQORM+1, ACTIONS+26, ACTIONS+27, DETDISP+8, FNDPRNT+6, SELECT+10
>> VALM("TITLE"	ACTIONS+4, ACTIONS+6, ACTIONS+8, ACTIONS+15, ACTIONS+17, ACTIONS+26, CHNGVIEW+3, CHNGVIEW+6, SELECT+17, SELECT+26
>> VALMAR	FNDPRNT+5, SELECT+6, SELECT+15, SELECT+16
>> VALMBCK	HELP+10, ACTIONS+2, ACTIONS+29, CHNGVIEW+3, CHNGVIEW+6, DETDISP+16, SELECT+21, SELECT+26, SELECT+28*
>> VALMBG	CHNGVIEW+5, CHNGVIEW+8
>> VALMCNT	INIT+5, INIT+8, INIT+9, INIT+15, INIT+16, XQORM+1, SELECT+3
>> VALMHDR(1	HDR+3*
>> VALMLST	SELECT+6, SELECT+8, SELECT+9, SELECT+15, SELECT+16
VALMY	DETDISP+16!
X	HELP+2, ACTIONS+3~, CHKFILE+2~, DTRANGE+1~, DTRANGE+10, SELECT+7~, SELECT+13*, SELECT+15, SELECT+16
>> XQORM("#"	XQORM+1*
>> XQORNOD(0	SELECT+4
Y	ACTIONS+3~, ACTIONS+17, ACTIONS+21, ACTIONS+26, ACTIONS+27, CHKFILE+2~, CHKFILE+3, DTRANGE+1~, DTRANGE+8, DTRANGE+9 , DTRANGE+10, DETDISP+1~, SELECT+7~, SELECT+10
Y(0	SELECT+11

Customize PDF page

Package: Text Integration Utility

Routine: TIUADCL

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: