4605 IF J=0 THEN RETURN