Index: Prod/GAData/Product.cls.xml
===================================================================
diff -u -r1842 -r1875
--- Prod/GAData/Product.cls.xml	(.../Product.cls.xml)	(revision 1842)
+++ Prod/GAData/Product.cls.xml	(.../Product.cls.xml)	(revision 1875)
@@ -534,13 +534,14 @@
  C : Creatie van product
  P : met prijswijziging
  H : Creatie van halffabr (bouwstenen)
+ M : Modify BS (in combinatie met optie "H") : aanpassen van enkele halffabr, dus niet alle BS, maar slechts lijst van DataItems (hard-coded)  - enkel op bestaande producten, "met Prijsaanpassing" wordt AFgeraden! 
  1 : backwards compatible komt overeen met : C;H;P
  0 of leeg: backwards compatible komt overeen met : C;H]]></Description>
 <FormalSpec>GenPRNr:%Library.Integer,QtyStaffel:%Library.String=1,Opties:%Integer="C;P;H",NoSa:%String=""</FormalSpec>
 <Implementation><![CDATA[
  Do KPRCreate^Prod.GAData.Product.tmpKPRCreate   ; (GenPRNr,QtyStaffel,Opties,NoSa)
  
- Do:(NoSa'="S") ..BewaarIngegevenKenmerken()   // Added by WimV on 05/04/2011 
+ Do:(NoSa'="S")&&($G(Opties)'?1(1"M;H",1"-")) ..BewaarIngegevenKenmerken()   // Added by WimV on 05/04/2011 
  Quit
 ]]></Implementation>
 </Method>
@@ -670,6 +671,7 @@
 	Set Exception = ##class(TECH.ExceptionHandler).Catch()
 	Set Body="PRNr = "_..ProductGetObjectId()_$$$CRLF_Exception.ToString()_$$$CRLF_$$$CRLF_$$GetJobInfo^vhLib(1,"")
 	Do SendMiniMail^vhLib($$$SystemMail("reports"),$LB("ICT_SupportTBX@vanhoecke.be"),"Fout in TandemBox KenmerkConversie",Body)
+	Do ##class(vhLib.Logger).%New("Kenmerken conversie").Error("ConverteerProductToIK","Fout in TandemBox KenmerkConversie:"_$$$CRLF_Body)
 	Quit
 ]]></Implementation>
 </Method>