Index: zTryout/PBO/TAXBOG/impl/Doos.cls.xml
===================================================================
diff -u -r29721 -r31687
--- zTryout/PBO/TAXBOG/impl/Doos.cls.xml	(.../Doos.cls.xml)	(revision 29721)
+++ zTryout/PBO/TAXBOG/impl/Doos.cls.xml	(.../Doos.cls.xml)	(revision 31687)
@@ -60,6 +60,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefKartonSpecificatieErrondDoos">
+<FormalSpec>MaxInVerpakking:TECH.Integer=1</FormalSpec>
+<ReturnType>DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie</ReturnType>
+<Implementation><![CDATA[
+	#define ExtraMaatBinnenflap 100
+	#dim Lengte As TECH.Numeric=(..Hoogte*2)+..Breedte+(..#KartonDikte*2)+($$$ExtraMaatBinnenflap*2)
+	#dim Breedte As TECH.Numeric=(..Hoogte*2)+(..Diepte*2)+(..#KartonDikte*2)+$$$ExtraMaatBinnenflap
+	quit ..GeefKartonSpecificatie(..DoosType.ErrondDoos,Lengte,Breedte,MaxInVerpakking)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKartonSpecificatie">
 <FormalSpec>Benaming:DOM.PM.Verpakking.enu.BenamingVerpakkingsOnderdeel,Lengte:%Decimal,Breedte:%Decimal,MaxInVerpakking:TECH.Integer</FormalSpec>
 <Private>1</Private>