0

有没有一种方法可以使 SQL in Progress 中的减号操作等效?我有 2 个选择,想要第一个减去第二个。例如,最初在 SQL 中是这样的:

select id from item
minus
select id from item-uni

我正在尝试这样做

DEF TEMP-TABLE tt-item NO-UNDO
FIELD item-id    AS INT
FIELD desc       AS CHAR
.

DEF TEMP-TABLE tt-item2 NO-UNDO
FIELD item-id    AS INT
FIELD desc       AS CHAR
.


FOR EACH item-uni
WHERE item-uni.desc = '101':

        CREATE tt-item.
        ASSIGN
        tt-item.item-id   = item-uni.item-id
        tt-item.desc = item-uni.desc
        .
END.

   FOR EACH item:

        CREATE tt-item2.
        ASSIGN
        tt-item2.item-id   = item.item-id
        tt-item2.desc = item.desc
        .
END.



FOR EACH tt-item,
    EACH tt-item2
    WHERE tt-item.item-id = tt-item2.item-id:

            DELETE tt-item.
    END.

但是,当我尝试执行此操作时,我会收到一条错误消息。有没有一种简单的方法(或至少更容易)来做到这一点?谢谢。

4

2 回答 2

2

如果我正在阅读minus应该做的事情,即从外部选择返回所有行,而内部选择中不存在任何行,那么应该这样做:

for each item
   where not can-find( 
            item-uni 
               where item-uni.id = item.id
         )
no-lock:

   /* do something */

end.
于 2021-04-06T21:19:30.657 回答
0

自从我发布以来已经有几天了,因为直到现在我才设法得到一个好的和正确的答案。我必须在 IF 子句中使用 NOT CAN-FIND 才能使其工作。第一个临时表获取我想要的值,第二个查看哪些值在我不想要的表上。第三次迭代是 NOT CAN-FIND 所在的位置,使它像我想使用的“减号”。变成了这样:

IF NOT CAN-FIND (tt-item-temp2
            WHERE tt-item-temp2.item-id = tt-item-temp.item-id) THEN DO:

再次感谢 Stefan。如果不是你,我不会找到这个答案。

于 2021-04-12T18:32:34.293 回答