Index: APPS/StockBeheer/impl/TAORPlatenMagazijn.cls.xml
===================================================================
diff -u -r42993 -r45890
--- APPS/StockBeheer/impl/TAORPlatenMagazijn.cls.xml (.../TAORPlatenMagazijn.cls.xml) (revision 42993)
+++ APPS/StockBeheer/impl/TAORPlatenMagazijn.cls.xml (.../TAORPlatenMagazijn.cls.xml) (revision 45890)
@@ -79,14 +79,12 @@
ProductNaam:%String
Index: AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml
===================================================================
diff -u -r45400 -r45890
--- AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml (.../AankoopOrderRegelDixfConverter.cls.xml) (revision 45400)
+++ AX/Uitgaand/PM/AankoopOrderRegel/impl/AankoopOrderRegelDixfConverter.cls.xml (.../AankoopOrderRegelDixfConverter.cls.xml) (revision 45890)
@@ -44,7 +44,7 @@
1
-
+
DOM.PM.impl.BlumProductAPI
1
@@ -77,7 +77,7 @@
Set ..AankoopAPI = $$$Inject(AankoopApi,##class(DOM.DomeinContext).Instance().GeefAankoopAPI())
Set ..BlumKundeOmzetter = ##class(AX.Uitgaand.PM.impl.Convertor.Sopr.BlumKunde).%New()
Set ..SoprConvertor = ##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()
- Set ..ProductApi = ##class(DOM.PM.impl.BlumProductAPI).%New()
+ Set ..BlumProductApi = ##class(DOM.PM.impl.BlumProductAPI).%New()
Quit $$$OK
]]>
@@ -506,7 +506,7 @@
Set AxProductIdentNummer = $Extract(AxProductIdentNummer,1)_"."_$Extract(AxProductIdentNummer,2,4)_"."_$Extract(AxProductIdentNummer,5,7)_"."_$Extract(AxProductIdentNummer,8)
#dim Toelevering As DOM.AKP.impl.DataM.DataMToelevering = ##class(DOM.AKP.impl.DataM.DataMToelevering).%New(ToeleveringLijn.ToeleveringNr,"L||5005")
#dim KundeNr As %String = Toelevering.GeefKlantNummerBijLeverancier()
- Set ..AxProduct = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..ProductApi.GeefProductIdVolgensIdentNummer(AxProductIdentNummer,KundeNr))
+ Set ..AxProduct = ##class(AX.Uitgaand.PM.Product.impl.Product).%New(..BlumProductApi.GeefProductIdVolgensIdentNummer(AxProductIdentNummer,KundeNr))
}
]]>
Index: APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml
===================================================================
diff -u -r38095 -r45890
--- APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml (.../ToeleveringInfoVerzamelaar.cls.xml) (revision 38095)
+++ APPS/AKP/AankoopControle/BLUM/impl/ToeleveringInfoVerzamelaar.cls.xml (.../ToeleveringInfoVerzamelaar.cls.xml) (revision 45890)
@@ -4,6 +4,11 @@
vhLib.Macro
TECH.Mockable
+
+DOM.PM.ProductAPI
+1
+
+
DOM.AKP.ToeleveringAPI
1
@@ -15,14 +20,16 @@
-BlumProductAPI:DOM.PM.BlumProductAPI,ToeleveringAPI:DOM.AKP.ToeleveringAPI
+ProductApi:DOM.PM.ProductAPI="",BlumProductAPI:DOM.PM.BlumProductAPI="",ToeleveringAPI:DOM.AKP.ToeleveringAPI=""
1
1
%Status
1
@@ -62,7 +69,7 @@
do ..StuurMailNietGesplitsteToeleveringLijn(ToeleveringNr,CSBSO41.IdentNr,CSBSO41.ProductNrCustomer)
}
}
- #Dim Product as DOM.PM.Product = ..BlumProductAPI.GeefProduct(CSBSO41.ProductNrCustomer)
+ #Dim Product as DOM.PM.Product = ..ProductApi.GeefProduct(CSBSO41.ProductNrCustomer)
;is de prijs die we verwachten -> dummy factuur, prijs die blum gaat rekenen zit niet in despatch bericht.
set CSBSO41.Value = CSBSO41.QuantityInvoiced * ..GeefVHProductPrijs(CSBSO41.ProductNrCustomer)
Index: DOM/PM/impl/BlumProductAPI.cls.xml
===================================================================
diff -u -r37660 -r45890
--- DOM/PM/impl/BlumProductAPI.cls.xml (.../BlumProductAPI.cls.xml) (revision 37660)
+++ DOM/PM/impl/BlumProductAPI.cls.xml (.../BlumProductAPI.cls.xml) (revision 45890)
@@ -1,7 +1,7 @@
-DOM.PM.impl.ProductAPI,DOM.PM.BlumProductAPI
+DOM.PM.BlumProductAPI,TECH.RegisteredObject
ProductID:%String