PD: 0004759: Bad error message when creating pad with 0 length

src/Mod/PartDesign/App/FeatureSketchBased.cpp

@@ -593,17 +593,28 @@ void ProfileBased::generatePrism(TopoDS_Shape& prism,
                 Loffset = -0.5 * (L2 + L);
             else
                 Loffset = -L2;
-        } else if (midplane)
+        }
+        else if (midplane) {
             Loffset = -Ltotal/2;
+        }
 
         TopoDS_Shape from = sketchshape;
         if (method == "TwoLengths" || midplane) {
             gp_Trsf mov;
             mov.SetTranslation(Loffset * gp_Vec(dir));
             TopLoc_Location loc(mov);
             from = sketchshape.Moved(loc);
-        } else if (reversed)
+        }
+        else if (reversed) {
             Ltotal *= -1.0;
+        }
+
+        if (fabs(Ltotal) < Precision::Confusion()) {
+            if (addSubType == Type::Additive)
+                throw Base::ValueError("Cannot create a pad with a height of zero.");
+            else
+                throw Base::ValueError("Cannot create a pocket with a depth of zero.");
+        }
 
         // Its better not to use BRepFeat_MakePrism here even if we have a support because the
         // resulting shape creates problems with Pocket