program "OMZET"     ;omzet vorig jaar bij leveranciers aanpassen 

#include "CRINCLU" 
#include "CRINCLU2"

assign=2,"\AAALEV",wr,si
assign=3,"\DEPREST\AAALEV",wr,si
open=2:&20,e  
open=3:&20,e  
&10
down=3:&20,e,levdown         
levvj=levjomz
modif=2,levkode:&10,e,levrec
goto &10

&20
assign=2,"\AAAKLA",wr,si
assign=3,"\DEPREST\AAAKLA",wr,si
open=2:&1,e  
open=3:&1,e  
&30
down=3:&1,e,kldown         
klomzvj=kljomz
modif=2,klkode:&30,e,klrec
goto &30

eseg 0

end

sssssH$H$