Index: APPS/TBXWeb/OrderChecker.cls.xml
===================================================================
diff -u -r431 -r603
--- APPS/TBXWeb/OrderChecker.cls.xml	(.../OrderChecker.cls.xml)	(revision 431)
+++ APPS/TBXWeb/OrderChecker.cls.xml	(.../OrderChecker.cls.xml)	(revision 603)
@@ -250,9 +250,9 @@
 By default wordt gecontroleerd op Testklant VH en  VHCC_01 tot VHCC_09 .
 
 Oproepen via 
-  Set sc=##class(APPS.TBXWeb.OrderChecker).MarkeerTBXOrderAlsVerwerkt(WSOrderID,0)   w sc,! </Description>
+  Set sc=##class(APPS.TBXWeb.OrderChecker).MarkeerTBXOrderAlsVerwerkt(WSOrderID,0,[OfferteHoofdingID=99])   w sc,! </Description>
 <ClassMethod>1</ClassMethod>
-<FormalSpec>WSOrderID:%String,ForceerWijziging:%Boolean=0</FormalSpec>
+<FormalSpec>WSOrderID:%String,ForceerWijziging:%Boolean=0,OfferteHoofdingID:%String="99"</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	Set TBXOrder=##class(WS.TBX.Order).%OpenId(WSOrderID)
@@ -286,7 +286,7 @@
 	
 	If MagWijzigen {
 		Write "Order EDI "_TBXOrder.mID,!
-		Set sc=TBXOrder.AddToTransferLog(99,"","Manueel via MarkeerTBXOrderAlsVerwerkt")
+		Set sc=TBXOrder.AddToTransferLog(OfferteHoofdingID,"","Manueel via MarkeerTBXOrderAlsVerwerkt")
 		
 		write "New submitlog : "_$$$LCVT(TBXOrder.TransferLog),!