Had to add a bit to the code... a table must first be created to store the data, and the variable must first be defined if you want the code to work for you.
SET ERROR MESSAGES off
SET NULL -0-
OUTPUT SCREEN
CREATE TABLE errmsgs +
(errnum INTEGER , +
errmsg TEXT (240) )
CLS
SET VAR vtxt2write TEXT
set var verrnum = 1
WRITE ' '
WRITE '...... Creating Message Table ... PLEASE WAIT'
WHILE verrnum < 3200 THEN
OUTPUT messages.$$$
SHOW ERROR verrnum
output screen
LOAD errmsgs FROM messages.$$$ AS FORMATTED USING errmsg 1 240
UPDATE errmsgs SET errnum = .verrnum WHERE COUNT = LAST
SET VAR vtxt2write = 'Loaded error message ' + CTXT(.verrnum) + ' OF 3200.'
WRITE .vtxt2write
SET VAR verrnum = (.verrnum + 1)
ENDWHILE
OUTPUT SCREEN
CLS
WRITE 'Finished .. Look at the errmsgs table for results'
SET NULL ' '
SET ERROR MESSAGES ON
SET MESSAGES ON
RETURN
At 07:30 AM 5/19/2004, you wrote:
Jim,
I tried this code and can't get it to work... for whatever reason I cannot seem to display an error message with the 'show error ____' command.
If I type Show error 639 I get the error message "Variable not found (563)" displayed as an error rather than the actual value of error message 639. What am I doing wrong?
Rbase 6.5++ windows
Dan
At 02:20 PM 5/18/2004, you wrote:
Kenny
Looks like you got one that is undefined. I would get a hold of RBTI about it..
Here's a code snippet to help in this area.. Albert Berry posted a good while back.
I modified it a little.
Jim
SET ERROR MESSAGES OFF
SET NULL -0-
OUTPUT SCREEN
CLS
SET VAR vtxt2write TEXT
WRITE ' '
WRITE '...... Creating Message Table ... PLEASE WAIT'
WHILE verrnum < 3200 THEN
OUTPUT messages.$$$
SHOW ERROR verrnum
OUTPUT SCREEN
LOAD errmsgs FROM messages.$$$ AS FORMATTED USING errmsg 1 240
UPDATE errmsgs SET errnum = .verrnum WHERE COUNT = LAST
SET VAR vtxt2write = 'Loaded error message ' + CTXT(.verrnum) + ' OF 3200.'
WRITE .vtxt2write
SET VAR verrnum = (.verrnum + 1)
ENDWHILE
CLS
WRITE 'Finished .. Look at the errmsgs table for results'
SET NULL ' '
SET ERROR MESSAGES ON
SET MESSAGES ON
RETURN
Kenny Camp wrote:
I trapped an error number 2227 in some 6.5 for Windows code and when I try
to show the error message associated with it, I get nothing.
I've been trying to trap this error for months as it is a very rare
occurrence.
Anybody know what this error is?
Kenny Camp
IT Manager
Electro Enterprises
Oklahoma City, OK
Dan Champion
www.championsolutions.net
616-299-7420
Dan Champion
www.championsolutions.net
616-299-7420
