Index: APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml
===================================================================
diff -u -r32885 -r32902
--- APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(.../PrintEtiketten.cls.xml)	(revision 32885)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/LijstVerwerkers/KlantEtiketten/PrintEtiketten.cls.xml	(.../PrintEtiketten.cls.xml)	(revision 32902)
@@ -100,7 +100,7 @@
 
 <Method name="VoegToeKlantEtiketten">
 <Private>1</Private>
-<Implementation><![CDATA[	do ..VoegToeEtiketten(##class(TECH.ListIterator).%New(..KlantEtiketten))
+<Implementation><![CDATA[	Do ..VoegToeEtiketten(##class(TECH.ListIterator).%New(..KlantEtiketten))
 ]]></Implementation>
 </Method>
 
@@ -234,9 +234,7 @@
 <FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
-<Implementation><![CDATA[
-	
-	Quit $$$If((..WisselKar), "Kar:" _ ..GeefKarVolgNummer(UitvoeringInfo), "")
+<Implementation><![CDATA[	Quit $$$If((..WisselKar), "Kar:" _ ..GeefKarVolgNummer(UitvoeringInfo), "")
 ]]></Implementation>
 </Method>
 
@@ -260,13 +258,13 @@
 <Method name="IsAlpnach">
 <FormalSpec>UitvoeringInfo:APPS.Halux.PPS.Activiteit.impl.TAOR.dto.KlantEtiketUitvoeringInfo</FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[	quit $IsObject(UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2)) && ( UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2).KlantID = "SFS_83723" )
+<Implementation><![CDATA[	Quit $IsObject(UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2)) && ( UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2).KlantID = "SFS_83723" )
 ]]></Implementation>
 </Method>
 
 <Method name="VoegToeAlpnachEtiketten">
 <Private>1</Private>
-<Implementation><![CDATA[	do ..VoegToeEtiketten(##class(TECH.ListIterator).%New(..AlpnachEtiketten))
+<Implementation><![CDATA[	Do ..VoegToeEtiketten(##class(TECH.ListIterator).%New(..AlpnachEtiketten))
 ]]></Implementation>
 </Method>
 
@@ -277,27 +275,24 @@
 	#dim TaorProduct As DOM.PM.MaatwerkProduct = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(UitvoeringInfo.ProductID)
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = TaorProduct.GeefIngegevenKenmerken()
 	
-	#dim OrderID As %String = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToeleveringLijn(UitvoeringInfo.ToeleveringID,UitvoeringInfo.ToeleveringLijnID).GeefOrderID()
-	#dim OrderlijnID As %String = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToeleveringLijn(UitvoeringInfo.ToeleveringID,UitvoeringInfo.ToeleveringLijnID).GeefOrderLijnID()
-	
+	#dim OrderID As %String = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToeleveringLijn(UitvoeringInfo.ToeleveringID, UitvoeringInfo.ToeleveringLijnID).GeefOrderID()
+	#dim OrderlijnID As %String = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI().GeefToeleveringLijn(UitvoeringInfo.ToeleveringID, UitvoeringInfo.ToeleveringLijnID).GeefOrderLijnID()
 	#dim Orderlijn As DOM.VKP.ProductOrderlijn = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(OrderID).GeefOrderLijn(OrderlijnID)
 	
-	set Etiket = ##class(BL.Etiket.MaatwerkProductAlpnach).%New()
+	#dim Etiket As BL.Etiket.MaatwerkProductAlpnach = ##class(BL.Etiket.MaatwerkProductAlpnach).%New()
 	
-	set Etiket.Device = UitvoeringInfo.KlantEtiketData.Device
+	Set Etiket.Device = UitvoeringInfo.KlantEtiketData.Device
+	Set Etiket.Header1 = Orderlijn.GeefProjectReferentie()
+	Set Etiket.ImageLinksBoven = UitvoeringInfo.KlantEtiketData.LadeAfbeeldingLocatie
+	Set Etiket.DataRechts1 = IngegevenKenmerken.GeleiderTechnologie
+	Set Etiket.DataRechts2 = $extract(IngegevenKenmerken.LadeHoogte)
+	Set Etiket.DataRechts3 = UitvoeringInfo.KlantEtiketData.Kleurcodes
+	Set Etiket.DataRechts4 = "T:"_IngegevenKenmerken.LadeDiepte
+	Set Etiket.DataRechts5 = "B:"_IngegevenKenmerken.CorpusBinnenbreedte
+	Set Etiket.Footer1 = UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2).CommissieReferentie
+	Set Etiket.Footer2 = UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2).OrderReferentie
 	
-	set Etiket.Header1 = Orderlijn.GeefProjectReferentie()
-	set Etiket.ImageLinksBoven = UitvoeringInfo.KlantEtiketData.LadeAfbeeldingLocatie
-
-	set Etiket.DataRechts1 = IngegevenKenmerken.GeleiderTechnologie
-	set Etiket.DataRechts2 = $extract(IngegevenKenmerken.LadeHoogte)
-	set Etiket.DataRechts3 = UitvoeringInfo.KlantEtiketData.Kleurcodes
-	set Etiket.DataRechts4 = "T:"_IngegevenKenmerken.LadeDiepte
-	set Etiket.DataRechts5 = "B:"_IngegevenKenmerken.CorpusBinnenbreedte
-	set Etiket.Footer1 = UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2).CommissieReferentie
-	set Etiket.Footer2 = UitvoeringInfo.KlantEtiketData.DocumentReferenties.GetAt(2).OrderReferentie
-	
-	quit Etiket
+	Quit Etiket
 ]]></Implementation>
 </Method>
 </Class>