FiveTech Software tech support forums

Hola Amigos:

Tengo un Sistema Funcionando en Fw 16 Bits, lo estoy pasando a xHarbour y me da error al compilar con Verce.

Que me falta cambiar aqui?

Saludos,
Antonio

Fwh 7.01, xHarbour 00.99.71, Verce

** La Rutina es:

Function IniArchi()
Local aStru
if !file('Men_club.dbf')
aStru :={{"Tip_men", "C",2,0 },;
{"Cod_men" , "C",3,0 },;
{"Det_Men" , "C",35,0 },;
{"Nom_ico" , "C",30,0 },;
{"Ubi_ico" , "C",20,0 },;
{"tip_ico" , "C",4,0}}

dbcreate("Men_club.dbf",aStru)
endif
if !file('Men_club.cdx')
sele 1
use Men_club Exclusi
inde on Tip_men+Cod_men tag Men_clu1 to Men_club
use
endif
return nil

*** EL ERROR ES EL SIGUIENTE:
xHarbour Compiler build 0.99.71 (SimpLex)
Copyright 1999-2007, http://www.xharbour.org http://www.harbour-project.org/
Compiling 'c:\util\iniarchi.prg' and generating preprocessed output to 'c:\util\iniarchi.ppo'...
c:\util\iniarchi.prg(19) Warning W0001 Ambiguous reference: 'TIP_MEN'
c:\util\iniarchi.prg(19) Warning W0001 Ambiguous reference: 'COD_MEN'
Lines 24, Functions/Procedures 1
Generating C source output to 'c:\util\iniarchi.hrb'...
Borland C++ 5.5.1 for Win32 Copyright (c) 1993, 2000 Borland
c:\util\iniarchi.hrb:
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Fin del proceso.
Fin del proceso.
MAKE Version 5.2 Copyright (c) 1987, 2000 Borland
Application Build Success !!!
============================================================
VERCE v4.3 -> Ver Resultados de Compilación y Enlazado v4.3
Juan Carlos Salinas Ojeda
jcso@hotmail.com, jcso@esm.com.mx
Minatitlán, Veracruz. MEXICO
Y Solo Veracruz es bello !!!
FiveWin for Harbour!!

M. Antonio:

El problema no es porque compiles con VERCE, intentalo así

inde on Field->Tip_men+Field->Cod_men tag Men_clu1 to Men_club

Saludos

Armando:

Mil gracias, lo aplique y todo va excelente.

Saludos,
Antonio