FiveTech Software tech support forums

Amigos:

Creo que pasar de 16 a 32 bits, ha sido mas traumatico de lo que pensaba, ya que lo que funcionaba, aqui es un error. Me tiene de cabezas y no logro dar con el error, por eso recurro a los maestros.

Tengo lo siguiente:

**INICIO DE PROGRAMA

MEMVAR c_base

Function Main()
....
....
Local oBar

MeMvar->c_base="Men_cla" && Asigno Valor a Variable

**** EN ESTA LINEA SE PRODUCE EL ERROR
--> if !Usored(&c_base,1,.f.,,&c_base) // Aqui Mando a Abrir la Base de Datos que va en la variable c_base
Tone(3000,1);Tone(4000,1);Tone(5000,1)
MsgInfo("Error No Pudo Abrir Base de Dato")
Return (.F.)
Endif

AL tratar de pasar la variable con el nombre de la base de datos, me arroja el siguiente error:

c:\util\sistemas\rutina.prg(16) Warning W0001 Ambiguou

Estoy usando Fwh 701 y Xharbour 00.99.71, Bcc55 y Verce 5.1.
Los Flags para Xhabour que uso en verce es:
/n /m /w /es2 /gc1

Saludos,
Antonio

Prueba así:

if !Usored(&( Memvar->c_base ),1,.f.,,&( MemVar->c_base ) )

Antonio:

Maestro como siempre, funciono perfecto, un millon de gracias.

Saludos,
Antonio

Antonio Linares wrote:Prueba así:

if !Usored(&( Memvar->c_base ),1,.f.,,&( MemVar->c_base ) )