Index: vhUnitTest/DOM/PM/impl/DataM/PakketService/Test.cls.xml
===================================================================
diff -u -r47344 -r50132
--- vhUnitTest/DOM/PM/impl/DataM/PakketService/Test.cls.xml	(.../Test.cls.xml)	(revision 47344)
+++ vhUnitTest/DOM/PM/impl/DataM/PakketService/Test.cls.xml	(.../Test.cls.xml)	(revision 50132)
@@ -95,6 +95,31 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test GeefPakketNaam return waarde">
+<Implementation><![CDATA[
+	set PakketService = ##class(vhUnitTest.DOM.PM.impl.DataM.PakketService.PakketServiceFake).%New()	
+	#dim Data As TECH.MultiDim  
+	Do ##class(vhUnitTest.DOM.PM.impl.DataM.PakketService.PakketServiceFake).Zet3pakkettenTestData(.Data)
+	Do PakketService.Setup(.Data)
+	
+	Do $$$AssertTrue(PakketService.GeefPakketNaam(9),"1014,004")
+]]></Implementation>
+</Method>
+
+<Method name="Test GeefPakketNaam smijt exceptie voor niet bestaand pakket">
+<Implementation><![CDATA[
+	set PakketService = ##class(vhUnitTest.DOM.PM.impl.DataM.PakketService.PakketServiceFake).%New()	
+	#dim Data As TECH.MultiDim  
+	Do ##class(vhUnitTest.DOM.PM.impl.DataM.PakketService.PakketServiceFake).Zet3pakkettenTestData(.Data)
+	Do PakketService.Setup(.Data)
+	
+	#dim Substrings as %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Pakket met PakketNr '666' bestaat niet.")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(##class(TECH.Exceptions.InvalidInputException).%ClassName(1),Substrings))
+		
+	#dim pakketnaam as %String = PakketService.GeefPakketNaam(666)
+]]></Implementation>
+</Method>
+
 <Method name="Test VerwijderPakket cleared de data uit de globals">
 <Implementation><![CDATA[
 	set PakketService = ##class(vhUnitTest.DOM.PM.impl.DataM.PakketService.PakketServiceFake).%New()	
Index: vhTest/Fake/DOM/PM/impl/DataM/PakketService.cls.xml
===================================================================
diff -u -r47431 -r50132
--- vhTest/Fake/DOM/PM/impl/DataM/PakketService.cls.xml	(.../PakketService.cls.xml)	(revision 47431)
+++ vhTest/Fake/DOM/PM/impl/DataM/PakketService.cls.xml	(.../PakketService.cls.xml)	(revision 50132)
@@ -20,6 +20,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPakketNaam">
+<FormalSpec>PakketNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="GeefPakketNonAktief">
 <FormalSpec>PakketNummer:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
Index: vhTest/Mock/DOM/PM/impl/DataM/PakketService.cls.xml
===================================================================
diff -u -r47431 -r50132
--- vhTest/Mock/DOM/PM/impl/DataM/PakketService.cls.xml	(.../PakketService.cls.xml)	(revision 47431)
+++ vhTest/Mock/DOM/PM/impl/DataM/PakketService.cls.xml	(.../PakketService.cls.xml)	(revision 50132)
@@ -21,6 +21,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPakketNaam">
+<FormalSpec>PakketNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefPakketNaam",PakketNr)
+]]></Implementation>
+</Method>
+
 <Method name="GeefPakketNonAktief">
 <FormalSpec>PakketNummer:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
Index: DOM/PM/impl/DataM/PakketService.cls.xml
===================================================================
diff -u -r47431 -r50132
--- DOM/PM/impl/DataM/PakketService.cls.xml	(.../PakketService.cls.xml)	(revision 47431)
+++ DOM/PM/impl/DataM/PakketService.cls.xml	(.../PakketService.cls.xml)	(revision 50132)
@@ -34,6 +34,17 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefPakketNaam">
+<FormalSpec>PakketNr:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+
+	Quit:$Data(@..#Global("D",PakketNr)) $Piece(@..#Global("D",PakketNr),"\",2)
+	
+	Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Pakket met PakketNr '"_PakketNr_"' bestaat niet."))
+]]></Implementation>
+</Method>
+
 <Method name="MaakPakket">
 <FormalSpec>KlantId:%String,Pakketnaam:%String</FormalSpec>
 <ReturnType>%String</ReturnType>