sele 1
use se_movnf
repl all vlbccofins with vl_bc_pis for vl_bc_pis>0.and.vlbccofins=0
repl all vl_cofins with vl_bc_pis*0.076 for vl_bc_pis>0.and.vl_cofins=0
repl all cst_cofins with cst_pis for cst_cofins="  "
repl all aliqcofins with 7.6 for vlbccofins>0
close all
