Pular para o conteúdo principal

MRC031.R001 — Cabeçalho do orçamento exige Pessoa, Endereço, Condição/Forma de Pagamento, Tipo de Pedido e Data de Emissão

Módulo: MRC031 · Menu: Recapadora > Movimentações > Orçamento de Recapadora Classificação: intencional · Relevância: sistemica

Regra​

Ao gravar o orçamento, o sistema valida sequencialmente Pessoa, Endereço, Condição de Pagamento, Forma de Pagamento, Tipo de Pedido e Data de Emissão, posicionando o foco no campo faltante.

Quando dispara​

Ao clicar em OK/gravar (BeforePost do cabeçalho)

Mensagem exibida​

Informe a Pessoa! / Informe o Endereço do Cliente! / Informe a Condição de Pagamento! / Informe a Forma de Pagamento! / Informe o tipo do Pedido! / Informe a Data de Emissão!

Como o usuário resolve​

Preencher o campo indicado no cabeçalho do orçamento antes de gravar.

Evidência​

ArquivoLinhasRotinaO que o trecho faz
source/MRC031/UdmMRC031.pas374-416TdmMRC031.tabORCAMENTOPNEUBeforePostValida campos obrigatórios do cabeçalho antes de gravar

source/MRC031/UdmMRC031.pas:374

procedure TdmMRC031.tabORCAMENTOPNEUBeforePost(DataSet: TDataSet);
begin
   if (dmMRC031.tabORCAMENTOPNEUIDPESSOA.AsString = '') then
   begin
      formMRC031.frameMRC031.editIdCliente.SetFocus;
      raise JException.Create('W-0000', ['Informe a Pessoa!']);
   end;

   if (dmMRC031.tabORCAMENTOPNEUIDENDERECO.AsString = '') then
   begin
      formMRC031.frameMRC031.edtIDENDERECO.SetFocus;
      raise JException.Create('W-0000', ['Informe o Endereço do Cliente!']);