Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r49395 -r49448
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 49395)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 49448)
@@ -451,7 +451,15 @@
#dim PackingSlipBody As %String = $Replace(OrderHeader.PackingSlipBody,$char(13),"")
Set PackingSlipBody = $Replace(PackingSlipBody,$char(10),$$$CRLF)
- Do Order.ZetTekstVoorAfdrukDocumentType(PackingSlipBody, ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon())
+ if (Order.GeefKlantID() = ##class(DOM.VKP.enu.Klant).SFS()) && (PackingSlipBody ? 10N) {
+ ;Special SFS: sap nummer moet in tekstlijn op deze manier om op etiket afgedruk te word
+ #dim TekstOrderlijn As DOM.VKP.TekstOrderlijn = Order.MaakNieuweTekstLijn("Opmerking:")
+ Do TekstOrderlijn.ZetTekstblokBehandeling(..DateTimeAPI.CurrentHorolog()_";T;;-")
+ Set TekstOrderlijn = Order.MaakNieuweTekstLijn(PackingSlipBody)
+ Do TekstOrderlijn.ZetTekstblokBehandeling(..DateTimeAPI.CurrentHorolog()_";T;;OBF")
+ } else {
+ Do Order.ZetTekstVoorAfdrukDocumentType(PackingSlipBody, ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon())
+ }
If $$$HasLength(OrderHeader.RefSalesOriginId) {
If ..OfferteRepository.BestaatViaExterneId(OrderHeader.RefSalesOriginId) && (##class(AXimpl.AxToAdminUtils).ConvertOorsprong(OrderHeader.SalesOriginId) = ##class(BL.Flow.Offerte.enu.Oorsprong).Vhisie4Webshop()) {
@@ -614,7 +622,7 @@
If $$$Not($IsObject(DocumentReferenties)) {
Set DocumentReferenties = ..DocumentReferentiesRepository.Maak()
}
-
+ Set DocumentReferenties.KlantOrderNummer = OrderHeader.ConfirmBody
Set DocumentReferenties.OrderReferentie = OrderHeader.PurchOrderFormNum
Set DocumentReferenties.CommissieReferentie = OrderHeader.CustomerRef
Do ..DocumentReferentiesRepository.Bewaar(DocumentReferenties)
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml
===================================================================
diff -u -r49290 -r49448
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 49290)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 49448)
@@ -28,6 +28,7 @@
Do OrderMock.IndienMethodCall("GeefTypeOrderLijnIterator", $$$ElkeWaarde).DanReturn(..GeefDummyIterator($$$False))
Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID")
+ Do OrderMock.IndienMethodCall("GeefKlantID").DanReturn("KlantID")
Set OrderAPIMock = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
Do OrderAPIMock.VerwachtMethodCall("Bewaar", OrderMock).ExactAantalKeer(1)
@@ -89,6 +90,45 @@
]]>
+
+
+
+