jValidate.R001 — Data Inicial não pode ser maior que a Data Final

Módulo: jValidate Classificação: intencional · Relevância: sistemica

Regra

Em qualquer filtro de tela que use um par de campos de data (Data Inicial / Data Final), se ambos estiverem preenchidos e a Data Inicial for maior que a Data Final, a busca é bloqueada.

Quando dispara

Ao sair do campo Data Inicial ou Data Final em qualquer tela que utilize esse par de campos padrão.

Mensagem exibida

W-0231

Como o usuário resolve

Corrigir as datas de forma que a Data Inicial seja igual ou anterior à Data Final.

Evidência

Arquivo	Linhas	Rotina	O que o trecho faz
source/jCommon/jValidate.pas	1122-1136	ValidaDataInicial	Compara as duas datas e levanta W-0231 se a inicial for maior que a final.

source/jCommon/jValidate.pas:1122

procedure ValidaDataInicial(DataInicial: TField; DataFinal: TField);
begin
  if ((Trim(DataInicial.AsString) <> '') and (Trim(DataFinal.AsString) <> ''))
  then
    if (DataInicial.AsDateTime > DataFinal.AsDateTime) then
      Raise JException.Create('W-0231');
end;

procedure ValidaDataFinal(DataFinal: TField; DataInicial: TField);
begin
  if ((Trim(DataInicial.AsString) <> '') and (Trim(DataFinal.AsString) <> ''))
  then