Index: APPS/Halux/Planning/impl/ProductPlanningUtils.cls.xml
===================================================================
diff -u -r1133 -r1356
--- APPS/Halux/Planning/impl/ProductPlanningUtils.cls.xml	(.../ProductPlanningUtils.cls.xml)	(revision 1133)
+++ APPS/Halux/Planning/impl/ProductPlanningUtils.cls.xml	(.../ProductPlanningUtils.cls.xml)	(revision 1356)
@@ -57,6 +57,10 @@
 	{
 		Set Categorie = ##class(APPS.Halux.Planning.enu.Categorie).MDS()
 	}
+	ElseIf (Gentype = "DIV\VBO\")
+	{
+		Set Categorie = ##class(APPS.Halux.Planning.enu.Categorie).Verlichtingsbodem()
+	}
 	ElseIf (Product.%Extends("DOM.PM.ASMProduct.ASMAntislipmat"))
 	{
 		Set Categorie = ##class(APPS.Halux.Planning.enu.Categorie).Mat()
Index: CSC Halux Planningsoverzicht.prj.xml
===================================================================
diff -u -r1133 -r1356
--- CSC Halux Planningsoverzicht.prj.xml	(.../CSC Halux Planningsoverzicht.prj.xml)	(revision 1133)
+++ CSC Halux Planningsoverzicht.prj.xml	(.../CSC Halux Planningsoverzicht.prj.xml)	(revision 1356)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
-<Project name="CSC Halux Planningsoverzicht" LastModified="2011-05-16 07:58:07" Target="TMOVE^FLOWTOE3" TargetType="2">
+<Project name="CSC Halux Planningsoverzicht" LastModified="2011-05-31 12:08:43" Target="TMOVE^FLOWTOE3" TargetType="2">
   <Items>
     <ProjectItem name="APPS.Halux.Planning.PlanningService" type="CLS"/>
     <ProjectItem name="APPS.Halux.Planning.dto.ActieInfo" type="CLS"/>
@@ -31,6 +31,7 @@
     <ProjectItem name="APPS.Halux.Planning.impl.ActiviteitInfoTBX" type="CLS"/>
     <ProjectItem name="APPS.Halux.Planning.impl.EventCatcher" type="CLS"/>
     <ProjectItem name="APPS.Halux.Planning.impl.ExplicietePlanning" type="CLS"/>
+    <ProjectItem name="APPS.Halux.Planning.impl.OnbepaaldLogInfo" type="CLS"/>
     <ProjectItem name="APPS.Halux.Planning.impl.ProductInfo" type="CLS"/>
     <ProjectItem name="APPS.Halux.Planning.impl.ProductPlanningUtils" type="CLS"/>
     <ProjectItem name="APPS.Halux.Planning.impl.Queries" type="CLS"/>
Index: vhDeploy/Deploy201105311612.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy201105311612.cls.xml	(revision 0)
+++ vhDeploy/Deploy201105311612.cls.xml	(revision 1356)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.Deploy201105311612">
+<Description>
+Generisch product verlichtingsbodem toevoegen</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	If ($Data(^KPR(666983)))
+	{
+		Do DELETE^PRODUKT2(666983)
+	}
+	
+	Set ^KPR(666983,0) = "GEN.HALXVB VERL.BODEMXXXX\Generisch product HALUX \GENPROD\\8\\226.67\C#C\\703100\Verlichting op maat\\\\\\\6\2.6153\\\\\\\\\62242 "
+	Set ^KPR(666983,1) = "10\3\\\\\1\\\\\\\\\\\\\\\Produit générique HALUX \\999#0#0\\\"
+	Set ^KPR(666983,2) = "\\\\\\\14\\\Z\E\\\2\\D;59073\204.6\144\0.6\6.5\756\885\\9.669.831.6\\"
+	Set ^KPR(666983,3) = "3-4\VH96\\\\\\\\\\\\\\\\\\\sur mesure\\\\\\"
+	Set ^KPR(666983,4) = "Generisch product HALUX \DIVERSE\\\\\\\\\\\\\\\\\\\\\\\\\"
+	Set ^KPR(666983,5) = "\\\\\\\\\\\\\\\\\\\\\\\\\\"
+	Set ^KPR(666983,"G") = "DIV\VBO\"
+	Set ^KPR(666983,"I") = ""
+	Set ^KPR(666983,"I1") = "06EL \06EL02TLV \06EL02TLV07TLP/HA \1308\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\*\\"
+	Set ^KPR(666983,"J") = ""
+	Set ^KPR(666983,"J6332") = "6332\ \ \\\1\0\\\20\4\12\1\\\1\EUR\\10000\10633.333333\2\\10200.000000\51.04\20833.333333\8333.333333\40\E\\\\\\\*\"
+	
+	Set PRNr = $Order(^KPR(0))
+	While (PRNr '= "")
+	{
+		Set KorttekstPrefix = $Piece($Piece(^KPR(PRNr,0),"\"),".")
+		If (KorttekstPrefix = "XLD") || (KorttekstPrefix = "XTL")
+		{
+			Set $Piece(^KPR(PRNr,0),"\",3) = 666983
+		}
+		Set PRNr = $Order(^KPR(PRNr))
+	}
+	
+	Do BLDIND^PRODUKT2(666983)
+]]></Implementation>
+</Method>
+</Class>
+</Export>