Check Dimension Code blank

Hi Eveybody,

 

When add code on UnitCode use check Dimension Code on Sales Line then not work

SalesLine.RESET;
DimCode.RESET;
SalesLine.SETRANGE("Dimension Set ID",DimCode."Dimension Set ID");
DimCode.SETFILTER(DimCode."Dimension Code",'SKU');
IF DimCode.FINDSET THEN BEGIN
  REPEAT
    DimCode.TESTFIELD(DimCode."Dimension Value Code");
  UNTIL DimCode.NEXT = 0;
END;

Please help me fix code. Thanks so much.



Related
Recommended