Ir para conteúdo
  • Cadastre-se

jucieudo

Membros
  • Total de ítens

    10
  • Registro em

  • Última visita

Posts postados por jucieudo

  1. 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á.

  2. 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

  3. 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
  4. 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.

×
×
  • 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.