Index: cspBasis/GAProdTBox.cls.xml
===================================================================
diff -u -r324 -r407
--- cspBasis/GAProdTBox.cls.xml	(.../GAProdTBox.cls.xml)	(revision 324)
+++ cspBasis/GAProdTBox.cls.xml	(.../GAProdTBox.cls.xml)	(revision 407)
@@ -5,6 +5,7 @@
 <IncludeCode>APPS.TBXWeb,PRGACNTs,ErrorVHCNTs</IncludeCode>
 <ProcedureBlock>0</ProcedureBlock>
 <Super>%RegisteredObject</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="GeefKlantSpecifiekeSetting">
 <Description>
@@ -1402,6 +1403,9 @@
 	Set Log.WSOrderID=$G(wsID)
 	Set Log.WSBonType=$LG(lbPropts,1)
 	Set Totals=$LG(lbPropts,2)_"\"_$LG(lbPropts,3)
+	If ##class(APPS.TBXWeb.Utils).IsGroepOrder(wsID)=1 {
+		Set Totals="GRP: "_Totals
+	}	
 	Set Log.WSTotals=$S(Totals="\":"", 1:Totals)
 	Set Log.Verwerker=$G(Verwerker)
 	Set Log.VhisieLogin=$G(VhisieLogin)
@@ -1413,7 +1417,7 @@
 atlGetOrderPropts(wsID)
 	Quit:($G(wsID)="") ""
 	New sBonType,TotPrijs,TotAantal
-	&SQL(SELECT BonType,TotAantal,TotPrijs INTO :sBonType,:TotAantal,:TotPrijs FROM WS_TBX.WebOrder WHERE ID=:wsID)
+	&SQL(SELECT BonType,TotAantal,TotPrijs INTO :sBonType,:TotAantal,:TotPrijs FROM WS_TBX.OrderAbstract WHERE ID=:wsID)
 	Quit $LB($G(sBonType),$G(TotAantal),$G(TotPrijs))
 ]]></Implementation>
 </Method>