Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
GUID/UniqueIdentifier Upsizing Wizard
Message
De
15/07/2009 03:24:36
Dieter J. Vogel
Ingenieurbuero Vogel
Muenster, Allemagne
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Divers
Thread ID:
01412058
Message ID:
01412437
Vues:
36
Hi,
didn't rebuild the biest, so it used the internal dbf. But there is a bug in the program. The field, that is holding the remote-field-type information is too short for "uniqueidentifier". It has to be changed in row 8514 of wizusz.prg from c(13) to c(16)!
In addition to that I added a button on page 4 of the wizard with the following code (my GUID-fields are all beginning with "ui"):
LOCAL lnSelect, lcTab
lnSelect = SELECT()
lcTab = ThisForm.oEngine.EnumFieldsTbl

SELECT (lcTab)
replace rmttype WITH "uniqueidentifier" FOR LEFT(LOWER(rmtfldname),2) = "ui"
replace rmtlength WITH 0 FOR LEFT(LOWER(rmtfldname),2) = "ui"

WAIT WINDOW "UI-Felder auf uniqueidentifier gesetzt" nowait*

SELECT (lnSelect)
this.Parent.Cfieldtypemap.grdTypeMap.Refresh()
Now it's running like it should be. Thanks for your help

-Dieter from Muenster, Germany
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform