ContourPlot3D[z == If[x < 100 && y < 10000, x/100, 1], {x, -1000, 1000}, {y, 0, 10500}, {z, -10, 10}]