-
Total de ítens
11 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Eduardo Vasconcellos
-
-
Obrigado, Ítalo. Vou atualizar e testar novamente.
-
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.
-
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;
-
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.
-
Olá, Juliana.
Segue novamente o arquivo. Marquei minhas modificações para facilitar a identificação das mudanças.
-
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 thenbeginwMulta:= '2'+//tipo de registro - 2 OPCIONAL – COMPLEMENTO DETALHE - MULTA'2'+//CODIGO DA MULTA X(001) 2-percentualFormatDateTime('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);//sequencialwLinha := wLinha + #13 + wMulta; //acrescenta linha multaend;Segue arquivo modificado em anexo.Espero ter ajudado. -
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. -
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
-
A logomarca aparece nos boletos com fastreport após atualização dos arquivos do projeto hoje.
-
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.
ProSp retorna FProtocolo = '0' quando há erro no envio em vez de ''
em ACBrNFSe
Postado
Funcionou! muito grato.