I am wondering if I could just do this instead of the unload and load process for the update. 1. Apply the update 2. Open R:base V-8 3. Type at the R> SET multi off CONNECT DBName RELOAD NewDBName 4. Rename the database accordingly. Would this work as well?? I think reload does like an unload and load. Dan Goldberg
_____ From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Ramsour Mike Sent: Wednesday, September 10, 2008 10:43 AM To: RBASE-L Mailing List Subject: [RBASE-L] - RE: R:BASE 7.6 and Turbo V-8 Updates (09/09/2008) You are welcome! Mike Ramsour AK Steel Coshocton Works Quality Department Phone/VMS: 740-829-4340 _____ From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Wednesday, September 10, 2008 1:41 PM To: [email protected] Subject: [RBASE-L] - RE: R:BASE 7.6 and Turbo V-8 Updates (09/09/2008) Thank You Mike! Anne -------- Original Message -------- Subject: [RBASE-L] - RE: R:BASE 7.6 and Turbo V-8 Updates (09/09/2008) From: Ramsour Mike <[EMAIL PROTECTED]> Date: Tue, September 09, 2008 5:22 pm To: [email protected] (RBASE-L Mailing List) 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] <http://email.secureserver.net/pcompose.php#Compose> ] 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
