Ir para conteúdo
  • Cadastre-se

Giovani Da Cruz

Membros
  • Total de ítens

    60
  • Registro em

  • Última visita

Contact Methods

  • Website URL
    http://www.infus.inf.br

Últimos Visitantes

2.278 visualizações

Giovani Da Cruz's Achievements

Enthusiast

Enthusiast (6/14)

  • Dedicated Rare
  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done

Recent Badges

8

Reputação

3

Community Answers

  1. Bom dia @Juliana Tamizou, segue em anexo o manual utilizado. Atenciosamente Giovani Da Cruz 1685563119393-gr---cob136---cobranca-web---layout-cnab-240---remessapdf.pdf
  2. Boa tarde! Verificamos a necessidade de realizar um ajuste, no arquivo ACBrBancoUnicredES.pas para utilizar a opção "Dias para Negativação" O problema ocorre que ao montar o arquivo de remessa, o mesmo utiliza o mesmo valor para dias de protesto e dias de negativação. { Dias para protesto / Negativação } ADias := '00'; if Length(ACodProtesto) > 0 then begin if ACodProtesto[1] in ['1', '2'] then // protesto begin ADias := PadLeft(IntToStr(DiasDeProtesto), 2, '0'); end; if ACodProtesto[1] in ['4', '5'] then // negativação begin ADias := PadLeft(IntToStr(DiasDeNegativacao), 2, '0'); end; end; Também colocamos um ajuste para o código correto para a questão da negativação. if ACodProtesto = '7' then begin ACodProtesto := '4'; end; Com esta versão do arquivo, consegui homologar para CNAB 240. Gostaria de disponibilizar o arquivo para ver se pode ser útil ao projeto. ACBrBancoUnicredES.pas
  3. Olá. Estamos mantendo uma versão open source do User Control https://github.com/infussolucoes/usercontrol-sd Há diversas melhorias sugeridas por usuários, no entanto estamos atarefados aqui na empresa e não estamos conseguindo fazer as modificações sugeridas. Então estamos contratando freelancers com experiência em manipulação de componentes para realizar algumas melhorias no UserControl. A Suíte permanecerá Open Source. Interessados podem entrar em contato comigo. E-mail: [email protected] Skype: giovani_da_cruz
  4. Olá pessoal. Tenho interesse em contratar freelancers para o desenvolvimentos de algum módulos em html 5 Os módulos são integrações por json de sistemas existentes. E-mail para contato: [email protected]
  5. Seguinte, poderia carregar a lista de ocorrências, sem ter que instanciar um objeto. Exemplo: procedure TFrmRemessaCadastro.Button1Click(Sender: TObject); var I: Integer; vList : TACBrOcorrenciasRemessa; begin vList := TACBrBoleto.GetOcorrenciasRemessa(); ComboOcorrencia.Clear; for I := Low(vList) to High(vList) do begin ComboOcorrencia.Items.Add(vList[I].Descricao); ComboOcorrencia.Values.Add(GetEnumName(TypeInfo(TACBrTipoOcorrencia), Integer(vList[I].Tipo))); end; end;
  6. Olá pessoal! Estava analisando a função function GetOcorrenciasRemessa da unit acbr boleto, gostaria se saber se há possibilidades de deixar a mesma como class function como segue class function TACBrBoleto.GetOcorrenciasRemessa: TACBrOcorrenciasRemessa; var I: Integer; begin SetLength(Result, 41); for I:= 1 to 41 do begin Result[I-1].Tipo := TACBrTipoOcorrencia(I-1); Result[I-1].descricao := cACBrTipoOcorrenciaDecricao[I-1]; end; end; Assim se torna possível o uso da função se precisar instanciar um objeto. Desde já agradeço o retorno.
  7. Sim, estou utilizando as dlls de x64. Interessante que funcionava em antes da alteração do endereço, a pesquisa de cnpj funciona normalmente, no x64. Outro detalhe interessante é que testando o exemplo executando no D, funciona, mas no C, mesmo como administrador, da o Erro 500.
  8. Encontrei um problema mesmo compilando o programa de exemplo. Delphi 10 Seatle, Windows: Diversos compilação: 64 bits OBS: Colocando o exe gerado na pasta C:\arquivos de programas... Em x32 funciona normalmente. Em x64 em uma pasta comum O erro ocorre: procedure TACBrConsultaCPF.Captcha(Stream: TStream); HTTPGet('https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATCTA/CPF/captcha/gerarCaptcha.asp'); HTTPMethod( 'GET', AURL ); HTTPSend.HTTPMethod(Method, AURL); aqui a propriedade HTTPSend.ResultCode fica 500. Sendo que depois dará o erro aqui OK := HTTPSend.ResultCode = 200; //... if not OK then raise EACBrHTTPError.Create( 'Erro HTTP: '+IntToStr(HTTPSend.ResultCode)+' '+ HTTPSend.ResultString + sLineBreak + 'URL: '+AURL + sLineBreak + sLineBreak + 'Resposta HTTP:' + sLineBreak + String(AjustaLinhas( AnsiString(RespHTTP.Text), 80, 20) )) ; Detalhe o erro só ocorre na compilação x64 e executando em uma pasta mais restrita ex : c:\Program Files
  9. Testando agora, com os fontes atualizados de hoje, verifiquei que o problema foi resolvido com o Fortes. Com fast, não aparece qualquer informação dos dados de entrega. Testado com DANFeRetrato, DANFeRetratoNovo atualizados. conferencia.xml
  10. Nos meus testes utilizei o fortes. Vou tentar com o fast para ver se o problema persiste.
  11. Olá pessoal. Fazendo alguns testes com o endereço de entrega, percebi um detalhe. O complemento não esta saindo no danfe. No xml, tudo é preenchido corretamente, e o logradouro, número, bairro e etc aparecem automaticamente no danfe, porém o complemento não. Alguém já passou pelo mesmo problema? Talvez seja algo que esteja fazendo errado, mas não consegui identificar.
  12. Olá pessoal, alguns clientes de minha empresa reportaram a necessidade de importar dados de pessoas para o Sistema dos correios, o SIGEP. Conforme o manual, criei um componente para facilitar a geração do arquivo. Este componente foi criado, mantendo o padrão do ACBr e gostaria de saber se pode ser adicionado aos componentes. Segue em anexo os fontes do componente e o manual de geração do arquivo. O caminho das unit já esta no padrão do ACBr também, mas coloquei todos os arquinos no mesmo zip, a fim de facilitar o upload. ACBrSIGEP.zip Importação de Dados - SIGEP.docx
  13. Pelo que sei, você pode criar um formulário próprio para fazer um login personalizado no User Control. Se você estiver usando o UserControl da comunidade Show Delphi, Existe um fórum http://showdelphi.com.br/forum/forum/duvidas-e-problemas-relacionados-ao-usercontrol-showdelphi-edition/. Link do repositório git para baixar o componente: https://github.com/infussolucoes/usercontrol-sd Descrição dos componentes: http://showdelphi.com.br/descricao-dos-componentes-usercontrol/
  14. Olá. Tentei pesquisar aqui no fórum antes, mas não encontrei o que procurava. Seguinte, estou listando as notas destinadas a meu cliente normalmente com o exemplo DMDFe.NFe.DistribuicaoDFe. Até ai, tudo bem. Porém não estou conseguindo saber a situação da Manifestação da NF-e. Gostaria e exibir semelhante ao MD-e gratuito. Tem isto implementado no projeto? Caso positivo, alguém pode me dar escrever aqui um breve exemplo? Desde já, agradeço a colaboração.
×
×
  • 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.