Jump to content

Rafael Cruz

Membros
  • Posts

    146
  • Joined

  • Last visited

Everything posted by Rafael Cruz

  1. Só pra atualizar, consegui resolver o problema da impressão alterando a resolução de tela, verifiquei a maquina que imprimia sem problemas, resolução 1366 x 766, a maquina que não imprimia correto, estava em full HD, 1920 x 1080, ao baixar a resolução e testar, a impressão saiu correta. Agradeço aos tópicos e a atenção de todos pela ajuda!
  2. Diferença dos DACTEs.rar Aqui as imagens nomeados com as respectivas maquinas, e como se a maquina 2(PC2) não estivesse atualizado, se for algo algo externo, estou sem ideia do que possa ser
  3. Uso Fortes, é mesmo executável nos dois terminais
  4. Olá pessoal! Estava gerando CTes de duas maquinas, com um sistema com as mesmas configurações, em questão de arquivos e caminho de banco de dados( 2 terminais pra um mesmo servidor), ambos emitem o CTe sem problemas, da "Autorizado pela sefaz", porem na hora de imprimir, 1 deles(Vou definir como PC1) gera o DACTE correto, com o novo padrão com QRCode, mas a outra(PC2) gera sem o QRCode, mesmo com o xml contendo a tag, tentei trocar pasta schemas, até copiei a pasta completa do sistema do PC1 para o PC2, porem ainda o layout de impressão continuou diferente. Alguem ja passou por algo parecido ou saiba o que possa estar acontecendo?
  5. Bom dia Juliana, Fiz atualização do ACBr em outro pc e continua da mesma forma if DataProtesto <> 0 then begin if TipoDiasProtesto = diCorridos then AStringList.Add(ACBrStr('Protestar em ' + IntToStr(DaysBetween(Vencimento, DataProtesto))+ ' dias corridos após o vencimento')) else AStringList.Add(ACBrStr('Protestar no ' + IntToStr(DaysBetween(Vencimento, DataProtesto))+ ' dia útil após o vencimento')); end; e não tem a property nova que criei Fico no aguardo
  6. Fiz o seguinte pra resolver isso da impressão na unit ACBrBoleto no private criei fDiasDeProtesto: Integer; criei uma property property DiasDeProtesto: Integer read fDiasDeProtesto write fDiasDeProtesto; no create fDiasDeProtesto := 0; e na impressão if TipoDiasProtesto = diCorridos then AStringList.Add (ACBrStr('Protestar em ' + IntToStr(DaysBetween(Vencimento, DataProtesto)) + ' dias corridos após o vencimento')) else AStringList.Add (ACBrStr('Protestar no ' + IntToStr(DiasDeProtesto) + ' dia útil após o vencimento')); PS: não pude usar property DiasProtesto pq já era usada no banco do brasil só passei o numero de dias de protesto na property nova. Se tiver outra solução ou for essa o componente poderia ser ajustado No aguardo
  7. Boa tarde, Estou verificando a emissão de boleto CNAB 400 para banco Itau e surgiu um detalhe. Cliente com protesto 7 dias uteis, o vencimento do titulo é 21/12.. 7 dias corridos a data do protesto é 30/12. Eu seto então as 2 datas nas respectivas propriedades. O componente então lança faz o seguinte if DataProtesto <> 0 then begin if TipoDiasProtesto = diCorridos then AStringList.Add(ACBrStr('Protestar em ' + IntToStr(DaysBetween(Vencimento, DataProtesto))+ ' dias corridos após o vencimento')) else AStringList.Add(ACBrStr('Protestar no ' + IntToStr(DaysBetween(Vencimento, DataProtesto))+ ' dia útil após o vencimento')); end; Para dia util portanto, esta usando o DaysBetween, e a mensagem sai com 9 dias úteis após vencimento, quando o correto seria 7 dias. Verifiquei se existe a propriedades DiasUteis no componente ou algo do tipo, ai alteraria essa função acima mais não encontrei. Alguem resolveu esse detalhe?
  8. Daniel, estou testando o demo do ACBrPosPrinter, subi o bmp pelo sw do fabricante, com indice 01. Pelo sw do fabricante imprime a imagem, porem como mando o comando da impressão da imagem pelo componente?
  9. boa tarde, como faço para imprimir uma imagem usando o ACBrPosPrinter, setando impressora Epson. com o comando que o Demo gera </zera> </ce> Logo: - FatorX: 1 - FatorY: 1 </logo> </corte_total> não encontrei como faço a impressão da imagem obrigado
  10. Entendi Juliomar, não vou conseguir fazer os testes então!! obrigado pela ajuda
  11. Bom dia a todos, estou instalando o ACBr com o Seatle Update 1, baixei o ultimo fonte pelo svn, os pacotes que preciso instalam todos com sucesso. quando abro a IDE aparece a mensagem que não pode ler o pacote x conferi os paths na IDE e estão apontando para a pasta ACBr, mais minha pasta C:\ACBr\Lib\Delphi\LibD23 está vazia foi dada permissão Todos na pasta ACBr, foi aberto o install como administrador. Alguma idéia []s.
  12. entendi... é verdade versão 3.10... quase meia noite não me atentei a isso mais enfim vou entrar em contato com o fornecedor pra ele fazer o ajuste obrigado a todos
  13. boa noite amigos, tenho implementado a leitura de xml para entrada de estoque e observei um fato curioso um fornecedor enviou alguns xml mes 11/2015 com a versão 2.0 (imagem1) com a tag <dhEmi>2015-11-19T00:00:00-02:00</dhEmi> como essa tag foi alterada na versão 3.00 o componente não le essa tag, na function LerXML() está if NFe.infNFe.Versao >= 3 then begin (*B09*) NFe.ide.dEmi := Leitor.rCampo(tcDatHor, 'dhEmi'); (*B10*) NFe.ide.dSaiEnt := Leitor.rCampo(tcDatHor, 'dhSaiEnt'); end else begin (*B09*) NFe.ide.dEmi := Leitor.rCampo(tcDat, 'dEmi'); (*B10*) NFe.ide.dSaiEnt := Leitor.rCampo(tcDat, 'dSaiEnt'); (*B10a*)NFe.ide.hSaiEnt := Leitor.rCampo(tcHor, 'hSaiEnt'); end; na versao 2.00 a tag seria dEmi e não dhEmi, não sei como o fornecedor conseguiu validar a nota
  14. Perfeito pessoal, envio do evento por email funcionando!! Só atualizar os clientes Agora testar CTe e MDFe com trunk2 Obrigado e todos pela ajuda!
  15. Perfeito, funcionou. atualizei novamente o trunk2 e vi no demo que mudou a função LoadXML. O envio do email do evento de carta de correção e cancelamento, não foi implementado no trunk2? Obrigado pela ajuda.
  16. Daniel, não entendi como resolver isso, como eu disse no post acima, eu seto a propriedade configuracoes.arquivos.salvar pra true e o arquivo 1101103515110801008200016755001000003625100003625005-procEventoNFe.xml ja salva dessa forma que não abre no browser. quando eu usava o trunk não tinha esse problema tentei debugar as rotinas não mais encontrei esse detalhe do ACBrUtil.ACBrStrToUTF8() que vc mencionou abraço
  17. boa tarde Italo, atualizei o trunk2 novamente e continua com esse problema, porém não consegui debugar o componente pra ver se ajudo a resolver isso. alguma sugestão?
  18. bom dia Italo, refiz aqui os testes e o que ocorre é o seguinte no trunk2 eu transmito a carta de correção ok, o componente salva só esse arquivo 1511271007-eve.xml que abre normal. (em anexo) se eu seto a propriedade do componente configuracoes.arquivos.salvar pra true, ele salva o arquivo 1101103515110801008200016755001000003625100003625005-procEventoNFe.xml (em anexo), mais esse arquivo esta corrompido. Esse é o padrão que eu usava no trunk, que ia por email para o cliente com o pdf. vou ver se encontro algo sobre isso nos fontes do componente 1511271007-eve.xml 1101103515110801008200016755001000003625100003625005-procEventoNFe.xml com o cancelamento esta perfeito, eu seto a propriedade do componente configuracoes.arquivos.salvar pra true, ele salva o arquivo do evento no padrao 1101113515110801008200016755001000003625100003625001-procEventoNFe.xml sem problemas
  19. é gerado o arquivo xml do evento registrado correto da hora da transmissão, como segue o anexo mais nao salva o arquivo com nome correto depois 1101103515110801008200016755001000003617100003617804-procEventoNFe.xml 1511262157-eve.xml
  20. boa noite amigos, baixei o trunk2 e estou fazendo os testes para entrar em produção. enviei uma carta de correção e o arquivo xml salvo está com erro. em anexo xml e imagem outra questão que vi no demo ainda não é enviado por email pelo componente acbrmail o evento de cancelamento e carta de correção? obrigado 1101103515110801008200016755001000003617100003617804-procEventoNFe.xml
  21. blza Vinicius, instalou eu estava usando o repositório antigo, depois que vi no seu post acima... é a pressa... rsss mais valeu pela ajuda.. abraço
  22. boa tarde, Estou tendo dificuldades com a instalação do trunk2 no Seatle. Tenho uma outra partição no pc para testes, com windows 10, Seatle. Não tem nada do ACBr instalado nessa partição e tentando instalar o básico do ACBr já nao instala o primeiro pacote. Instalação 32 bits. Compilation failure Erro ao compilar o pacote "ACBr_synapse.dpk". Alguma idéia? segue meu arquivo de log da instalação log_Delphi_10_Seattle.txt
  23. boa tarde Ítalo, É NF-e mesmo, tb tenho um software rodando a um bom tempo sem homologação. É que um consultor está nos ajudando em melhorias no software e comentou que era necessário homologar e não achei nada sobre o assunto. Ele deve ter se confundido. Mais valeu amigo, abraço
  24. ola a todos!!! pesquisei sobre esse assunto e encontrei posts antigos, como esta o assunto sobre homologação de software para emissão de NFe pra SP, é obrigatório, se sim como proceder, não encontra-se muito assunto sobre isso abraço
  25. Para a carteira 11 cedente tamanho 7 tambem foi ajustado e funcionou else if ((wTamConvenio = 7) and (wCarteira = '11')) then Result := 17
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.