Bayer Leverkusen extended its unbeaten run to an extraordinary 32 matches in all competitions after beating Heidenheim 2-1 away from home to further strengthen its grip on top spot in the Bundesliga.