FINDSET FINDFIRST FINDLAST

FINDSET, FIND(’+’) or FIND(’-’) should only be used when NEXT is used and vice versa.

Bad code

IF Cust.FIND('-') THEN
    ERROR(CustIsBlockErr)

Good code

IF Cust.FINDFIRST THEN
    ERROR(CustIsBlockErr)

Bad code

IF Cust.FINDFIRST THEN
    REPEAT
        ...
    UNTIL Cust.NEXT = 0;

Good code

IF Cust.FINDSET THEN
    REPEAT
        ...
    UNTIL Cust.NEXT = 0;