Index: APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml
===================================================================
diff -u -r70959 -r71205
--- APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml (.../OverzichtBatch.cls.xml) (revision 70959)
+++ APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml (.../OverzichtBatch.cls.xml) (revision 71205)
@@ -57,7 +57,7 @@
Do ..Document.GeefKolom(1).Insert(VolgNr)
Do ..Document.GeefKolom(2).Insert(Toelevering.GeefID())
- Do ..Document.GeefKolom(3).Insert(..BepaalGroottePallet(Toelevering))
+ Do ..Document.GeefKolom(3).Insert(..BepaalPalletTekst(Toelevering))
Do ..Document.GeefKolom(4).Insert(..BepaalLadeHoogtesEnAantal(Toelevering))
Do ..VoegLegeRijenToeAanDocument()
Do ..VoegLegeRijenToeAanDocument()
@@ -115,6 +115,28 @@
]]>
+
+Toelevering:DOM.AKP.Toelevering
+1
+%String
+ 2 erbij
+
+ If (Aantal <= 3) {
+ Set PalletTekst = "Klein"
+ } Else {
+ Set PalletTekst = "Groot"
+ }
+
+ If (..IsToeleveringVoorBlumXs(Toelevering)) {
+ Set PalletTekst = PalletTekst _ " Blum XS"
+ }
+
+ Quit PalletTekst
+]]>
+
+
Toelevering:DOM.AKP.Toelevering
1
@@ -203,6 +225,24 @@
]]>
+
+Toelevering:DOM.AKP.Toelevering
+1
+%Boolean
+
+
+
%Library.CacheStorage
OverzichtBatchDefaultData