Routine: HLOUSR1

Select the objects that you wish to see in the downloaded PDF

Information

HLOUSR1 ;ALB/CJM/OAK/PIJ -ListManager Screen for viewing messages;12 JUN 1997 10:00 am ;03/21/2010

Source file <HLOUSR1.m>

Name	Comments	DBIA/ICR reference
EN	;
HDR	;
BLANK	;
DISPLAY	;
PICKMSG(DEFAULT)	;
PICK
HELP	;Help code
EXIT	;Exit code
EXPND	;Expand code
CJ(STRING,LEN)	;
LJ(STRING,LEN)	;
SP(LEN,CHAR)	;
SHOWMSG(MSGIEN,SUBIEN)	;
SHOWBODY(MSG,SUBIEN,SEGS)	;
I()	;
ADD(SEG,SEGS)	;
SHIFT(I,J)	;
SCRLMODE	;scroll mode
HLP	;
IFOPEN(LINK,TIME)	;	ICR #5695 Status: Active Usage: Private

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"That message can not be found! Try Again",! Line Location: PICK+4
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,"UNABLE TO DISPLAY THE MESSAGE",!! Line Location: SHOWMSG+9
Function Call: WRITE	Prompt: !!,IOINHI,"Hit any key to escape scroll mode...",IOINORM Line Location: SCRLMODE+3
Function Call: WRITE	Prompt: @IOSTBM Line Location: SCRLMODE+7
Function Call: WRITE	Prompt: !,$G(@VALMAR@(LINE,0)) Line Location: SCRLMODE+15
Function Call: READ	Variable: *C Timeout: 5 Line Location: SCRLMODE+18