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

CRE-301MORALLB

Módulo: CRE - Contas a Receber.

Finalidade: personalizar o recebimento dos links de boletos. É acionado quando o web service de alteração parcial de títulos (com.senior.g5.co.mfi.cre.titulos, porta AlteracaoParcialTitulosCR) altera o link de boleto de um título. Lembrando que, se houver algum erro na regra, o processo de alteração é cancelado e o web service retorna um alerta.

Transação: não se aplica.

Regra:

Possui as variáveis de entradas preenchidas conforme exemplo de regra abaixo. Não possui variáveis de retorno/saída.

@ Variáveis de entrada da regra @
Definir Numero VSNUMNFV;
Definir Numero VSCODEMP;
Definir Numero VSCODFIL;
Definir Alfa VSCODSNF;   
Definir Alfa VSLinkBoleto;
@ A variável E301TCR.XXXXXX vem carregada com QUASE todos os dados da tabela E301TCR@ 
@ A variável E140NFV.XXXXXX vem carregada com todos os dados da tabela E140NFV (se houver relacionamento entre o título e uma nota de venda) @
@ A variável E140PAR.XXXXXX vem carregado com todos os dados da tabela E140PAR (se houver relacionamento entre o título e uma parcela da nota de venda) @

      
@ Não existem variáveis de saída/retorno na regra. @

      
@ ***************************** Exemplo Regra *********************************@      
      
Definir Alfa vAux1;
Definir Alfa vAux2;
Definir Alfa vAux3;   
Definir Alfa vAux4;
      
@ Emxemplo de como usar a chave da nota @   
Definir Alfa vChaveDaNota;   
IntParaAlfa(VSCODEMP, vAux1);
IntParaAlfa(VSCODFIL, vAux2);
IntParaAlfa(VSNUMNFV, vAux3); 
vChaveDaNota = vAux1 + vAux2 + vAux3 + VSCODSNF;

@ Exemplo de como usar os dados do título @   
Definir Alfa vDadosDoTitulo; 
IntParaAlfa(E301TCR.CodEmp, vAux1);  
IntParaAlfa(E301TCR.CodFil, vAux2);
vDadosDoTitulo =  vAux1 + vAux2 + E301TCR.NumTit + E301TCR.CodTpt;

@ Exemplo de como usar os dados da nota fiscal @
Definir Alfa vDadosDaNota;    
IntParaAlfa(E140NFV.CodEmp, vAux1);
IntParaAlfa(E140NFV.CodFil, vAux2);
IntParaAlfa(E140NFV.NumNfv, vAux3);
vDadosDaNota = vAux1 + vAux2 + vAux3 + E140NFV.CodSnf;

@ Exemplo de como usar os dados da parcela associada ao título @
Definir Alfa vDadosDaParcela;  
IntParaAlfa(E140PAR.CodEmp, vAux1);   
IntParaAlfa(E140PAR.CodFil, vAux2);
IntParaAlfa(E140PAR.NumNfv, vAux3);   
IntParaAlfa(E140PAR.CodPar, vAux4);
vDadosDaParcela = vAux1 + vAux2 + vAux3 + E140PAR.codsnf + vAux4;

Este artigo ajudou você?