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