-
Total de ítens
6 -
Registro em
-
Última visita
Wendel Fassarela's Achievements
-
Wendel Fassarela changed their profile photo
-
Mas e os de Cancelamento e Carta de correção??
-
Boa tarde glr. Minha dúvida é simples. Toda vez que faço um evento, ou de cancelamento, inutilização e CCe. Eu guardo o XML gerado (não é o de retorno) dentro da minha tabela. Mas pelo ACBr eu não sei pegar o XML depois de chamar o método WebServices.Inutiliza ou Cancelar. Eu queria o XML preenchido com as informações que eu passo. Ou seja, o XML que é enviado para a receita. teria como?
-
Modificação necessária nas configurações do Banco do Brasil
um tópico no fórum postou Wendel Fassarela ACBrBoleto
Boa tarde, Vejo um problema nos arquivos do ACBrBoleto referente ao Banco do Brasil. No método CalcularTamMaximoNossoNumero, o valor padrão é 10, mas se olhar nos arquivos do cnab240, o valor padrão é 20. E em nenhum dos cáculos costantes no método, o valor é setado para 20. Isso causa um erro de leitura do arquivo. function TACBrBancoBrasil.CalcularTamMaximoNossoNumero( const Carteira: String; const NossoNumero : String = ''; const Convenio: String = ''): Integer; var wCarteira : String; wTamConvenio: Integer; begin Result := 20; //estava 10 antes if (ACBrBanco.ACBrBoleto.Cedente.Convenio = '') then raise Exception.Create(ACBrStr('Banco do Brasil requer que o Convênio do Cedente '+ 'seja informado.')); if (Carteira = '') then raise Exception.Create(ACBrStr('Banco do Brasil requer que a carteira seja '+ 'informada antes do Nosso Número.')); wCarteira:= Trim(Carteira); wTamConvenio:= Length(Trim(ACBrBanco.ACBrBoleto.Cedente.Convenio)); if (Length(trim(NossoNumero)) > 10) and (((wTamConvenio = 6) and ((wCarteira = '16') or (wCarteira = '18'))) or ((wTamConvenio = 7) and (wCarteira = '18'))) then Result:= 17 else if (wTamConvenio <= 4) then Result := 7 else if ((wTamConvenio > 4) and (wTamConvenio < 6)) or ((wTamConvenio = 6) and ((wCarteira = '12') or (wCarteira = '15') or (wCarteira = '17') or (wCarteira = '18'))) then Result := 5 else if (wTamConvenio = 6) then Result := 11 else if (wTamConvenio = 7) then Result := 10; end; -
Undeclared identifier: 'SNIHost'
Wendel Fassarela replied to Wendel Fassarela's tópico in Dúvidas Gerais sobre o ACBr
problema resolvido. Eu tinha uma pasta com umas funções antigas do acbr e no library essa pasta estava primeiro que os caminhos do acbr -
Undeclared identifier: 'SNIHost'
Wendel Fassarela replied to Wendel Fassarela's tópico in Dúvidas Gerais sobre o ACBr
Também já tentei colocar ela nas minhas pastas. e Nada. -
Undeclared identifier: 'SNIHost'
um tópico no fórum postou Wendel Fassarela Dúvidas Gerais sobre o ACBr
Está me dando esse problema na classe httpsend : [dcc32 Error] httpsend.pas(356): E2003 Undeclared identifier: 'SNIHost' function THTTPSend.InternalDoConnect(needssl: Boolean): Boolean; begin Result := False; FSock.CloseSocket; FSock.Bind(FIPInterface, cAnyPort); if FSock.LastError <> 0 then Exit; FSock.Connect(FTargetHost, FTargetPort); if FSock.LastError <> 0 then Exit; if needssl then begin if (FSock.SSL.SNIHost='') then FSock.SSL.SNIHost:=FTargetHost; FSock.SSLDoConnect; FSock.SSL.SNIHost:=''; //don't need it anymore and don't wan't to reuse it in next connection if FSock.LastError <> 0 then Exit; end; FAliveHost := FTargetHost; FAlivePort := FTargetPort; Result := True; end; alguém consegue me ajudar? Já copiei as dlls do OpenSLL 0.9.x pra dentro da pasta do projeto e do windows/system32 e syswow64 e já apaguei as dcus pela apagar acbr e reinstalei o trunck2. Também apaguei todo o ACBr e baixei dnv. Não sei mais o que fazer.