Index: APPS/VKP/Commissie/impl/CommissieService.cls.xml =================================================================== diff -u -r40092 -r40394 --- APPS/VKP/Commissie/impl/CommissieService.cls.xml (.../CommissieService.cls.xml) (revision 40092) +++ APPS/VKP/Commissie/impl/CommissieService.cls.xml (.../CommissieService.cls.xml) (revision 40394) @@ -346,10 +346,7 @@ } if $length(Commissie.Aankoopfactuur) { - #dim Aankoopfactuur As DOM.BKH.AankoopFactuur = ..BoekhoudingAPI.GeefAankoopFactuur(Commissie.Aankoopfactuur) set dtoCommissie.Aankoopfactuur = Commissie.Aankoopfactuur - set dtoCommissie.DatumAankoopfactuur = Aankoopfactuur.GeefDatum() - set dtoCommissie.DatumAankoopfactuurVoldaan = Aankoopfactuur.GeefDatumVoldaan() } @@ -473,10 +470,6 @@ if $length(Commissie.Aankoopfactuur) { set Status = ##class(DOM.VKP.Commissie.enu.CommissieStatus).AankoopfactuurIngeboekt() - If $$$Not(..IsAankoopFactuurDieWaarschijnlijkInAXZit( Commissie.Aankoopfactuur )) { - #dim Aankoopfactuur As DOM.BKH.AankoopFactuur = ..BoekhoudingAPI.GeefAankoopFactuur(Commissie.Aankoopfactuur) - if Aankoopfactuur.IsVoldaan() set Status = ##class(DOM.VKP.Commissie.enu.CommissieStatus).AankoopfactuurBetaald() - } } quit Status