Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 03-05-2016 em todas as áreas

  1. Boa tarde a todos Seguindo alguns tópicos que encontrei no fórum, fiz um resumo da conversão que fiz para quem estiver migrando para o trunk 2, espero que possa ajudar alguém: CTe ** CTe * Valida De: ACBrCTe1.Conhecimentos.Valida; Para: ACBrCTe1.Conhecimentos.Validar; * Configuracoes.Geral.PathSalvar De: ACBrCTe1.Configuracoes.Geral.PathSalvar Para: ACBrCTe1.Configuracoes.Arquivos.PathSalvar * EnviarEventoCTe De: ACBrCTe1.EnviarEventoCTe(idLote); Para: ACBrCTe1.EnviarEvento(idLote); * De: if ACBrCTe1.Conhecimentos.Items[i].Confirmada then Para: if ACBrCTe1.Conhecimentos.Items[i].Confirmado then * De: ACBrCTe1.Conhecimentos.Items[i].SaveToFile(cFileName); Para: ACBrCTe1.Conhecimentos.Items[i].GravarXML(cFileName); * De: DFEUtil.LimpaNumero(cDocumento) Para: OnlyNumber(cDocumento) * De: ACBrCTe1.Configuracoes.Certificados.DataVenc Para: ACBrCTe1.SSL.CertDataVenc NFe ** NFe * De: cNroSerieCertificado := ACBrNFe1.Configuracoes.Certificados.SelecionarCertificado; Para: cNroSerieCertificado := ACBrNFe1.SSL.SelecionarCertificado; * De: ACBrNFe1.NotasFiscais.Valida; Para: ACBrNFe1.NotasFiscais.Validar; * De: ACBrNFe1.Configuracoes.Geral.PathSalvar; Para: ACBrNFe1.Configuracoes.Arquivos.PathSalvar; * De: ACBrNFe1.EnviarEventoNFe(idLote); Para: ACBrNFe1.EnviarEvento(idLote); * De: cSituacao := SituacaoNFeToStr(AcbrNFe1.WebServices.ConsNFeDest.retConsNFeDest.ret.Items[idx].resNFe.cSitNFe); Para: cSituacao := SituacaoDFeToStr(AcbrNFe1.WebServices.ConsNFeDest.retConsNFeDest.ret.Items[idx].resNFe.cSitNFe); * De: ACBrNFe1.NotasFiscais.Items[i].SaveToFile(cFileName); Para: ACBrNFe1.NotasFiscais.Items[i].GravarXML(cFileName); * Removidos: ( não existe mais DPEC) ACBrNFe1.WebServices.EnviarDPEC.Executar ACBrNFe1.WebServices.ConsultaDPEC.NFeChave ACBrNFe1.WebServices.ConsultaDPEC.Executar; * De: NFe.Det[idx].Prod.nItemPed := 0; Para: NFe.Det[idx].Prod.nItemPed := ''; * Disponível NFe.Det[idx].Prod.CEST ( trunk 2 ) * Remover Componentes ACBrNFeDANFERave1 e ACBrNFeDANFERaveCB1 * De: ACBrNFe1.NotasFiscais.Items[idx].SaveToFile(cFileName ); Para: ACBrNFe1.NotasFiscais.Items[idx].GravarXML(cFileName); * De: ACBrNFe1.Configuracoes.Certificados.DataVenc Para: ACBrNFe1.SSL.CertDataVenc NFSe ** NFSe * De: ACBrNFSe1.Configuracoes.Arquivos.PastaMensal := True Para: ACBrNFSe1.Configuracoes.Arquivos.SepararPorMes := True * De: ACBrNFSe1.Configuracoes.WebServices.CodigoMunicipio := 9999 Para: ACBrNFSe1.Configuracoes.Geral.CodigoMunicipio := 9999 * De: ACBrNFSe1.Configuracoes.WebServices.SetConfigMunicipio(ACBrNFSe1.Configuracoes.Geral.PathSchemas); Para: ACBrNFSe1.Configuracoes.Geral.SetConfigMunicipio; * De: ACBrNFSe1.Configuracoes.WebServices.SenhaWeb := cSenhaWeb; Para: ACBrNFSe1.Configuracoes.Geral.SenhaWeb := cSenhaWeb; * De: ACBrNFSe1.Configuracoes.WebServices.UserWeb := cUserWeb; Para: ACBrNFSe1.Configuracoes.Geral.UserWeb := cUserWeb; * De: cProvedor := ACBrNFSe1.Configuracoes.WebServices.xProvedor; Para: cProvedor := ACBrNFSe1.Configuracoes.Geral.xProvedor; * De: ACBrNFSe1.Configuracoes.Geral.PathSalvar; Para: ACBrNFSe1.Configuracoes.Arquivos.PathSalvar; * De: ACBrNFSe1.NotasFiscais.Items[0].NFSe.NaturezaOperacao := noTributacaoNoMunicipio; ACBrNFSe1.NotasFiscais.Items[0].NFSe.NaturezaOperacao := StrToNaturezaOperacao(ok, cNaturezaOperacao); Geral * pcnConversao ( ainda existe ) - especializado para pcnConversaoNFe e pcteConversaoCTe adicionem no uses pcnConversaoNFe e pcteConversaoCTe junto com pcnConversao * ACBrDFeUtil // Unificado: ACBrNFeUtil-ACBrNFEsUtil-ACBrCTeUtil ( não existem mais ) remover ACBrNFeUtil-ACBrNFEsUtil-ACBrCTeUtil e deixem ACBrDFeUtil * Added novo uses ACBrUtil * EstaVazio De: if DFeUtil.EstaVazio(cPathSalvar) then Para: if EstaVazio(cPathSalvar) then
    1 ponto
  2. Olá Josival, quero te dar uma sugestão para matar essa questão, temos que matar a cobra e mostrar ambos. Informa para essa pessoa que o campo Série é campo númerico, então estar informando 1, estar correto, e tem mais manda ele ler nota2013_005_v1_21, na página 45: 11B07 serie Série do Documento Fiscal E B01 N 1-11-3 Por experiencia tem que ser com documentos do nosso governo. Não adianta querer fazer cambiara remendo, é perder tempo, essa conversa que tem que pedir para a sefaz corrigir, 99.999999 de mentira... Obrigado, Leão
    1 ponto
  3. Julimar uanto a consulta já sabia que cada loop percorria 50 mil notas agora pra manifestar o máximo é 50 por vez ja não sabia obrigado
    1 ponto
  4. Pode ser o 040-000 então, olhe estes exemplos com REDECARD e VISANET, estes exemplos que tenho são de retornos um pouco antigos: REDECARD (Maestro) 000-000 = CRT ... 010-000 = REDECARD ... 040-000 = MAESTRO VASANET (ELO DEBITO) 000-000 = CRT ... 010-000 = VISANET ... 040-000 = ELO DEBITO São os unicos campos redefentes a Redes no Pay&Go, a não ser que tenha mudado alguma coisa.
    1 ponto
  5. Palpite: verifique a tag Ide.cNF caso deixe em branco, o componente gera um código aleatório e isso gera uma chave de acesso diferente. Att Ricardo
    1 ponto
  6. Boa noite! Vc está enviando o comando desta forma mesmo? Sem o chr(10) e chr(13)? Formate o texto O Correto é: Observe que os campos em vermelho vc não informou.
    1 ponto
  7. Também, usamos o firebird aqui e não temos problemas com esse linux...
    1 ponto
  8. 1 ponto
  9. Boa noite! adicionado ao svn a contribuição! Obrigado
    1 ponto
  10. Boa noite. A forma como a propriedade Modalidade está sempre passada está incorreta.. Ao invés de passar: Modalidade=017/027. Informe 17 na propriedade carteira do título e 27 na propriedade Modalide do cedente. Att.
    1 ponto
  11. esses casos se chama Backup! simples fácil e prático! ou HD Externo, ou e-mail, ou conta no gdrive, onedrive, dropbox!
    1 ponto
  12. Concordo com todos! Tivemos essa conversa hoje aqui na empresa. Para cada cliente, para cada tipo de empresa, para cada produto e estado haverá uma programação diferente. Complicadíssimo isso! Ainda bem que temos o projeto ACBR, mas que nosso cérebro frita na hora de fazer essas amarrações,frita. Parabéns a todos!
    1 ponto
  13. Desistiram de adequar o aplicativo deles porque são muitas alterações, NTs e Ajustes.
    1 ponto
  14. Boa noite Leonardo, Esta errado da forma que você montou o comando, pois desta forma você esta passando apenas um parâmetro e não 5. O correto é: MDFe.EncerrarMDFe("35150620451020000196580010000000151000000010", "29/06/2015", "1100205", "99999999999999", "1")
    1 ponto
×
×
  • 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.