Index: KF20.mac.rou =================================================================== diff -u -r948 -r2132 --- KF20.mac.rou (.../KF20.mac.rou) (revision 948) +++ KF20.mac.rou (.../KF20.mac.rou) (revision 2132) @@ -193,6 +193,7 @@ .Quit:$$CHECKWMS^FLOW(,,,,BonNr) .;Quit:$$ISORGAL^FLOWCHK("L",BonNr) ; Tijdelijk geen ORGALUX factureren:PV .If IsBulk,$P(^KUL(KLNr,"F",BonNr,1),D,38)'=BulkGroep Quit + .If $L($G(BulkGroep)),$$ISTERUGN^FLOWBON5(BonNr) Quit ; Terugnames niet tonen bij bulkfacturatie .Do RecalcCommKort^FLOWMANL("KUL",KLNr,BonNr) .Set Count=Count+1,BonNr(Count)=BonNr .Set:BonNr=$G(AutoSel) LD("SELECT")=Count,SelFakt=$P(^KUL(KLNr,"F",BonNr,1),D,12)