Esta versão do sistema foi descontinuada e não recebe atualizações e novas implementações. Acesse a documentação da versão 5.10.3 aqui

Identificador de Regra

GER-051DISPN01

Módulo: GER - Gerais.

Finalidade: Permite a automação da adição de dispositivos fiscais aos itens das notas fiscais de entrada e saída, tanto na Gestão Comercial/Suprimentos como em Tributos, possibilitando que sejam incluídos uma quantidade variável de dispositivos, conforme necessidade.

Tela: F660NFV, F660NFC, F140GNF e F440GNE.

Transação: E660INV.CodTns, E660INC.CodTns, E140IPV.TnsPro, E140ISV.TnsSer, E440IPC.TnsPro e E440ISC.TnsSer.

Variáveis disponibilizadas:

Nome Descrição Retorno
GERAMODULO Módulo de lançamento (C - Comercial/Suprimentos; T - Tributos) N
GERATABELA

Tabelas referente ao item que está sendo incluído:

  • Vendas - Notas Fiscais de Saída - Itens de Produtos (E140IPV) ;
  • Vendas - Notas Fiscais de Saída - Itens de Serviço (E140ISV);
  • Compras - Notas Fiscais de Entrada - Itens de Produto (E440IPC);
  • Compras - Notas Fiscais de Entrada - Itens de Serviço (E440ISC);
  • Impostos - Nota Fiscal de Saída - Itens de Produto/Serviço (E660INV);
  • Impostos - Nota Fiscal de Entrada - Itens de Produto/Serviço) (E660INC)
N
E140IPV ou E140ISV ou E440IPC ou E440ISC ou E660INV ou E660INC Tag na tabela sendo processado conforme informado em GERATABELA N
GERNCODDFS Código do dispositivo fiscal S
GERNBASAJS Base de cálculo do Ajuste S
GERNPERAJS Percentual do Ajuste S
GERNVLRAJS Valor do Ajuste S
GERNPRXAJS Variável de controle que permite incluir mais de um ajuste (0 - Não existem mais ajustes; > 0 - Existem mais ajustes) S
GERNVLROUT Valor Outros S
GERNDESAJS Descrição do ajuste S

Observação

As variáveis indicadas como sendo de retorno (Retorno = S) serão inicializadas com valores vazios ou zerados na execução da regra. Esses valores devem ser preenchidos de acordo com as necessidades de cada contexto durante a execução da regra.

Regra:

Definir Alfa GERAMODULO;
Definir Alfa GERATABELA;
Definir Numero GERNCODDFS;
Definir Numero GERNBASAJS;
Definir Numero GERNPERAJS;
Definir Numero GERNVLRAJS;
Definir Numero GERNPRXAJS;

Definir Alfa VSDigitadoAlfa;
Definir Numero VSDigitadoNumero;
Definir Alfa PadraoAlfa;
Definir Numero PadraoNumero;
Definir Numero TipoSaida;

@O código do dispositivo que for retornado precisa existir na base de dados.@
ENTRADAVALOR("Dispositivo da NFS:", "Digite o código do dispositivo:", 2, "ZZZZZ9", VSDigitadoAlfa,PadraoNumero, PadraoAlfa, VSDigitadoNumero, TipoSaida);

@Verifica se retornou valor na caixa de resposta.@
Se (TipoSaida = 1)
inicio
@O preenchimento das variáveis pode ser feito conforme a lógica de negócio de cada cliente.@
GERNCODDFS = VSDigitadoNumero;
GERNBASAJS = 1000 * GERNCODDFS;
GERNPERAJS = 10 * GERNCODDFS;
GERNVLRAJS = (GERNBASAJS * GERNPERAJS) / 100;
Fim

Definir Alfa xMensagem;
xMensagem = "Deseja informar outro dispositivo? [&Sim, &Não,]";

@Pergunta se deve cadastrar outro dispositivo.@
RetornoMensagem = Mensagem(Retorna, xMensagem);

@Verifica o retorno da pergunta.@
Se (RetornoMensagem = 0)
Inicio
@Deve continuar o cadastro dos dispositivos.@
GERNPRXAJS = 1;
Fim;
SeNao
Inicio
@Não deve continuar o cadastro dos dispositivos.@
GERNPRXAJS = 0;
Fim;

Atenção

Caso o parâmetro global LisVarReg esteja habilitado, a variável ListaVariaveis estará disponível em todos os identificadores de regras do sistema. O conteúdo desta variável lista os campos disponibilizados no identificador de regras em questão.

Não é aconselhada a ativação desse parâmetro global para o uso cotidiano. Esse recurso de listagem dos campos de identificadores auxilia a construção de regras e o Suporte para, por exemplo, depuração ou quando não houver acesso à documentação dos identificadores de regras.

Este artigo ajudou você?