Index: APPS/Halux/Planning/Resource/impl/ImportTijdenFromXLS.cls.xml
===================================================================
diff -u -r57301 -r57446
--- APPS/Halux/Planning/Resource/impl/ImportTijdenFromXLS.cls.xml	(.../ImportTijdenFromXLS.cls.xml)	(revision 57301)
+++ APPS/Halux/Planning/Resource/impl/ImportTijdenFromXLS.cls.xml	(.../ImportTijdenFromXLS.cls.xml)	(revision 57446)
@@ -30,7 +30,7 @@
 
 <Method name="InitialiseReader">
 <Implementation><![CDATA[
-	Set ..Reader=##class(TECH.FileReader).%New("\\notes01\shared\halux\planning\Productie resource tijden.txt")
+	Set ..Reader=##class(TECH.FileReader).%New("\\notes01\shared\halux\planning\Resource tijden export from XLS.txt")
 	/// Do reader.SetDelimiter($C(9)) ; optioneel, default is TAB
 	Do ..Reader.SetHeaderRow(1)
 	Do ..Reader.SetFirstDataRow(2)
@@ -48,34 +48,47 @@
 	Do ..VerwijderOude()
 	
 	While ..Reader.Next()
-	{
-		Set Hoofdgroep=..Reader.Data("Hoofdgroep")
-		Set:$E(Hoofdgroep)="""" Hoofdgroep=$P(Hoofdgroep,"""",2)
-		Set Groep=..Reader.Data("Groep")
-		Set:$E(Groep)="""" Groep=$P(Groep,"""",2)
+	{	
+		Set Resourcegroep=..Reader.Data("Resourcegroep")
+		Set:$E(Resourcegroep)="""" Resourcegroep=$P(Resourcegroep,"""",2)
+
+		Set Resource=..Reader.Data("Resource")
+		Set:$E(Resource)="""" Resource=$P(Resource,"""",2)
+
+		Set Activiteit=..Reader.Data("Activiteit")
+		Set:$E(Activiteit)="""" Activiteit=$P(Activiteit,"""",2)
+
+		Set Productgroep=..Reader.Data("Productgroep")
+		Set:$E(Productgroep)="""" Productgroep=$P(Productgroep,"""",2)
+		
 		Set Selector=..Reader.Data("Selector")
 		Set:$E(Selector)="""" Selector=$P(Selector,"""",2)
+		Set:Selector="" Selector="*" ; indien geen selector in XLS dan als default gebruiken voor Resource, Activiteit en Productgroep
+
 		Set Tijd=..Reader.Data("Tijd")
-		Do ..OpslaanRecord(Hoofdgroep, Groep, Selector,Tijd)
+		Do ..OpslaanRecord(Resourcegroep, Resource, Activiteit,Productgroep, Selector,Tijd)
 	}
 ]]></Implementation>
 </Method>
 
 <Method name="OpslaanRecord">
-<FormalSpec>Hoofdgroep:%String,Groep:%String,Selector:%String,Tijd:%Decimal</FormalSpec>
+<FormalSpec>Resourcegroep:%String,Resource:%String,Activiteit:%String,Productgroep:%String,Selector:%String,Tijd:%Decimal</FormalSpec>
 <Implementation><![CDATA[
-	#dim ResourceTijd as ResourceTijd
-	Set ResourceTijd=##class(ResourceTijd).%New()
-	Set ResourceTijd.Hoofdgroep=Hoofdgroep
-	Set ResourceTijd.Groep=Groep
+	#dim ResourceTijd as APPS.Halux.Planning.Resource.dto.ResourceTijd
+	Set ResourceTijd=##class(APPS.Halux.Planning.Resource.dto.ResourceTijd).%New()
+	Set ResourceTijd.Resourcegroep=Resourcegroep
+	Set ResourceTijd.Resource=Resource
+	Set ResourceTijd.Activiteit=Activiteit
+	Set ResourceTijd.Productgroep=Productgroep
 	Set ResourceTijd.Selector=Selector
 	Set ResourceTijd.Tijd=Tijd
-	Do ResourceTijd.Save()
+	set sc=ResourceTijd.%Save()
+	w $$ParseStatus^vhLib(sc)
 ]]></Implementation>
 </Method>
 
 <Method name="VerwijderOude">
-<Implementation><![CDATA[	D ##class(ResourceTijd).%DeleteExtent()
+<Implementation><![CDATA[	D ##class(APPS.Halux.Planning.Resource.dto.ResourceTijd).%DeleteExtent()
 ]]></Implementation>
 </Method>
 </Class>