Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantRechtsOnly/Test.cls.xml
===================================================================
diff -u -r55081 -r72207
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantRechtsOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 55081)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantRechtsOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 72207)
@@ -9,7 +9,11 @@
 <Implementation><![CDATA[
 	#dim TAORKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	
-	Set TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).ZijkantRechts()
+	Set TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.ZijkantRechts
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.ZwartIngekleurdYaya
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.Berk
+	Set TAORKenmerken.KantenbandKleur = ..Enum.KantenbandKleur.NatuurNotenhout
 	
 	Quit TAORKenmerken
 ]]></Implementation>
@@ -30,10 +34,10 @@
 
 	Do List.Insert("[DiepteAfkorting]:500x[BreedteAfkorting]:600")
 	Do List.Insert("******")
-	Do List.Insert("[Enkel] [zijkantrechts]:[W]")
-	Do List.Insert("[LadezijkantBuitenkant]:[W]")
-	Do List.Insert("[LadezijkantBinnenkant]:[W]")
-	Do List.Insert("[kantenband]:[W]")
+	Do List.Insert("[Enkel] [zijkantrechts]:[NE]")
+	Do List.Insert("[LadezijkantBuitenkant]:[NE]")
+	Do List.Insert("[LadezijkantBinnenkant]:[ZY]")
+	Do List.Insert("[kantenband]:[NN]")
 	Do List.Insert("******")
 
 	Quit List
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/RugOnly/Test.cls.xml
===================================================================
diff -u -r55081 -r72207
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/RugOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 55081)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/RugOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 72207)
@@ -9,7 +9,11 @@
 <Implementation><![CDATA[
 	#dim TAORKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	
-	Set TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).Rug()
+	Set TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.Rug
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.ZwartIngekleurdYaya
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.Berk
+	Set TAORKenmerken.KantenbandKleur = ..Enum.KantenbandKleur.NatuurNotenhout
 	
 	Quit TAORKenmerken
 ]]></Implementation>
@@ -30,8 +34,8 @@
 
 	Do List.Insert("[DiepteAfkorting]:500x[BreedteAfkorting]:600")
 	Do List.Insert("******")
-	Do List.Insert("[Enkel] [rug]:[W]")
-	Do List.Insert("[kantenband]:[W]")
+	Do List.Insert("[Enkel] [rug]:[ZY]")
+	Do List.Insert("[kantenband]:[NN]")
 	Do List.Insert("******")
 
 	Quit List
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/BodemOnly/Test.cls.xml
===================================================================
diff -u -r55081 -r72207
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/BodemOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 55081)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/BodemOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 72207)
@@ -9,7 +9,10 @@
 <Implementation><![CDATA[
 	#dim TAORKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	
-	Set TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).Bodem()
+	Set TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.Bodem
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.ZwartIngekleurdYaya
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.Berk
 	
 	Quit TAORKenmerken
 ]]></Implementation>
@@ -30,7 +33,7 @@
 
 	Do List.Insert("[DiepteAfkorting]:500x[BreedteAfkorting]:600")
 	Do List.Insert("******")
-	Do List.Insert("[Enkel] [Bodem]:[W]")
+	Do List.Insert("[Enkel] [Bodem]:[BE]")
 	Do List.Insert("******")
 
 	Quit List
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/FrontOnlyLBX/Test.cls.xml
===================================================================
diff -u -r63611 -r72207
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/FrontOnlyLBX/Test.cls.xml	(.../Test.cls.xml)	(revision 63611)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/FrontOnlyLBX/Test.cls.xml	(.../Test.cls.xml)	(revision 72207)
@@ -9,7 +9,10 @@
 <Implementation><![CDATA[
 	#dim TAORKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardBinnenlade()
 	
-	Set TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).FrontLBX()
+	Set TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.FrontLBX
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.ZwartIngekleurdYaya
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.Berk
 	
 	Quit TAORKenmerken
 ]]></Implementation>
@@ -30,7 +33,7 @@
 
 	Do List.Insert("[DiepteAfkorting]:500x[BreedteAfkorting]:600")
 	Do List.Insert("******")
-	Do List.Insert("[Enkel] [front]:[W]")
+	Do List.Insert("[Enkel] [front]:[NE]")
 	Do List.Insert("[Eindkap]:[AL]")
 	Do List.Insert("[frontbevestiging]:[schroef]")
 	Do List.Insert("******")
Index: DOM/PM/impl/Langtekst/TAOREnkelOnderdeelTekstBepaler.cls.xml
===================================================================
diff -u -r63596 -r72207
--- DOM/PM/impl/Langtekst/TAOREnkelOnderdeelTekstBepaler.cls.xml	(.../TAOREnkelOnderdeelTekstBepaler.cls.xml)	(revision 63596)
+++ DOM/PM/impl/Langtekst/TAOREnkelOnderdeelTekstBepaler.cls.xml	(.../TAOREnkelOnderdeelTekstBepaler.cls.xml)	(revision 72207)
@@ -8,11 +8,6 @@
 <Default>; </Default>
 </Parameter>
 
-<Property name="KleurCodeBepaler">
-<Type>DOM.PM.ProductTekst.impl.KleurcodeBepaler</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="Vertaler">
 <Type>DOM.common.Transl.Vertaler</Type>
 <Private>1</Private>
@@ -33,26 +28,37 @@
 <Private>1</Private>
 </Property>
 
-<Property name="HalffabItemsBoom">
-<Type>DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="OnderdeelTekst">
 <Type>%String</Type>
 <Collection>list</Collection>
 <Private>1</Private>
 </Property>
 
+<Property name="LosseComponentFactory">
+<Type>DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Kleuren">
+<Type>%ArrayOfDataTypes</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductieWijzeNaarLosseComponentConverter">
+<Type>DOM.PM.Maatwerk.TAX.impl.ProductieWijzeNaarLosseComponentConverter</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>KleurCodeBepaler:DOM.PM.ProductTekst.impl.KleurcodeBepaler=""</FormalSpec>
+<FormalSpec>LosseComponentFactory:DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory="",ProductieWijzeNaarLosseComponentConverter:DOM.PM.Maatwerk.TAX.impl.ProductieWijzeNaarLosseComponentConverter=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	Set ..KleurCodeBepaler = $$$Implementation(KleurCodeBepaler, ##class(DOM.PM.ProductTekst.impl.KleurcodeBepaler.LBX).%New())
-	Set ..OnderdeelTekst = ##class(%ListOfDataTypes).%New()
+	Set ..LosseComponentFactory = $$$Inject(LosseComponentFactory, ##class(DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory).%New())
+	Set ..ProductieWijzeNaarLosseComponentConverter = $$$Inject(ProductieWijzeNaarLosseComponentConverter, ##class(DOM.PM.Maatwerk.TAX.impl.ProductieWijzeNaarLosseComponentConverter).%New())
+	Set ..OnderdeelTekst = ##class(%ListOfDataTypes).%New()	
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -67,29 +73,31 @@
 	Set ..KleurCodeVertaler = VertaalAPI.GeefKleurCodeVertaler(Taal)
 	Set ..PlaatMateriaalKleurVertaler = PlaatMateriaalKleurVertaler
 	Set ..TAORKenmerken = TAORKenmerken
-	Set ..HalffabItemsBoom = HalffabItemsBoom
 	
+	#dim LosseComponentType As DOM.PM.Maatwerk.Lade.enu.LosseComponent = ..ProductieWijzeNaarLosseComponentConverter.Convert(TAORKenmerken.ProductieWijze)
+	#dim LadeOnderdeel As DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel = ..LosseComponentFactory.MaakLosseComponent(HalffabItemsBoom, TAORKenmerken, LosseComponentType)
+	Set ..Kleuren = LadeOnderdeel.GeefKleuren()
+	
 	Do ..Verwerk(TAORKenmerken.ProductieWijze)
+	
 	Quit ..OnderdeelTekst
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkBodem">
 <Private>1</Private>
-<Implementation><![CDATA[
-	#dim KleurCode As TECH.String = ..KleurCodeBepaler.GeefBinnenKleurCode(..TAORKenmerken, ..HalffabItemsBoom)
-	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("Bodem")_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(KleurCode))
+<Implementation><![CDATA[	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("Bodem")_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(1)))
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkFront">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim KleurCode As TECH.String = ..TAORKenmerken.LadeKleur
+	#dim LadeKleurCode As TECH.String = ..TAORKenmerken.LadeKleur
 	#dim EindkapKleurCode As TECH.String = ..TAORKenmerken.FrontEindkapKleur
 	#dim FrontBevestiging As TECH.String = $ZCVT(##class(DOM.PM.enu.TAORFrontBevestiging).Array().GetAt(..TAORKenmerken.FrontBevestiging),"L")
 
-	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("front", "", $$$True)_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(KleurCode))
+	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("front", "", $$$True)_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(LadeKleurCode))
 	Do ..Append(..Vertaler.GeefVertaling("Eindkap", "", $$$True)_":"_..KleurCodeVertaler.GeefVertaling(EindkapKleurCode))
 	Do ..Append(..Vertaler.GeefVertaling("frontbevestiging", "", $$$True)_":"_..Vertaler.GeefVertaling(FrontBevestiging, "", $$$True))
 ]]></Implementation>
@@ -104,40 +112,33 @@
 <Method name="VerwerkZijkantRechts">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim BinnenKleurCode As TECH.String = ..KleurCodeBepaler.GeefBinnenKleurCode(..TAORKenmerken, ..HalffabItemsBoom)
-	#dim BuitenKleurCode As TECH.String = ..KleurCodeBepaler.GeefBuitenKleurCode(..TAORKenmerken, ..HalffabItemsBoom)
-	#dim KantenbandKleurCode As TECH.String = ..TAORKenmerken.KantenbandKleur
 	#dim LadeKleurCode As TECH.String = ..TAORKenmerken.LadeKleur
 	
 	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("zijkantrechts", "", $$$True)_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(LadeKleurCode))
-	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBuitenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(BuitenKleurCode))
-	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBinnenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(BinnenKleurCode))
-	Do ..Append(..Vertaler.GeefVertaling("kantenband", "", $$$True) _":"_..PlaatMateriaalKleurVertaler.GeefVertaling(KantenbandKleurCode))
+	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBuitenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(2)))
+	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBinnenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(1)))
+	Do ..Append(..Vertaler.GeefVertaling("kantenband", "", $$$True) _":"_..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(3)))
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkZijkantLinks">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim BinnenKleurCode As TECH.String = ..KleurCodeBepaler.GeefBinnenKleurCode(..TAORKenmerken, ..HalffabItemsBoom)
-	#dim BuitenKleurCode As TECH.String = ..KleurCodeBepaler.GeefBuitenKleurCode(..TAORKenmerken, ..HalffabItemsBoom)
-	#dim KantenbandKleurCode As TECH.String = ..TAORKenmerken.KantenbandKleur
 	#dim LadeKleurCode As TECH.String = ..TAORKenmerken.LadeKleur
 	
 	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("zijkantlinks", "", $$$True)_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(LadeKleurCode))
-	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBuitenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(BuitenKleurCode))
-	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBinnenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(BinnenKleurCode))
-	Do ..Append(..Vertaler.GeefVertaling("kantenband", "", $$$True) _":"_..PlaatMateriaalKleurVertaler.GeefVertaling(KantenbandKleurCode))
+	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBuitenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(2)))
+	Do ..Append(..Vertaler.GeefVertaling("LadezijkantBinnenkant", "", $$$True)_":" _..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(1)))
+	Do ..Append(..Vertaler.GeefVertaling("kantenband", "", $$$True) _":"_..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(3)))
 ]]></Implementation>
 </Method>
 
 <Method name="VerwerkRug">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim KleurCode As TECH.String = ..KleurCodeBepaler.GeefBinnenKleurCode(..TAORKenmerken, ..HalffabItemsBoom)
 	#dim KantenbandKleurCode As TECH.String = ..TAORKenmerken.KantenbandKleur
 	
-	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("rug", "", $$$True)_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(KleurCode))
+	Do ..Append(..Vertaler.GeefVertaling("Enkel")_" " _..Vertaler.GeefVertaling("rug", "", $$$True)_":"_..PlaatMateriaalKleurVertaler.GeefVertaling(..Kleuren.GetAt(1)))
 	Do ..Append(..Vertaler.GeefVertaling("kantenband", "", $$$True) _":"_..PlaatMateriaalKleurVertaler.GeefVertaling(KantenbandKleurCode))
 ]]></Implementation>
 </Method>
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/FrontOnly/Test.cls.xml
===================================================================
diff -u -r55086 -r72207
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/FrontOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 55086)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/FrontOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 72207)
@@ -9,7 +9,10 @@
 <Implementation><![CDATA[
 	#dim TAORKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardBinnenlade()
 	
-	Set TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).Front()
+	Set TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.Front
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.ZwartIngekleurdYaya
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.Berk
 	
 	Quit TAORKenmerken
 ]]></Implementation>
@@ -30,7 +33,7 @@
 
 	Do List.Insert("[DiepteAfkorting]:500x[BreedteAfkorting]:600")
 	Do List.Insert("******")
-	Do List.Insert("[Enkel] [front]:[W]")
+	Do List.Insert("[Enkel] [front]:[NE]")
 	Do List.Insert("[Eindkap]:[AL]")
 	Do List.Insert("[frontbevestiging]:[schroef]")
 	Do List.Insert("******")
Index: vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantLinksOnly/Test.cls.xml
===================================================================
diff -u -r55081 -r72207
--- vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantLinksOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 55081)
+++ vhUnitTest/DOM/PM/impl/TAORLangtekstCreator/GeefLangtekst/ZijkantLinksOnly/Test.cls.xml	(.../Test.cls.xml)	(revision 72207)
@@ -9,7 +9,11 @@
 <Implementation><![CDATA[
 	#dim TAORKenmerken As APPS.PM.Maatwerk.dto.TAORKenmerken = ##class(vhTest.Utils.APPS.PM.Maatwerk.dto.TAORKenmerken).StandaardLade()
 	
-	Set TAORKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).ZijkantLinks()
+	Set TAORKenmerken.ProductieWijze = ..Enum.ProductieWijze.ZijkantLinks
+	Set TAORKenmerken.LadeKleur = ..Enum.LadeKleur.NatuurEikenhout
+	Set TAORKenmerken.LadeBinnenKleur = ..Enum.LadeKleur.ZwartIngekleurdYaya
+	Set TAORKenmerken.BodemKleur = ..Enum.BodemKleur.Berk
+	Set TAORKenmerken.KantenbandKleur = ..Enum.KantenbandKleur.NatuurNotenhout
 	
 	Quit TAORKenmerken
 ]]></Implementation>
@@ -30,10 +34,10 @@
 
 	Do List.Insert("[DiepteAfkorting]:500x[BreedteAfkorting]:600")
 	Do List.Insert("******")
-	Do List.Insert("[Enkel] [zijkantlinks]:[W]")
-	Do List.Insert("[LadezijkantBuitenkant]:[W]")
-	Do List.Insert("[LadezijkantBinnenkant]:[W]")
-	Do List.Insert("[kantenband]:[W]")
+	Do List.Insert("[Enkel] [zijkantlinks]:[NE]")
+	Do List.Insert("[LadezijkantBuitenkant]:[NE]")
+	Do List.Insert("[LadezijkantBinnenkant]:[ZY]")
+	Do List.Insert("[kantenband]:[NN]")
 	Do List.Insert("******")
 
 	Quit List