CREATE CURSOR crsrisk ;
 (Mainkey c(30), Group C(30), Element C(30), Weight C(10))

select crsrisk 
APPEND FROM DBF('fablin') FIELDS mainkey, group, element, weight

select mainkey, group, element, weight;
FROM fablin ;
into cursor crsrisk readwrite