Index: APPS/EC/impl/KlantInstellingenServiceOPO.cls.xml
===================================================================
diff -u
--- APPS/EC/impl/KlantInstellingenServiceOPO.cls.xml (revision 0)
+++ APPS/EC/impl/KlantInstellingenServiceOPO.cls.xml (revision 64405)
@@ -0,0 +1,63 @@
+
+
+
+APPS.common.impl.KlantInstellingenService
+
+
+KlantID:DOM.VKP.VanHoeckeKlantID,VerpakkingType:DOM.PM.enu.LBXVerpakkingType
+%Boolean
+
+
+
+
+KlantID:DOM.VKP.KlantID
+%Boolean
+
+
+
+
+KlantID:DOM.VKP.KlantID
+1
+%String
+
+
+
+
+KlantID:DOM.VKP.VanHoeckeKlantID,VerpakkingType:TECH.String
+TECH.Integer
+
+
+
+
+
+
Index: APPS/EC/impl/ECommerceAPI.cls.xml
===================================================================
diff -u -r64266 -r64405
--- APPS/EC/impl/ECommerceAPI.cls.xml (.../ECommerceAPI.cls.xml) (revision 64266)
+++ APPS/EC/impl/ECommerceAPI.cls.xml (.../ECommerceAPI.cls.xml) (revision 64405)
@@ -84,6 +84,8 @@
Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceVanHoecke).%New()
} ElseIf (Personality.GeefID() = ..Personality.SFS) {
Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceSFS).%New()
+ } ElseIf (Personality.GeefID() = ..Personality.OPO) {
+ Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceOPO).%New()
} ElseIf (Personality.GeefID() = ..Personality.HaefeleBE) {
Set KlantInstellingenService = ##class(APPS.EC.impl.KlantInstellingenServiceHaefeleBE).%New()
} ElseIf (Personality.GeefID() = ..Personality.HaefeleNL) {
Index: vhUnitTest/APPS/OV/impl/OrderVerwerkingAPI/TestGeefKlantInstellingenService.cls.xml
===================================================================
diff -u -r64266 -r64405
--- vhUnitTest/APPS/OV/impl/OrderVerwerkingAPI/TestGeefKlantInstellingenService.cls.xml (.../TestGeefKlantInstellingenService.cls.xml) (revision 64266)
+++ vhUnitTest/APPS/OV/impl/OrderVerwerkingAPI/TestGeefKlantInstellingenService.cls.xml (.../TestGeefKlantInstellingenService.cls.xml) (revision 64405)
@@ -35,6 +35,14 @@
]]>
+
+
+
+