Script de BD (persona.lsq) actualizado