MariaDb SetFilter Error no definida: SOLUCIONADO

MariaDb SetFilter Error no definida: SOLUCIONADO

Postby CARLOS ATUNCAR » Fri Jan 26, 2024 11:36 pm

Tengo esta consulta

cMsg := "SELECT c.*,g.detalle AS ngrupo,g.tipo,g.etapa,f.detalle AS netapa "
cMsg += "FROM labores_maquina c "
cMsg += "INNER JOIN labores_gruop g ON g.idgrupo=c.idgrupo "
cMsg += "LEFT JOIN familia2 f ON f.idfamilia2=g.etapa "
cMsg += "ORDER BY ngrupo,detalle"
oQry := aServer:RowSet( cMsg )

y necesito filtrar los datos por la columna detalle de la tabla labores_maquina con el Alias c en este procedure

Static Procedure BuscarLab
local cPer:= Space( 30 )
local cWhere,oWait,mWhere

If MsgGet("Buscador de Labores","Ingrese Nombres :",@cPer )
WaitOn("Espere un momento por favor....",@oWait )
If cPer = Space(30)
cWhere := ""
Else
mWhere := {Upper(Alltrim( cPer ))}
cWhere := "c.detalle LIKE '%?%'"
EndIf
TRY
oQry:SetFilter( cWhere , mWhere)

CATCH o
SysRefresh()
END
oBrw:Refresh()
WaitOff( @oWait )
EndIf

Return


Pero no me esta realizando el filtrado
Last edited by CARLOS ATUNCAR on Sat Jan 27, 2024 1:13 am, edited 3 times in total.
Carlos Atuncar - CaSoftSystem
Chincha - Perú
carlosalbatun@gmail.com
CARLOS ATUNCAR
 
Posts: 176
Joined: Thu Sep 17, 2015 11:40 pm
Location: Chincha - Peru

Re: MariaDb SetFilter no realiza Filtrado

Postby CARLOS ATUNCAR » Sat Jan 27, 2024 12:04 am

Static Procedure BuscarLab
local cPer:= Space( 30 )
local cWhere,oWait,mWhere

If MsgGet("Buscador de Labores","Ingrese Nombres :",@cPer )

WaitOn("Espere un momento por favor....",@oWait )

If cPer = Space(30)
cWhere := ""
Else
x := Upper(Alltrim( cPer ))
cWhere := "c.detalle LIKE '% ? %' "
EndIf

oQry:SetFilter( cWhere ,{x})

aServer:ShowError()
SysRefresh()
oBrw:Refresh()
WaitOff( @oWait )

EndIf

Return

da este resultado


Compiler version: xHarbour 1.3.0 Intl. (SimpLex) (Build 20230914)
FiveWin version: FWH 23.07
C compiler version: Borland/Embarcadero C++ 7.6 (32-bit)
Windows 10 64 Bits, version: 6.2, Build 9200

Time from start: 0 hours 0 mins 13 secs
Error occurred at: 26/01/2024, 19:00:54
Error description: Error BASE/1001 Funci¢n no definida: C.WILDMATCH
Args:
[ 1] = C * ? *
[ 2] = C APLICACION

Stack Calls
===========
Called from: => WILDMATCH( 0 )
Called from: .\source\internal\FWROWSET.PRG => (b)EXPRTOCODEBLOCK( 1422 )
Called from: .\source\internal\FWROWSET.PRG => FWROWSET:SETFILTER( 495 )
Called from: .\source\internal\FWMARIA.PRG => FWMARIAROWSET:SETFILTER( 2860 )
Called from: Bin\laborMaquina.prg => BUSCARLAB( 185 )
Called from: Bin\laborMaquina.prg => (b)BRWBTNBAR( 144 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 792 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 1083 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1847 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2135 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3693 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1118 )
Called from: Bin\menu.prg => MAIN( 115 )

System
======
CPU type: AMD Ryzen 5 2400G with Radeon Vega Graphics 3593 Mhz
Hardware memory: 14285 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Windows total applications running: 5
1 , C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.19041.3636_none_a863d7
2 , D:\MySql\Control Agricola\2021\Exe\AgroCostos.exe
3 GDI+ Window (AMDRSServ.exe),
4 GDI+ Window (AgroCostos.exe), C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.19041.3996_none_d954cb49e10154
5 HideForm, D:\MYSQL\CONTROL AGRICOLA\2021\EXE\FrSystH.dll

Variables in use
================
Procedure Type Value
==========================
WILDMATCH
Param 1: C "* ? *"
Param 2: C "APLICACION"
Local 1: U
Local 2: U
(b)EXPRTOCODEBLOCK
Param 1: A Len: 12
FWROWSET:SETFILTER
Param 1: C "c.WILDMATCH( '* ? *', Upper( detalle ) ) "
Param 2: U
Param 3: L .F.
Local 1: O Class: FWMARIAROWSET
Local 2: B {|| ... }
Local 3: U
Local 4: U
Local 5: U
Local 6: N 0
Local 7: U
FWMARIAROWSET:SETFILTER
Param 1: C "c.WILDMATCH( '* ? *', Upper( detalle ) ) "
Param 2: A Len: 1
Local 1: U
Local 2: O Class: FWMARIAROWSET
BUSCARLAB
Local 1: C "rufo "
Local 2: C "c.detalle LIKE '% ? %' "
Local 3: O Class: TDIALOG
Local 4: U
(b)BRWBTNBAR
Param 1: O Class: TBTNBMP
TBTNBMP:CLICK
Local 1: O Class: TBTNBMP
TBTNBMP:LBUTTONUP
Param 1: N 39
Param 2: N 40
Param 3: O Class: TBTNBMP
Local 1: U
Local 2: L .T.
Local 3: N 0
TCONTROL:HANDLEEVENT
Param 1: N 514
Param 2: N 0
Param 3: N 2555944
Local 1: O Class: TBTNBMP
Local 2: U
TBTNBMP:HANDLEEVENT
Param 1: N 514
Param 2: N 0
Param 3: N 2555944
Local 1: O Class: TBTNBMP
_FWH
Param 1: N 2555944
Param 2: N 514
Param 3: N 0
Param 4: N 2555944
Param 5: N 70
Local 1: O Class: TBTNBMP
WINRUN
Carlos Atuncar - CaSoftSystem
Chincha - Perú
carlosalbatun@gmail.com
CARLOS ATUNCAR
 
Posts: 176
Joined: Thu Sep 17, 2015 11:40 pm
Location: Chincha - Peru

Re: MariaDb SetFilter Error no definida: SOLUCIONADO

Postby CARLOS ATUNCAR » Sat Jan 27, 2024 1:14 am

If MsgGet("Buscador de Labores","Ingrese Nombres :",@cPer )

WaitOn("Espere un momento por favor....",@oWait )

If cPer = Space(30)
x := ""
Else
x := Upper(Alltrim( cPer ))
EndIf

cWhere := "detalle LIKE '"+x+"%'"

oQry:SetFilter( cWhere )

aServer:ShowError()
SysRefresh()

oBrw:Refresh()
WaitOff( @oWait )

EndIf
Carlos Atuncar - CaSoftSystem
Chincha - Perú
carlosalbatun@gmail.com
CARLOS ATUNCAR
 
Posts: 176
Joined: Thu Sep 17, 2015 11:40 pm
Location: Chincha - Peru


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 116 guests