AlexBecker

aqui a danfe na visualizacao, visualmente/aparentemente bem para a esquerda, não consigo alterar ela, mudo as margens e passo toda vez antes de carregar uma nova danfe mas aparentemente não dá diferença. Juliomar, é NFe está ai é minha config atual, mudei para o fortes conforme imagem acima e dai as margens passo em runtime como no codigo mostrado.

tem a config para os 2 ali juliomar, uso os 2 dm5.ACBrNFeDANFeRL1 e dm5.ACBrNFeDANFEFR1, mudei para o FORTES REPORT agora mas é muito estranho parace que a config não surte efeito mudando ao carregar em runtime, tenho uma impressora EPSON aqui tbem de outro modelo e nela também está fora a impressão do FORTES REPORT, como alterar diretamente o relatorio no fortes report? porque ai compilo ejá envio alterado dentro do exe para este cliente.

eu criei 2 campos de config no sistema, margem esquerda e direita e passo em runtime toda vez que carrega o sistema: dm5.ACBrNFeDANFeRL1.MargemEsquerda := dm5.LConfiguracaoNfeMargemEsquerdaNFe.Value; dm5.ACBrNFeDANFeRL1.MargemDireita := dm5.LConfiguracaoNfeMargemDireitaNFe.Value; dm5.ACBrNFeDANFEFR1.MargemEsquerda := dm5.LConfiguracaoNfeMargemEsquerdaNFe.Value; dm5.ACBrNFeDANFEFR1.MargemDireita := dm5.LConfiguracaoNfeMargemDireitaNFe.Value; qual é o modelo de danfe que o fast usa? tem a pasta relatorios mas apaguei todos os .FR3, copiei para uma nova pasta e mesmo sem eles continua abrindo a danfe então deve estar configurado para usar internamente, armazenar fr3 no projeto, tem como alterar isto também?

Bom dia a todos, tenho 1 cliente com uma impressora EPSON M1100, no sistema estou utilizando o danfe com o fast report e deixo configurar margem porém a minha margem esquerda mesmo com alteração nas regulagens parece não surtir efeito e fica a linha gráfica de fora da impressão, em 1 outro cliente regulo a margem com impressora HP e a ela resolve já neste não, outra coisa é que em alguns codigos estã imprimindo o codigo de produto esta imprimindo o codigo de barras e está remontando em cima do nome do produto, qual é o modelo de DANFE que é usado para imprimir no fast e em que local ele fica salvo? desde já agradeço...

então, não sei explicar mas... sem alterar nenhuma linha de código agora, do mesmo jeito que postei acima, sem pegar o número do certificado só informando o arquivo agora funcionou, sai para almoço, voltei e rodei o mesmo código e não retornou mais o erro passou normalmente com o dadosPFX pegando direto do banco de dados, até o momento tudo beleza e funcionando corretamente com o fonte que eu citei no topico do post sem alterar nada, Juliomar e Daniel... MUITO OBRIGADO pela atenção pessoal!

na verdade PRECISAR eu especificamente não preciso para nada mas quando carrego os dados do certificado para o banco de dados: QConfiguracaoNfeCertificadoArquivoPFX.LoadFromFile(Dialogo.FileName); //DIRETO NA LEITURA DO CAMPO BLOB PARA O BANCO eu informo o certificado e a senha, guardei os dados em um campo blob fazendo a leitura direta do arquivo ( sem nenhum tipo de converção ), faço a leitura: acbrNfce.Configuracoes.Certificados.DadosPFX := LConfiguracaoNfeCertificadoArquivoPFX.Value; //campo no banco com o certificado armazenado acbrNfce.Configuracoes.Certificados.Senha := LConfiguracaoNfeCERTIFICADO_DIGITAL_SENHA.Value; então depois de ler desta forma eu não precisaria informar o numero do certificado? seria isto? se caso nao precisar é exatamente da forma que faço hoje ou seja, se é aruquivo PFX eu informo no dadosPFX do acbr, porém me retona o erro que não tenho um arquivoPFX informado ou certificado digital... erro: DadosPFX, ArquivoPFX, URLPFX ou NumeroSerie não especificados ! será que o arquivo PFX carregado para o banco de dados precisa de alguma formatação ou converção? a forma como utilizei encontrei aqui no fórum mesmo indicado por outro colega em um post. o certificado que estou utilizando é válido e estava instalado no windows funcionando corretamente, como ainda até hoje não trabalhei com o arquivo em banco estou levando uma surra em fazer sua utilizacao direta.

Olá a todos! seguindo alguns exemplos aqui do fórun guardei meu certificado digital no banco de dados em um campo blob ###### RESUMO GERAL ANTES DE LER TODO O POST: acbrNfce.SelecionarCertificado; qual é o comando para ler o numero do certificado depois de especificado para o componente o SSLib conforme fonte abaixo, visando que fiz busca no demo por: SelecionarCertificado e não encontrei, desde já agradeço a todos. try QConfiguracaoNfeCertificadoArquivoPFX.Clear; QConfiguracaoNfeCertificadoArquivoPFX.LoadFromFile(Dialogo.FileName); except MessageBox(handle, 'Erro ao gravar o certificado no banco de dados !', 'Mensagem de aviso', mb_IconInformation + 0 + mb_DefButton4); QConfiguracaoNfeCertificadoArquivoPFX.Clear; Exit; end; o aquivo é carregado e guardado no banco, para ler utilizo: acbrNfce.Configuracoes.Certificados.DadosPFX := LConfiguracaoNfeCertificadoArquivoPFX.Value; //campo no banco com o certificado armazenado acbrNfce.Configuracoes.Certificados.Senha := LConfiguracaoNfeCERTIFICADO_DIGITAL_SENHA.Value; configoro com as demais configuracoes que utilizo quando é informado o numero do certificado normalmente ( onde com o certificado instalado no windows e buscando pelo numero funciona corretamente ) porém quando informo: ACBrNFe1.Configuracoes.Certificados.DadosPFX := dm5.LConfiguracaoNfeCertificadoArquivoPFX.Value; Me retorna este Erro aqui: DadosPFX, ArquivoPFX, URLPFX ou NumeroSerie não especificados ! codigo fonte: ################################ dm7.acbrNfce.SSL.SSLType := TSSLType(dm5.LConfiguracaoNfeSSLType.AsInteger); dm7.acbrNfce.Configuracoes.Geral.SSLLib := TSSLLib(dm5.LConfiguracaoNfeSSLLib.AsInteger); dm7.acbrNfce.Configuracoes.Geral.SSLCryptLib := TSSLCryptLib(dm5.LConfiguracaoNfeCryptoLib.AsInteger); dm7.acbrNfce.Configuracoes.Geral.SSLHttpLib := TSSLHttpLib(dm5.LConfiguracaoNfeHttpLib.AsInteger); dm7.acbrNfce.Configuracoes.Geral.SSLXmlSignLib := TSSLXmlSignLib(dm5.LConfiguracaoNfeXMLSignLib.AsInteger); dm7.acbrNfce.Configuracoes.Geral.AtualizarXMLCancelado := (dm5.LConfiguracaoNfeAtualizarXML.AsString = 'S'); dm7.acbrNfce.Configuracoes.Geral.ExibirErroSchema := (dm5.LConfiguracaoNfeExibirErroSchema.AsString = 'S'); dm7.acbrNfce.Configuracoes.Geral.Salvar := (dm5.LConfiguracaoNfeSalvarArquivoEnvioResposta.AsString = 'S'); dm7.acbrNfce.Configuracoes.Geral.FormatoAlerta := 'TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.'; if (Trim(dm5.LConfiguracaoNfeCERTIFICADO_DIGITAL_CAMINHO.Value) <> '') and (dm5.LConfiguracaoNfeSSLLib.Value = '1') and (Trim(dm5.LConfiguracaoNfeUsarCertificadoDoBanco.AsString) <> 'True') then begin dm7.acbrNfce.Configuracoes.Certificados.ArquivoPFX := dm5.LConfiguracaoNfeCERTIFICADO_DIGITAL_CAMINHO.Value; dm7.acbrNfce.Configuracoes.Certificados.Senha := dm5.LConfiguracaoNfeCERTIFICADO_DIGITAL_SENHA.Value; end else if (Trim(dm5.LConfiguracaoNfeCERTIFICADO_DIGITAL_SERIE.Value) <> '') and (Trim(dm5.LConfiguracaoNfeUsarCertificadoDoBanco.AsString) <> 'True') then dm7.acbrNfce.Configuracoes.Certificados.NumeroSerie := dm5.LConfiguracaoNfeCERTIFICADO_DIGITAL_SERIE.Value else if (Trim(dm5.LConfiguracaoNfeCertificadoArquivoPFX.Value) <> '') and (Trim(dm5.LConfiguracaoNfeUsarCertificadoDoBanco.AsString) = 'True') then begin dm7.acbrNfce.Configuracoes.Certificados.DadosPFX := dm5.LConfiguracaoNfeCertificadoArquivoPFX.Value; dm7.acbrNfce.Configuracoes.Certificados.Senha := dm5.LConfiguracaoNfeCERTIFICADO_DIGITAL_SENHA.Value; end else begin MessageBox(0, 'Não existe certificado configurado para está empresa! NÃO será possivel Emitir/Consultar NFe!', 'Mensagem de aviso', mb_IconInformation + 0 + mb_DefButton4); Exit; end; ################################ em outro post vi que era necessário ler o numero do certificado digital mesmo pegando o arquivo guardando no campo blob porém não estou encontrando exemplo de como fazer isto usando diretamente o meu componente: acbrNfce no projeto, verifiquei no demo e tentei encontrar: acbrNfce.SelecionarCertificado;

peguei uma APP, MEUIP, é só executar e ele mostra o ip foi mais fácil.

Bem depois de muito consultar a internet e o velho googrisss conseguimos a solução, obrigado.

Olá a todos, alguém já fez uma APP para pegar o IP do celular ( local e não wifi )? achei uma dezena ( pra não dizer uma centena quase rsrsr ) de exemplos na internet mas nada que retorna o ip local do celular androi, apenas localhost ( 0.0.0.0 no caso do android ), endereço de ip wifi... mas o endereço do celular para ver em qual rede ele está não achei algo que funcionasse, se alguém tiver um exemplo e puder ajudar fico grato.

também não encontrei local, utilizamos aqui na sequencia um número bem alto e ai passou mas é algo estranho tem que ser pelo chutometro pois entrar em contato com a equiplano é algo não muito fácil, de qualquer forma está resolvido, obrigado a todos.

Olá Italo boa tarde, entendi, pelo fato de que se eu usar o número da NFSe e trocar a série realmente o número de lote repete, até ai tudo bem fácil mudar, mas eu não sei de onde pegar o valor de qual numero esta agora o numero de lote, tem alguma funcao para retornar qual é o proximo ou algo assim? pois neste caso ai que postei tentei o numero do lote com valore já acima, 30, 40 e em todos os casos ele me retorna que o numero de lote já foi utilizado.

Olá boa a tarde todos Estou com estas notas acima de testes já enviada, entao meu ultimo RPS é o 11 ( isto confirmado no site da equiplano ) meu RPS atual é o 12, a última NFSe enviada é a 9, para o número do lote eu incluo o número da NFSe, então a minha NFSe atual é a 10, porém quando tento enviar ela dá a mensagem: Procurei nas configurações, visualizei as notas emitidas lá na equiplano mas não achei este número de lote, estou a um bom tempo tentando emitir as NFSe em homologação para testas e só me retorna esta mensagem ( com base nos dado já citados aqui para emissão ok ). Se alguém puder me ajudar com isto fico muito grato ( como saber qual o número de lote correto a utilizar, de onde tirar esta informação ).

bem depois de um dia de pesquisa: é legal pois usa a API do cromium, na verdade voce só esta emulando um browser dentro do delphi e o whatsapp está rodando dentro da API e automaticamente dentro do whatsappweb, como o browser emula na api voce consegue pegar os dados, já estou com tudo rodando aqui, obrigado!

e ai é legal ou ilegal? está funcionando bem ainda? tem chance de ser bloqueado... estou precisando de um e gostaria de saber como está este, obrigado!

Desculpem a demora no retorno tive alguns problemas ( pessoais, cirurgia entre outros ) e não pude fazer o teste de prontidão, refizemos boa parte do código e funcionou corretamente, acredito que o problema estava na ordem das chamadas das funções e com alguns sobrecarregamentos de memória, sei que depois de refeito funcionou corretamente.

vou verificar um meio de colocar um log e retorno aqui, por enquanto obrigado.

Bom dia a todos, esto utilizando pós printer em um monitor de impressão que fica rodando e buscando novas impressões a cada 30 segundos, para cada impressão eu configuro o componente novamente e depois de cada impressão eu libero ele, gostaria de saber se alguém utiliza do mesmo jeito e qual a forma correta de se utilizar os componentes em um monitor assim, o meu problema é que depois de algum tempo depois de configurado o pos e enviado a impressão as vezes demora alguns minutos até sair a impressão, acontece com modelos diversos de impressoras, se alguém tiver algo parecido e conseguiu solucionar por gentileza comente! desde já fico agradecido!!

eu tentei mas quando dou o F8 no enviar ele já envia na hora, não consegui ser rápido o bastante ou não fiz certo porém ainda persiste o erro este mes novamente constatamos o erro.

achei no meu codigo um ponto bem abaixo nas linhas onde estava pegando o numero aleatorio.... mesmo com o teste acima mais abaixo no codigo ele repassava o valor, valeu pelo toque tudo funcionando novamente, obrigado.

Olá a todos, a muito tempo venho gerando o danfe da seguinte forma: PreencheAcbrComNfe(StrToInt(F_menu_principal.FIdEmpresaNfe), dm5.LNfeCabecalhoid.Value); dm5.ACBrNFe1.NotasFiscais.GerarNFe; if (Trim(dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt) = '') then begin try dm5.FRetWS := ''; F_Menu_Principal.FTipoRequisicao := trConsulta; dm5.ACBrNFe1.WebServices.Consulta.NFeChave := dm5.LNfeCabecalhoCHAVE_ACESSO.AsString; dm5.ACBrNFe1.WebServices.Consulta.Executar; dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.tpAmb := dm5.ACBrNFe1.WebServices.Consulta.TpAmb; // cdsNFe.FieldByName('AMBIENTE').AsString; dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe := dm5.ACBrNFe1.WebServices.Consulta.NFeChave;//A chave de acesso que já foi enviada dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.dhRecbto := dm5.ACBrNFe1.WebServices.Consulta.DhRecbto; dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt := dm5.ACBrNFe1.WebServices.Consulta.Protocolo; dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat := dm5.ACBrNFe1.WebServices.Consulta.cStat; dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.xMotivo := dm5.ACBrNFe1.WebServices.Consulta.XMotivo; dm5.ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.verAplic := dm5.ACBrNFe1.WebServices.Consulta.verAplic; except end; end; dm5.ACBrNFe1.DANFE.ImprimirDANFE(); Simplificando, eu preencho o componente do ACBR com os dados da nota, consulto e comando para imprimir o danfe. verifiquei nesta linha debugando: dm5.ACBrNFe1.WebServices.Consulta.NFeChave := dm5.LNfeCabecalhoCHAVE_ACESSO.AsString; e o número da NFe está correto, porém ao mostrar a danfe ele não mostra a danfe referente a chave informada ali e pior, cada danfe gerada é com uma chave DIFERENTE! estou usando este codigo a bastante tempo e funcionava normalmente depois de uma ultima atualizacao pra cá ele começou com este problema, verifiquei que no DEMO a impressão do danfe é feita somente tendo o arquivo XML, por gentileza poderia alguém me ajudar com isto?

Obrigado, eu peguei um exemplo no caso eu me expressei mal, realmente precisa do XML da nota e do XML da carta, eu gostaria de saber se não tinha um jeito de imprimir somente com o XML da carta mas realmente pelo jeito não funciona assim.

Olá boa tarde a todos, estou com um XML de uma carta de correção e tentando fazer a reimpressão do mesmo: dm5.ACBrNFe1.EventoNFe.Evento.Clear; dm5.ACBrNFeDANFEFR1.MostraPreview := True; dm5.ACBrNFe1.DANFE := dm5.ACBrNFeDANFEFR1; dm6.LNfeXmlEmitidosxml.SaveToFile(dm5.LConfiguracaoNfeCaminho_Salvar_XML.Value+'cartacorrecao.xml'); dm5.ACBrNFe1.NotasFiscais.Clear; dm5.ACBrNFe1.NotasFiscais.LoadFromFile(dm5.LConfiguracaoNfeCaminho_Salvar_XML.Value+'cartacorrecao.xml'); dm5.ACBrNFe1.ImprimirEvento; a carta foi emitida em ambiente de homolocação e está salvo no meu banco o XML, eu salvo ele em um caminho e depois tento fazer a impressão da carta, é detectado que é uma carta de correção mas na hora de imprimir fica em branco, bem se puderem indicar onde está meu erro ou até postar um exemplo ( que o exemplo de impressão do site do régys ) e apliquei ele no sistema. OBS também apliquei com loadfromstring e pegando o campo direto da tabela porém o resultado foi o mesmo. ACBrNFeDANFERaveCB.MostrarPreview := True; ACBrNFe.NotasFiscais.Clear; ACBrNFe.NotasFiscais.LoadFromString(<XML Nota Eletrônica>); ACBrNFe.EventoNFe.Evento.Clear; ACBrNFe.EventoNFe.LerXMLFromString(<XML Evento>); ACBrNFe.ImprimirEvento; cartacorrecao.xml

Boa tarde a todos! da ultima atualização do ACBR de uns 15 dias atrás até a presente data estou tendo um problema ( muito raro de acontecer ), a NFCe é gerada, é enviada para a receita... porém o ACBR não conseguiu pegar o retorno desta NFCe, não sei o motivo ao certo, se é falha na internet ou oque acontece mas os dados são enviados pra sefaz, a sefaz tem a nota válida lá no servidor porém ao retornar os dados não sei se é questão de conexão ( não consegui simular pois quando passo o comando executar dentro do acbr tem apenas 1 linha e não consigo desativar a rede neste meio tempo ) quando o XML não retorna a chave é modificada para chave OFF-Line ( isto começou agora de uns 15 dias pra cá depois que atualizei o ACBR ) com o digito 9, se eu mudar para o digito 1 gerando a chave e consultar no servidor da sefaz a chave está lá então eu gostaria de saber como recuperar o XML desta nota que está la no servidor, estou agora guardando as 2 chaves, com a situação 9 que é offline e com a situação 1 que é validada mas como o xml da nota válida não retornou fico sem ele no banco, resumindo... como recuperar o XML da nota pela chave dela... desde já, agradeço!

Pessoal, foi falha minha! peço desculpas... nestas versões o que acontece é que se você instala o 64 bits junto quando abre o library path ele traz selecionado diretamente na caixa os paths para versão 64 bits eu não enxerguei isto... noobada total! obrigado aos colegas e novamente sorry!