MNF032.R001 — Vendedor obrigatório quando bloqueio está ativo

Módulo: MNF032 · Menu: Faturamento > Movimentações > Notas Fiscais > Importação de XML Transmitido Classificação: intencional · Relevância: alta

Regra

A nota não pode ser salva/confirmada sem vendedor quando PARMFATUR.ST_BLOQUEIOVENDEDOR='S' e ST_VARIOSVENDEDORES='N'.

Quando dispara

ao salvar a nota (BeforePost) e ao confirmar (btnConfirmaNota)

Mensagem exibida

É Obrigatório informar o Vendedor !

Como o usuário resolve

Informar o vendedor no campo Vendedor da aba Dados da Nota, ou ajustar o parâmetro em Parâmetros de Faturamento.

Parâmetros envolvidos

• ST_BLOQUEIOVENDEDOR
• ST_VARIOSVENDEDORES

Evidência

Arquivo	Linhas	Rotina	O que o trecho faz
source/MNF032/UdmMNF032.pas	1494-1500	TdmMNF032.tabNOTABeforePost
source/MNF032/UMNF032.pas	1471-1475	TfrmMNF032.btnConfirmaNotaClick

source/MNF032/UdmMNF032.pas:1494

      if ((ParmFatur.Values['ST_BLOQUEIOVENDEDOR'] = 'S')
       and(ParmFatur.Values['ST_VARIOSVENDEDORES'] = 'N')
       and(Trim(dmMNF032.tabNOTACD_VENDEDOR.AsString) = ''))then
      begin
         frmMNF032.edtCD_VENDEDOR.SetFocus;
         Raise JException.Create('W-0000', ['É Obrigatório informar o Vendedor !']);
      end;

source/MNF032/UMNF032.pas:1471

               if (Trim(dmMNF032.tabNOTACD_VENDEDOR.AsString) = '')and(ParmFatur.Values['ST_BLOQUEIOVENDEDOR'] = 'S')and(ParmFatur.Values['ST_VARIOSVENDEDORES'] = 'N')then
               begin
                  frmMNF032.edtCD_VENDEDOR.SetFocus;
                  Raise JException.Create('W-0000', ['É Obrigatório informar o Vendedor !']);
               end;