Defending champion Katarina Johnson-Thompson remains in medal contention with just two events remaining as she bids for a third world heptathlon title.