IF cust.FIND(’-’) THEN REPEAT
IF cust.“Sales (LCY)” = 0 THEN
cust.Blocked := cust.Blocked::Invoice
ELSE
cust.Blocked := cust.Blocked::All;
cust.MODIFY;
UNTIL cust.NEXT =0 ;
MESSAGE(‘inactivated’) ;
i excuted this code it will getting all in the blocked field not getting any other fileds…plz suggest a solution to get the answer