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:
|
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.