Routine: TIUFHA2

Information

TIUFHA2 ; SLC/MAM - LM Templates A and H Action Copy/Move (COPYMOVE), WHICHTL(CFILEDA,PFILEDA), COPY, OVERRIDE(XDIRA) ;7/28/97 14:02

Source Information

Source file <TIUFHA2.m>

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Text Integration Utility	7	COPYFDA^TIUFHA5 ($$WHICHDC,MOVETL,REEXPAND,UPDATE,VALMBG)^TIUFHA7 MOVEDOC^TIUFHA8 CHECK^TIUFLF3 (ADDTEN,ANCESTOR)^TIUFLF4 AUTOSTAT^TIUFLF6 (PAUSE,RESET)^TIUFXHLX
VA Fileman	3	^DIC ^DIK ^DIR
Registration	2	FULL^VALM1 EN^VALM2

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Text Integration Utility	4	TIUFHA7 TIUFHA8 TIUFT TIUFT1

Entry Points

External References

Name	Field # of Occurrence
^DIC	WHICHTL+7
^DIK	AGAINC+26, AGAINC+27
^DIR	COPYMOVE+14, OVERRIDE+8
COPYFDA^TIUFHA5	AGAINC+8
$$WHICHDC^TIUFHA7	AGAINC+15
MOVETL^TIUFHA7	COPYMOVE+21
REEXPAND^TIUFHA7	MSG+11, MSG+12
UPDATE^TIUFHA7	COPYMOVE+21
VALMBG^TIUFHA7	MSG+14
MOVEDOC^TIUFHA8	COPYMOVE+21
CHECK^TIUFLF3	AGAINC+5
ADDTEN^TIUFLF4	AGAINC+29
ANCESTOR^TIUFLF4	AGAINC+24
AUTOSTAT^TIUFLF6	AGAINC+28
PAUSE^TIUFXHLX	WHICHTL+8, COPYMOVE+16, AGAINC, AGAINC+3, AGAINC+5, AGAINC+10, AGAINC+16, MSG+9
RESET^TIUFXHLX	CMOVX+1
FULL^VALM1	COPYMOVE+5
EN^VALM2	AGAINC

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Copy left in file as an orphan. To add it to a Title/Component, use action",!,"Items for the desired Title/Component.",! Line Location: WHICHTL+8
Function Call: WRITE	Prompt: " ...Nothing ",$S(ACTION["M":"Moved",1:"Copied") Line Location: COPYMOVE+16
Function Call: WRITE	Prompt: !,"WARNING: Entries can be COPIED without affecting the original, but be careful",!,"where you PUT the copy. Don't touch entries you are not responsible for.",! Line Location: COPYMOVE+17
Function Call: WRITE	Prompt: !,"WARNING: This action affects inheritance and can CHANGE DOCUMENT BEHAVIOR. It",!,"DISREGARDS ownership. It may take awhile if the Title has many documents.",!,"Please use caution and DON'T TOUCH entries you are not responsible for.",! Line Location: COPYMOVE+19
Function Call: WRITE	Prompt: !!," Missing List Manager Data; See IRM",! Line Location: AGAINC+0
Function Call: WRITE	Prompt: !!,MSG,! Line Location: AGAINC+3
Function Call: WRITE	Prompt: !!,"Faulty entry. Please TRY entry and correct problems before copying it.",! Line Location: AGAINC+5
Function Call: WRITE	Prompt: !!,"Another user is editing this entry.",! Line Location: AGAINC+7
Function Call: WRITE	Prompt: !!," ...Not copied" Line Location: AGAINC+11
Function Call: WRITE	Prompt: !!," ...Copy deleted" Line Location: AGAINC+12
Function Call: WRITE	Prompt: !!,TYPE_" copied into File Entry #"_CFILEDA Line Location: AGAINC+13
Function Call: WRITE	Prompt: !!,"Copy left in file as an orphan. To add it to a Document Class, use action",!,"Items for the desired Document Class. Please test it thoroughly after adding it",!,"since its inheritance may have changed.",! Line Location: AGAINC+17
Function Call: WRITE	Prompt: !!,"Another user is editing parent Title. Copy deleted. Please try again later.",! Line Location: AGAINC+25
Function Call: WRITE	Prompt: !,"Inactivating Title ",$P(TLNODE0,U) Line Location: AGAINC+30
Function Call: WRITE	Prompt: !,"Copy added to ",$P(NPARENTY,U,2),! Line Location: AGAINC+31
Function Call: WRITE	Prompt: !,"You will need to add the copy to a Document Class in the hierarchy and activate",!,"it before it can be used. Use DETAILED DISPLAY for the Document Class, ITEMS,",!,"ADD/CREATE, and enter the name of the copy.",! Line Location: MSG+1
Function Call: WRITE	Prompt: !,"Copies are created inactive. Please activate the copy Title when it is ready",!,"for users to enter documents on it.",! Line Location: MSG+2
Function Call: WRITE	Prompt: !,"Adding the copy Title to a different Document Class may change its behavior",!,"from that of the original. Adding it to a different CLASS may change it",!,"RADICALLY. Please test the copy thoroughly before activating it.",! Line Location: MSG+3
Function Call: WRITE	Prompt: !,"Please test the Title ",$P(TLNODE0,U),!,"and reactivate it when it is ready for users to enter documents on it.",! Line Location: MSG+5
Function Call: WRITE	Prompt: !!,"You will need to add the copy to a Title in the hierarchy before it can be used.",!,"Use DETAILED DISPLAY for the Title, ITEMS, ADD/CREATE, and enter the name of",!,"the copy.",! Line Location: MSG+6
Function Call: WRITE	Prompt: !,"You will have to expand the hierarchy to see the Copy in its new position.",! Line Location: MSG+7
Function Call: WRITE	Prompt: !,"Please test the copy object and activate it when it is ready for users to embed",!,"it in boilerplate text.",! Line Location: MSG+8
Function Call: WRITE	Prompt: ! Line Location: MSG+9
Function Call: WRITE	Prompt: !,"WARNING: As a National Programmer, you are permitted to override safeguards",!,"when moving entries and when adding/deleting items. Please do NOT override" Line Location: OVERWARN+1
Function Call: WRITE	Prompt: !,"safeguards except as a last resort, and then only after thoroughly testing the",!,"actions you plan to take.",! Line Location: OVERWARN+2
Routine Call	DIC Line Location: WHICHTL+7
Routine Call	DIR Line Location: COPYMOVE+14 OVERRIDE+8

FileNo	Call Tags
^TIU(8925.1 - [#8925.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^TIU(8925.1 - [#8925.1]	COPYMOVE+8, AGAINC+1, AGAINC+4, AGAINC+7, AGAINC+23, AGAINC+24, AGAINC+25, AGAINC+26, COPYX+1
^TMP("TIUF"	AGAINC+9, AGAINC+28
^TMP("TIUF1IDX"	COPYMOVE+7, AGAINC, AGAINC+4, AGAINC+19, MSG+11

Name	Line Occurrences
$$WHICHTL	AGAINC+15
AGAINC	AGAINC+3
CMOVX	COPYMOVE+4, COPYMOVE+6, COPYMOVE+16
COPY	COPYMOVE+21
COPYX	AGAINC, AGAINC+3, AGAINC+5, AGAINC+7, AGAINC+10, AGAINC+18
MSG	AGAINC+14
OVERWARN	COPYMOVE+20
OVERX	OVERRIDE+4
WTLX	WHICHTL+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTION	COPYMOVE+2~, COPYMOVE+6, COPYMOVE+8, COPYMOVE+15*, COPYMOVE+16, COPYMOVE+17, COPYMOVE+18, COPYMOVE+21
ANCESTOR	AGAINC+24~
ANCESTOR(	AGAINC+24
ANCESTOR(100	AGAINC+24
CFILEDA	WHICHTL~, COPY+5~, AGAINC+8, AGAINC+10, AGAINC+11, AGAINC+12*, AGAINC+13, AGAINC+26, AGAINC+27, AGAINC+29 , MSG+14
CNODE0	COPY+7~, AGAINC+8, AGAINC+29, AGAINC+30, MSG, MSG+4, MSG+8, MSG+11
DA	AGAINC+22~, AGAINC+26, AGAINC+27
DIC	WHICHTL+3~, WHICHTL+4*
DIC("A"	WHICHTL+5*
DIC("S"	WHICHTL+6*
DIC(0	WHICHTL+4*
DIK	AGAINC+22~, AGAINC+26*
DIR	COPYMOVE+2~, COPY+8~, OVERRIDE+2~
DIR("?"	COPYMOVE+9, COPYMOVE+10, COPYMOVE+11, COPYMOVE+12, COPYMOVE+13*
DIR("A"	COPYMOVE+14, OVERRIDE+3, OVERRIDE+6, OVERRIDE+7
DIR("B"	COPYMOVE+14, OVERRIDE+5
DIR(0	COPYMOVE+14, OVERRIDE+5
DIROUT	COPY+7~
DIRUT	COPYMOVE+2~, COPYMOVE+6, COPYMOVE+16~, COPY+7~, AGAINC+3, AGAINC+6!, AGAINC+12, AGAINC+15
DTOUT	WTLX, COPYMOVE+2~, CMOVX, COPY+7~, AGAINC+5, AGAINC+10, COPYX
DUOUT	COPY+7~
ENTRYNO	COPYMOVE+2~, COPYMOVE+7*
FILEDA	COPYMOVE+2~, COPYMOVE+7, COPYMOVE+8, COPY+5~, AGAINC+1, AGAINC+4, AGAINC+5, AGAINC+7, AGAINC+8, AGAINC+15 , MSG+14, COPYX+1
INFO	COPY+5~, AGAINC*, AGAINC+1
LINENO	COPY+6~, AGAINC+1*, MSG+14
MSG	COPY+6~, AGAINC+3*
NEWTLY	WHICHTL+3~, WHICHTL+9*, WTLX+1
NODE0	COPY+5~, AGAINC+1*, AGAINC+3, AGAINC+9, AGAINC+14, AGAINC+15, AGAINC+21
NPARENTY	COPY+8~, AGAINC+15*, AGAINC+16, AGAINC+18, AGAINC+19, AGAINC+31
NPFILEDA	COPY+7~, AGAINC+19*, AGAINC+23, AGAINC+24, AGAINC+29, MSG+2, MSG+12
NPLINENO	COPY+5~, AGAINC+14, AGAINC+19, MSG+7, MSG+10, MSG+12
NPNODE0	COPY+7~, AGAINC+23*, AGAINC+24
OVERRIDE	OVERRIDE+2~, OVERRIDE+3, OVERRIDE+9, OVERX
PFILEDA	WHICHTL~, COPY+5~, AGAINC+4*, AGAINC+5, AGAINC+8, AGAINC+15, MSG+2
PLINENO	COPY+5~, AGAINC+4*
TENDA	AGAINC+22~, AGAINC+26*
TIUFCK	AGAINC+5~
TIUFCK("P"	AGAINC+5!
TIUFFULL	COPYMOVE+2~, COPYMOVE+5*, CMOVX+1
TIUFI	COPY+7~, AGAINC+24*
TIUFSHAR	COPY+6~, AGAINC+1*
>> TIUFTMPL	COPYMOVE+4, COPYMOVE+6, COPYMOVE+15, COPYMOVE+16, AGAINC+14, MSG+1, MSG+6, MSG+7, MSG+10
>> TIUFWHO	COPYMOVE+4, COPYMOVE+20, OVERRIDE+4
>> TIUFXNOD	COPYMOVE+3*, COPYMOVE+7, AGAINC, AGAINC+3, OVERRIDE+7
TLFILEDA	COPY+8~, AGAINC+23, AGAINC+24, AGAINC+25, AGAINC+28, MSG+11
TLLINENO	COPY+8~, MSG+11*
TLNODE0	COPY+8~, AGAINC+23, AGAINC+24, AGAINC+28, AGAINC+30, MSG+5
TYPE	COPY+8~, AGAINC+9*, AGAINC+13, AGAINC+16
U	COPYMOVE+7, AGAINC+1, AGAINC+3, AGAINC+9, AGAINC+14, AGAINC+15, AGAINC+21, AGAINC+24, AGAINC+26, AGAINC+28 , AGAINC+30, AGAINC+31, MSG, MSG+4, MSG+5, MSG+8, MSG+11
>> VALM("ENTITY"	COPY+9, COPYX+1
>> VALMBCK	COPYMOVE+3, CMOVX+1, AGAINC, AGAINC+6, COPYX*
>> VALMCNT	AGAINC+8
>> VALMQUIT	WTLX, CMOVX
>> VALMY(0	AGAINC
X	WHICHTL+3~, COPYMOVE+2~, COPY+8~
XDIRA	OVERRIDE~, OVERRIDE+3
>> XQORNOD(0	COPYMOVE+3
Y	WHICHTL+3~, WHICHTL+8, WHICHTL+9, COPYMOVE+2~, COPYMOVE+6, COPY+8~, OVERRIDE+2~, OVERRIDE+9

Customize PDF page

Package: Text Integration Utility

Routine: TIUFHA2

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
CMOVX
WHICHTL(CFILEDA,PFILEDA)	; Function returns IFN of TL/CO to add copy Component to, or 0 if none chosen.
WTLX
AGAINC
COPYMOVE	; Template H Action Copy/Move, Templates A, J Action Copy ; See Description Field of Protocol TIUFHA ACTION COPY for detailed description of actions Copy, Move Title, Move Documents, and Update Documents.
COPYX
OVERRIDE(XDIRA)	; function returns 1 if natl programmer, wants to override safeguards
OVERWARN	;Warn re override
OVERX
MSG
COPY	; Copy Title, Component, or Object. ; Updates Template A if started there. ; Returns TIUFERR=1 if couldn't complete process. ; Requires TIUFTMPL. ; Requires TIUFWHO, set in Options TIUF/A/C/H EDIT/SORT/CREATE DDEFS CLIN/MGR/NATL.