program "test"
#include "crinclu" 
#include "crinclu2"
assign=2,"AAAVER",wr,si
assign=3,"NEWVER",wr,si
open=3:next,e
cfile=3,d=200,k=8
open=2:&1,e  
&10
down=2:&1,e,verkdown  
insert=3,verkkey:&10,e,verkrec
goto &10
eseg 0
end