Index: BURBID.mac.rou =================================================================== diff -u -r734 -r4782 --- BURBID.mac.rou (.../BURBID.mac.rou) (revision 734) +++ BURBID.mac.rou (.../BURBID.mac.rou) (revision 4782) @@ -241,6 +241,7 @@ s ^KPR(PRNr,"I")="",^KPR(PRNr,"I1")=TT("I") d RECALC^PRODUKT2(PRNr,TT("J")) D BLDIND^PRODUKT2(PRNr) + D Gemaakt^PRODUKT2(PRNr) Quit EXTRACT S OmschE=$P(Rec,Tab,2) @@ -414,4 +415,6 @@ .For Set KLNr=$O(^KLPUTZ("IS",HoofdGr,Groep,SubGroep,PRNr,KLNr)) Quit:KLNr="" Set List=List_","_KLNr Quit Res - \ No newline at end of file + + +