[RBASE-L] - Re: Time Out

[A. Razzak Memon]

At 06:06 PM 2/18/2010, Paul InterlockInfo wrote:

I can see I am going to have to switch to Mike B.'s approach. But in
the mean time any thoughts would be appreciated.

Paul,

Yes. ON CONNECT, ON FIRST CONNECT, or ON BEFORE CONNECT are the most
enhanced and useful procedures in a situation like yours. Mike Byerley
had a great input during the implementation of these commands in R:BASE
7.6, Turbo V-8, and R:BASE eXtreme 9.0.

However, in the meantime, if you need to take care of your situation,
use the following procedure in your default RBASE.DAT, your application
startup file, or the .DAT file for your compiled and or non-compiled
applications.

-- Example
-- To force database settings for all users who use the same database
-- Start here
LABEL StartFresh
   DISCONNECT
   SET QUOTES=NULL
   SET QUOTES='
   SET DELIMIT=NULL
   SET DELIMIT=','
   SET LINEEND=NULL
   SET LINEEND='^'
   SET SEMI=NULL
   SET SEMI=';'
   SET PLUS=NULL
   SET PLUS='+'
   SET SINGLE=NULL
   SET SINGLE='_'
   SET MANY=NULL
   SET MANY='%'
   SET IDQUOTES=NULL
   SET IDQUOTES='`'
   SET CURRENCY '$' PREF 2 B
   DISCONNECT
   SET STATICDB OFF
   SET ROWLOCKS ON
   SET FASTLOCK OFF
   SET TIMEOUT 120
   SET FEEDBACK OFF
LABEL StartApp
   CLS
   CONNECT dbname IDENTIFIED BY owner password
   -- Enforce Default Settings
   SET QUOTES='
   SET DELIMIT=','
   SET LINEEND='^'
   SET SEMI=';'
   SET PLUS='+'
   SET SINGLE='_'
   SET MANY='%'
   SET IDQUOTES='`'
   SET CURRENCY '$' PREF 2 B
   SET NULL ' '
   SET DATE FORMAT MM/DD/YYYY
   SET DATE SEQUENCE MMDDYY
   SET DATE YEAR 30
   SET DATE CENTURY 19
   CLS
   EDIT USING MyApp_MainMenu or whatever
LABEL Done
RETURN
-- End here ..

Make sure to update any or all settings as you see fit.

Once incorporated in your RBASE.DAT, or application startup file,
everyone will always start fresh, no matter what were the settings
of other database, application, etc.

Good Luck and Very Best R:egards,

Razzak.