function incv(forma){
eval("document.reg."+forma+".value++");
}
function desincv(forma){
if(eval("document.reg."+forma+".value")>0) eval("document.reg."+forma+".value--");
}
function incvv(forma){
if (eval("document.reg."+forma+".value")!=0) eval("document.reg."+forma+".value++");
if (eval("document.reg."+forma+".value")==0) {
eval("document.reg."+forma+".value++");
eval("document.reg."+forma+".value++");
}
}
function desincvv(forma){
if(eval("document.reg."+forma+".value")>0 && eval("document.reg."+forma+".value")!=1) eval("document.reg."+forma+".value--");
if (eval("document.reg."+forma+".value")==1) {eval("document.reg."+forma+".value--");}
}
function incv_(forma,form2){
eval("document."+form2+"."+forma+".value++");
}
function desincv_(forma,form2){
if(eval("document."+form2+"."+forma+".value")>0) eval("document."+form2+"."+forma+".value--");
}