Routine: TIUHSOLM

Information

TIUHSOLM ;;SLC/AJB,AGP Display Health Summary Object for TIU Objects;27-MAR-2009

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
List Manager	3	EN^VALM ($$SETSTR,FULL)^VALM1 (CLEAN,SET)^VALM10
VA FileMan	3	^DIC ^DIE ^DIR
Kernel	2	($$LJ,$$RJ)^XLFSTR DISP^XQORM1
Health Summary	1	($$CRE,EXTRACT,TYPE)^GMTSOBJ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 7

Package	Total	Caller Graph
Text Integration Utility	6	TIUHS CREATE/MODIFY HS TYPE TIUHS OBJ CHANGE HST TIUHS OBJ DISPLAY TIUHS OBJ EDIT HS OBJECT TIUHSL TIUHSV
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
EN(IEN,TIUIEN)	; -- main entry point for TIUHS OBJ DISPLAY
HDR	; -- header code
INIT	; -- init variables and list array
EHSO	;
CHST	;
CREATEHS	;
HELP	; -- help code
XQORM	;
EXIT	; -- exit code
EXPND	; -- expand code

External References

Name	Field # of Occurrence
^DIC	CHST+16
^DIE	CHST+19
^DIR	CHST+10, CREATEHS+4
$$CRE^GMTSOBJ	EHSO+6
EXTRACT^GMTSOBJ	INIT+4
TYPE^GMTSOBJ	CREATEHS+3
EN^VALM	EN+1
$$SETSTR^VALM1	HDR+6, INIT+21
FULL^VALM1	EHSO+2, CHST+2, CREATEHS+2
CLEAN^VALM10	EHSO+7, CHST+20, CREATEHS+5
SET^VALM10	INIT+7, INIT+11, INIT+13, INIT+15, INIT+18, INIT+19, INIT+22, INIT+23, INIT+27, INIT+31 , INIT+35, INIT+39, INIT+43, INIT+47, INIT+50, INIT+53
$$LJ^XLFSTR	INIT+25, INIT+29, INIT+33, INIT+37, INIT+41, INIT+45
$$RJ^XLFSTR	INIT+48, INIT+51
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Can't edit this HS Object: Only the owner can edit this HS Object" Line Location: EHSO+3
Function Call: WRITE	Prompt: !,"Can't edit this HS Object: Only the owner or the HS Manager can edit this HS Object" Line Location: EHSO+4
Function Call: WRITE	Prompt: !,"Can't edit this National Object" Line Location: CHST+3
Function Call: WRITE	Prompt: !,"Can't edit this HS Object: Only the owner or the HS Manager can edit this HS Object" Line Location: CHST+4
Function Call: WRITE	Prompt: !,"*WARNING* By changing the HS Type this will change the output data." Line Location: CHST+5
Function Call: WRITE	Prompt: ! Line Location: CREATEHS+4
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	DIC Line Location: CHST+16
Routine Call	DIE Line Location: CHST+19
Routine Call	DIR Line Location: CHST+10 CREATEHS+4
Routine Call	VALM Line Location: EN+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMT(142.5 - [#142.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142.5 - [#142.5]	EHSO+3, EHSO+4, EHSO+5, CHST+3, CHST+4
^TIU(8925.1 - [#8925.1]	HDR+3
^XUSEC("GMTSMGR"	EHSO+4, CHST+4

Label References

Name	Line Occurrences
INIT	EHSO+8, CHST+21, CREATEHS+6
XQORM	HDR+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CENTER	HDR+1~, HDR+5, HDR+6, INIT+20, INIT+21
DA	CHST+1~, CHST+19*
DIC	CHST+1~, CHST+15*, CHST+17!
DIC("A"	CHST+15*
DIC("S"	CHST+15*
DIC(0	CHST+15*
DIE	CHST+1~, CHST+19*
DIR	CHST+1~
DIR("?"	CHST+9*
DIR("A"	CHST+7*
DIR("B"	CHST+8*
DIR(0	CHST+6, CREATEHS+4
DIROUT	CHST+1~, CHST+11
DR	CHST+1~, CHST+19*
DTOUT	CHST+1~, CHST+11*, CHST+12
DUOUT	CHST+1~, CHST+12
DUZ	EHSO+4, CHST+4
HEADER	HDR+1~, HDR+6*, HDR+7
HSIEN	CHST+1~, CHST+18*
>> HSOBJ	EHSO+3, EHSO+4, CHST+3, CHST+4
HSOBJNOD	HDR+1~
HSOBNAM	EHSO+1~, EHSO+5*, EHSO+6
>> HSTYNAM	INIT+5*, INIT+12, CREATEHS+3
IEN	EN~, INIT+4, INIT+5, INIT+6, INIT+8, INIT+9, INIT+12, INIT+14, INIT+16, INIT+24 , INIT+25, INIT+28, INIT+29, INIT+32, INIT+33, INIT+36, INIT+37, INIT+40, INIT+41, INIT+44 , INIT+45, INIT+48, INIT+51, EHSO+5, CHST+19
IOM	HDR+5, INIT+20
LINE	INIT+1~, INIT+2, INIT+6, INIT+7, INIT+10, INIT+11, INIT+12, INIT+13, INIT+14, INIT+15 , INIT+17, INIT+18, INIT+19, INIT+22, INIT+23, INIT+26, INIT+27, INIT+30, INIT+31, INIT+34 , INIT+35, INIT+38, INIT+39, INIT+42, INIT+43, INIT+46, INIT+47, INIT+49, INIT+50, INIT+52* , INIT+53, INIT+54
OBJ	INIT+1~, INIT+4
OBJ(	INIT+5, INIT+6, INIT+8, INIT+9, INIT+12, INIT+14, INIT+16, INIT+24, INIT+25, INIT+28 , INIT+29, INIT+32, INIT+33, INIT+36, INIT+37, INIT+40, INIT+41, INIT+44, INIT+45, INIT+48 , INIT+51
OBJDISP	INIT+1~, INIT+20*, INIT+21
OBJECT	INIT+1~
POP	CHST+1~, CREATEHS+1~
TEXT	CHST+1~
TITLE	HDR+1~, HDR+4*, HDR+5, HDR+6
TIUIEN	EN~, HDR+3
TIUNAM	HDR+1~, HDR+3*, HDR+4
U	HDR+3, EHSO+3, EHSO+4, EHSO+5, CHST+3, CHST+4
VAL	INIT+1~, INIT+25, INIT+29, INIT+33, INIT+37, INIT+41, INIT+45
VALHDR	HDR+1~
>> VALMCNT	INIT+54*
>> VALMHDR(1	HDR+7*
VALMSG	HDR+1~, HDR+8*
VALUE	INIT+1~, INIT+6, INIT+7, INIT+9, INIT+11, INIT+12, INIT+13, INIT+14, INIT+15, INIT+16* , INIT+18, INIT+19, INIT+21, INIT+22, INIT+23, INIT+24, INIT+25, INIT+27, INIT+28, INIT+29* , INIT+31, INIT+32, INIT+33, INIT+35, INIT+36, INIT+37, INIT+39, INIT+40, INIT+41, INIT+43 , INIT+44, INIT+45, INIT+47, INIT+48, INIT+50, INIT+51, INIT+53, EHSO+1~, EHSO+6*
X	CHST+1~, HELP+1*
>> XQORM("A"	XQORM+1*
Y	CHST+1~, CHST+17, CHST+18
Y(0	CHST+13
YESNO	CHST+1~, CHST+13*, CHST+14

Customize PDF page

Package: Text Integration Utility