Indices únicos en dBase 7

¡Sorpresa! Tuve que impartir un curso hace poco utilizando dBase como "sistema de bases de datos". Definí las tablas de mi ejemplo, les definí su índice primario como único, utilizando para esto Database Desktop. Bien, ya sabemos que por algún despiste de nuestros amigos de Inprise, seguimos sin poder crear tablas en el formato más moderno de Visual dBase 7, a pesar de que basta tener un BDE con versión igual o superior a la 4.5. No obstante, para mí fue totalmente inesperado que las tablas que creé permitían insertar varios registros con la misma clave teóricamente única. Es más, ¡los registros anteriores desaparecían como si se los hubiera tragado la tierra!

Después de darle un par de vueltas al asunto, encontré que el tipo IDXDesc, del API de bajo nivel del BDE, había cambiado de repente la interpretación de uno de sus campos, llamado bUnique. Antes, este campo de tipo WordBool podía tener uno de los valores 1 ó 0: único o no. Sin embargo, ahora permite también el valor 2. El problema es que 2 se utiliza para los índices verdaderamente únicos: aquellos que protestan al intentar insertar un duplicado, mientras que el antiguo 1 indica que en el índice aparece una sola entrada para cada clave. Al insertar una clave repetida en este último tipo de índices, sencillamente se elimina la clave anterior y se sobrescribe con la nueva (iba a escribir ¡cojonudo!, pero la decencia me impide utilizar palabras tan groseras).

Conclusión: Si no quiere tener que crear sus índices con el API del BDE, es conveniente que disponga de un Visual dBase 7 (es relativamente barata la versión Professional) para crear las tablas con las que Delphi trabajará más adelante.

Más adelante, pondré en esta misma página código para corregir este problema. También he encontrado cambios en la forma en que se crean restricciones de integridad referencial para Paradox. Lo que antes funcionaba bien, ya no funciona...