Saludos necesito realmente ayuda, estoy implementando una aplicacion y cuando los usuarios estan trabajando con el xBrowse, da el siguiente error:
El codigo que he ingresado para el xbrowse es:
Alguna idea
Application
===========
Path and name: C:\Adm_Com\Adm_com.exe (32 bits)
Size: 3,827,200 bytes
Time from start: 0 hours 9 mins 16 secs
Error occurred at: 26/10/2011, 16:26:36
Error description: Error DBCMD/2001 Area de trabajo no usada: ORDKEYCOUNT
Stack Calls
===========
Called from: => ORDKEYCOUNT(0)
Called from: .\source\classes\XBROWSE.PRG => (b)TXBROWSE:SETRDD(3696)
Called from: .\source\classes\XBROWSE.PRG => (b)TXBROWSE:TXBROWSE(383)
Called from: => TXBROWSE:KEYCOUNT(0)
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:REFRESH(1127)
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:MOUSELEAVE(3225)
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT(11047)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => SYSREFRESH(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:END(531)
Called from: Prg\objects.prg => (b)CONSULTAMDS(1677)
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176)
Called from: Prg\objects.prg => (b)CONSULTAMDS(1671)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:LDBLCLICK(1872)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:LDBLCLICK(1514)
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:LDBLCLICK(3463)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(1499)
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT(11050)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => DIALOGBOX(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273)
Called from: Prg\objects.prg => CONSULTAMDS(1701)
Called from: Prg\Inv_Mov.prg => VAL_ARTICULO(1049)
Called from: Prg\Inv_Mov.prg => (b)MOVI_AGREDIT(1018)
Called from: .\source\classes\TGET.PRG => TGET:LVALID(1209)
Called from: .\source\classes\CONTROL.PRG => TGET:FWLOSTFOCUS(924)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(1468)
Called from: .\source\classes\TGET.PRG => TGET:HANDLEEVENT(598)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => SYSREFRESH(0)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:KEYCHAR(731)
Called from: .\source\classes\TGET.PRG => TGET:KEYCHAR(1117)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(1499)
Called from: .\source\classes\TGET.PRG => TGET:HANDLEEVENT(598)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => DIALOGBOX(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273)
Called from: Prg\Inv_Mov.prg => MOVI_AGREDIT(1034)
Called from: Prg\Inv_Mov.prg => (b)IN_MOVI(394)
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK(176)
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT(1447)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => SENDMESSAGE(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND(408)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT(944)
Called from: => DIALOGBOX(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273)
Called from: Prg\Inv_Mov.prg => IN_MOVI(461)
Called from: Prg\Inv_Mov.prg => (b)MOVTOOL(212)
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK(463)
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP(658)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(1489)
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT(1450)
Called from: .\source\classes\WINDOW.PRG => _FWH(3394)
Called from: => WINRUN(0)
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE(978)
Called from: Prg\Admin.prg => MAIN(104)
El codigo que he ingresado para el xbrowse es:
FUNCTION Ajust_xBrws( oxBrw, nID )
  With Object oxBrw
    oxBrw:lRecordSelector   = .F.
    oxBrw:lAllowRowSizing   = .F.
    oxBrw:nRowDividerStyle   = LINESTYLE_NOLINES
    oxBrw:nColDividerStyle   = LINESTYLE_NOLINES
    oxBrw:nMarqueeStyle    = MARQSTYLE_HIGHLROW
    oxBrw:lColDividerComplete = .T.
   oxBrw:bClrSelFocus     = oApp:bxBrowSel
   oxBrw:bClrSel       = oApp:bxBrowSel
   oxBrw:bClrGrad       = oApp:bGradient
   IF ( oxBrw:cAlias )->(RddName()) != "DBFCDX"
     oxBrw:bKeyNo        = oxBrw:bBookMark
     oxBrw:bKeyCount      = {|| ( oxBrw:cAlias )->( LastRec() ) }
   ENDIF
   oxBrw:SetBackGround( "Fondos\Gradient.bmp" )
   oxBrw:CreateFromResource(nID)
  End
  RETURN NILAlguna idea
Oscar A. Martinez
http://www.multisofthn.com
Honduras, Centro America
xHarbour Enterprise 1.2.2, Fivewin 13.06
http://www.multisofthn.com
Honduras, Centro America
xHarbour Enterprise 1.2.2, Fivewin 13.06