valor m1;
valor resultado;
valor eve998;

eve998 = valeve(998) + valeve(995) + valeve(826) + valeve(989);
m1 = valvar(0) / 100;
resultado = pliqu * m1;

vcalc = resultado;
vinf = valvar(0);