Index: APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml =================================================================== diff -u -r38004 -r38146 --- APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml (.../BLOrdRspService.cls.xml) (revision 38004) +++ APPS/EDIExport/AankoopOrderResponse/BLUM/impl/BLOrdRspService.cls.xml (.../BLOrdRspService.cls.xml) (revision 38146) @@ -101,9 +101,11 @@ if (ToeleveringsUniekLijnNummer >= 100) { set ToeleveringsLijnNummer = (ToeleveringsUniekLijnNummer\100) } else { - set ToeleveringsLijnNummer = ToeleveringsUniekLijnNummer + set ToeleveringsLijnNummer = +ToeleveringsUniekLijnNummer } quit:(ToeleveringsLijnNummer="") + + Do:$$$Not($data(@..#Global(ToeleveringsNummer,ToeleveringsLijnNummer))) ..Logger.Info("BLOrdRsp UpdateVerwerkvlag", "Toelevering : "_ToeleveringsNummer_"."_ToeleveringsLijnNummer _ " niet gevonden in BLOrdRsp") quit:$$$Not($data(@..#Global(ToeleveringsNummer,ToeleveringsLijnNummer))) set eersteindexvoortlnr = $Order(@..#Global(ToeleveringsNummer,ToeleveringsLijnNummer,0))