Index: APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml
===================================================================
diff -u -r37031 -r37139
--- APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml (.../BLOrdRspService.cls.xml) (revision 37031)
+++ APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml (.../BLOrdRspService.cls.xml) (revision 37139)
@@ -73,6 +73,9 @@
#dim eersteindexvoortlnr = 0
#dim indexoudste as %integer = 0
#dim ToeleveringsLijnNummer as %String = ""
+
+ Quit:(##class(TECH.Config.ConfigMgr).Instance().GetString("AankoopOrderResponse.BLUM.ImportXML")'="1")
+
set ToeleveringsLijnNummer = (ToeleveringsUniekLijnNummer\100)
quit:$$$Not($data(@..#Global(ToeleveringsNummer,ToeleveringsLijnNummer)))
@@ -112,13 +115,16 @@
ToeleveringsNummer:%String
-
zijn niet geleverd en moeten manueel behandeld worden
+ ; Do ..ZetVervallenLijnenAlsVerwerkt()
Do ..Kopieerder.Kopieer()
]]>