如何检测并删除RPGLE数组中的重复数据？
我正在基于业务逻辑在 RPGLE 程序中加载数组，这可能会导致数组中的数据重复。
我想首先知道如何检测重复。
最后我想知道如何删除数组中的重复项。
回答
在添加之前，您可以使用 %LOOKUP 查看该条目是否已经在数组中。
if %lookup(newValue : array : 1 : numElems) = 0;
// the element is not in the array yet
numElems += 1;
array(numElems) = newValue;
endif;