Index: DOM/PM/Maatwerk/Calc/HF/impl/HalffabItem/BodemDeksel.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/HF/impl/HalffabItem/BodemDeksel.cls.xml (revision 0)
+++ DOM/PM/Maatwerk/Calc/HF/impl/HalffabItem/BodemDeksel.cls.xml (revision 29286)
@@ -0,0 +1,12 @@
+
+
+
+DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem
+
+
+APPS.Halux.PPS.Verpakking.Volume
+
+
+
+
+
Index: APPS/Halux/PPS/Verpakking/Volume.cls.xml
===================================================================
diff -u -r29059 -r29286
--- APPS/Halux/PPS/Verpakking/Volume.cls.xml (.../Volume.cls.xml) (revision 29059)
+++ APPS/Halux/PPS/Verpakking/Volume.cls.xml (.../Volume.cls.xml) (revision 29286)
@@ -1,7 +1,8 @@
-TECH.RegisteredObject
+serial
+%SerialObject
%Numeric
@@ -14,6 +15,23 @@
%Numeric
+
+
+%Library.CacheSerialState
+VolumeState
+^APPS.Halux.PPS.Verp6A05.VolumeS
+
+
+Breedte
+
+
+Diepte
+
+
+Hoogte
+
+
+
Index: zTryout/PBO/TAXBOG/impl/DoosBerekenaar.cls.xml
===================================================================
diff -u -r29238 -r29286
--- zTryout/PBO/TAXBOG/impl/DoosBerekenaar.cls.xml (.../DoosBerekenaar.cls.xml) (revision 29238)
+++ zTryout/PBO/TAXBOG/impl/DoosBerekenaar.cls.xml (.../DoosBerekenaar.cls.xml) (revision 29286)
@@ -56,6 +56,9 @@
Set ..DoosGrootte = ItHoeveelheidDozenPerGrootte.Key()
Do ..Verwerk(Input.BenamingVerpakking)
Set ..KartonSpecificatie.AantalStapels = ..GeefDoosAfmetingBepaler().GeefAantalStapels(..LadeOnderdeel, ..AantalOnderdelen)
+ Set ..KartonSpecificatie.Volume.Diepte = ..Doos.Diepte
+ set ..KartonSpecificatie.Volume.Breedte = ..Doos.Breedte
+ set ..KartonSpecificatie.Volume.Hoogte = ..Doos.Hoogte
Do ..VoegToe(..KartonSpecificatie,..AantalDozenVoorGrootte)
}
Quit ..Verpakkingen
Index: DOM/PM/Maatwerk/Calc/HF/impl/HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie.cls.xml
===================================================================
diff -u -r29236 -r29286
--- DOM/PM/Maatwerk/Calc/HF/impl/HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie.cls.xml (.../HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie.cls.xml) (revision 29236)
+++ DOM/PM/Maatwerk/Calc/HF/impl/HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie.cls.xml (.../HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie.cls.xml) (revision 29286)
@@ -13,6 +13,10 @@
APPS.Halux.PPS.Verpakking.enu.BenamingVerpakkingsOnderdeel
+
+APPS.Halux.PPS.Verpakking.Volume
+
+
%Float
Index: vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardLadeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt
===================================================================
diff -u -r29285 -r29286
--- vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardLadeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt (.../BulkPerOnderdeelGegroepeerdVandaag.txt) (revision 29285)
+++ vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardLadeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt (.../BulkPerOnderdeelGegroepeerdVandaag.txt) (revision 29286)
@@ -200,10 +200,12 @@
[BewerktHFKostItem] BOP - Bodem bodemdoos
Kost: 0.434 EUR
Details: 0.5720 * .7587
+ Formaat : Breedte : 480, Diepte : 569, Hoogte : 83
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Bodem dekseldoos
Kost: 0.509 EUR
Details: 0.8613 * .5914
+ Formaat : Breedte : 480, Diepte : 569, Hoogte : 83
Product : 353743 - VFF.TB143EB ZZCARTON BR
[StandaardHFKostItem] BOP - Rug Horizontaal
Kost: 0.214 EUR
@@ -214,10 +216,12 @@
[BewerktHFKostItem] BOP - Rug bodemdoos
Kost: 0.476 EUR
Details: 0.5720 * .8329
+ Formaat : Breedte : 569, Diepte : 334, Hoogte : 81
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Rug dekseldoos
Kost: 0.383 EUR
Details: 0.5720 * .6692
+ Formaat : Breedte : 569, Diepte : 334, Hoogte : 81
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[StandaardHFKostItem] BOP - Zijkant_Links Horizontaal
Kost: 0.107 EUR
@@ -228,10 +232,12 @@
[BewerktHFKostItem] BOP - Zijkant_Links bodemdoos
Kost: 0.578 EUR
Details: 0.5720 * 1.0105
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Zijkant_Links dekseldoos
Kost: 0.414 EUR
Details: 0.5720 * .7241
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[StandaardHFKostItem] BOP - Zijkant_Rechts Horizontaal
Kost: 0.107 EUR
@@ -242,10 +248,12 @@
[BewerktHFKostItem] BOP - Zijkant_Rechts bodemdoos
Kost: 0.578 EUR
Details: 0.5720 * 1.0105
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Zijkant_Rechts dekseldoos
Kost: 0.414 EUR
Details: 0.5720 * .7241
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[SamengesteldKostItem] ZijkantBestukking : 0.000 EUR
[SamengesteldKostItem] ZijkantBestukkingVooraan : 0.827 EUR
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001BulkPerOnderdeelGegroepeerd.cls.xml
===================================================================
diff -u -r29148 -r29286
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001BulkPerOnderdeelGegroepeerd.cls.xml (.../HFVerpakkingv001BulkPerOnderdeelGegroepeerd.cls.xml) (revision 29148)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001BulkPerOnderdeelGegroepeerd.cls.xml (.../HFVerpakkingv001BulkPerOnderdeelGegroepeerd.cls.xml) (revision 29286)
@@ -128,6 +128,8 @@
}
Do HalffabItem.ZetTotaalAantalTeVerpakken(..Input.TotaalTeVerpakken)
Do HalffabItem.ZetAantalVerpakkingen(AantalVerpakkingen)
+
+ set HalffabItem.Volume = Verpakking.KartonSpecificatie.Volume
]]>
Index: vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardBinnenladeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt
===================================================================
diff -u -r29285 -r29286
--- vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardBinnenladeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt (.../BulkPerOnderdeelGegroepeerdVandaag.txt) (revision 29285)
+++ vhTestFiles/UnitTests/APPS.PM.Maatwerk.End2End.TAOR/TestTAORGewoneLadePrijzen/TestStandaardBinnenladeVerpakking/BulkPerOnderdeelGegroepeerdVandaag.txt (.../BulkPerOnderdeelGegroepeerdVandaag.txt) (revision 29286)
@@ -267,21 +267,25 @@
[BewerktHFKostItem] BOP - Bodem bodemdoos
Kost: 0.434 EUR
Details: 0.5720 * .7587
+ Formaat : Breedte : 480, Diepte : 569, Hoogte : 83
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Bodem dekseldoos
Kost: 0.509 EUR
Details: 0.8613 * .5914
+ Formaat : Breedte : 480, Diepte : 569, Hoogte : 83
Product : 353743 - VFF.TB143EB ZZCARTON BR
[StandaardHFKostItem] BOP - Front Horizontaal
Kost: 0.120 EUR
Details: 0.4000 * .3
[BewerktHFKostItem] BOP - Front bodemdoos
Kost: 1.095 EUR
Details: 0.8613 * 1.2714
+ Formaat : Breedte : 590, Diepte : 490, Hoogte : 195.5
Product : 353743 - VFF.TB143EB ZZCARTON BR
[BewerktHFKostItem] BOP - Front dekseldoos
Kost: 0.774 EUR
Details: 0.8613 * .898
+ Formaat : Breedte : 590, Diepte : 490, Hoogte : 195.5
Product : 353743 - VFF.TB143EB ZZCARTON BR
[StandaardHFKostItem] BOP - Rug Horizontaal
Kost: 0.214 EUR
@@ -292,10 +296,12 @@
[BewerktHFKostItem] BOP - Rug bodemdoos
Kost: 0.476 EUR
Details: 0.5720 * .8329
+ Formaat : Breedte : 569, Diepte : 334, Hoogte : 81
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Rug dekseldoos
Kost: 0.383 EUR
Details: 0.5720 * .6692
+ Formaat : Breedte : 569, Diepte : 334, Hoogte : 81
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[StandaardHFKostItem] BOP - Zijkant_Links Horizontaal
Kost: 0.107 EUR
@@ -306,10 +312,12 @@
[BewerktHFKostItem] BOP - Zijkant_Links bodemdoos
Kost: 0.578 EUR
Details: 0.5720 * 1.0105
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Zijkant_Links dekseldoos
Kost: 0.414 EUR
Details: 0.5720 * .7241
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[StandaardHFKostItem] BOP - Zijkant_Rechts Horizontaal
Kost: 0.107 EUR
@@ -320,10 +328,12 @@
[BewerktHFKostItem] BOP - Zijkant_Rechts bodemdoos
Kost: 0.578 EUR
Details: 0.5720 * 1.0105
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[BewerktHFKostItem] BOP - Zijkant_Rechts dekseldoos
Kost: 0.414 EUR
Details: 0.5720 * .7241
+ Formaat : Breedte : 495, Diepte : 174.5, Hoogte : 148
Product : 360508 - VFF.TB 95EB ZZCARTON BR
[SamengesteldKostItem] ZijkantBestukking : 0.000 EUR
[SamengesteldKostItem] ZijkantBestukkingVooraan : 0.827 EUR
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/HalffabItem/Verpakkingv001BulkPerOnderdeelGegroepeerdTemplate.cls.xml
===================================================================
diff -u -r29146 -r29286
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/HalffabItem/Verpakkingv001BulkPerOnderdeelGegroepeerdTemplate.cls.xml (.../Verpakkingv001BulkPerOnderdeelGegroepeerdTemplate.cls.xml) (revision 29146)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/HalffabItem/Verpakkingv001BulkPerOnderdeelGegroepeerdTemplate.cls.xml (.../Verpakkingv001BulkPerOnderdeelGegroepeerdTemplate.cls.xml) (revision 29286)
@@ -1,7 +1,7 @@
-DOM.PM.Maatwerk.Calc.HF.BewerktHalffabItem
+DOM.PM.Maatwerk.Calc.HF.impl.HalffabItem.BodemDeksel
%Integer
Index: zTryout/PBO/TAXBOG/impl/Doos.cls.xml
===================================================================
diff -u -r29149 -r29286
--- zTryout/PBO/TAXBOG/impl/Doos.cls.xml (.../Doos.cls.xml) (revision 29149)
+++ zTryout/PBO/TAXBOG/impl/Doos.cls.xml (.../Doos.cls.xml) (revision 29286)
@@ -5,51 +5,58 @@
1
APPS.Halux.PPS.Verpakking.Volume
-
-TAORBOX
-
-
%Integer
4.2
-APPS.Halux.PPS.Verpakking.enu.DoosTypes
+APPS.Halux.PPS.Verpakking.enu.BenamingVerpakkingsOnderdeel.AutoComplete
+1
-MaxInVerpakking:TECH.Integer
+MaxInVerpakking:TECH.Integer=1
DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie
-MaxInVerpakking:TECH.Integer
+MaxInVerpakking:TECH.Integer=1
DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie
-MaxInVerpakking:TECH.Integer
+MaxInVerpakking:TECH.Integer=1
DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie
+
+
+Benaming:APPS.Halux.PPS.Verpakking.enu.BenamingVerpakkingsOnderdeel,Lengte:%Decimal,Breedte:%Decimal,MaxInVerpakking:TECH.Integer
+1
+DOM.PM.Maatwerk.Calc.HF.impl.HFBulkPerOnderdeelGegroepeerdVerpakkingKartonSpecificatie
+
+
Index: DOM/PM/Maatwerk/Calc/Kost/impl/KostItemWriterVisitor.cls.xml
===================================================================
diff -u -r29059 -r29286
--- DOM/PM/Maatwerk/Calc/Kost/impl/KostItemWriterVisitor.cls.xml (.../KostItemWriterVisitor.cls.xml) (revision 29059)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/KostItemWriterVisitor.cls.xml (.../KostItemWriterVisitor.cls.xml) (revision 29286)
@@ -51,13 +51,17 @@
Do ..Writer.WriteLine(..GeefIndentatie()_"[BewerktHFKostItem] "_Item.GeefNaam())
Do ..Writer.WriteLine(..GeefIndentatie()_$$$TAB_"Kost:"_$$$TAB_..GeefKost(Item)_$$$TAB_"EUR")
Do ..Writer.WriteLine(..GeefIndentatie()_$$$TAB_"Details:"_$$$TAB_Item.GeefDetails())
+
+ if Item.GeefHalffabItem().%Extends("DOM.PM.Maatwerk.Calc.HF.impl.HalffabItem.BodemDeksel") {
+ #dim Volume As APPS.Halux.PPS.Verpakking.Volume = Item.GeefHalffabItem().Volume
+ Do ..Writer.WriteLine(..GeefIndentatie()_$$$TAB_"Formaat : "_"Breedte : "_Volume.Breedte_", Diepte : "_Volume.Diepte _ ", Hoogte : "_Volume.Hoogte)
+ }
#dim ProductID As %String = Item.GeefHalffabItem().GeefHalffab().GeefProductID()
if $length(ProductID) {
#dim Product As DOM.PM.Product = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(ProductID)
Do ..Writer.WriteLine(..GeefIndentatie()_$$$TAB_"Product : "_ProductID_" - "_Product.GeefKorttekst())
}
-
Quit $$$OK
]]>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml
===================================================================
diff -u -r29219 -r29286
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml (.../HFVerpakkingv001.cls.xml) (revision 29219)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Builder/HFVerpakkingv001.cls.xml (.../HFVerpakkingv001.cls.xml) (revision 29286)
@@ -91,7 +91,7 @@
#dim Bodem As DOM.PM.Maatwerk.LadeInfo.Bodem = Lade.GeefBodems().GetAt(1)
if $IsObject(Bodem) {
- ; ; Bodem - BodemDoos
+ ; Bodem - BodemDoos
Set BuilderInput = ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid())
Set DoosBerekenaarInput = ##class(zTryout.PBO.TAXBOG.impl.DoosBerekenaarInput).%New(Bodem,..Context.GeefBerekeningsSpecificatie().GeefHoeveelheid(),..BenamingVerpakkingen.Bodem)
Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
@@ -223,6 +223,8 @@
Do BuilderInput.ZetVerpakkingen(DoosBerekenaar.GeefVerpakkingen(DoosBerekenaarInput))
Do ..Builders.Insert(##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOR.Builder.HFVerpakkingv001BulkPerOnderdeelGegroepeerdVerticaalTussenschot).%New(##this, BuilderInput))
}
+
+
]]>
Index: DOM/PM/Maatwerk/Calc/HF/impl/Builder/BodemDekselProcessor.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/HF/impl/Builder/BodemDekselProcessor.cls.xml (revision 0)
+++ DOM/PM/Maatwerk/Calc/HF/impl/Builder/BodemDekselProcessor.cls.xml (revision 29286)
@@ -0,0 +1,20 @@
+
+
+
+DOM.PM.Maatwerk.Calc.HF.impl.Processor.HFItemProcessorExactEenBewerkt
+
+
+LadeOnderdeel:DOM.PM.Maatwerk.LadeInfo.LadeOnderdeel
+1
+1
+%Status
+1
+
+
+
+
+
+