FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Error DBCMD/2001 Workarea not in use: DBSEEK
Posts: 40
Joined: Wed Feb 20, 2008 05:40 PM
Error DBCMD/2001 Workarea not in use: DBSEEK
Posted: Fri Mar 07, 2008 04:59 PM
BUEN DIA TENGAN TODOS LOS DEL FORO, ESTOY ATORADO CON ESTO QUIZAS A ALGUIEN LE HA SUCEDIDO....

PORFA ORIENTENME



CUANDO TENGO ESTE TIPO DE ERROR QUE ES LO QUE TENGO QUE HACER

Path and name: C:\APLICACIONES\CXC\cxc.Exe (32 bits)
Size: 1,499,648 bytes
Time from start: 0 hours 0 mins 14 secs
Error occurred at: 07/03/08, 10:30:32
Error description: Error DBCMD/2001 Workarea not in use: DBSEEK

Stack Calls
===========
Called from: => DBSEEK(0)
Called from: cap_doc.prg => TRAE_CLIENTE(135)
Called from: cap_doc.prg => (b)DOC_CAP(99)
Called from: TGET.PRG => TGET:LVALID(0)
Called from: CONTROL.PRG => TGET:FWLOSTFOCUS(0)
Called from: CONTROL.PRG => TGET:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => SYSREFRESH(0)
Called from: CONTROL.PRG => TCONTROL:KEYCHAR(0)
Called from: TGET.PRG => TGET:KEYCHAR(0)
Called from: WINDOW.PRG => TWINDOW:HANDLEEVENT(0)
Called from: CONTROL.PRG => TGET:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => DIALOGBOX(0)
Called from: DIALOG.PRG => TDIALOG:ACTIVATE(0)
Called from: cap_doc.prg => DOC_CAP(117)
Called from: cap_doc.prg => (b)CAP_DOC(61)
Called from: BUTTON.PRG => TBUTTON:CLICK(0)
Called from: CONTROL.PRG => TBUTTON:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => SENDMESSAGE(0)
Called from: DIALOG.PRG => TDIALOG:COMMAND(0)
Called from: WINDOW.PRG => TWINDOW:HANDLEEVENT(0)
Called from: DIALOG.PRG => TDIALOG:HANDLEEVENT(0)
Called from: => DIALOGBOXINDIRECT(0)
Called from: DIALOG.PRG => TDIALOG:ACTIVATE(0)
Called from: cap_doc.prg => CAP_DOC(71)
Called from: cxc.prg => (b)CREAMENU(65)
Called from: MENU.PRG => TMENU:COMMAND(0)
Called from: WINDOW.PRG => TWINDOW:COMMAND(0)
Called from: WINDOW.PRG => TWINDOW:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(0)
Called from: => WINRUN(0)
Called from: WINDOW.PRG => TWINDOW:ACTIVATE(0)
Called from: cxc.prg => MAIN(49)

TENGO UNA CAPTURA DE DOCUMENTOS DESDE UN DLG EN EL CUAL TENGO UN CAMPO QUE SE LLAMA CLAVE Y ES DE CLIENTES, CUANDO EL USUARIO INTRODUCE LA CLAVE EN EL OTRO EDITBOX ME TIENE QUE APARECER EL NOMBRE. PERO ME MANDA ESTE ERROR.


ESTE ES EL GET Y EL SAY

REDEFINE get aYDts[4] ID 104 OF oDlg1 PICTURE "9999" WHEN NwMod valid TRAE_CLIENTE(aYDts[4],oGet)
REDEFINE SAY oget PROMPT cNombre id 105 OF oDlg1



Y ESTA ES MI FUNCION

FUNCTION Trae_Cliente(cNombre,oGet)
local cClientes
IF (cClientes)->(DBSEEK(aYDts))
cNomCli := (cClientes)->NOMBRE
oGet:Refresh()
RETURN(.T.)
ELSE
MsgInfo("Cliente no registrado")

RETURN(.F.)

ENDIF

return nil
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Error DBCMD/2001 Workarea not in use: DBSEEK
Posted: Fri Mar 07, 2008 05:38 PM

SELECT CLIENTES

CLIENTES :- ALIAS()

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 40
Joined: Wed Feb 20, 2008 05:40 PM
Gracias Karinha
Posted: Fri Mar 07, 2008 05:39 PM

ok Karinha lo provare

Gracias

Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Error DBCMD/2001 Workarea not in use: DBSEEK
Posted: Fri Mar 07, 2008 05:49 PM

Ruben lo que observo es :

que estas buscando una variable que no es compatible con el campo,

la variable aYdts[4] es un objeto

REDEFINE get aYDts[4] ID 104 OF oDlg1 PICTURE "9999" WHEN NwMod valid TRAE_CLIENTE(aYDts[4],oGet)
REDEFINE SAY oget PROMPT cNombre id 105 OF oDlg1

REDEFINE GET oGet VAR cVar valid trae_cliente( cVar, oGet )

FUNCTION Trae_Cliente(cVar,oGet)
local cClientes
IF (cClientes)->(DBSEEK(cVar))
cNomCli := (cClientes)->NOMBRE
oGet:Refresh()
RETURN(.T.)
ELSE
MsgInfo("Cliente no registrado")

RETURN(.F.)

saludos ..

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Posts: 40
Joined: Wed Feb 20, 2008 05:40 PM
TKS SISCTRL PERO PERSISTE EL ERROR
Posted: Fri Mar 07, 2008 06:16 PM
ME SIGUE MARCANDO EL MISMO ERROR

EN EL DBSEEK

Error description: Error DBCMD/2001 Workarea not in use: DBSEEK
Posts: 205
Joined: Fri Oct 07, 2005 05:07 PM
Error DBCMD/2001 Workarea not in use: DBSEEK
Posted: Fri Mar 07, 2008 06:38 PM
FUNCTION Trae_Cliente(cVar,oGet) 
local cClientes


pues como ves cClientes es local , y en ese momento es NIL

por lo cual no lo puedes utilizar como referencia a un alias.

Salu2
Saludos/regards

RenOmaS



skype: americo.balboa
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Error DBCMD/2001 Workarea not in use: DBSEEK
Posted: Fri Mar 07, 2008 06:38 PM
El problema esta

local cClientes
IF (cClientes)->(DBSEEK(cVar))


la variable ccliente es NIL


cCliente debe tener un alias Válido
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

Continue the discussion