I have never heard of SQLCODE = -7.....

My goto is:
SET VAR vtext = (CVAL('Database'))
IF vtext IS NULL THEN
  PAUSE 2 USING 'Trouble Connecting to Database!' CAPTION 'ERROR!' +
    ICON STOP OPTION MESSAGE_FONT_SIZE 11
  EXIT
  RETURN
ENDIF



 If it continues to happen for you, maybe try replacing the SQLCODE with a test 
of a connected database as above?

Karen


 

 

-----Original Message-----
From: Dan Goldberg <[email protected]>
To: rbase-l <[email protected]>
Sent: Fri, Mar 31, 2017 9:25 am
Subject: RE: [RBASE-L] - how to eliminate this error



I use his startup stuff except this part.
 
SET ERROR MESSAGE 2495 OFF
CONNECT dbname IDENTIFIED BY ownername
SET ERROR MESSAGE 2495 ON
SET MESSAGES ON SET ERROR MESSAGES ON
-- Check the availability of database
IF SQLCODE = -7 THEN
….
 
I am thinking of using it but with a slight modification. Maybe a second 
connect try would get it to connect.
 
SET ERROR MESSAGE 2495 OFF
CONNECT dbname IDENTIFIED BY ownername
SET ERROR MESSAGE 2495 ON
SET MESSAGES ON SET ERROR MESSAGES ON
-- Check the availability of database
IF SQLCODE = -7 THEN
   --second try
   SET ERROR MESSAGE 2495 OFF
   CONNECT dbname IDENTIFIED BY ownername  
   SET ERROR MESSAGE 2495 ON
Endif
 
What do you guys think? Has anyone tried it?
 
Dan Goldberg
 
 
From: [email protected] [mailto:[email protected]]On Behalf Of 
Tom Hart
Sent: Friday, March 31, 2017 7:06 AM
To: [email protected]
Subject: Re: [RBASE-L] - how to eliminate this error
 

I use Razz's config setup in all my compiled apps, that enforces multi on

 

Tom 


 

On Mar 31, 2017 8:54 AM, "Dan Goldberg" <[email protected]> wrote:


Sometimes when we run our compiled apps we get this message.
 

 
If we exit and run it again it works fine. Just annoying.  It is a link on our 
desktops to our compiled app on the server.
 
Anybody have a solution to eliminate this error?
 
Dan Goldberg
 

-- 
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
[email protected].
For more options, visit https://groups.google.com/d/optout.


-- 
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
[email protected].
For more options, visit https://groups.google.com/d/optout.

-- 
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.


-- 
You received this message because you are subscribed to the Google Groups 
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to