Identificador de Regra

CPR-440MANIR01

Módulo: CPR - Compras.

Finalidade: Disponibilizar todos os campos das tabelas E440IPC e E440ISC afim de permitir a manipulação do cálculo do IRRF dos itens da nota fiscal de entrada.

Características: As informações ainda não estarão gravadas no banco de dados. Para acessar as variáveis das tabelas E440ISC e E440IPC deve ser utilizado o formato, por exemplo, "E440IPC.VLRBIR". Além disso, é importante ressaltar que este identificador é exclusivo da tela F440GNE, executado somente no processamento da nota, ou seja, não é executado no fechamento.

Variáveis que RETORNAM VALOR ao sistema:

Tela: F440GNE

Transação: Não se aplica.

Regra:

Definir Alfa VCprNCodEmp;
Definir Alfa VCprNCodFil;
Definir Alfa VCprNCodFor;
Definir Alfa VCprNNumNfc;
Definir Alfa VCprNVlrLiq;
Definir Alfa VCprDDatEnt;
Definir Alfa VCprDDatEmi;
Definir Alfa CprACodSnf;
Definir Alfa CprATabela;
Definir Alfa Quebra;
Definir Alfa StrAux;

inicio

RetornaAscii(13, Quebra);

IntParaAlfa(CprNCodEmp, VCprNCodEmp);
IntParaAlfa(CprNCodFil, VCprNCodFil);
IntParaAlfa(CprNCodFor, VCprNCodFor);
IntParaAlfa(CprNNumNfc, VCprNNumNfc);
IntParaAlfa(CprNVlrLiq, VCprNVlrLiq);
ConverteMascara(3,CprDDatEnt, VCprDDatEnt, "DD/MM/YYYY");
ConverteMascara(3,CprDDatEmi, VCprDDatEmi, "DD/MM/YYYY");

StrAux =
"CprNCodEmp: " + VCprNCodEmp + Quebra +
"CprNCodFil: " + VCprNCodFil + Quebra +
"CprNCodFor: " + VCprNCodFor + Quebra +
"CprNNumNfc: " + VCprNNumNfc + Quebra +
"CprACodSnf: " + CprACodSnf + Quebra +
"CprNVlrLiq: " + VCprNVlrLiq + Quebra +
"CprDDatEnt: " + VCprDDatEnt + Quebra +
"CprDDatEmi: " + VCprDDatEmi + Quebra +
"[&OK]";
Mensagem(Retorna,StrAux);

Se (CprATabela = "E440IPC")
Inicio
E440IPC.PERIRF = 12;
E440IpC.VLRIRF = 39;
E440IpC.VLRBIR = 41;
Mensagem(Retorna, CprATabela);
Fim Senao
Se (CprATabela = "E440ISC")
Inicio
E440ISC.PERIRF = 80;
E440ISC.VLRIRF = 30;
E440ISC.VLRBIR = 50;
Mensagem(Retorna, CprATabela);
Fim;

XX = 0;
fim

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
CprNCodEmp NÚMERO Código da empresa N
CprNCodFil NÚMERO Código da filial N
CprNCodFor NÚMERO Código do fornecedor da nota fiscal de entrada N
CprNNumNfc NÚMERO Número da nota fiscal de entrada N
CprACodSnf ALFA Código da série da nota fiscal de entrada N
CprNVlrLiq NÚMERO Total líquido da nota fiscal de entrada N
CprDDatEnt DATA Data de entrada N
CprDDatEmi DATA Data de emissão N

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ê?