Create 3DGraphics with SurfaceBuilder and BoxPlot in Mathematica 12?

In the old versions of Mathematica we generated cubic minimal surfaces using the commands:

surface = SurfaceBuilder[initpoints, symmdata, shift, edge];

box = BoxPlot[edge];

Show[box, surface, Axes -> False, PlotRange -> All, Boxed -> False]

In the last few versions the message appears “cannot combine graphical objects”. What has changed? Can anyone help, please?