Dan:

FWIW I am in the process of upgrading at this moment.  I created an R:BASE
script that automates the unloading and renaming in preparation for the
upgrade.  I will use the same basic structure to do the reload portion after
the update.

If you're interested here is the code.  The program creates a list of
database names in a given directory and then loops through each database
name, creating variables that take care of the various names needed for
unloading, renaming, etc.  It's working well for me.

-- start code

CONNECT MAINDATA (or whatever database you choose)
--
SET ERROR MESSAGES OFF
--
CLEAR VAR VDB%
--
CLS
--
SET VAR RBVERSION TEXT = (SGET((CVAL('BUILD')),3,1))
--
SET VAR VDB_NAME TEXT = NULL
--
SET VAR VDB_ORIG TEXT = NULL
--
SET VAR VDB_BKUP TEXT = NULL
--
SET VAR VDB_FILE TEXT = NULL
--
SET VAR VDB_CNT INTEGER = NULL
--
SET VAR VDB_CNTR INTEGER = 1
--
SET VAR VDB_LIST NOTE = NULL
--
DROP TABLE TDBLIST
--
CREATE TEMPORARY TABLE TDBLIST (TDBNAME TEXT 8)
--
SET VAR VDB_CMD TEXT = ('DIR *.' + (IFLT(.RBVERSION,'8.0','RB1','RX1')))
--
OUTPUT DB.$$$
--
&VDB_CMD
--
OUTPUT SCREEN
--
LOAD TDBLIST FROM DB.$$$
--
DELETE FROM TDBLIST WHERE TDBNAME IN ('VOLUME','DIRECTOR')
--
SELECT (COUNT(*) - 2) INTO VDB_CNT FROM TDBLIST
--
DELETE ROWS FROM TDBLIST WHERE COUNT > .VDB_CNT
--
SET VAR VDB_LIST TEXT = (LISTOF(TDBNAME)) FROM TDBLIST
--
DROP TABLE TDBLIST
--
DELETE DB.$$$
--
DISCONNECT
--
CLS
--
WHILE VDB_CNTR <= .VDB_CNT THEN
--
  SET VAR VDB_NAME TEXT = (SSUB(.VDB_LIST,.VDB_CNTR))
  --
  SET VAR VDB_ORIG TEXT = (.VDB_NAME + '.RX?')
  --
  SET VAR VDB_BKUP TEXT = ('BKUP_' + .VDB_NAME + '.RX?')
  --
  SET VAR VDB_FILE TEXT = (.VDB_NAME + '.ALL')
  --
  CONNECT &VDB_NAME
  --
  OUTPUT .VDB_FILE
  --
  UNLOAD ALL
  --
  OUTPUT SCREEN
  --
  DISCONNECT
  --
  RENAME .VDB_ORIG .VDB_BKUP
  --
  SET VAR VDB_CNTR INTEGER = (.VDB_CNTR + 1)
  --
  CLS
  --
ENDWHILE
--
RETURN

-- end code

Hope that helps.
Mike Ramsour
AK Steel Coshocton Works
Quality Department

Phone/VMS:  740-829-4340
-----Original Message-----
From: Dan Goldberg [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, September 09, 2008 5:15 PM
To: [email protected]
Subject: [RBASE-L] - RE: R:BASE 7.6 and Turbo V-8 Updates (09/09/2008)

Wow, it looks like the V-8 update is more involved. 

I was wondering if anybody has tried it yet??

Dan Goldberg


Reply via email to