Plot3D[Im[SpheroidalPS[3, 1, 1, x + I y]], {x, -3, 3}, {y, -2, 2}, Exclusions -> {{y == 0, x^2 > 1}}]