Index: APPS/Halux/PPS/Document/impl/common/TiponSynchronisatiestangInkorten.cls.xml
===================================================================
diff -u -r71983 -r72071
--- APPS/Halux/PPS/Document/impl/common/TiponSynchronisatiestangInkorten.cls.xml (.../TiponSynchronisatiestangInkorten.cls.xml) (revision 71983)
+++ APPS/Halux/PPS/Document/impl/common/TiponSynchronisatiestangInkorten.cls.xml (.../TiponSynchronisatiestangInkorten.cls.xml) (revision 72071)
@@ -29,6 +29,25 @@
]]>
+
+UitvoeringInfoLijst:APPS.Halux.PPS.dto.UitvoeringInfoLijst
+1
+
+
+
1
%ListOfDataTypes
@@ -39,7 +58,6 @@
Do List.Insert("Breedte")
Do List.Insert("Uitvoer")
Do List.Insert("AantalTiponSynchronisatiestangen")
- Do List.Insert("TotaalAantalTiponSynchronisatiestangenInToelevering")
Do List.Insert("Type")
Do List.Insert("TiponSynchronisatiestangKorttekst")
Quit List
@@ -77,7 +95,7 @@
VorigeUI:APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo,UI:APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo
1
%Boolean
-
Index: APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml
===================================================================
diff -u -r72026 -r72071
--- APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml (.../WerklijstItemsUitvoerder.cls.xml) (revision 72026)
+++ APPS/Halux/PPS/Activiteit/impl/WerklijstItemsUitvoerder.cls.xml (.../WerklijstItemsUitvoerder.cls.xml) (revision 72071)
@@ -74,7 +74,7 @@
Do ..ZetTotaalAantalMattenPerToelevering(UitvoeringLijstIterator)
Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
- Do ..ZetTotaalAantalTiponSynchronisatiestangenPerToelevering(UitvoeringLijstIterator)
+ Do ..GroepeerTiponSynchronisatiestangen(UitvoeringLijstIterator)
Set UitvoeringLijstIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
//Matten met zelfde dimensies groeperen
@@ -153,36 +153,48 @@
]]>
-
-UitvoeringLijstIterator:TECH.ListIterator
+
+UitvoeringInfoIterator:TECH.ListIterator
1
+
+VorigeUI:BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo,UI:BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo
+1
+%Boolean
+
+
+
Object:APPS.Halux.PPS.dto.SequentieGebaseerdeUitvoeringInfo
1
Index: BL/PPS/TBX/DocSynchroStangInkortLijst.cls.xml
===================================================================
diff -u -r72025 -r72071
--- BL/PPS/TBX/DocSynchroStangInkortLijst.cls.xml (.../DocSynchroStangInkortLijst.cls.xml) (revision 72025)
+++ BL/PPS/TBX/DocSynchroStangInkortLijst.cls.xml (.../DocSynchroStangInkortLijst.cls.xml) (revision 72071)
@@ -166,7 +166,6 @@
1
@@ -199,7 +197,7 @@
Do ..VoegToeHoofdingMetTussenLijnen("INKORTEN", ..Document.GeefAantalKolommen())
#dim UitvoeringInfoIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(..UitvoeringInfoLijst)
- Do ..ZetTotaalAantalTiponSynchronisatiestangenPerToelevering(UitvoeringInfoIterator)
+ Do ..GroepeerTiponSynchronisatiestangen(UitvoeringInfoIterator)
Do UitvoeringInfoIterator.Reset()
#dim VorigeUI As BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo = ""
@@ -216,10 +214,9 @@
Do ..Document.GeefKolom(2).Insert(UI.ToeDos)
Do ..Document.GeefKolom(3).Insert(UI.Breedte)
Do ..Document.GeefKolom(4).Insert(UI.Uitvoer)
- Do ..Document.GeefKolom(5).Insert(UI.AantalTiponSynchronisatiestangen)
- Do ..Document.GeefKolom(6).Insert(UI.TotaalAantalTiponSynchronisatiestangenInToelevering)
- Do ..Document.GeefKolom(7).Insert(UI.Type)
- Do ..Document.GeefKolom(8).Insert(UI.TiponSynchronisatiestangKorttekst)
+ Do ..Document.GeefKolom(5).Insert(UI.TotaalAantalTiponSynchronisatiestangenInToelevering)
+ Do ..Document.GeefKolom(6).Insert(UI.Type)
+ Do ..Document.GeefKolom(7).Insert(UI.TiponSynchronisatiestangKorttekst)
Set VorigeUI = UI
}
@@ -314,32 +311,45 @@
]]>
-
+
UitvoeringInfoIterator:TECH.ListIterator
1
+
+
+VorigeUI:BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo,UI:BL.PPS.TBX.DocSynchroStangInkortLijst.dto.SynchroStangInkortenUitvoeringInfo
+1
+%Boolean
+
+