Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostVoorbereidenv001.cls.xml
===================================================================
diff -u -r1510 -r1511
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostVoorbereidenv001.cls.xml (.../KostVoorbereidenv001.cls.xml) (revision 1510)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostVoorbereidenv001.cls.xml (.../KostVoorbereidenv001.cls.xml) (revision 1511)
@@ -23,10 +23,8 @@
Set BodemAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Bodem())
Set FrontAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Front())
- // TODO: Correcte kostenplaats definiëren
- Set KostenPlaats = "TBZAAG"
-
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 1
Set ActiviteitNaam = "Werkplaatsvoorbereiding zagen"
Set Variabele = MultiplierFixedNul
@@ -38,6 +36,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 2
Set ActiviteitNaam = "Werkplaatsvoorbereiding monteren"
Set Variabele = MultiplierFixedNul
@@ -49,6 +48,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 3
Set ActiviteitNaam = "Zagen bodem + rug"
Set Variabele = MultiplierFixedNul
@@ -61,6 +61,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 4
Set ActiviteitNaam = "Aanbrengen identificatie"
Set Variabele = MultiplierFixedNul
@@ -72,6 +73,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 5
Set ActiviteitNaam = "Boren bodem"
Set Variabele = MultiplierFixedNul
@@ -84,6 +86,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 6
Set ActiviteitNaam = "Frezen + boren rug"
Set Variabele = MultiplierFixedNul
@@ -96,6 +99,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 20
Set ActiviteitNaam = "Werkplaatsvoorbereiding zagen (front)"
Set Variabele = MultiplierFixedNul
@@ -108,6 +112,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 21
Set ActiviteitNaam = "Werkplaatsvoorbereiding monteren (front)"
Set Variabele = MultiplierFixedNul
@@ -120,6 +125,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 22
Set ActiviteitNaam = "Zagen front"
Set Variabele = MultiplierFixedNul
@@ -132,6 +138,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 23
Set ActiviteitNaam = "Frezen en boren front"
Set Variabele = MultiplierFixedNul
Index: DOM/PM/Maatwerk/Calc/HF/IHalffabItemBuilder.cls.xml
===================================================================
diff -u -r1494 -r1511
--- DOM/PM/Maatwerk/Calc/HF/IHalffabItemBuilder.cls.xml (.../IHalffabItemBuilder.cls.xml) (revision 1494)
+++ DOM/PM/Maatwerk/Calc/HF/IHalffabItemBuilder.cls.xml (.../IHalffabItemBuilder.cls.xml) (revision 1511)
@@ -131,7 +131,7 @@
Do ..FilterHalffabList(.HalffabList, IngegevenKenmerken, Context)
Do ..ValideerHalffabList(.HalffabList)
Set HalffabItem = ..GenereerHalffabItem(.HalffabList, IngegevenKenmerken, Context)
- Do ..PostProcessHalffabItem(HalffabItem, IngegevenKenmerken, Context)
+ Do ..PostProcessHalffabItem(.HalffabItem, IngegevenKenmerken, Context, .HalffabList)
Set $ZTRAP = ""
}
Quit HalffabItem
@@ -210,7 +210,7 @@
-
+
Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostMontagev001.cls.xml
===================================================================
diff -u -r1510 -r1511
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostMontagev001.cls.xml (.../KostMontagev001.cls.xml) (revision 1510)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostMontagev001.cls.xml (.../KostMontagev001.cls.xml) (revision 1511)
@@ -26,10 +26,9 @@
Set GlijderAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Glijder())
Set FrontAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Front())
- // TODO: Correcte kostenplaats definiëren
- Set KostenPlaats = "TBZAAG"
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 7
Set ActiviteitNaam = "Zijkanten verlijmen"
Set Variabele = MultiplierFixedNul
@@ -42,6 +41,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 8
Set ActiviteitNaam = "Rug verlijmen"
Set Variabele = MultiplierFixedNul
@@ -54,6 +54,7 @@
+ Set KostenPlaats = "TAOOMontage"
Set ActiviteitNr = 9
Set ActiviteitNaam = "Rug vastschroeven aan bodem"
Set Variabele = MultiplierFixedNul
@@ -66,6 +67,7 @@
+ Set KostenPlaats = "TAOOMontage"
Set ActiviteitNr = 10
Set ActiviteitNaam = "Montage TANDEM koppeling"
Set Variabele = MultiplierFixedNul
@@ -78,6 +80,7 @@
+ Set KostenPlaats = "TAOOMontage"
Set ActiviteitNr = 11
Set ActiviteitNaam = "Uitpakken zijkanten"
Set Variabele = MultiplierFixedNul
@@ -90,6 +93,7 @@
+ Set KostenPlaats = "TAOOMontage"
Set ActiviteitNr = 12
Set ActiviteitNaam = "Uitpakken TANDEM"
Set Variabele = MultiplierFixedNul
@@ -102,6 +106,7 @@
+ Set KostenPlaats = "TAOOMontage"
Set ActiviteitNr = 13
Set ActiviteitNaam = "Wegleggen lege verpakkingen"
Set Variabele = MultiplierFixedNul
@@ -114,6 +119,7 @@
+ Set KostenPlaats = "TAOOZaag"
Set ActiviteitNr = 23
Set ActiviteitNaam = "Frontbevestiging monteren"
Set Variabele = MultiplierFixedNul
@@ -126,6 +132,7 @@
+ Set KostenPlaats = "TAOOMontage"
Set ActiviteitNr = 26
Set ActiviteitNaam = "Front monteren"
Set Variabele = MultiplierFixedNul
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFFrontv001.cls.xml
===================================================================
diff -u -r1496 -r1511
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFFrontv001.cls.xml (.../HFFrontv001.cls.xml) (revision 1496)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFFrontv001.cls.xml (.../HFFrontv001.cls.xml) (revision 1511)
@@ -34,8 +34,19 @@
-
-
+
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFEtiketv001.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFEtiketv001.cls.xml (revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFEtiketv001.cls.xml (revision 1511)
@@ -0,0 +1,32 @@
+
+
+
+
+do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","DOM.PM.Maatwerk.Calc.HF.TAOO.HFEtiketv001")
+1
+vhUnitTest.DOM.PM.Maatwerk.HF.ITestHalffabBuilder
+0
+
+
+HalffabTabel:vhUnitTest.DOM.PM.Maatwerk.HF.impl.InMemoryHalffabTabelUT
+
+
+
+
+
+
+
+
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFRugv001.cls.xml
===================================================================
diff -u -r1496 -r1511
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFRugv001.cls.xml (.../HFRugv001.cls.xml) (revision 1496)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFRugv001.cls.xml (.../HFRugv001.cls.xml) (revision 1511)
@@ -34,8 +34,19 @@
-
-
+
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/BuilderHFv001.cls.xml
===================================================================
diff -u -r1496 -r1511
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/BuilderHFv001.cls.xml (.../BuilderHFv001.cls.xml) (revision 1496)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/BuilderHFv001.cls.xml (.../BuilderHFv001.cls.xml) (revision 1511)
@@ -23,6 +23,7 @@
Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFFrontBevestigingv001).%New(##this)
Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFSchroefv001).%New(##this)
Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFLijmv001).%New(##this)
+ Do ##class(DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFEtiketv001).%New(##this)
Quit ##super(SamengesteldHalffabItemBuilder)
]]>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFBodemv001.cls.xml
===================================================================
diff -u -r1496 -r1511
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFBodemv001.cls.xml (.../HFBodemv001.cls.xml) (revision 1496)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFBodemv001.cls.xml (.../HFBodemv001.cls.xml) (revision 1511)
@@ -34,8 +34,19 @@
-
-
+
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFFrontBevestigingv001.cls.xml
===================================================================
diff -u -r1506 -r1511
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFFrontBevestigingv001.cls.xml (.../HFFrontBevestigingv001.cls.xml) (revision 1506)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFFrontBevestigingv001.cls.xml (.../HFFrontBevestigingv001.cls.xml) (revision 1511)
@@ -13,7 +13,7 @@
]]>
-
+
0
-;LadeZijkant;Bodem;Rug;Front;Glijder;TANDEM koppeling;FrontBevestiging;Schroef;Lijm
+;LadeZijkant;Bodem;Rug;Front;Glijder;TANDEM koppeling;FrontBevestiging;Schroef;Lijm;Etiket
@@ -72,5 +72,12 @@
+
+
+1
+DOM.PM.Maatwerk.Calc.HF.enu.TAOORol
+
+
Index: CSC TAOO.prj.xml
===================================================================
diff -u -r1506 -r1511
--- CSC TAOO.prj.xml (.../CSC TAOO.prj.xml) (revision 1506)
+++ CSC TAOO.prj.xml (.../CSC TAOO.prj.xml) (revision 1511)
@@ -1,6 +1,6 @@
-
+
@@ -193,6 +193,7 @@
+
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFEtiketv001.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFEtiketv001.cls.xml (revision 0)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFEtiketv001.cls.xml (revision 1511)
@@ -0,0 +1,37 @@
+
+
+
+persistent
+1
+DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder
+0
+
+
+SamengesteldHalffabItemBuilder:DOM.PM.Maatwerk.Calc.HF.ISamengesteldHalffabItemBuilder
+1
+1
+%Status
+
+
+
+
+IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext
+DOM.PM.Maatwerk.Calc.HF.IHalffabItem
+
+
+
+
+%Library.CacheStorage
+
+
+
Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostAfwerkenv001.cls.xml
===================================================================
diff -u -r1510 -r1511
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostAfwerkenv001.cls.xml (.../KostAfwerkenv001.cls.xml) (revision 1510)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostAfwerkenv001.cls.xml (.../KostAfwerkenv001.cls.xml) (revision 1511)
@@ -21,10 +21,7 @@
Set FrontAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Front())
- // TODO: Correcte kostenplaats definiëren
- Set KostenPlaats = "TBZAAG"
-
-
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 14
Set ActiviteitNaam = "Opkuisen lade"
Set Variabele = MultiplierFixedNul
@@ -36,6 +33,7 @@
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 15
Set ActiviteitNaam = "Verpakken losse onderdelen"
Set Variabele = MultiplierFixedNul
@@ -45,8 +43,9 @@
Set MinimumKost = 0
Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
-
-
+
+
+ Set KostenPlaats = "TAOOKarton"
Set ActiviteitNr = 16
Set ActiviteitNaam = "Snijden karton met PANOTE"
Set Variabele = MultiplierFixedNul
@@ -58,6 +57,7 @@
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 17
Set ActiviteitNaam = "Vouwen doos"
Set Variabele = MultiplierFixedNul
@@ -69,6 +69,7 @@
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 18
Set ActiviteitNaam = "Inpakken lade"
Set Variabele = MultiplierFixedNul
@@ -80,6 +81,7 @@
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 19
Set ActiviteitNaam = "Controle, labelen en kuisen"
Set Variabele = MultiplierFixedNul
@@ -91,6 +93,7 @@
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 24
Set ActiviteitNaam = "Opkuisen front"
Set Variabele = MultiplierFixedNul
@@ -103,6 +106,7 @@
+ Set KostenPlaats = "TAOOVerpak"
Set ActiviteitNr = 25
Set ActiviteitNaam = "Controleren front"
Set Variabele = MultiplierFixedNul
@@ -114,17 +118,11 @@
Do ControlerenFront.GebruikEvaluator(FrontAanwezigEvaluator)
+ Do ##class(DOM.PM.Maatwerk.Calc.Kost.ExtraKostItemBuilder).%New(##this,"Verpakking PANOTEC",5)
- Set ActiviteitNr = 27
- Set ActiviteitNaam = "Receptie, stapeling en afhandeling"
- Set Variabele = MultiplierFixedNul
- Set Factor = MultiplierFixedEen
- Set VariabeleKost = 0
- Set VasteKost = 60
- Set MinimumKost = 0
- Set ControlerenFront = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
- Do ControlerenFront.GebruikEvaluator(FrontAanwezigEvaluator)
+ Do ##class(DOM.PM.Maatwerk.Calc.Kost.ExtraKostItemBuilder).%New(##this,"Receptie, stapeling en afhandeling",3)
+
Quit $$$OK
]]>
Index: zTryout/CSC/TAOOLade.cls.xml
===================================================================
diff -u -r1506 -r1511
--- zTryout/CSC/TAOOLade.cls.xml (.../TAOOLade.cls.xml) (revision 1506)
+++ zTryout/CSC/TAOOLade.cls.xml (.../TAOOLade.cls.xml) (revision 1511)
@@ -22,8 +22,9 @@
Set IngegevenKenmerken.LadeDiepte = 250
Set IngegevenKenmerken.LadeKleur = ##class(DOM.PM.enu.TAOOLadeKleur).SmokedWalnut()
Set IngegevenKenmerken.LadeHoogte = ##class(DOM.PM.enu.TAOOLadeHoogte).N()
- Set IngegevenKenmerken.IsBinnenlade = 1
+ Set IngegevenKenmerken.IsBinnenlade = 0
Set IngegevenKenmerken.Draagkracht = 30
+ Set IngegevenKenmerken.InbouwBreedte = 650
Do Context.GeefHalffabSpec().BerekenHalffabDetails(Context,IngegevenKenmerken)
Set WriterVisitor=##class(DOM.PM.Maatwerk.Calc.HF.impl.WriterVisitor).%New()
Index: vhDeploy/Deploy20110624x0834.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20110624x0834.cls.xml (revision 0)
+++ vhDeploy/Deploy20110624x0834.cls.xml (revision 1511)
@@ -0,0 +1,86 @@
+
+
+
+1
+svn.Deploy
+0
+
+
+1
+
+
+
+