At 12:19 PM 6/24/2010, Jim Belisle wrote:

I do use a form instead of an application, mostly because Razzak
helped me understand some of the 7.6 functions by implementing
them into a form. I do have some ON CONNECT options, just not
ALL the settings.

Jim,

Mucking with database SETtings and then wondering why some routines
are not working is pretty hard to keep track of. However, you may
adapt a routine in startup file that will always ensure consistent
results when connecting to your specific database(s).

Here is a code that you can use in your application startup file.
Make sure to update anything specific to your database environment.

-- Start here
-- Start Fresh
   CLEAR ALL VARIABLES
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 Start
   CLS
   CONNECT mydbname IDENTIFIED BY NONE
   -- 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 ZERO ON
   SET DATE FORMAT MM/DD/YYYY
   SET DATE SEQUENCE MMDDYY
   SET DATE YEAR 30
   SET DATE CENTURY 19
   CLS
   EDIT USING ApplicationMainMenu
   RETURN
-- End here

You may also save this routine as RBASE.DAT file, if you wish.

Hope it helps!

Very Best R:egards,

Razzak.


Reply via email to