Progess 4GL - 如何在一个表字段中使用 AND 运算符过滤多条记录？

Question

I want to check and filter only if the table has value1 = 005 and value1 = 009. But it seems below query is not helping me. I dont know where I am making mistakes. Kindly help to solve this. Note - I cannot use where not as it may have many different value stored in value1 field

DEFINE TEMP-TABLE test NO-UNDO
FIELD value1 AS CHARACTER
.

EMPTY TEMP-TABLE test.

CREATE test.
ASSIGN
  value1 = "005".

CREATE test.
ASSIGN
  value1 = "009".

CREATE test.
ASSIGN
  value1 = "001".

FOR EACH test NO-LOCK
   WHERE value1 <> ""
   AND (value1 = "005" AND value1 = "009")
  :

   MESSAGE YES.
END.

Answer 1

It looks like you're looking for an OR ooperation, rather than AND .

Answer 2

You can use can-find

if can-find(first test WHERE value1 = "005") 
   AND can-find(first test WHERE value1 = "009")
then message yes.

It is safest to always use can-find(first if you're looking for a non-unique value

Answer 3

If you want to check if both records are present you could do:

DEFINE VARIABLE isPresent005 AS LOGICAL NO-UNDO.
DEFINE VARIABLE isPresent009 AS LOGICAL NO-UNDO.
DEFINE VARIABLE bothPresents AS LOGICAL NO-UNDO.

FIND FIRST test WHERE test.value1 = "005" NO-LOCK NO-ERROR.
isPresent005 = AVAIL test.

FIND FIRST test WHERE test.value1 = "009" NO-LOCK NO-ERROR.
isPresent009 = AVAIL test.

bothPresents = isPresent005 AND isPresent009.

But, if you only want to get these 2 records, you should use OR :

FOR EACH test WHERE test.value1 = "005" OR test.value1 = "009" NO-LOCK :
    /*do stuff*/
END.

Answer 4

Another option if you are, maybe, looking for some additional fields might look something like this:

define buffer test005 for test.
define buffer test009 for test.

for each test005 no-lock where test005.customer = 1 and test005.value1 = "005",
    each test009 no-lock where test009.customer = 1 and test009.value1 = "009":

  display test005.customer.

end.

Answer 5

Use OR instead of AND to search the records...

This will return records if value1 = 005 OR value1 = 009 .

FOR EACH test NO-LOCK
   WHERE value1 <> ""
   AND (value1 = "005" OR value1 = "009")
   :

   MESSAGE YES.
END.

Is not possible to search using your way, because value1 cannot be two values at once, it's always one OR another .