Index: BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r37288 -r37452
--- BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 37288)
+++ BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 37452)
@@ -1305,13 +1305,14 @@
 <Implementation><![CDATA[
 	If AantalEtikettenZonderLogo > 0 {
 		Do ..PalletEtikettenZonderLogo(AantalEtikettenZonderLogo)
+	} Else {
+		If '..BevatSFS() {	
+			Do ..PalletEtikettenNietSFS() 
+		}
+		Else { 	
+			Do ..PalletEtikettenSFS() 
+		}
 	}
-	If '..BevatSFS() {	
-		Do ..PalletEtikettenNietSFS() 
-	}
-	Else { 	
-		Do ..PalletEtikettenSFS() 
-	}
 	
 	Quit
 ]]></Implementation>
@@ -1472,6 +1473,10 @@
 <Method name="PalletEtiketOne">
 <FormalSpec>Type:BL.PPS.TBX.enu.PalletEtiketType="SFS"</FormalSpec>
 <Implementation><![CDATA[
+	Do ##class(Tools.Wlip).%New(127).String(Type)
+	If Type'="Z" {
+		Do ##class(Tools.Wlip).%New(127).Stack()
+	}
 	if '##class(BL.PPS.TBX.enu.PalletEtiketType).IsValid(Type) {
 		set Exception = ##class(TECH.Exceptions.BaseException).%New(##class(TECH.enu.ExceptionCode).InvalidInput(),Type _" is geen geldig PalletEtiketType")
 		Do ##class(TECH.ExceptionHandler).Throw(Exception)