Index: APPS/TBXWeb/impl/AbstractOrderHandler.cls.xml
===================================================================
diff -u -r459 -r463
--- APPS/TBXWeb/impl/AbstractOrderHandler.cls.xml	(.../AbstractOrderHandler.cls.xml)	(revision 459)
+++ APPS/TBXWeb/impl/AbstractOrderHandler.cls.xml	(.../AbstractOrderHandler.cls.xml)	(revision 463)
@@ -132,21 +132,24 @@
 <Final>1</Final>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
+	If '(..IsValidWebDomain()) Do  Quit $$$ERROR($$$GeneralError,"WSOrder has no valid WebDomain for this shop (bij RetryPostProcessOrder)")
+	. Set Info = "RetryPostProcessOrder : WSOrd.WebDomain = *"_..GeefOrderDomein() _"* "_"Requester = *"_..Requester_"*"
+	. Do ..Logger.ErrorMail("WEBDOMAIN_INVALID",Info) 
+
 	; Order is reeds besteld
-	If (..WSOrd.BonType'=..GetOrderResultType()) Do  Quit $$$ERROR($$$errOrderAlreadyConfirmed,"WSOrder start type not correct for PostProcessing")
-	. Do ..Logger.ErrorMail("ORDERSTARTTYPE_INVALID",..WSOrd.%Id()_" : "_..WSOrd.BonType_" is ongeldig voor RetryPostProcessOrder() ") 
+	If (..WSOrd.BonType'=..GetOrderResultType()) Do  Quit $$$ERROR($$$errStartTypeIncorrect,"WSOrder start type not correct for PostProcessing")
+	. Do ..Logger.ErrorMail("RETRY_ORDERSTARTTYPE_INVALID",..WSOrd.%Id()_" : "_..WSOrd.BonType_" is ongeldig voor RetryPostProcessOrder() ") 
 
 	; Post processing verwerking starten -> indien post processing errors --> quiten
-	Do ..Logger.Info("POSTPROCESSING_STARTED") 
+	Do ..Logger.Info("RETRY_POSTPROCESSING_STARTED") 
 	Set stPostProcessing = ..PostProcessing()
 	if 'stPostProcessing Do  Quit $$$ERROR($$$GeneralError,"Post processing error")
-	. Do ..Logger.ErrorMail("POSTPROCESSING_FAILED",$$ParseStatus^vhLib.System(stPostProcessing)) 
+	. Do ..Logger.ErrorMail("RETRY_POSTPROCESSING_FAILED",$$ParseStatus^vhLib.System(stPostProcessing)) 
 	. Set lbExtras=""
 	. Set lbExtras=lbExtras_$LB(..%ClassName(0))
+	. Set lbExtras=lbExtras_$LB("via RetryPostProcessOrder")
 	. Do ##class(cspBasis.GAProdTBox).AddToLog("SUBMIT_FAILED",..GeefOrderDomein(),..WSOrd.KLNummer,"shop="_..Shop,..WSOrd.mID,..Requester,..Taal,,lbExtras)
 	
-	Do ..Logger.Info("ORDER_PROCESSED")
-	
 	Quit $$$OK
 ]]></Implementation>
 </Method>