if(EntreAB(data.dia, 1, DiasMes(data.mes, data.ano)) == 1 && EntreAB(data.LDia, 1, DiasMes(data.LMes, data.LAno)) == 1 && EntreAB(data.minutos, 1, 60) == 1 && EntreAB(data.horas, 1, 24) == 1 && EntreAB(data.LMinutos, 1, 60) == 1 && EntreAB(data.LHoras, 1, 24) == 1 && data.mes > 0 && data.ano > 0 && data.LMes > 0 && data.LAno > 0 && data.ano <= data. LAno)