ContourPlot3D[x^2+y^2+z==1+z,{x,-1,1},{y,-1,1},{z,-10,10}]