Ir para conteúdo
  • Cadastre-se
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Desenv. AT Info Sistemas

Membros Pro
 Perfil  Explorar Conteúdo

  • Total de ítens

    556

  • Registro em

  • Última visita

  • Days Won

    1

 Tipo de Conteúdo 

Tudo que Desenv. AT Info Sistemas postou

  1. Desenv. AT Info Sistemas
    Alterei para Dest.indIEDest := inNaoContribuinte e mesmo assim não transmite...
  2. Desenv. AT Info Sistemas
    Daniel, muito obrigado, era isto mesmo que eu estava precisando.
  3. Desenv. AT Info Sistemas
    Pois é, tentei alterar para a nova função e da problema, é que temos a nota fiscal de serviço da nossa cidade e estamos usando o componente somente para retornar o certificado .
  4. Desenv. AT Info Sistemas
    Boa tarde, está função de SelecionarCertificado tem um efeito diferente, a GetCertificado que existia retornava um objeto do tipo "ICertificate2", tentei olhar em várias funções e não encontrei.
  5. Desenv. AT Info Sistemas
    Boa tarde, não estou conseguindo encontrar a função "GetCertificado" que uma ves se encontrava no caminho -> ACBrNFe.Configuracoes.Certificados.GetCertificado, tentei procurar no ACBRNfe.SSL. porem não encontrei, e no forum aqui pesquisei um pouco e não tive sucesso nos posts que criaram. Att Matthias
  6. Desenv. AT Info Sistemas
    Brotheeeeeeeeeer, foiiiiiiiiiiiiiiiii, dei um cleanup na pasta e limpou tudo e FOIIIIIIIIIIIIIIIIIIIIII. VLWWWWWWWWWWWWWWWWWWWWWWWWW, Obrigado a todos do fórum pela ajuda.
  7. Desenv. AT Info Sistemas
    Em anexo, obrigado pela ajuda, vou criar uma VM e vou fazer uns testes enquanto isso. log_Delphi_XE3.txt
  8. Desenv. AT Info Sistemas
    Boa tarde Tiago, acabei de tentar sua sugestão e mesmo assim não funcionou :((( removi o trunk, baixei o trunk 2, rodei o bat no disco C e D e tentei instalar.
  9. Desenv. AT Info Sistemas
    Tentei apagar a pasta do trunk e apagar no Delphi no library e os componentes instalados, mas mesmo assim persisto com o mesmo problema.
  10. Desenv. AT Info Sistemas
    Opa, segue em anexo. log_Delphi_XE3.txt
  11. Desenv. AT Info Sistemas
    Bom dia, vi na entrada no fórum que era já possível instalar o NFS-e no trunk2, tentei fazer a instalação e o CT-e e NF-e instalaram mas o NFS-e e o MDF-e estão dando o mesmo erro. Erro: ACBr_NFSe.dpk(39) Fatal: E2202 Required package 'ACBrComum' not found ACBr_MDFe.dpk(36) Fatal: E2202 Required package 'ACBrComum' not found Meu repositório esta na última versão, fiz update agora pouco. Att Matthias Bebber Breda
  12. Desenv. AT Info Sistemas
    Bom dia Italo, desculpe a demora acabei olhando só hoje, em anexo tem um XML de exemplo e os Schemas. Schemas_data_center.zip nota18_export.xml
  13. Desenv. AT Info Sistemas
    O ACBr funciona em qualquer versão do Delphi a partir da 7. Bom dia, instalei a ultima versão e esta dando problema no fonte "pcnGerador" -> [dcc32 Error] pcnGerador.pas(895): E2003 Undeclared identifier: 'PadR' . Tentei apagar tudo e reinstalar mas sem sucesso.
  14. Desenv. AT Info Sistemas
    Boa tarde Italo, conseguistes fazer a alteração no componente para aceitar 1 ou mais serviços ?
  15. Desenv. AT Info Sistemas
    Ok, estamos aguardando.
  16. Desenv. AT Info Sistemas
    Bom dia Italo, obrigado pelo retorno. Em anexo os Schemas do servidor Tecnos e também um XML gerado pelo portal de homologação da Prefeitura de Flores da Cunha com 2 serviços. Qualquer coisa estamos a disposição. nota18_export.xml Schemas_Tecno.zip
  17. Desenv. AT Info Sistemas
    Boa tarde, estamos tentando inserir multiplos itens de serviço do provedor Tecno, mas ao gerar o XML ele só preenche 1 serviço. Percebemos que no exemplo tem um provedor chamado "SimplISS" que permite informar mais de 1 serviço. Existe a possibilidade de enviar multiplos itens de serviço para o provedor da Tecno ? Att Matthias Atinfo Sistemas
  18. Desenv. AT Info Sistemas
    Este campo -> "InfAdic.infCpl" ? Mas este vai mostrar no nas observações no meio do NFC-e, gostaria de imprimir no final sem ter que mandar outro comando pra impressora.
  19. Desenv. AT Info Sistemas
    Bom dia, gostaria de saber se tem alguma opção de adicionar um texto a ser impresso logo depois do NFC-e, por exemplo "Volte Sempre". Att Matthias
  20. Desenv. AT Info Sistemas
    Boa tarde, em alguns clientes ao carregar o certificado digital está demorando em média 2 minutos, acontece sempre, o certificado de todos os clientes são A1. Pesquisei aqui no forum e encontrei um caso aonde alteraram no fonte "ACBrNFEConfigurações.pas" um parâmetro da chamada do capicom, alterando de "CAPICOM_STORE_OPEN_READ_ONLY" para "CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED", tentei fazer esta alteração mas acontece a mesmo problema, e é neste comando mesmo que fica "pendurado", olhe abaixo: if DFeUtil.EstaVazio( FNumeroSerie ) then raise EACBrNFeException.Create('Número de Série do Certificado Digital não especificado !'); Result := nil; Store := CoStore.Create; // Store.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_STORE_NAME, CAPICOM_STORE_OPEN_READ_ONLY); Store.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_STORE_NAME, CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); Alguem tem idéia do que pode ser ?
  21. Desenv. AT Info Sistemas
    **Obs: fiz no forum errado, me desculpem, era no da NFE. Boa tarde, em alguns clientes ao carregar o certificado digital está demorando em média 2 minutos, acontece sempre, o certificado de todos os clientes são A1. Pesquisei aqui no forum e encontrei um caso aonde alteraram no fonte "ACBrNFEConfigurações.pas" um parâmetro da chamada do capicom, alterando de "CAPICOM_STORE_OPEN_READ_ONLY" para "CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED", tentei fazer esta alteração mas acontece a mesmo problema, e é neste comando mesmo que fica "pendurado", olhe abaixo: if DFeUtil.EstaVazio( FNumeroSerie ) then raise EACBrNFeException.Create('Número de Série do Certificado Digital não especificado !'); Result := nil; Store := CoStore.Create; // Store.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_STORE_NAME, CAPICOM_STORE_OPEN_READ_ONLY); Store.Open(CAPICOM_CURRENT_USER_STORE, CAPICOM_STORE_NAME, CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); Alguem tem idéia do que pode ser ?
  22. Desenv. AT Info Sistemas
    Não, ele não substitui pelo texto anterior sem concatenação, de uma olhada abaixo. cdsEmitenteDADOS_ENDERECO.AsString := Trim(FieldByName('XLgr').AsString) + ', ' + trim(FieldByName('Nro').AsString); if (trim(FieldByName('XCpl').AsString) <> '') then cdsEmitenteDADOS_ENDERECO.AsString := cdsEmitenteDADOS_ENDERECO.AsString + ', ' + Trim(FieldByName('XCpl').AsString); cdsEmitenteDADOS_ENDERECO.AsString := cdsEmitenteDADOS_ENDERECO.AsString + ' - ' + Trim(FieldByName('XBairro').AsString) + ' - ' + Trim(FieldByName('XMun').AsString) + ' - ' + Trim(FieldByName('UF').AsString) + #13 + 'Fone: ' + Trim(FieldByName('Fone').AsString) +
  23. Desenv. AT Info Sistemas
    Funcionou, na verdade esse IF é só pra concatenar o complemento quando existe, senão tem complemente continua como era antes.
  24. Desenv. AT Info Sistemas
    Bom dia, tive que colocar na impressão da DANFE do FastReports o campo complemento do remetente (cdsEmitente.FieldByName('XCpl')) que estava faltando. Acredito que este campo seja essencial para os dados do remetente, então enviei em anexo o fonte alterado para os senhores efetuarem um merge. Qualque dúvida estou a disposição. Att Matthias Bebber Breda ACBrNFeDANFEFRDM.pas
  25. Desenv. AT Info Sistemas
    Descobri vasculhando nos fontes que fazem a impressão que tem um parametro chamado ImprimirUnQtVlComercial no ACBRNfeDanfeFR, que ao ativar ele imprime a quantidade, unidade e valor comercial e não o tributado, e exatamente isso que eu preciso, obrigado pela ajuda
×
×
  • 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.