Ir para conteúdo
  • Cadastre-se

Eduardo Vasconcellos

Membros
  • Total de ítens

    11
  • Registro em

  • Última visita

Posts postados por Eduardo Vasconcellos

  1. Caros,

    Quando há erro na RPS ao enviar uma nota para o servidor de São paulo ( ProSP ) retorna '0' na variável FProtocolo em vez de '' e passa direto na linha 2340 - if FProtocolo <> '' then

    Dá erro logo mais abaixo List out of bounds em 2354 - FNotasFiscais.Items.NFSe.Numero := RetEnvLote.InfRec.ListaChaveNFeRPS.ChaveNFeRPS.Numero; porque não há nota fiscal retornada.

    Dessa forma não retorna a mensagem de erro do servidor.

  2. Eu me deparei com o mesmo problema.

    A variável Fprotocolo é retornada com valor '0' e não '' quando o RPS tem erros e passa direto pela linha 2340   if FProtocolo <> '' then na unit ACBrNFSEWebServices.

    O erro acontece logo abaixo na linha 2354 FNotasFiscais.Items.NFSe.Numero := RetEnvLote.InfRec.ListaChaveNFeRPS.ChaveNFeRPS.Numero;

     

  3. Gean,

    Quando o boleto vence que começamos a cobrar multa e mora. Algumas pessoas preferem conceder um ou mais dias para o sacado pagar sem multa e mora. Acredito que esse campo de data de mora e multa tenha sido criado para isso. Não vejo muito sentido prático em começar a cobrar a multa e mora em dias diferentes. Se você tem essa solicitação de seu cliente terá de implementar você mesmo um campo a mais para conter esta data.

  4. Implementei esta opção de envio de multa e já está em produção aqui.

     

    Modificar ACBrBancoItau na procedure GerarRegistroTransacao400 linha 449

     

    - incluir após  ATipoEspecieDoc, ANossoNumero,wLinha,wCarteira :String;

      

    wMulta :String;

     

    - incluir após IntToStrZero(aRemessa.Count + 1, 6);

     

    if PercentualMulta>0 then
      begin
           wMulta:= '2'+//tipo de registro - 2 OPCIONAL – COMPLEMENTO DETALHE - MULTA
                          '2'+//CODIGO DA MULTA X(001) 2-percentual
                          FormatDateTime('ddmmyyyy',DataMoraJuros)+//DATA DA MULTA 9(008)
                          IntToStrZero( round(PercentualMulta * 100 ), 13) +//VALOR/PERCENTUAL A SER APLICADO 9(013)
                          space(371)+//
                          IntToStrZero(aRemessa.Count + 2 , 6);//sequencial
                          wLinha := wLinha + #13 + wMulta; //acrescenta linha multa
      end;
     
    Segue arquivo modificado em anexo.
    Espero ter ajudado.
     

    ACBrBancoItau.pas

  5. Olá, caros amigos.

     

    Existe um comando trocado no AcbrBancoSantander.pas

     

    na linha 203:

     

             toRemessaCancelarInstrucaoProtesto     : Ocorrencia := '18'; {Sustar protesto e manter na carteira}

     

    correto seria

     

             toRemessaCancelarInstrucaoProtesto     : Ocorrencia := '98'; {Cancelar instrução de protesto}
             toRemessaSustarProtesto                       : Ocorrencia := '18'; {Sustar protesto e manter na carteira}
     
     
    Conforme manual disponível do santander para layout 400.
    Seria possível alterar este arquivo?
     
    Muito grato pela atenção.
  6. Olá, caros amigos.

     

    O Santander retornou erro no meu layout CNAB do Santander.

    Verifiquei e realmente há algo estranho no código que segue abaixo:

     

    Unidade ACBrBancoSantander.pas

     

    Linha 155 - padR( CodigoTransmissao, 20, '0') 

    linha 250 -  padL(trim(Cedente.CodigoTransmissao),20,'0') 

     

    Isso está causando um alinhamento diferente no header e no transação para o campo código de transmissão.

     

    revisão 6429

  7. Eu também não consigo colocar o logo do banco nos boletos com fast report. O path que uso para imprimir no fortes não funciona no fast report e nem colocando o logo através do evento do componente a logo entra.

    Uso Delphi Xe2 update 3. Vou testar as mudanças do colega para ver se funciona.

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...