jucieudo

OK Rafael. Desculpe-me então. Darei continuidade ao meu projeto em Delphi com ACBR. Quanto ao projeto utilizando o componente em framework, procurarei outra solução. Mais uma vez agradeço e peço-lhes desculpas.

Rafael, Obrigado pela resposta rápida. Já li as regras sim. Não vi nenhuma violação. Apenas comentei que até agora não consegui resolver meu problema. Já utilizo o ACBr desde o ano passado em Delphi 7 e estou perfeitamente satisfeito. O AcbrFramework, comecei em Junho e não estou conseguindo concluir meu projeto para gerar o sintegra. Vou repetir aqui apenas a linha onde citei o problema: O registro 10 está gerando erro na data inicial: 2013053118991230101 (a partir da posição 108 do registro 10) Agradeço desde já.

Boa noite a todos. Estou com problemas na geração do sintegra. Postei aqui no forum desde o dia 17-07-2013 e não obtive resposta. Alguém pode me ajudar?

Olá Amigos. Estou com esse mesmo problema. Instalei e atualizei na semana passada. Como resolvo?

Alguém pode ajudar? Ainda não resolvi!

Alguém pode ajudar? Ainda não consegui resolver!

ok. agradeço.

Olá! Vi que o amigo AndreSantana conseguiu gerar o sintegra normalmente. Estou com problema ao gerar o registro10. Informo a data inicial e a final, mas a data inicial está saindo diferente, exemplo: PE00000000812013053118991230101 (Final do registro 10) A parte riscada deveria sair: 20130501 Agradeço desde já, Juciêudo Kéfrem

Não amigo. Conferi várias vezes debugando. As datas informadas foram: Inicial: 01/05/2013 Final: 31/05/2013. Coloquei até manualmente durante o debug e o resultado foi o mesmo. Segue o código: Try AcBrSintegra1.Registro10.CNPJ = Fu_Zeros(reader("CNPJ").ToString, 14) AcBrSintegra1.Registro10.Inscricao = reader("IE").ToString AcBrSintegra1.Registro10.RazaoSocial = Fu_Brancos(reader("RAZÃO_SOCIAL").ToString, 35) AcBrSintegra1.Registro10.Cidade = Fu_Brancos(reader("CIDADE").ToString, 30) AcBrSintegra1.Registro10.Estado = Fu_Brancos(reader("ESTADO").ToString, 2) AcBrSintegra1.Registro10.Telefone = Fu_Zeros(reader("FONE").ToString, 10) AcBrSintegra1.Registro10.DataInicial = CDate("01/05/2013") AcBrSintegra1.Registro10.DataFinal = CDate("31/05/2013") AcBrSintegra1.Registro10.CodigoConvenio = VI_CODCONVENIO AcBrSintegra1.Registro10.NaturezaInformacoes = cmbNatureza.SelectedIndex + 1 AcBrSintegra1.Registro10.FinalidadeArquivo = cmbFinalidade.SelectedIndex + 1 Catch ex As Exception MessageBox.Show(ex.Message, "Erro ao gerar Registro10", MessageBoxButtons.OK, MessageBoxIcon.Error) End Try Try AcBrSintegra1.Registro11.Bairro = reader("BAIRRO").ToString AcBrSintegra1.Registro11.Cep = reader("CEP").ToString AcBrSintegra1.Registro11.Complemento = reader("COMPLEMENTO").ToString AcBrSintegra1.Registro11.Endereco = reader("ENDEREÇO").ToString AcBrSintegra1.Registro11.Numero = reader("NRO").ToString AcBrSintegra1.Registro11.Responsavel = txtResponsavel.Text AcBrSintegra1.Registro11.Telefone = reader("FONE").ToString Catch ex As Exception MessageBox.Show(ex.Message, "Erro ao gerar Registro11", MessageBoxButtons.OK, MessageBoxIcon.Error) End Try

Olá pessoal. Estou começando a desenvolver agora com o ACBrFramework. Utilizo o Visual Studio 2010 (Visual Basic). O registro 10 está gerando erro na data inicial: 2013053118991230101 (a partir da posição 108 do registro 10) Como posso resolver esse problema? Agradeço desde já. Juciêudo Kéfrem.