Index: EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml =================================================================== diff -u -r35235 -r35238 --- EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml (.../BestandVerwerker.cls.xml) (revision 35235) +++ EXT/Unishop/PurchaseOrder001/BestandVerwerker.cls.xml (.../BestandVerwerker.cls.xml) (revision 35238) @@ -40,7 +40,10 @@ Set ..OrderConverter = ..GeefOrderConverter(BestandVolledigeNaam) If ($IsObject(..OrderConverter)) { - do ..BestelService.PlaatsBestelling(..OrderConverter.Converteer(Order)) + #dim Resultaat As APPS.EDI.Bestel.BestelService.PlaatsBestelling.Resultaat = ..BestelService.PlaatsBestelling(..OrderConverter.Converteer(Order)) + If $IsObject(Resultaat.Exceptie) { + Do ##class(TECH.ExceptionHandler).Throw(Resultaat.Exceptie) ; OPM.: als er nog andere bestanden zijn, zullen deze niet meer verwerkt worden. + } } Else { Do ##class(TECH.Exceptions.InvalidInputException).Throw("Het bestand '"_BestandVolledigeNaam_"' kan niet verwerkt worden. Geen converter beschikbaar.") @@ -50,11 +53,7 @@ BestandVolledigeNaam:%String -