Identificador de Regra
CPR-435RCPAR01
Módulo: CPR - Compras.
Finalidade: o objetivo deste identificador é sobrepor as parcelas de uma nota fiscal de entrada, quando a mesma é fechada nas rotinas do Agronegócio.
Características: o identificador é disparado no momento anterior ao fechamento da nota fiscal.
Seu funcionamento consiste no seguinte:
- Se não houver linhas no retorno da lista de parcelas, nada será feito.
- Caso retornem parcelas na lista, as parcelas pré-existentes na nota fiscal serão excluídas e serão assumidas novas parcelas.
É destinado ao identificador, a responsabilidade de fechar o valor correto das parcelas com o valor da nota fiscal. O sistema não efetuará consistências posteriores a isso.
Tela: F435CCC, F435CST, F115COE, F115TRF
Transação: Não se aplica.
Regras
Definir Numero CprNCodEmp;
Definir Numero CprNCodFil;
Definir Numero CprNCodFor;
Definir Numero CprNNumNfc;
Definir Alfa CprACodSnf;
Definir Numero CprNFilCtr;
Definir Numero CprNNumCtr;
Definir Numero CprNDatCpt;
Definir Numero CprNSeqCcp;
Definir Numero CprNVlrLiq;
Definir Numero CprNVlrFin;
Definir Alfa CprACodCpg;
Definir Numero CprNCodFpg;
Definir Alfa CprATnsPro;
Definir Alfa CprATnsSer;
Definir Alfa CprACodPor;
Definir Alfa CprACodCrt;
Definir Alfa CprACodTpt;
Definir Alfa CprACodFcr;
Definir Numero CprNDatFcr;
Definir Data dVctPar;
Definir numero ListaPar;
Definir Alfa aAux;
Definir numero i;
definir numero nvalorpar;
definir numero nValorRestante;
NValorPar = (CprNVlrFin/3);
NValorPar = ArredondarValor(NValorPar, 2);
NValorRestante = CprNVlrFin - (NValorPar * 3);
i = 1;
dVctPar = DatSis;
enquanto (i <= 3)
{
Se (i = 3)
{
NValorPar = NValorPar + NValorRestante;
}
ListaRegraNovaLinha(ListaPar);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodPor", CprACodPor, aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodCrt", CprACodCrt, aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodTpt", CprACodTpt, aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodCrp", "", aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodFcr", CprACodFcr, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "DatFcr", CprNDatFcr, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "VctPar", DVctPar, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "CodNtg", 0, aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodBan", "001", aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CodAge", "001", aAux);
ListaRegraAddValorLinhaAlfa(ListaPar, "CcbFor", "1234", aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "CodPar", i, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "VlrPar", NValorPar, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "QtdDdd", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "PerDdp", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "VlrDdp", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "JrsNeg", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "MulNeg", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "VlrDsc", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "OutNeg", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "DatNeg", 0, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "TipTcc", 1, aAux);
ListaRegraAddValorLinhaNumero(ListaPar, "CodFpg", CprNCodFpg, aAux);
ListaRegraSalvarLinha(ListaPar);
DVctPar = DvctPar + 10;
Se (i = 3)
NValorPar = NValorPar + NValorRestante;
i = i + 1;
}
Variáveis Disponibilizadas:
Observação
As variáveis CprACodPor, CprACodCrt, CprACodTpt, CprACodFcr, CprNDatFcr são obtidas através da primeira parcela existente na nota fiscal. Caso não houver parcelas, estas variáveis estarão sem valor e devem ser preenchidas.
Nome | Tipo | Observações | Retorna Valor |
---|---|---|---|
CcbFor | ALFA | Número da conta corrente do fornecedor no banco | S |
CodAge | ALFA | Número da agência do banco | S |
CodBan | ALFA | Número do banco na FEBRABAN | S |
CodCpg | ALFA | Condição de Pagamento | |
CodCrp | ALFA | Código do grupo a pagar | S |
CodCrt | ALFA | Filial do controle entradas e saídas | S |
CodCrt | ALFA | Código da carteira a ser lançado o título no contas a pagar | |
CodEmp | NÚMERO | Código de Empresa | |
CodEqu | NÚMERO | Código do equipamento fiscal | |
CodFav | NÚMERO | Número do CNPJ ou CPF do favorecido | |
CodFcr | ALFA | Código da moeda ou índice como fator de correção (financeiro) | S |
CodFil | NÚMERO | Código da Filial | |
CodFor | NÚMERO | Código de Fornecedor da nota fiscal de entrada | |
CodFpg | NÚMERO | Código da forma de pagamento | S |
CodNtg | NÚMERO | Código da natureza do gasto | S |
CodPar | NÚMERO | Sequência de parcelas da nota fiscal de entrada | S |
CodPor | ALFA | Código Portador a ser lançado o título no contas a pagar | |
CodRep | NÚMERO | Código do representante | |
CodSnf | ALFA | Código da série da nota fiscal de entrada | |
CodTpt | ALFA | Código do tipo de título a ser gerado no contas a pagar | S |
CodTpt | ALFA | Tipo de Título | |
CroEcf | NÚMERO | Cont. de Reinício de Operação do ECF | |
DatFcr | DATA | Data da cotação da moesa ou índice para o fator de correção (financeiro) | S |
DatGer | DATA | Data da geração do registro | |
DatNeg | DATA | Data base dos valores negociados (data até) | S |
FilCtr | NÚMERO | Código de filial de Contrato | |
HorGer | NÚMERO | Hora da geração do registro | |
IndPag | ALFA | Indicativo da forma de pagamento | |
JrsNeg | NÚMERO | Valor dos juros negociados | S |
ListaPar | Lista das parcelas da nota fiscal | ||
MulNeg | NÚMERO | Valor da multa negociada | S |
NumCpr | ALFA | Número do cartão presente | |
NumCoo | NÚMERO | Contador da ordem de operação que emitiu o recebimento na ECF | |
NumCtr | NÚMERO | Número de Contrato | |
NumNfc | NÚMERO | Número da nota fiscal de entrada | |
NumTit | ALFA | Número do título a ser gerado no contas a pagar | |
ObsPar | ALFA | Texto da observação | |
OutNeg | NÚMERO | Valor de outros valores negociados | S |
PerDdp | NÚMERO | Percentual de desconto da parcela da nota fiscal de entrada | S |
QtdDdd | NÚMERO | Quantidade de dias de tolerância para o desconto da parcela | S |
TipTcc | NÚMERO | Tipo da conta - conforme lista de tipos de conta | S |
TnsPro | ALFA | Código de Transação do Produto | |
TnsSer | ALFA | Código de Transação do Serviço | |
UsuGer | NÚMERO | Usuário responsável pela geração do registro | |
VctPar | DATA | Data de vencimento da parcela da nota fiscal de entrada | S |
VlrDsc | NÚMERO | Valor do desconto negociado a ser concedido ao título a pagar | S |
VlrFin | NÚMERO | Valor Financeiro | |
VlrInt | NÚMERO | Valor de intermediação de serviços da parcela | |
VlrLiq | NÚMERO | Valor Líquido | |
VlrPar | NÚMERO | Valor da parcela da nota fiscal de entrada | S |
Origem |
|
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.