Information générale
Catégorie:
Codage, syntaxe et commandes
Hi all,
I have and/or boolean clause which worked fine only for OR fo any one word to maximum of 4 words but did not work at all for AND if I put one of 4 words
please correct my codes if something is wrong,
Thanks in advance,
Paul
for example :
OR case:
4 words to be entered : in 4 textboxes .
box1,box2,box3,box4
my name is paul OK
my name is OK
my name OK
my OK
---------------------------------------------------------
AND CASE :
4 words to be entered : in 4 textboxes .
box1,box2,box3,box4
my name is paul OK
my name is INCORRECT
my name INCORRECT
my INCORRECT
ALWAYS NEEDED 4 WORDS IN FULL IN ORDER TO HAVE SOMETHING BUT
I WOULD LIKE TO ENTER ONLY ONE WORD LIKE :
my STILL HAVE TO GIVE ALL my ANYWAY.
-------------------------------------------------
cMemos1=iif(empty(allt(cMemos1)),'',allt(cMemos1))
cMemos2=iif(empty(allt(cMemos2)),'',allt(cMemos2))
cMemos3=iif(empty(allt(cMemos3)),'',allt(cMemos3))
cMemos4=iif(empty(allt(cMemos4)),'',allt(cMemos4))
CREATE CURSOR dbtemp1 ( empno C(5),notes m(10) )
lcEmptyMemo = [SELECT * FROM dbtemp2 WHERE empty(cMemos1) OR empty(cMemos2) OR empty(cMemos3) OR empty(cMemos4) INTO cursor dbtemp1 ]
llBoolean1 = IIF(thisform.opgtext1.value = 1, [AND ], [OR ])
lcAndOrMemo = ;
[SELECT empno,notes FROM dbtemp2 ] + ;
[WHERE ] + ;
[cMemos1 $ UPPER(notes) ] + llBoolean1 + ;
[cMemos2 $ UPPER(notes) ] + llBoolean1 + ;
[cMemos3 $ UPPER(notes) ] + llBoolean1 + ;
[cMemos4 $ UPPER(notes) ] + ;
[INTO cursor dbtemp1 ]
if empty(cMemos1) and empty(cMemos2) and empty(cMemos3) and empty(cMemos4)
&lcEmptyMemo
else
&lcAndOrMemo
endif
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement