Index: vhDeploy/Deploy20231004xUpdateDocumentTiponSynchrostangInkortenTbx.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20231004xUpdateDocumentTiponSynchrostangInkortenTbx.cls.xml	(revision 0)
+++ vhDeploy/Deploy20231004xUpdateDocumentTiponSynchrostangInkortenTbx.cls.xml	(revision 72025)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20231004xUpdateDocumentTiponSynchrostangInkortenTbx">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Update document inkortlijst TiponSynchronisatiestang: kolom Tot# toegevoegd, enkel voor TBX</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Do ##class(BL.PPS.TBX.LijstDefinities.SynchroStangInkortenLijstDefinitie).%New().MaakDocument()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: BL/PPS/TBX/DocSynchroStangInkortLijst.cls.xml
===================================================================
diff -u -r72010 -r72025
--- BL/PPS/TBX/DocSynchroStangInkortLijst.cls.xml	(.../DocSynchroStangInkortLijst.cls.xml)	(revision 72010)
+++ BL/PPS/TBX/DocSynchroStangInkortLijst.cls.xml	(.../DocSynchroStangInkortLijst.cls.xml)	(revision 72025)
@@ -202,10 +202,16 @@
 		Do ..ZetTotaalAantalTiponSynchronisatiestangenPerToelevering(UitvoeringInfoIterator)
 		Do UitvoeringInfoIterator.Reset()
 		
+		#dim VorigeUI As BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo = ""
+		
 		While (UitvoeringInfoIterator.HasNext())
 		{
 			#dim UI As BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo = UitvoeringInfoIterator.Next()
-			Do ##class(Tools.Wlip).%New(252).ObjToText(UI)
+			
+			If ($IsObject(VorigeUI) && ..HeeftTussenlijnNodig(VorigeUI, UI)) {
+				Do ..VoegToeLegeRegel()
+			}
+			
 			Do ..Document.GeefKolom(1).Insert(UI.Nr)
 			Do ..Document.GeefKolom(2).Insert(UI.ToeDos)
 			Do ..Document.GeefKolom(3).Insert(UI.Breedte)
@@ -214,6 +220,8 @@
 			Do ..Document.GeefKolom(6).Insert(UI.TotaalAantalTiponSynchronisatiestangenInToelevering)
 			Do ..Document.GeefKolom(7).Insert(UI.Type)
 			Do ..Document.GeefKolom(8).Insert(UI.TiponSynchronisatiestangKorttekst)
+			
+			Set VorigeUI = UI
 		}
 	}
 ]]></Implementation>
@@ -252,17 +260,27 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VoegToeLegeRegel">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Kolom As %Integer
+	For Kolom=1:1:..Document.GeefAantalKolommen() {
+		Do ..Document.GeefKolom(Kolom).Insert("")
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefTBXVerpakkingKort">
 <FormalSpec>VerpakkingID:DOM.PM.enu.TBXVerpakking</FormalSpec>
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Tekst As %String = ##class(Prod.GAMeta.BT.Verpakking).TaalAfhOmsClass("Prod.GAMeta.BT.Verpakking",VerpakkingID,##class(DOM.enu.Taal).Nederlands())
-
+	
 	If (##class(TECH.StringUtils).Contains($$$LCase(Tekst),"verpakt:")) {
 		Set Tekst = $Piece(Tekst,":",2)
 	}
-
+	
 	Quit $$$Trim(Tekst)
 ]]></Implementation>
 </Method>
@@ -288,6 +306,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HeeftTussenlijnNodig">
+<FormalSpec>VorigeUI:BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo,UI:BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $$$Not($Piece(VorigeUI.ToeDos, ":",1) = $Piece(UI.ToeDos, ":",1))
+]]></Implementation>
+</Method>
+
 <Method name="ZetTotaalAantalTiponSynchronisatiestangenPerToelevering">
 <FormalSpec>UitvoeringInfoIterator:TECH.ListIterator</FormalSpec>
 <Private>1</Private>
@@ -298,7 +324,7 @@
 	while UitvoeringInfoIterator.HasNext() {
 		Set HuidigeSynchroStang = UitvoeringInfoIterator.Next()
 		
-		If ((VorigeSynchroStang = "") || ($Piece(VorigeSynchroStang.ToeDos, ":",1) = $Piece(VorigeSynchroStang.ToeDos, ":",1))) {
+		If ((VorigeSynchroStang = "") || ($Piece(VorigeSynchroStang.ToeDos, ":",1) = $Piece(HuidigeSynchroStang.ToeDos, ":",1))) {
 			Set AantalSynchroStangenVoorDezeToelevering = AantalSynchroStangenVoorDezeToelevering + HuidigeSynchroStang.AantalTiponSynchronisatiestangen
 		}
 			
@@ -311,8 +337,6 @@
 	
 	If $IsObject(VorigeSynchroStang) {
 		Set VorigeSynchroStang.TotaalAantalTiponSynchronisatiestangenInToelevering = AantalSynchroStangenVoorDezeToelevering
-		Do ##class(Tools.Wlip).%New(252).String("Vorige SynchroStang")
-		Do ##class(Tools.Wlip).%New(252).ObjToText(VorigeSynchroStang)
 	}
 ]]></Implementation>
 </Method>