Ir para conteúdo
  • Cadastre-se

Daniel Simoes

Fundadores
  • Total de ítens

    27.062
  • Registro em

  • Última visita

  • Days Won

    759

Tudo que Daniel Simoes postou

  1. Não devemos modificar a resposta do SEFAZ... se ela tem acentos, então temos que considerá-los... O problema de não abrir, ocorre pelo fato do arquivo estar usando um Encoding diferente do informado na TAG inicial A modificação que fiz, é para garantir que o arquivo seja sempre gravado com o Encoding de UTF8 (o mesmo informado na Tag inicial)
  2. Não é tão difícil assim... abra a Unit ACBrEscBematech.pas do Trunk2, e veja como é feita a impressão do QRCode
  3. É bom ter Olhos de águia... O "Resolvido" era um PlugIn para o Fórum, que ainda não foi disponibilizado nessa nova versão
  4. Não compreendi a pergunta... pois o ACBrSAT *SEMPRE*, retornou o XML do SAT
  5. O que você mudou especificamente ? Não vejo como essas mudanças no arquivo DFM, poderiam corrigir o problema..
  6. Não compreendi... conforme já foi dito antes... para o modelo ELGIN I9, é necessário usar: ppEscPosEpson Vários usuários aqui do fórum já usam a ELGIN I9, com sucesso... (com o modelo ppEscPosEpson)... Use a busca do fórum e confira... Verifique se a impressora está configura para modo EscPos
  7. O ideal é usar a porta Serial (ou um adaptador USB-Serial de boa qualidade).. Por favor faça um teste... na Unit ACBrECFEscEcf.pas, linha 979 mude: Sleep( 50 ); Para um valor maior... o recomendado no protocolo é 200... usei 50 para agilizar a comunicação...
  8. Sim, você pode usar o Tortoise para gerar um Patch, e ele gera um arquivo apenas com as diferenças.. Por favor descreva melhor a origem dos problemas... Aqui está compilando sem problemas em XE7, D7 e Lazarus
  9. Ok quanto o OR no IF... O que notei que no seu código, não tem o Índice Det.Prod O correto não seria: Det[i].Prod ? (Compilando aqui da sua maneira, ocorreu um erro de compilação)
  10. Aparentemente o problema ocorre porque esse modelo adiciona "Aplicativo:" no inicio da Linha... Resta saber se isso também ocorre com os demais equipamentos MFD da Bematech A sua mudança propõem: PadRight(Trim(MD5)+NomeVersao,84); Isso não irá piorá o quadro ? pois acredito que o resultado final será o MD5 concatenado com o Nome do programa: "12345NomedoProgreama"
  11. O modelo ppEscElgin foi criado justamente para a VOX... pode ser que seja necessária alguma configuração no equipamento... porém, não sei dar mais detalhes, pois (ainda) não tenho esse equipamento para testes... A Elgin já entrou em contato comigo, e estão enviando: uma Impressora I9, uma Impressora VOX e um SAT
  12. Não... o problema é que o S.O.não consegue encontrar a BPL quando a IDE tenta fazer a carga dinâmica dela...
  13. Muito obrigado pelo Exemplo... Acho que encontrei o problema... A confusão é que estava tratando o Delphi XE como se o mesmo gerasse código em UTF8, o que não é verdade (ele gera em Unicode)... Estou aplicando algumas correções... vou testar em Lazarus e D7, volto a postar em breve Se alguém desejar testar enquanto isso... Segue em anexo um Patch com as Units que foram modificadas ACBrDFe_Delphi_Unicode.patch
  14. Leia os fontes... Procedure SubtotalizaCupom( DescontoAcrescimo : Double = 0; MensagemRodape : AnsiString = '') ;
  15. Para reproduzirmos os testes... precisamos do arquivo ENT.TXT com os comandos que você está enviando
  16. o ACBrSAT.CFe, mapeia todas as tags do CFe... então sua dúvida provavelmente não é relativa ao ACBRSAT, mas ao desconhecimento das Tags do CFe... Para isso, faça o seu dever de casa... estude a Especificação Técnica do SAT
  17. copie a BPL do fortes para a pasta Projects\BPL do Delphi... ou adicione o diretório onde a BPL do fortes está, no seu Environmento, PATH
  18. Fique atento para o fato de que não é permitido por lei, a reimpressão de um Cupom fiscal ( o fisco entende que você poderia usar esse recurso para criar cupons falsos )
  19. Tem uma versão (não oficial) do com0com, com assinatura para o Win64.. eu uso ela atualmente.. https://code.google.com/p/powersdr-iq/downloads/detail?name=setup_com0com_W7_x64_signed.exe&can=2&q=
  20. Veja o Log... Parece que seus fontes contem modificações indevidas... na Unit ACBrBoleto.pas
  21. Você pode abrir os fontes do Trunk2 e ver o que foi feito... e com isso fazer um "Merge" nos seus fontes
  22. SIM, isso já existe... Veja no Demo o evento OnDepoisConfirmarTransacoes... Nele você pode ter acesso a todo o Log de informações retornado pelo SiTef procedure TForm1.ACBrTEFD1DepoisConfirmarTransacoes( RespostasPendentes: TACBrTEFDRespostasPendentes); var I : Integer; begin for I := 0 to RespostasPendentes.Count-1 do begin with RespostasPendentes[I] do begin Memo1.Lines.Add('Confirmado: '+Header+' ID: '+IntToStr( ID ) ); Memo1.Lines.Add( 'Rede: ' + Rede + ' NSU: ' + NSU + ' Valor: '+ FormatFloat('###,###,##0.00',ValorTotal)) ; Memo1.Lines.Add('Campo 11: ' + LeInformacao(11,0).AsString ); end; end; end; As informações principais são "mapeadas" para propriedades internas do componente... Ex: RespostasPendentes[I].Debito; RespostasPendentes[I].Credito; RespostasPendentes[I].ValorTotal; As informações que você quer obter e não tiverem propriedade, você pode acessar pelo Índice da mesma... O Exemplo abaixo retorna o texto da 1a via (apenas no Sitef) RespostasPendentes[I].LeInformacao(121,0); Para conhecer todas os retornos do Sitef, consulte o manual "SiTef - Interface Simplificada com a aplicação(VRS-150).pdf", observe porém, que nem todas as propriedades são retornadas, em todas as transações....
  23. Verifiquem com o Fabricante, se o equipamento está na última versão do Sw.Básico
  24. O correto não seria: if (nfe.Det[i].Prod.detExport[j].nRE <> '') or (nfe.Det[i].Prod.detExport[j].chNFe <> '') then ?
×
×
  • 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.