Index: SGREEP2.mac.rou =================================================================== diff -u -r734 -r4782 --- SGREEP2.mac.rou (.../SGREEP2.mac.rou) (revision 734) +++ SGREEP2.mac.rou (.../SGREEP2.mac.rou) (revision 4782) @@ -188,6 +188,7 @@ Do RECALC^PRODUKT2(NewPRNr) Do BLDIND^PRODUKT2(NewPRNr) Do ZEND^EWPR(NewPRNr) + Do Gemaakt^PRODUKT2(NewPRNr) Quit KSTPRIJS(Param) @@ -424,4 +425,6 @@ . Set $P(^KTO(LevNrKey,TLevKey,LnNr),D,14)=1 Lock -^KTO(LevNrKey) Close:0'[Dev Dev - Quit \ No newline at end of file + Quit + +