Pular para o conteúdo principal

MPD002.R001 — Cliente deve estar ativo e sem bloqueio financeiro

Módulo: MPD002 · Menu: Faturamento > Movimentações > Pedidos > Emissão de Pedidos de Venda Classificação: intencional · Relevância: alta

Regra​

Ao informar a pessoa no pedido, o sistema valida se ela está cadastrada, ativa e sem situação financeira bloqueada (SCPC); se bloqueada, impede a gravação.

Quando dispara​

Ao sair do campo Pessoa (CD_PESSOA) do cabeçalho.

Mensagem exibida​

A Pessoa "..." está com Situação Financeira Bloqueada! / A Pessoa Física / Jurídica não está Ativa [TFA001]! / não está Cadastrada [TFA001]!

Como o usuário resolve​

Regularizar a situação financeira do cliente (CFC004/financeiro) ou reativar/cadastrar a pessoa em TFA001.

Evidência​

ArquivoLinhasRotinaO que o trecho faz
source/MPD002/UdmMPD002.pas1672-1699TdmMPD002.tabPEDIDOCD_PESSOAValidateConsulta a pessoa e bloqueia se inativa ou com situação financeira bloqueada.

source/MPD002/UdmMPD002.pas:1672

procedure TdmMPD002.tabPEDIDOCD_PESSOAValidate(Sender: TField);
var
   Consulta, iConsulta: String;
   Resultado, Result, iResultado: TResultado;
   i, iCdtipoPessoa : Integer;
begin
   if (Trim(tabPEDIDOCD_PESSOA.AsString) <> '') then
   begin
      flagReprocessaMovimentacao := 'N';
      Consulta :=
         'SELECT P.NM_PESSOA, P.ST_ATIVA, P.CD_TIPOPESSOA, T.TP_TIPOPESSOA, ' +
         '   P.DS_OBSERVACAO, P.ST_SCPC, P.NR_LICENSA, P.DT_VALLICENSA, ' +