update refites set ret_codtes = ret_codtes + 100000000
update movpunti set mp_codtes = mp_codtes + 100000000
update tabnuma set tb_numprog = tb_numprog + 100000000 where tb_numtipo = 'FI'