Routine: HLOUSR2

Package	Total	Call Graph
Health Level Seven	5	$$HLNEXT^HLOMSG ($$FINDMSG,GETMSGB)^HLOMSG1 $$ESCAPE^HLOPBLD $$STARTMSG^HLOPRS ($$STOPPED,STARTQUE,STOPQUE)^HLOQUE
VA FileMan	4	^%DT EN^DDIOL WAIT^DICD ^DIR
List Manager	3	EN^VALM (FULL,PAUSE)^VALM1 (CLEAN,CNTRL)^VALM10
Kernel	2	($$FMADD,$$FMTE)^XLFDT ($$LJ,$$RJ)^XLFSTR

Package	Total	Caller Graph
Health Level Seven	17	HLO APPLICATION ERRORED MESSAGES HLO MESSAGE ERRORS HLO MESSAGE VIEWER HLO START/STOP ONE QUEUE HLO TRANSMISSION FAILURES HLOESTAT HLOQUE HLOSTAT HLOSTRAC HLOTRACE HLOUSR HLOUSR3 HLOUSR4 HLOUSR5 HLOUSR6 HLOUSR7 ^HLD(779.11
Kernel	2	^DIC(19 ^ORD(101

Name	Comments	DBIA/ICR reference
EN	;
SHOWLIST	;
SHOW
ADDTO(IEN,TIME,SCREEN,ERRCOUNT)	;
ASKPARMS(PARMS)	;
ASKMAX()
ASKAPP()	;
ASKSCR()	;
ASKYESNO(PROMPT,DEFAULT)	;
STRTSTPQ	;
ASKQUE(DIR)	;
AGAIN
ASKBEGIN(DEFAULT)	;
ASKEND(BEGIN)	;
LJ(STRING,LEN)	;
RJ(STRING,LEN)	;
I()	;
HEADER	;
HELP	;
GETSCRN(IEN,SCREEN)	;
SCREEN(ERROR,SCREEN)	;

Name	Field # of Occurrence
^%DT	ASKBEGIN+12, ASKEND+11
EN^DDIOL	HELP+12
WAIT^DICD	EN+1
^DIR	ASKMAX+7, ASKAPP+7, ASKSCR+8, ASKYESNO+12, STRTSTPQ+12, STRTSTPQ+20
$$HLNEXT^HLOMSG	ADDTO+20
$$FINDMSG^HLOMSG1	ADDTO+13
GETMSGB^HLOMSG1	ADDTO+11
$$ESCAPE^HLOPBLD	ADDTO+21
$$STARTMSG^HLOPRS	ADDTO+2, ADDTO+16
$$STOPPED^HLOQUE	STRTSTPQ+24
STARTQUE^HLOQUE	STRTSTPQ+34
STOPQUE^HLOQUE	STRTSTPQ+33
EN^VALM	EN+2
FULL^VALM1	ASKAPP+1, ASKSCR+1, STRTSTPQ+5
PAUSE^VALM1	AGAIN+19
CLEAN^VALM10	SHOWLIST+3
CNTRL^VALM10	SHOWLIST+16, SHOWLIST+25, ADDTO+30
$$FMADD^XLFDT	ASKBEGIN+9
$$FMTE^XLFDT	ADDTO+29, ASKBEGIN+9
$$LJ^XLFSTR	LJ+1
$$RJ^XLFSTR	RJ+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"That queue is not stopped!" Line Location: STRTSTPQ+28
Function Call: WRITE	Prompt: !,"Enter the full, exact name of queue:" Line Location: AGAIN+0
Function Call: READ	Variable: QUEUE Timeout: 60 Line Location: AGAIN+2
Function Call: WRITE	Prompt: !,"Each message is placed on a queue that has an arbitrary name up to 20",!,"characters long." Line Location: AGAIN+3
Routine Call	DIR Line Location: ASKMAX+7 ASKAPP+7 ASKSCR+8 ASKYESNO+12 STRTSTPQ+12 STRTSTPQ+20
Routine Call	VALM Line Location: EN+2

Name	Line Occurrences (* Changed, ! Killed)
^HLB("ERRORS"	SHOWLIST+11, SHOWLIST+14, SHOWLIST+17, SHOWLIST+23, SHOWLIST+26
^HLB("QUEUE"	AGAIN+7, AGAIN+9
^HLD(779.11 - [#779.11]	GETSCRN+6, GETSCRN+12
^TMP($J	AGAIN+5!, AGAIN+9*, AGAIN+14, AGAIN+23!

Name	Line Occurrences
$$ASKAPP	ASKPARMS+14
$$ASKBEGIN	ASKPARMS+2
$$ASKMAX	ASKPARMS+4
$$ASKPARMS	SHOWLIST+5
$$ASKQUE	STRTSTPQ+22
$$ASKSCR	ASKPARMS+15
$$ASKYESNO	ASKPARMS+6, AGAIN+3
$$GETSCRN	SHOWLIST+7
$$I	SHOWLIST+15, SHOWLIST+24, ADDTO+29, ADDTO+32
$$LJ	ADDTO+29
$$RJ	ADDTO+32
$$SCREEN	ADDTO+27
@(	STRTSTPQ+38
ADDTO	SHOWLIST+17, SHOWLIST+26
AGAIN	AGAIN+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	ASKBEGIN+6~, ASKBEGIN+7, ASKEND+5~, ASKEND+6
%DT("A"	ASKBEGIN+8, ASKEND+7
%DT("B"	ASKBEGIN+9, ASKEND+8
%DT(0	ASKBEGIN+10, ASKEND+9
ADD	SCREEN+5~, SCREEN+8, SCREEN+10, SCREEN+12
AIEN	ADDTO+14~, ADDTO+15*, ADDTO+16
APP	SHOWLIST+9~, SHOWLIST+10, SHOWLIST+11, SHOWLIST+14, SHOWLIST+15, SHOWLIST+16, SHOWLIST+17, SHOWLIST+19~, SHOWLIST+20*, SHOWLIST+23 , SHOWLIST+24, SHOWLIST+25, SHOWLIST+26
ARY	HELP+1~, HELP+12
ARY(1	HELP+2*
ARY(10	HELP+11*
ARY(2	HELP+3*
ARY(3	HELP+4*
ARY(4	HELP+5*
ARY(5	HELP+6*
ARY(6	HELP+7*
ARY(7	HELP+8*
ARY(8	HELP+9*
ARY(9	HELP+10*
BEGIN	ASKEND~, ASKEND+9
C	STRTSTPQ+25~, STRTSTPQ+30, STRTSTPQ+32~, STRTSTPQ+37
COUNT	AGAIN+4~, AGAIN+12, AGAIN+16, AGAIN+17, AGAIN+21*
DEFAULT	ASKYESNO~, ASKYESNO+11, ASKBEGIN~, ASKBEGIN+9
DIR	ASKMAX+1~, ASKAPP+3~, ASKSCR+3~, ASKYESNO+8~, STRTSTPQ+8~, STRTSTPQ+16~, ASKQUE~, AGAIN+7, AGAIN+9
DIR("?"	ASKMAX+5, ASKMAX+6, ASKAPP+6, ASKSCR+7
DIR("A"	ASKMAX+3, ASKAPP+5, ASKSCR+5, ASKYESNO+10, STRTSTPQ+10, STRTSTPQ+18
DIR("B"	ASKMAX+4, ASKSCR+6, ASKYESNO+11, STRTSTPQ+11, STRTSTPQ+19*
DIR(0	ASKMAX+2, ASKAPP+4, ASKSCR+4, ASKYESNO+9, STRTSTPQ+9, STRTSTPQ+17
>> DIRUT	ASKAPP+8, ASKSCR+9, ASKYESNO+13
DT	ASKBEGIN+9
DTIME	STRTSTPQ+30, STRTSTPQ+37
>> DTOUT	ASKMAX+8, ASKBEGIN+11, ASKEND+10
>> DUOUT	ASKMAX+8
ERRCOUNT	SHOWLIST+1~, SHOWLIST+2, SHOWLIST+11, SHOWLIST+17, SHOWLIST+26, ADDTO~, ADDTO+28
ERROR	GETSCRN+4~, GETSCRN+12*, SCREEN~, SCREEN+3, SCREEN+10
ERRTEXT	ADDTO+7~, ADDTO+8, ADDTO+12, ADDTO+13, ADDTO+21, ADDTO+23, ADDTO+26, ADDTO+27, ADDTO+29, ADDTO+31 , ADDTO+32
FS	ADDTO+14~, ADDTO+20, ADDTO+21, ADDTO+24~, ADDTO+25, ADDTO+26
>> HLRFRSH	STRTSTPQ+38
I	SHOWLIST+1~, SHOWLIST+2, GETSCRN+4~, GETSCRN+11, GETSCRN+12, SCREEN+5~, SCREEN+7, SCREEN+10*
IEN	SHOWLIST+12~, SHOWLIST+17, SHOWLIST+21~, SHOWLIST+26, ADDTO~, ADDTO+2, ADDTO+9, ADDTO+33, GETSCRN~, GETSCRN+6 , GETSCRN+10, GETSCRN+12
INOROUT	STRTSTPQ+3~, STRTSTPQ+15, STRTSTPQ+21*, STRTSTPQ+22, STRTSTPQ+24, STRTSTPQ+33, STRTSTPQ+34
>> IOINHI	SHOWLIST+16, SHOWLIST+25, ADDTO+30, STRTSTPQ+29, STRTSTPQ+36
>> IOINORM	SHOWLIST+16, SHOWLIST+25, ADDTO+30, STRTSTPQ+29, STRTSTPQ+36
IOSL	AGAIN+11*, AGAIN+17
LEN	LJ~, LJ+1, RJ~, RJ+1
LIST	ADDTO+1~, ADDTO+13
LIST(1	ADDTO+15
MSA	ADDTO+7~, ADDTO+8, ADDTO+20, ADDTO+21
MSG	ADDTO+1~, ADDTO+2, ADDTO+11, ADDTO+14~, ADDTO+16, ADDTO+20, ADDTO+21
MSG("ACK BY"	ADDTO+13, ADDTO+23
MSG("BATCH"	ADDTO+17*, ADDTO+29
MSG("DT/TM CR	EATED" , ADDTO+29
MSG("EVENT"	ADDTO+29
MSG("HDR"	ADDTO+25
MSG("ID"	ADDTO+29, ADDTO+33
MSG("LINE COU	NT" , ADDTO+17*
MSG("MESSAGE	TYPE" , ADDTO+29
MSG("STATUS"	ADDTO+12, ADDTO+26
NODE	ADDTO+1~, GETSCRN+4~, GETSCRN+6*, GETSCRN+7
PARMS	SHOWLIST+1~, SHOWLIST+5, ASKPARMS~, ASKPARMS+1!
PARMS("ALL"	SHOWLIST+8, ASKPARMS+6*, ASKPARMS+11, ASKPARMS+13
PARMS("APP"	SHOWLIST+20, ASKPARMS+13, ASKPARMS+14*
PARMS("MAX"	SHOWLIST+11, SHOWLIST+17, SHOWLIST+26, ASKPARMS+4*, ASKPARMS+5
PARMS("SCR"	SHOWLIST+7, ASKPARMS+15*
PARMS("START"	SHOWLIST+13, SHOWLIST+22, ASKPARMS+2*, ASKPARMS+3
PROMPT	ASKYESNO~, ASKYESNO+10
QUE	STRTSTPQ+3~, STRTSTPQ+22, STRTSTPQ+23, STRTSTPQ+24, STRTSTPQ+33, STRTSTPQ+34, AGAIN+4~, AGAIN+8, AGAIN+9, AGAIN+10 , AGAIN+14*, AGAIN+15
QUEUE	ASKQUE+1~, AGAIN+1, AGAIN+2, AGAIN+3, AGAIN+24, AGAIN+25, AGAIN+26
QUIT	AGAIN+4~, AGAIN+12, AGAIN+14, AGAIN+20
SCREEN	SHOWLIST+1~, SHOWLIST+2, SHOWLIST+7, SHOWLIST+17, SHOWLIST+26, ADDTO~, ADDTO+27, GETSCRN~, GETSCRN+5!, SCREEN~
SCREEN("ERRORS"	GETSCRN+12*, SCREEN+10
SCREEN("IEN"	GETSCRN+10*
SCREEN("TYPE"	GETSCRN+9*, SCREEN+3, SCREEN+8, SCREEN+10
SEG	ADDTO+14~, ADDTO+20
SEG(1	ADDTO+20
SKIP	ADDTO+1~
STOP	STRTSTPQ+3~, STRTSTPQ+7, STRTSTPQ+13*, STRTSTPQ+18, STRTSTPQ+24, STRTSTPQ+26, STRTSTPQ+33, STRTSTPQ+34
STRING	LJ~, LJ+1, RJ~, RJ+1
SUB	AGAIN+4~, AGAIN+6, AGAIN+7, AGAIN+9
SUBIEN	ADDTO+7~, ADDTO+9, ADDTO+11, ADDTO+15, ADDTO+17
TEXT	SCREEN+5~, SCREEN+10*
TIME	SHOWLIST+12~, SHOWLIST+13, SHOWLIST+14, SHOWLIST+17, SHOWLIST+21~, SHOWLIST+22, SHOWLIST+23, SHOWLIST+26, ADDTO~
TYPE	GETSCRN+4~, GETSCRN+7*, GETSCRN+8, GETSCRN+9
>> VALMAR	SHOWLIST+15, SHOWLIST+24, ADDTO+29, ADDTO+32, ADDTO+33
>> VALMBCK	SHOWLIST+5, SHOW, ASKAPP+2, ASKSCR+2, STRTSTPQ+4*
>> VALMBG	SHOWLIST+2, SHOWLIST+4
>> VALMCNT	SHOWLIST+2, SHOWLIST+16, SHOWLIST+25, ADDTO+30, I+1, I+2
>> X	ASKMAX+9
Y	ASKAPP+8, ASKAPP+9, ASKSCR+9, ASKSCR+10, ASKYESNO+8~, ASKYESNO+14, STRTSTPQ+13, STRTSTPQ+21, AGAIN+18~, AGAIN+20 , ASKBEGIN+13, ASKBEGIN+14, ASKEND+12, ASKEND+13

Customize PDF page

Package: Health Level Seven

Routine: HLOUSR2

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 19

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: