Pular para o conteúdo principal

MRC001.R001 — Cliente deve estar ativo, sem SCPC bloqueado e com endereço cadastrado

Módulo: MRC001 · Menu: Recapadora > Movimentações > Pedidos de Pneu Classificação: intencional · Relevância: alta

Regra​

Ao informar o cliente do pedido, o sistema valida se a pessoa está ativa, se não está com SCPC bloqueado e se possui ao menos um endereço cadastrado.

Quando dispara​

No campo Cliente (Pessoa) do cabeçalho do pedido.

Mensagem exibida​

O Cliente não está Ativo! Verifique[TFA001]! / O Cliente está com o SCPC Bloqueado! Verifique[TFA001]! / O Cliente deve ter um Endereço Cadastrado![TFA001]

Como o usuário resolve​

Ativar o cliente ou regularizar o bloqueio SCPC na tela TFA001, ou cadastrar um endereço para a pessoa.

Evidência​

ArquivoLinhasRotinaO que o trecho faz
source/MRC001/UdmMRC001.pas290-299TdmMRC001.qryPedidoPneuIDPESSOAValidateValida se cliente está ativo, sem SCPC bloqueado e com endereço

source/MRC001/UdmMRC001.pas:290

      if not (dataSet.IsEmpty) then
      begin
         if (dataSet.FieldByName('ST_ATIVA').AsString = 'N') then
            raise JException.Create('W-0000', ['O Cliente não está Ativo! Verifique[TFA001]!']);

         if (dataSet.FieldByName('ST_SCPC').AsString = 'S') then
            raise JException.Create('W-0000', ['O Cliente está com o SCPC Bloqueado! Verifique[TFA001]!']);
      end
      else
         raise JException.Create('W-0000', ['O Cliente deve ter um Endereço Cadastrado![TFA001]']);