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

CPR-440NFEDG04

Módulo: CPR - Compras.

Finalidade: Consistir as informações dos dados gerais das notas fiscais de entrada.

Características: Chamado em todas as rotinas que utilizarem o fechamento de nota fiscal de entrada.

Importante: Este identificador de regras apenas será executado quando a transação indicar a necessidade da conferência e a nota ainda não ter sido conferida.

Tela: Fechamento de notas fiscais de entrada

Transação: Utiliza a transação de produto ou serviço, na existência das duas prevalece a transação de produto.

Regra:

Definir Alfa VVSCodEmp;
Definir Alfa VVSCodFil;
Definir Alfa VVSCodFor;
Definir Alfa VVSNumNfc;
Definir Alfa VVSTipNfe;
Definir Alfa VVSDatEnt;
Definir Alfa VVSDatEmi;
Definir Alfa VVSVlrliq;
Definir Alfa VVSVlrFin;
Definir Alfa VVSNumCtr;

Definir Alfa VSCodSnf;
Definir Alfa VSTnsPro;
Definir Alfa VSTnsSer;
Definir Alfa VSCodCpg;
Definir Alfa VSCodSel;
Definir Alfa VSCodSsl;

Definir Alfa Quebra;
Definir Alfa StrAux;

inicio

RetornaAscii(13, Quebra);

IntParaAlfa(VSCodEmp, VVSCodEmp);
IntParaAlfa(VSCodFil, VVSCodFil);
IntParaAlfa(VSCodFor, VVSCodFor);
IntParaAlfa(VSNumNfc, VVSNumNfc);
IntParaAlfa(VSTipNfe, VVSTipNfe);
ConverteMascara(3,VSDatEnt, VVSDatEnt, "DD/MM/YYYY");
ConverteMascara(3,VSDatEmi, VVSDatEmi, "DD/MM/YYYY");
DecimalParaAlfa(VSVlrliq, VVSVlrliq);
DecimalParaAlfa(VSVlrFin, VVSVlrFin);
IntParaAlfa(VSNumCtr, VVSNumCtr);

StrAux =
"VSCodEmp: " + VVSCodEmp + Quebra +
"VSCodFil: " + VVSCodFil + Quebra +
"VSCodFor: " + VVSCodFor + Quebra +
"VSNumNfc: " + VVSNumNfc + Quebra +
"VSCodSnf: " + VSCodSnf + Quebra +
"VSTipNfe: " + VVSTipNfe + Quebra +
"VSDatEnt: " + VVSDatEnt + Quebra +
"VSDatEmi: " + VVSDatEmi + Quebra +
"VSTnsPro: " + VSTnsPro + Quebra +
"VSTnsSer: " + VSTnsSer + Quebra +
"VSCodCpg: " + VSCodCpg + Quebra +
"VSVlrliq: " + VVSVlrliq + Quebra +
"VSVlrFin: " + VVSVlrFin + Quebra +
"VSCodSel: " + VSCodSel + Quebra +
"VSCodSsl: " + VSCodSsl + Quebra +
"VSNumCtr: " + VVSNumCtr + Quebra +
"[&OK]";
Mensagem(Retorna,StrAux);

XX = 0;
fim

Variáveis Disponibilizadas:

Nome Tipo Observações Retorna Valor
VSCODEMP NÚMERO Código da empresa N
VSCODFIL NÚMERO Código da filial N
VSCODFOR NÚMERO Código do fornecedor da NFE N
VSNUMNFC NÚMERO Número da NFE N
VSCODSNF ALFA Código da série da NFE N
VSTIPNFE NÚMERO Tipo de NFE N
VSDATENT DATA Data da Entrada da NFE N
VSDATEMI DATA Data de emissão da NFE N
VSTNSPRO ALFA Transação da NFE para produtos N
VSTNSSER ALFA Transação da NFE para serviços N
VSCODCPG ALFA Código da condição de pagamento da NFE N
VSVLRLIQ NÚMERO Total líquido da NFE N
VSVLRFIN NÚMERO Total financeiro da NFE N
VSCODSEL ALFA Código da Série Legal da nota fiscal de entrada N
VSCODSSL ALFA Código da Subsérie Legal da nota fiscal de entrada N
VSNUMCTR NÚMERO Número do Contrato N
CprATelAtu ALFA Tela de onde foi chamado o fechamento da nota N
CprNPrcNfc ALFA Procedência da nota fiscal 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ê?