MNF002.R001 — Cliente deve estar ativo, sem bloqueio financeiro e com endereço

Módulo: MNF002 · Menu: Faturamento > Movimentações > Notas Fiscais > Emissão de Nota Fiscal de Venda Classificação: intencional · Relevância: alta

Regra

Ao informar a Pessoa no cabeçalho da nota (e novamente ao salvar, para o consumidor final padrão), o sistema valida se ela está ativa (ST_ATIVA), sem bloqueio financeiro (ST_SCPC) e com endereço cadastrado.

Quando dispara

Seleção da Pessoa no campo Cliente ou confirmação no botão Salvar quando a pessoa é o consumidor final padrão dos parâmetros.

Mensagem exibida

A Pessoa está com Situação Financeira Bloqueada! / A Pessoa Física / Jurídica não está Ativa! Verifique [TFA001] / não possui Endereço Cadastrado!

Como o usuário resolve

No cadastro de Pessoa (TFA001), reativar a pessoa, resolver a pendência financeira (SCPC) ou cadastrar um endereço para ela.

Evidência

Arquivo	Linhas	Rotina	O que o trecho faz
source/MNF002/UdmMNF002.pas	4186-4212	TdmMNF002.tabNOTACD_PESSOAValidate	Consulta dados da pessoa e bloqueia se inativa/bloqueada financeiramente/sem endereço
source/MNF002/UMNF002.pas	3572-3579	TfrmMNF002.btnSalvarClick	Repete a mesma validação ao salvar quando a pessoa é o consumidor final configurado em PARMFATUR.CD_CONSUMIDOR

source/MNF002/UdmMNF002.pas:4186

      if (Resultado[0] <> '') then
      begin
         IF resultado[14] <> tabNOTACD_PESSOA.Asstring Then
         begin
            if (Resultado[7] = 'S') then
               Raise JException.Create('W-0000', [ 'A Pessoa está com Situação Financeira Bloqueada!']);

            if (Resultado[1] = 'N') then
               Raise JException.Create('W-0000', ['A Pessoa Física / Jurídica não está Ativa! Verifique [TFA001]']);

            if (Resultado[13] = '') then
               Raise JException.Create('W-0000', ['A Pessoa Física / Jurídica não possui Endereço Cadastrado! Verifique [TFA001]']);

source/MNF002/UMNF002.pas:3572

               if (Resultado[7] = 'S') then
               Raise JException.Create('W-0000', [ 'A Pessoa está com Situação Financeira Bloqueada!']);

               if (Resultado[1] = 'N') then
               Raise JException.Create('W-0000', ['A Pessoa Física / Jurídica não está Ativa! Verifique [TFA001]']);

               if (Resultado[13] = '') then
               Raise JException.Create('W-0000', ['A Pessoa Física / Jurídica não possui Endereço Cadastrado! Verifique [TFA001]']);