J Pereira

Grato amigão...

Bom dia amigos. Em qual fonte verifico que se já estou com a webservice atualizada para out/15? Como saber se meu acbr do trunk1 está com a versão atualizada? onde vejo esse numero de versão? Aos poucos estarei atualizando para o trunk2.

Bom dia Tentei gerar uma nfc-e com informações adicionais no item com ESCPOS, mas não imprimiu. Verifiquei que esta linha não estava disponivel no fonte, então pergunto se não é permitido por lei esta informação por item, já que também na consulta da nfc-e emitida na receita não exibe esta informação no cupom, somente nos dados detalhados. Na unit ACBrNFeDANFeESCPOS, linha 945, na procedure TACBrNFeDANFeESCPOS.GerarItens inclui o seguinte código: if FpNFe.Det.Items.infAdProd <> '' then begin FLinhaCmd := FpNFe.Det.Items.infAdProd; if Length(FLinhaCmd) > 40 then begin FBuffer.Add(cCmdAlinhadoEsquerda + cCmdFontePequena + ' ' + Copy(FpNFe.Det.Items.infAdProd,1,40)); FBuffer.Add(cCmdAlinhadoEsquerda + cCmdFontePequena + ' ' + Copy(FpNFe.Det.Items.infAdProd,41,40)); end else FBuffer.Add(cCmdAlinhadoEsquerda + cCmdFontePequena + FLinhaCmd); end Então, se for viável, solicito que sejam atualizados seus fontes para futuras atualizações. Grato pela disponibilidade de todos do AcBr. ACBrNFeDANFeESCPOS.pas

Bom dia. Desculpe a ignorância, mas o que são Trunk ou Trunk2? Baixei os fontes de svn://svn.code.sf.net/p/acbr/code

Bom dia a todos. A nível de ajuda: Usei pela primeira vez impressora Elgin i9 para impressão da nfc-e. Tudo ok, mas o corte do papel pegava o qr code. Verificando o código, e depois de alguns testes, observei que o numero de linhas entre cupons não funcionava, pois a elgin ignora o nulo ('') do rodape. troquei o nulo por espaço (' ') e funcionou. Observei também que daruma, bematech e elgin terminam com alturas diferentes de final de impressao, então acrescentei no meu sistema uma configuração para definir o numero de linhas entre cupons. abaixo modificações: procedure TACBrNFeDANFeESCPOS.PulaLinhas(NumLinhas: Integer); var i: Integer; begin if NumLinhas = 0 then NumLinhas := LinhasEntreCupons; for i := 0 to NumLinhas do begin FBuffer.Add(' ') end; end; ------------------------------------------------- if LinhasPosCupom <> 0 then ACBrNFeDANFeESCPOS1.LinhasEntreCupons := LinhasPosCupom; Abcs e parabens novamente pelos excelentes componentes.

Amigos, até que por fim consegui agora agora a solução. Sem muitos resultados, orei ao meu Senhor Jesus, e ele me deu uma luz: Removi o componente ECF e coloquei de novo. Simples assim. Mesmo tendo reinstalado e recompilado os componentes, nao tive sucesso, mas removendo o componente funcionou. Validei com o eECFc e passou: 201504 Em alguns arquivos ocorreram erros de totais, e estes nao sei mesmo como resolver, como no caso o 201503, mas os registros 04,10,19 e 20 foram gravados. Grato pela atenção de todos. Vcs estão de parabens pela excelente ferramenta. TDM_ECF-0002_201504_GR KRAFT.txt TDM_ECF-0002_201503_GR KRAFT.txt TDM_ECF-0002_201503_GR KRAFT-log.txt TDM_ECF-0002_201504_GR KRAFT-log.txt

Amigos, infelizmente ainda sem solucao. O eECFc gera o arquivo completo. Utilizei as dlls dele, mas ocorrer erro no Bematech_Fi_GeraRegistrosSpedFiscal

grato Daniel Simoes

Bom dia Juliomar o ECF é Bematech MP-2100 FI Fiz update pelo svn e o ecfdemo dá o mesmo resultado. As dlls estão atualizadas, usando a do acbr quanto da propria bematech. Observei que os registros E04, E19 e E20 gerados pelo eecfc estão zerados, mas o validador diz que está faltando esses regs gerados pelo acbr

Boa noite Estou tendo dificuldades em gerar os arquivos MFD e TDM, onde faltam registros. Mensagem do contador: não consta os Registros E02,E12,E13,E14,E15 e E16, Executando o eECFc realmente apontam estes erros. executei as seguintes linhas de comando: (assim como no EcfTeste) frm_principal.ACBrECF1.ArquivoMFD_DLL(StrToDate(Edit3.Text), StrToDate(Edit4.Text),cArquivo,[docTodos],finTDM); frm_principal.ACBrECF1.ArquivoMFD_DLL(StrToDate(Edit3.Text), StrToDate(Edit4.Text),cArquivo,[docTodos],finMFD); Alguém pode me dar uma luz??? Estou a tempos com isto e os clientes estão com urgencia. Anexo arquivos gerados pelo acbr e pelo eECFc versao v3.28 de 09/10/2012 O acbr fiz update pelo SVN e ocorre a mesma coisa. Grato pela atenção e ajuda. ArquivoMFDDATA-PAF20150611204839.txt ArquivoMFDDATA-PAF20150611204839log.txt eecfc.TXT eecfclog.txt

Olá Regis Veja na pasta "\Projetos\RecuperarXML", tem um demo funcional de como fazer isso. Não encontro esta pasta. Como fazer para pegar este xml do sefaz? Abcs

Boa noite. Encontrei este post enquanto garimpava novidade no AcBr. Eu também registro em relatorio de fechamento do caixa os cancelamentos de itens na venda ou de toda a venda, informando dia/hora e qual gerente autorizou. Exibo também num relatorio de log de operações. Abcs

Boa noite amigos: Como fazer para baixar o xml do sefaz? qual componente? Onde tem o exemplo? Grato

Olá, de novo. Fiz novo teste. Desinstalei o avast, removi tudo com RevoUninstaler. Reinstalei o avast o email foi enviado sem dificuldades. Amanhã vou testar no cliente. Grato pela ajuda de todos. Abcs

Boa noite a todos. Obrigado Juliomar, Astrogildo82 e Leao pelas dicas. 1-Fiz login na conta do google 1-Ativei os serviços usando os links acima. 2-Ativei o pop e imap na configuracao da conta do gmail. Ainda assim nao enviou. Desabilitei o Avast e então foi enviado. Alguém saberia aonde configurar no Avast para permitir este envio? Procurei e não. Deixá-lo desabilitado é muito perigoso. Grato pela ajuda até aqui. Abcs

Olá Atualizei as dlls e nada... Tela de erro em anexo

Juliomar, bom dia Substituirei sim as dlls, apesar de ter baixado de outro lugar, vou pegar do svn. Quanto ao gmail, entrei na configuração da conta e a principio está liberado pop e imap. Grato pela resposta. Abcs

Continuando... Pelo exemplo do demonfe, se nao marcar SMTP exige conexao segura, recebo como erro: STARTTLS command firts Como startar esse TLS? Já estou com as libs sslay32 libeau32 e libss32 na pasta do executavel e tb no system32 Uso windows 7 32bits Grato pela ajuda

Boa tarde: Não estou conseguindo enviar email para contas gmail. Consigo para hotmail e locaweb, mas nao gmail. Segui várias orientacoes e nada. Abaixo minhas linhas de codigo. Creio que o problema está em USAR AUTENTICAÇÃO. É a mesma coisa que SSL? Pelas instrucoes do gmail, deveriam estar marcados Servidor de e-mails enviados (SMTP) - requer TLS ou SSL: smtp.gmail.com Usar autenticação: sim Porta para TLS/STARTTLS: 587 Porta para SSL: 465 (https://support.google.com/mail/troubleshooter/1668960?hl=pt-BR&rd=1#ts=1665119,1665157,2769079) Tambem tenho duvidas quanto a marcar uma porta para TLS e outra para SSL. ACBrNFe1.NotasFiscais.Items[0].EnviarEmail(edtSmtpHost.Text , edtSmtpPort.Text , edtSmtpUser.Text , edtSmtpPass.Text , edtSmtpEmail.Text , Para , edtEmailAssunto.Text , mmEmailMsg.Lines , cbEmailSSL.Checked // SSL - Conexão Segura , True //Enviar PDF junto , nil //Lista com emails que serão enviado cópias - TStrings , nil // Lista de anexos - TStrings , False //Pede confirmação de leitura do email , True //Aguarda Envio do Email(não usa thread) , edtEmitFantasia.Text , cbEmailTLS.Checked , False // Usar Thread , False ); // Html Aguardo resposta dos amigos. Abcs

Olá. Pelo que sei o AcBrECF só pode ser impresso em impressoras fiscais. Pode usar o AcBrECF com o modelo de impressora NAO FISCAL, mas não irá imprimir um cupom fiscal. Quanto a porta USB, baixe do site o driver para este modelo, ele vai instalar uma porta serial virtual. Informe essa porta e verifique a velocidade. Normalmente as mini-impressoras colocam velocidade de 115200 bauds (principalmente Daruma). A Bematech precisa verificar qual é. Abaixo um exemplo de impressão nao fiscal (uso para relatorios): function TFrm_principal.EnviaComandoNaoFiscal(Linha: string): Boolean; Var CMD1,CMD2, C : String ; A : Integer ; T : String ; begin CMD1 := Linha ; T := '0' ; CMD2 := '' ; A := 1 ; while A <= length( CMD1 ) do begin C := copy( CMD1, A, 1) ; if C = '#' then begin CMD2 := CMD2 + chr( StrToIntDef(copy(CMD1,A+1,3),0) ) ; A := A + 3 ; end else CMD2 := CMD2 + C ; A := A + 1 ; end ; ACBrECFnf.EnviaComando( CMD2 );

Sim Niltom, realmente parece que houve um erro o que gera tanta confusão. Mas da forma como está acima funcionou, o que nos interessa. Possivelmente na proxima versão do manual eles devem corrigir isso. Abcs

Boa tarde a todos. Imprimo o danfe NFC-e porém nao consigo imprimir o qrcode. Solicitei ajuda a Bematech e eles me mandaram os comandos conforme abaixo. Pelo projeto deles consigo simular o qrcode exemplo. Alguem já está conseguindo imprimir na Bematech MP-2500 TH direto pelo Acbr ESCPOS? Abaixo exemplo do fonte deles: sPorta := Edit2.Text; sCenter := chr(27) + chr(97) + chr(1); sModuloWidth := chr(29) + chr(40) + chr(107) + chr(2) + chr(0) + chr(49) + chr(67) + chr(3); sErrorCorrection := chr(29) + chr(40) + chr(107) + chr(3) + chr(0) + chr(49) + chr(69) + chr(48); sStoreSymbolDate := chr(29) + chr(40) + chr(107) + chr(147) + chr(0) + chr(49) + chr(80) + chr(48); sBarCodeData := 'http://partners.bematech.com.br/suporte-recursos/downloads/?category=146http://partners.bematech.com.br/suporte-recursos/downloads/?category=146'; sPrintQrCodeSymbol := chr(29) + chr(40) + chr(107) + chr(3) + chr(0) + chr(49) + chr(81) + chr(48) + chr(27) + chr(64); sComando := sCenter + sModuloWidth + sErrorCorrection + sStoreSymbolDate + sBarCodeData + sPrintQrCodeSymbol; AssignFile(F, sPorta); Rewrite(F); WriteLn(F, sComando); WriteLn(F); CloseFile(F); Tentei substituir nos fontes TACBrNFeDANFeESCPOS.GerarRodape mas sem sucesso. O que poderiamos fazer para melhorar os fontes no SVN? Abcs Unit1.pas

Obrigado André, funcionou. Grato pela cooperação. Um ano de sucesso iluminado por Deus para vc. Anexado arquivos para quem desejar ver como fiz. 157.TXT

Boa tarde. Faço importação do txt para xml. Não estou conseguindo trazer o valor do ipi e nem o percentual. Tentei por percentual e por unidade, sem sucesso. Fiz uma operação reversa usando o Emissor Gratuito onde imprime o percentual e o valor do ipi. Peguei o txt exportado por ele e importei pelo NfeDemo e mesmo assim não exibe as duas informações. Alguém pode me dar uma dica? Grato 154.TXT NOTAFISCAL com percentual.txt 33150113033799000164550000000001541233469680-nfe.xml

ok Grato pela ajuda