Index: APPS/PM/KenmerkenService.cls.xml
===================================================================
diff -u -r1519 -r1536
--- APPS/PM/KenmerkenService.cls.xml (.../KenmerkenService.cls.xml) (revision 1519)
+++ APPS/PM/KenmerkenService.cls.xml (.../KenmerkenService.cls.xml) (revision 1536)
@@ -122,6 +122,9 @@
/// Enkel Set toevoegen als er kenmerken zijn voor die set.
If (Kenmerken.Count() > 0){
+
+ // [ Review JBL WV Kenmerken ] Code vanaf New ProductKenmerkenSet t/m GeneratieType mag naar hier (binnen de if{} ) verhuizen, denk ik.
+
Set ProductKenmerkenSet.Kenmerken = Kenmerken
Do ProductKenmerkenGroep.Sets.Insert(ProductKenmerkenSet)
}
Index: vhUnitTest/DOM/PM/TestProductKenmerkenSets.cls.xml
===================================================================
diff -u -r1507 -r1536
--- vhUnitTest/DOM/PM/TestProductKenmerkenSets.cls.xml (.../TestProductKenmerkenSets.cls.xml) (revision 1507)
+++ vhUnitTest/DOM/PM/TestProductKenmerkenSets.cls.xml (.../TestProductKenmerkenSets.cls.xml) (revision 1536)
@@ -63,6 +63,8 @@
Do $$$AssertTrue(KenmerkenSet.GeefKenmerkWaarden("MeubelToepassing"),"De aangemaakte KenmerkenSet heeft waarden voor kenmerk 'MeubelToepassing'.")
Do $$$AssertEquals(KenmerkenSet.GeefKenmerkWaarden("MeubelToepassing").GetAt(1),"Keuken","De aangemaakte KenmerkenSet heeft een correcte waarde voor kenmerk 'MeubelToepassing'.")
+
+ // [ Review JBL WV Kenmerken ] Best ook iets checken van de UnID. Is dit een test voor OneToMultiple ?
}
]]>
Index: APPS/PM/OL/MasterAutoGenerator.cls.xml
===================================================================
diff -u -r1517 -r1536
--- APPS/PM/OL/MasterAutoGenerator.cls.xml (.../MasterAutoGenerator.cls.xml) (revision 1517)
+++ APPS/PM/OL/MasterAutoGenerator.cls.xml (.../MasterAutoGenerator.cls.xml) (revision 1536)
@@ -118,19 +118,21 @@
JBL + 2011-06-21
Geef voor het opgegeven UnID of PRNr de AUTO's
-indien het opgegeven UnID of PRNr een MASTER is.
+indien het opgegeven UnID of PRNr een MASTER is.
+
1
UnID:%String
%Status
Maak voor een product een multiple aan.
BronUnID : mag een PRNr of UnID zijn.
- - Als PRNr dan word .1 en .2 aangemaakt.
+ - Als PRNr dan worden .1 en .2 aangemaakt.
- Als UnID dan wordt bron .1 er een .2 bijgemaakt.
Als BronUnID leeg is, dan wordt automatisch het PRNr gebruikt.
Index: DOM/PM/impl/DataM/DataMProductAPI.cls.xml
===================================================================
diff -u -r1517 -r1536
--- DOM/PM/impl/DataM/DataMProductAPI.cls.xml (.../DataMProductAPI.cls.xml) (revision 1517)
+++ DOM/PM/impl/DataM/DataMProductAPI.cls.xml (.../DataMProductAPI.cls.xml) (revision 1536)
@@ -233,7 +233,7 @@
Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.BaseException).%New(##class(TECH.enu.ExceptionCode).InvalidInput(),"Kon het kenmerk niet opslaan om het AUTO als GeneratieType heeft."))
}
- Do ProductKenmerkenSet.ZetRaiseEvent(0) /// Geen event raisen, want is buld operatie
+ Do ProductKenmerkenSet.ZetRaiseEvent(0) /// Geen event raisen, want is bulk operatie
Set Wijziging = ProductKenmerkenSet.ZetKenmerkWaarden(ProductKenmerk.Waarden,ProductKenmerk.Naam)
If (Wijziging '= ""){