Code: Alles auswählen
...
if len(trim(stel)) > 0
sbefehl = sbefehl + 'tel1 = trim(stel) .or. tel2 = trim(stel) .and.'
endif
if len(trim(sanrede)) > 0
sbefehl = sbefehl + 'lower(anrede1) = trim(lower(sanrede)) .and.'
endif
sbefehl = substr(sbefehl,1,len(sbefehl)-5)
set filter to &sbefehl
go top
aber dies nicht:
Code: Alles auswählen
...
if len(trim(kontrol->w1)) > 0
sbefehl = sbefehl + 'insasse->privat = "û" .and.'
endif
if len(trim(kontrol->w2)) > 0
sbefehl = sbefehl + 'insasse->fan1 = "û" .and.'
endif
sbefehl = substr(sbefehl,1,len(sbefehl)-5)
set filter to &sbefehl
go top
...
Code: Alles auswählen
Xbase++ version : Xbase++ (R) Version 1.82.306
Operating system : Windows 06.01 Build 07601 Service Pack 1
------------------------------------------------------------------------------
oError:args :
-> VALTYPE: C VALUE:
oError:canDefault : N
oError:canRetry : N
oError:canSubstitute: Y
oError:cargo : NIL
oError:description : Syntax error in macro expression
oError:filename :
oError:genCode : 20,00
oError:operation : &< ...>
oError:osCode : 0,00
oError:severity : 2,00
oError:subCode : 2300,00
oError:subSystem : BASE
oError:thread : 1,00
oError:tries : 0,00
------------------------------------------------------------------------------
CALLSTACK:
------------------------------------------------------------------------------
Called from (B)KUNDEDIT(125)