Routine: INTSUT3

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
Interaction Calls
Global Variables Directly Accessed
Local Variables

Information

INTSUT3 ; cmi/flag/maw - JD 13 Apr 96 21:09 INTERACTIVE TESTING II ; [ 05/22/2002 2:54 PM ]

Source Information

Source file <INTSUT3.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
IHS Generic Interface System	3	$$LOOKUP^INHUTC1 DISPLAY^INTSUT1 UPSINGMS^INTSUT3
Kernel	1	$$READ^%ZTF
Uncategorized	1	$$CR^UTSRD
VA Fileman	1	^DICN

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
IHS Generic Interface System	7	INHSYS05 INTSEND INTSTO INTSTRT INTSTRT1 INTSUT2 INTSUT3

Entry Points

Name	Comments	DBIA/ICR reference
UPSINGMS(INDA,IN0,INENT)	;Update a single entry in test message multiple ; Input: ; INDA - ien of Test Criteria ; IN0 - DIC(0) ; INENT - value to stuff
ERR
MERGE(INREQLST)	;Merge tests into ^UTILITY GLOBAL ; Input: ; INREQLST - Array of selected messages
UPDAT2FL(INREQLST,INDA)	;Merge to 4001.1 multiple ; Input: ; INREQLST - Array of selected messages ; INDA - ien of 4001.1
UPDATE(INDA)	;Update INREQLST with test messages ; Input/Output - INREQLST - Name of Utility with tests
MERGE2(INARY)	;Merge tests into ^UTILITY GLOBAL ; Input: ; INARY - Array of selected messages
UPDTSND(INDA)	;Update ^UTILITY("INTHU" with test messages ; Input - INDA - ien of Criteria ; Output - ^UTILITY - Name of Utility with tests
FLATNAM(INAME,INTYP)	;Get VMS flat file name
EXISTS(INODE0,INAME)	;Check to see if user defined record exists
UPDTFRUT(INDA)	;Update ^UTILITY to 4001.1 multiple ; Input: ; ^UTILITY("DIS",$J - selected messages ; INDA - ien of 4001.1 ; Output: ; ^DIZ(4001.1,INDA,19, multiple

Name	Field # of Occurrence
$$READ^%ZTF	FLATNAM+10
^DICN	UPSINGMS+9
$$LOOKUP^INHUTC1	EXISTS+14
DISPLAY^INTSUT1	UPSINGMS+10
UPSINGMS^INTSUT3	UPDTFRUT+13
$$CR^UTSRD	FLATNAM+19

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Enter a flat file name to save Criteria to" Line Location: FLATNAM+17
Function Call: WRITE	Prompt: $ZC(%SPAWN,"DIR") Line Location: FLATNAM+18

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(4001.1	UPSINGMS+6
^DIZ(4001.1 - [#4001.1]	UPDAT2FL+6!, UPDAT2FL+11, UPDAT2FL+13, UPDTFRUT+8!, UPDATE+4, UPDATE+5, UPDTSND+5, UPDTSND+6
^INTHU - [#4001]	MERGE+8, MERGE+9, UPDAT2FL+10, UPDAT2FL+11, UPDTFRUT+12, UPDATE+8, UPDTSND+9, UPDTSND+10, UPDTSND+13!
^UTILITY("DIS"	UPDATE+3!, UPDATE+8, UPDATE+9
^UTILITY("INTHU"	MERGE+5!, MERGE+8, MERGE+9, MERGE+10, MERGE2+9, MERGE2+10!, MERGE2+11, MERGE2+12, MERGE2+13, UPDTFRUT+10 , UPDTFRUT+11, UPDTSND+4!, UPDTSND+9, UPDTSND+10, UPDTSND+11*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	UPSINGMS+5~
DA(1	UPSINGMS+7*
DIC	UPSINGMS+5~, UPSINGMS+6!, UPSINGMS+7*
DIC("P"	UPSINGMS+6*
DIC(0	UPSINGMS+7*
DIE	UPSINGMS+5~, UPSINGMS+7*
DLAYGO	UPSINGMS+5~, UPSINGMS+6*
DONE	FLATNAM+5~, FLATNAM+8, FLATNAM+12, FLATNAM+20*
DUZ	MERGE+5, MERGE+8, MERGE+9, MERGE+10, MERGE2+9, MERGE2+10, MERGE2+11, MERGE2+12, MERGE2+13, UPDTFRUT+10 , UPDTFRUT+11, UPDTSND+4, UPDTSND+9, UPDTSND+10, EXISTS+13
IN0	UPSINGMS~, UPSINGMS+7
INAME	FLATNAM~, FLATNAM+10, FLATNAM+11, FLATNAM+12, FLATNAM+13, FLATNAM+16, FLATNAM+21, EXISTS~, EXISTS+10, EXISTS+11 , EXISTS+14
INARY	MERGE2~, MERGE2+6*, MERGE2+11, MERGE2+12
INARY("A"	MERGE2+7, MERGE2+8
INCTRL	EXISTS+7~, EXISTS+8*, EXISTS+13
IND	UPDATE+2~, UPDATE+5, UPDATE+6, UPDATE+8, UPDTSND+3~, UPDTSND+6, UPDTSND+7, UPDTSND+9, UPDTSND+10, UPDTSND+13
INDA	UPDAT2FL~, UPDAT2FL+6, UPDAT2FL+11, UPDAT2FL+13, UPDTFRUT~, UPDTFRUT+8, UPDTFRUT+13, UPDATE~, UPDATE+4, UPDATE+5 , UPSINGMS~, UPSINGMS+7, UPDTSND~, UPDTSND+5, UPDTSND+6
INENT	UPSINGMS~, UPSINGMS+8, UPSINGMS+10
INEXIST	MERGE2+4~, MERGE2+5, MERGE2+9, MERGE2+13
INL	MERGE+4~, MERGE+6, MERGE+7, MERGE+8, MERGE+9, MERGE2+4~, MERGE2+7, MERGE2+8, MERGE2+9, MERGE2+10 , MERGE2+11, MERGE2+12, UPDAT2FL+5~, UPDAT2FL+8, UPDAT2FL+9, UPDTFRUT+7~, UPDTFRUT+10, UPDTFRUT+11, UPDATE+2~, UPDATE+4* , UPDATE+7, UPDATE+8, UPDATE+9, UPDTSND+3~, UPDTSND+5, UPDTSND+8*, UPDTSND+9, UPDTSND+10, UPDTSND+11
INODE0	EXISTS~, EXISTS+10, EXISTS+13
INOPT2	EXISTS+7~, EXISTS+14
INOPT2("APP"	EXISTS+13*
INOPT2("CONTROL"	EXISTS+13*
INOPT2("DUZ"	EXISTS+13*
INOPT2("FUNC"	EXISTS+13*
INOPT2("TYPE"	EXISTS+13*
INREQLST	MERGE~, UPDAT2FL~
INREQLST(	MERGE+6, MERGE+7, UPDAT2FL+8, UPDAT2FL+9
INT	MERGE+4~, MERGE+7, MERGE+8, MERGE+9, MERGE2+4~, MERGE2+8, MERGE2+11, MERGE2+12, UPDAT2FL+5~, UPDAT2FL+9* , UPDAT2FL+10, UPDAT2FL+11, UPDTFRUT+7~, UPDTFRUT+11, UPDTFRUT+12, UPDTFRUT+13, UPDATE+2~, UPDATE+4, UPDATE+5, UPDTSND+3~ , UPDTSND+5*, UPDTSND+6
INTYP	FLATNAM~, FLATNAM+6, FLATNAM+7, FLATNAM+10
IOF	FLATNAM+9
TESTNUM	MERGE+4~, MERGE+10, MERGE2+4~, MERGE2+13, UPDAT2FL+5~, UPDAT2FL+7, UPDAT2FL+12, UPDAT2FL+13, UPDTFRUT+7~, UPDTFRUT+9*
U	UPDAT2FL+11, UPDAT2FL+13, UPSINGMS+6, EXISTS+10, EXISTS+13
X	UPSINGMS+5~, UPSINGMS+8*
Y	UPSINGMS+5~, UPSINGMS+10

Customize PDF page

Package: IHS Generic Interface System

Routine: INTSUT3

Call Graph Total: 6

Caller Graph Total: 7