Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestBulkPOG.cls.xml
===================================================================
diff -u -r30933 -r31148
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestBulkPOG.cls.xml (.../TestBulkPOG.cls.xml) (revision 30933)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/WerklijstItemsMaker/MaakWerklijstItems/TestBulkPOG.cls.xml (.../TestBulkPOG.cls.xml) (revision 31148)
@@ -81,7 +81,7 @@
Do $$$AssertEquals(KartonSnijdenData.AantalDozen, 1, Omschrijving)
Do $$$AssertEquals(KartonSnijdenData.DoosGroep, "TAORBOX", Omschrijving)
- Do $$$AssertEquals(KartonSnijdenData.DoosNaam, "V1 Bodem en deksel", Omschrijving)
+ Do $$$AssertEquals(KartonSnijdenData.DoosNaam, ##class(BL.Prod.OptiBox.enu.SnijDoosNaam).TaorboxBodemDekselDoos(), Omschrijving)
Do $$$AssertEquals(KartonSnijdenData.MachineID, ##class(APPS.Halux.PPS.Verpakking.enu.KartonMachineID).TAOR(),Omschrijving)
;Do $$$AssertEquals(KartonSnijdenData.OmschrijvingInWerkpostApplicatie, "KORTTEKST COMPONENTTYPE", AssertOmschrijving)
Index: APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KartonSnijdenDataAanvuller.cls.xml
===================================================================
diff -u -r30903 -r31148
--- APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KartonSnijdenDataAanvuller.cls.xml (.../KartonSnijdenDataAanvuller.cls.xml) (revision 30903)
+++ APPS/Halux/PPS/Activiteit/impl/TAOR/Verpakking/KartonSnijdenDataAanvuller.cls.xml (.../KartonSnijdenDataAanvuller.cls.xml) (revision 31148)
@@ -23,10 +23,9 @@
Index: APPS/Halux/PPS/TAORVerpakking/impl/DoosLade.cls.xml
===================================================================
diff -u -r29516 -r31148
--- APPS/Halux/PPS/TAORVerpakking/impl/DoosLade.cls.xml (.../DoosLade.cls.xml) (revision 29516)
+++ APPS/Halux/PPS/TAORVerpakking/impl/DoosLade.cls.xml (.../DoosLade.cls.xml) (revision 31148)
@@ -10,10 +10,14 @@
+
+Type = BL.Prod.OptiBox.enu.SnijDoosNaam
V1 Bodem en deksel
+
+Type = BL.Prod.OptiBox.enu.SnijDoosNaam
V1 Doos met deksel
Index: APPS/Halux/PPS/Activiteit/impl/LBX/LBXKartonSnijden.cls.xml
===================================================================
diff -u -r29986 -r31148
--- APPS/Halux/PPS/Activiteit/impl/LBX/LBXKartonSnijden.cls.xml (.../LBXKartonSnijden.cls.xml) (revision 29986)
+++ APPS/Halux/PPS/Activiteit/impl/LBX/LBXKartonSnijden.cls.xml (.../LBXKartonSnijden.cls.xml) (revision 31148)
@@ -58,7 +58,7 @@
Set UitvoeringInfo.Hoogte = DoosLade.Hoogte
Set UitvoeringInfo.Diepte = DoosLade.Diepte
- Do ..VulInUitvoeringInfo(UitvoeringInfo,"V1 Doos met deksel")
+ Do ..VulInUitvoeringInfo(UitvoeringInfo,##class(BL.Prod.OptiBox.enu.SnijDoosNaam).TaorboxV1LadeDoosMetDeksel())
Do WerklijstItem.Save()
// We gebruiken de ID van het werklijstitem als unique id
@@ -81,7 +81,7 @@
Set UitvoeringInfo.Diepte = DoosLO.Diepte
Set UitvoeringInfo.BreedteGeleidervak = DoosLO.BreedteCorpusProfiel
- Do ..VulInUitvoeringInfo(UitvoeringInfo,"V1 LosseOnderdelen")
+ Do ..VulInUitvoeringInfo(UitvoeringInfo,##class(BL.Prod.OptiBox.enu.SnijDoosNaam).TaorboxV1LosseOnderdelenDoos())
Do WerklijstItem.Save()
// We gebruiken de ID van het werklijstitem als unique id
Index: vhUnitTest/APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox/KartonSnijdenDoos/Test.cls.xml
===================================================================
diff -u -r30758 -r31148
--- vhUnitTest/APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox/KartonSnijdenDoos/Test.cls.xml (.../Test.cls.xml) (revision 30758)
+++ vhUnitTest/APPS/Halux/PPS/Verpakking/impl/KartonSnijder/OptiBox/KartonSnijdenDoos/Test.cls.xml (.../Test.cls.xml) (revision 31148)
@@ -33,7 +33,16 @@
1
+
+BL.Prod.OptiBox.enu.SnijDoosNaam.AutoComplete
+1
+
+
+
+
+ TO DO : nog 2 testcases bijmaken : 1 om de Callback te testen en 1 om de Exception "Optimizer fout" te controleren.
+
%Status