Error description: Error BASE/1002 Alias does not exist:

[lafug]

Amigos:

1 USE AFP2005 new shared ALIAS AFP
2 SET INDEX TO AFP2005

Esto me funciona en FW Clipper 5.2


pero al ejecutarlo en FWH27 / xHarbour me da :
Error description: Error BASE/1002 Alias does not exist: AFP2005 en la linea 2

GRACIAS DE ANTEMANO POR VUESTRA AYUDA
SALU2

[Antonio Linares]

Luis,

Puedes probarlo con Harbour también ?

Parece claro que es un error en el RDD, que de confirmarse hay que reportar tanto en Harbour como xharbour. Cual usas, NTX ?

[lafug]

Antonio:

Lo probaré con harbour, y uso DBFNTX

SALU2

[lafug]

Antonio:

Probé compilando con HARBOUR el tutor07.prg que viene con FWH y también ocurre el mismo error

aqui está el codigo y el error a continuacion

function Customers()

local oDlg
local cNombre := ""
local cDireccion := ""
local getNombre, getDireccion

if ! File( "clientes.dbf" )
DbCreate( "Clientes.dbf", { { "Nombre", "C", 40, 0 },;
{ "Direccion", "C", 50, 0 },;
{ "Telefono", "C", 12, 0 },;
{ "Edad", "N", 2, 0 },;
{ "Productos", "C", 10, 0 },;
{ "Nivel", "N", 2, 0 } } )
endif

USE Clientes

if RecCount() == 0
APPEND BLANK
endif
INDEX ON Clientes->Nombre TO CliNombr
SET INDEX TO CliNombr
clientes->(dbclosearea())

USE CLIENTES NEW SHARED ALIAS CLI
linea 98--> SET INDEX TO CLINOMBR

Application
===========
Path and name: C:\FWH\SAMPLES\tutor07.exe (32 bits)
Size: 1,022,976 bytes
Time from start: 0 hours 0 mins 5 secs
Error occurred at: 02/23/06, 22:23:41
Error description: Error BASE/1002 Alias does not exist: CLIENTES

Stack Calls
===========
Called from: => ORDLISTADD(0)
Called from: => CUSTOMERS(98)
Called from: => (b)BUILDMENU(46)
Called from: => TMENU:COMMAND(0)
Called from: => TWINDOW:COMMAND(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: => _FWH(0)
Called from: => WINRUN(0)
Called from: => TWINDOW:ACTIVATE(0)
Called from: => MAIN(18)

SALUDOS

[Antonio Linares]

Luis,

Gracias. Vamos a reportarlo en la lista de correo de Harbour.

Por favor publícalo en news.xharbour.org. Gracias.

[lafug]

Antonio,



Cuanto tiempo demorará la solución a este problema ?
Mientras tanto que hago?, espero la corrección o modifico el código?


SALUDOS Y GRACIAS POR TU ATENCION

[Antonio Linares]

Luis,

Przemek es el gurú de los RDDs. Ya hemos reportado el problema en la lista, pero es imposible saber cuando lo arreglará. Puede ser hoy, ó la semana que viene.

Modifica el código si te corre prisa.

[lafug]

OK , Antonio
Prefiero esperar ya que los PRG'S que componen el sistema son muchos y en todos utilizamos la clausula ALIAS.

GRACIAS NUEVAMENTE , Y QUEDO A LA ESPERA DE TU RESPUESTA
SALUDOS