FiveTech Support Forums

oBrwFt:goTop()
oRsFtr:Find("ll_consec="+alltrim(cFcEn))
oBrwFt:refresh()

oBrwFt:goTop()
oRsFtr:Find("ll_consec="+alltrim(cFcEn)+" AND ll_docume="+alltrim(cFcDc))
oBrwFt:refresh()

Application
===========
   Path and name: C:\DLYMA\hymlyma.exe (32 bits)
   Size: 9,043,456 bytes
   Compiler version: xHarbour 1.3.0 Intl. (SimpLex) (Build 20231104)
   FiveWin  version: FWH 23.10
   C compiler version: Borland/Embarcadero C++ 7.7 (32-bit)
   Windows 8 64 Bits, version: 6.2, Build 9200 

   Time from start: 0 hours 0 mins 16 secs 
   Error occurred at: 18/01/2024, 20:59:27
   Error description: Error ADODB.RecordSet/6  DISP_E_UNKNOWNNAME: FIND
   Args:
     [   1] = C   ll_consec=60914 AND ll_docume=009

Stack Calls
===========
   Called from:  => TOLEAUTO:FIND( 0 )
   Called from: z:\prg\R32_fact.prg => SERVICIONOTARIAS( 15675 )
   Called from: z:\prg\R32_fact.prg => (b)FFACTURAS( 607 )
   Called from: .\source\classes\URLLINK.PRG => TURLLINK:LBUTTONDOWN( 180 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1848 )
   Called from: .\source\classes\URLLINK.PRG => TURLLINK:HANDLEEVENT( 168 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3651 )
   Called from:  => WINRUN( 0 )
   Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1113 )
   Called from: z:\prg\R32_menu.prg => VTNAPRINCIPAL( 895 )
   Called from: z:\prg\R32_menu.prg => MAIN( 141 )

cQuery := "SELECT * from "+cTabla+" WHERE CONCAT (descripcion, codigo_fabrica)  LIKE '%"+cSeek+"%'  ORDER BY descripcion;"

  cBusqueda:="ll_consec="+alltrim(cFcEn)
  hhash    :={ => }
  
  oRs:MoveFirst() /// Voy al primero
  
 for i=0 to oRs:fields:count-1
     cCampo:=oRs:fields(i):name
     uValue:=oRs:fields(i):value
     hhash[cCampo]:=uValue 
 next i

   Msginfo( hhash[cBusqueda]) )