Identificador de Regra

PAT-670ENTVA02

Módulo: PAT - Patrimônio.

Finalidade: permite alterar o valor dos campos Vlr. Uni. Aquisição Bem, Vlr. Uni. Aq. Bem p/ Créd. PIS, Vlr.Uni.Aq.Bem p/ Créd. COFINS e Vlr. Uni. Aq. Bem p/ Créd. CSLL da grade de itens das notas fiscais de entrada por meio de regra.

Características: se o retorno da regra for zero, a rotina vai calcular o valor base para os campos Vlr. Uni. Aquisição Bem, Vlr. Uni. Aq. Bem p/ Créd. PIS, Vlr. Uni. Aq. Bem p/ Créd. COFINS e Vlr. Uni. Aq. Bem p/ Créd. CSLL da grade.

Tela: F670EBI.

Transação: não se aplica.

Regra:

@ Definição da Chave do Registro @
Definir Numero PATNCodEmp; @Código da Empresa@
Definir Numero PATNCodFil; @Código da Filial@
Definir Numero PATNCodFor; @Código do Fornecedor@
Definir Numero PATNNumNfi; @Número inicial da Nota Fiscal de Entrada@
Definir Numero PATNNumNff; @Número final da Nota Fiscal de Entrada@
Definir Alfa PATACodSnf; @Código da Série da Nota Fiscal de Entrada@
Definir Alfa PATACodTns; @Código da Série da Nota Fiscal de Entrada@
Definir Numero PATNSeqInc; @Seqüência do item na nota fiscal de entrada@

@ Definição dos valores do Registro @
Definir Numero PATNVlrCtb; @Valor contábil do item da nota fiscal@
Definir Numero PATNVlrCip; @Valor ICMS@
Definir Numero PATNVlrSic; @Valor do ICMS substituído@
Definir Numero PATNVlrIsd; @Valor ICMS Substituído Destacado@
Definir Numero PATNVlrIns; @Valor INSS@
Definir Numero PATNVlrFun; @Valor Funrural@
Definir Numero PATNVlrSen; @Valor Senard@
Definir Numero PATNVlrDai; @Vlr. Diferença Alíquota@
Definir Numero PATNVlrIpi; @Vlr. IPI@
Definir Numero PATNVlrIpd; @Vlr. IPI Presumido@
Definir Numero PATNVlrPir; @Vlr. PIS a Recuperar@
Definir Numero PATNVlrPit; @Vlr. PIS Retido@
Definir Numero PATNVlrCrt; @Vlr. COFINS Retido@
Definir Numero PATNVlrCsl; @Vlr. CSLL Retido@
Definir Numero PATNVlrIrf; @Vlr. IRRF@
Definir Numero PATNVlrIss; @Vlr. ISS@
Definir Numero PATNVlrCor; @Vlr. COFINS a Recuperar@
Definir Numero PATNVlrOur; @Vlr. Outras Retenções@

@ Definição da Variável de Retorno da Regra @
Definir Numero PATNVlrBas; @Valor Base para o Cálculo do campo: "Vlr. Uni. Aquisição Bem"@
Definir Numero PATNVlrAqu; @Valor Base para o Cálculo dos campos: "Vlr. Uni. Aq. Bem p/ Créd. PIS", "Vlr. Uni. Aq. Bem p/ Créd. COFINS", "Vlr. Uni. Aq. Bem p/ Créd. CSLL".@
Definir Alfa PATARecPis; @Indicador de recuperação de crédito PIS - valor inicial 'N' ou E674Esp.RecPis@
Definir Alfa PATACstPis; @Código da situação tributária de PIS para crédito nas movimentações@
Definir Alfa PATACstCof; @Código da situação tributária de COFINS para crédito nas movimentações@
Definir Alfa PATARecCof; @Indicador de recuperação de crédito Cofins - valor inicial 'N' ou E674Esp.RecCof@
Definir Alfa PATARecCsl; @Indicador de recuperação de crédito CSLL - valor inicial 'N' ou E674Esp.RecCsl@
Definir Numero PATNQtmPis; @Quantidade Maxima de Meses para recuperação PIS@
Definir Numero PATNQtmCof; @Quantidade Maxima de Meses para recuperação COFINS@
Definir Numero PATNQtmCsl; @Quantidade Maxima de Meses para recuperação CSLL@

PATNVlrBas = 0; @ Como está retornando zero para variável o sistema irá fazer o calculo do Valor Base para o campo "Vlr. Uni. Aquisição Bem" da grade. @
PATNVlrAqu = PATNVlrCtb - PATNVlrIpi;

PATARecPis = 'S';
PATARecCof = 'N';
PATARecCsl = 'N';
PATNQtmPis = 24;
PATNQtmCof = 0;
PATNQtmCsl = 0;

Variáveis disponibilizadas:

Nome Tipo Observações Retorna Valor
PATNCodEmp NÚMERO Código da Empresa N
PATNCodFil NÚMERO Código da Filial N
PATNCodFor NÚMERO Código do Fornecedor N
PATNNumNfi NÚMERO Número inicial da Nota Fiscal de Entrada N
PATNNumNff NÚMERO Número final da Nota Fiscal de Entrada N
PATACodTns ALFA Código da Transação da Nota Fiscal de Entrada N
PATNSeqInc NÚMERO Seqüência do item na Nota Fiscal de Entrada N
PATNVlrCtb NÚMERO Valor contábil do item da nota fiscal N
PATNVlrCip NÚMERO Valor ICMS do Item N
PATNVlrSic NÚMERO Valor ICMS Substituído N
PATNVlrIsd NÚMERO Valor ICMS Substituído Destacado N
PATNVlrIns NÚMERO Valor INSS N
PATNVlrFun NÚMERO Valor Funrural N
PATNVlrSen NÚMERO Valor Senar N
PATNVlrDai NÚMERO Valor Diferença de Alíquota N
PATNVlrIpi NÚMERO Valor IPI N
PATACodSnf ALFA Código da Série da Nota Fiscal de Entrada N
PATNVlrIpd NÚMERO Valor IPI Presumido N
PATNVlrPir NÚMERO Valor PIS a Recuperar N
PATNVlrPit NÚMERO Valor PIS Retido N
PATNVlrCrt NÚMERO Valor COFINS Retido N
PATNVlrCsl NÚMERO Valor CSLL Retido N
PATNVlrIrf NÚMERO Valor IRRF N
PATNVlrIss NÚMERO Valor ISS N
PATNVlrCor NÚMERO Valor COFINS a Recuperar N
PATNVlrOur NÚMERO Valor Outras Retenções N
PATNVlrBas NÚMERO Valor Base para Cálculo do campo: "Vlr. Uni. Aquisição Bem" S
PATNVlrAqu NÚMERO Valor Base para o Cálculo dos campos: "Vlr. Uni. Aq. Bem p/ Créd. PIS", "Vlr. Uni. Aq. Bem p/ Créd. COFINS", "Vlr. Uni. Aq. Bem p/ Créd. CSLL" S
PATARecPis ALFA Indicador de recuperação de crédito do PIS S
PATARecCof ALFA Indicador de recuperação de crédito do Cofins S
PATARecCsl ALFA Indicador de recuperação de crédito CSLL S
PATNQtmPis NÚMERO Quantidade Maxima de Meses para recuperação do PIS S
PATNQtmCof NÚMERO Quantidade Maxima de Meses para recuperação do COFINS S
PATNQtmCsl NÚMERO Quantidade Maxima de Meses para recuperação do CSLL S
PATACstPis ALFA Código da situação tributária de PIS para crédito nas movimentações S
PATACstCof ALFA Código da situação tributária de COFINS para crédito nas movimentações S
PATNBasPis Número Base PIS a Recuperar N
PATNBasCof Número Base COFINS a Recuperar N
Importante

As variáveis PATNQtmPis, PATNQtmCof e PATNQtmCsl devem estar definidas com valor "S" para que seja sugerida a quantidade de meses.

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