-
Total de ítens
143 -
Registro em
-
Última visita
Tudo que AlexBecker postou
-
achei o meu problema e erro também, como a NFCe é emitida offline ele gera uma CHAVE2 esta chave 2 mesmo que envie a NFCe que estava online e deixe ela autorizada a chave 2 continua sendo a padrao entao quando consulto com a chave1 ele sempre me retorna o XML sem assinatura da receita porque logicamente não está lá, um erro bobo da minh aparte... fiz este esquema para pegar a chave2 offline a pouco tempo e nas consultas nao estou incluindo por ela quando o tipo de envio é 9, falha minha acredito que agora deve retornar o XML vou fazer mais alguns testes aqui para ver e retorno.
-
está true sim, eu sempre deixo ele true, em caso de CONSULTA o XML também é atualizado no componente e fisicamente (confirme a config do path e salvar = true) automatico ou devo fazer algum procedimento para isto? bem basicamente se tiver os passos de efetuar uma consulta na receita para a NFCe e ele atualizar o XML fisico em arquivo no hd automaticamente, quando ele não existe cria normal, quando estou retransmitindo offline ou consultando ( no caso consulto porque tranmisti a offline, ela gerou uma nfce emitida mas ai como não veio o protocolo eu consulto na receita para ver se atualiza o XML fisico e não estou conseguindo isto )
-
NFC-e como atualizar XML de NFCe emitida offline
um tópico no fórum postou AlexBecker NFC-e - Nota Fiscal do Consumidor Eletrônica
Olá a todos, estou reemitindo uma NFCe que foi emitida offline e estava pendende, na hora que emito: ACBrNFce.configuracoes.arquivos.salvarevento está falso e ACBrNFce.configuracoes.arquivos.salvar está true, quando emito a NFCe eu consigo pegar o XML dela, caso ela seja aprovada vem o xml certo, caso seja offline ela fica sem o protocolo da receita e sem a assinatura no RODAPé, quando faço reemissão de NFCe offline ou Consulta de NFCe não está atualizando o arquivo XML para que eu possa guardar na base de dados e auditar a NFCe mais tarde, alguém poderia me ajusar com os passos neste caso e me indicar meu erro!? no caso eu faço a remissão da NFCe que estava offline, ela fica como NFCe autorizada, eu dou um edit na tabela do banco com o arquivo XML referente a NFCe e posto porém o arquivo XML físico em disco não está alterando fica sempre o mesmo arquivo de quando a NFCe foi emitida offline, no caso uso o comando dm6.QNfeXmlEmitidosxml.LoadFromFile(dm7.acbrNfce.NotasFiscais.Items[0].NomeArq); e está sempre o mesmo arquivo. vou postar o trecho do meu codigo: dm5.NfceCabecalhoOffLine.First; while not dm5.NfceCabecalhoOffLine.Eof do begin if TransmitirNfce(F_ConsultaNfce, dm5.NfceCabecalhoOffLineID_Empresa.AsInteger, dm5.NfceCabecalhoOffLineID.AsInteger, 9, SituacaoAposTransmissao) then begin try if not(ConsultaNfeXmlEmitidos('consulta',' WHERE (IdNfceCabecalho = "'+ dm5.NfceCabecalhoOffLineID.AsString +'") AND (TipoDfe = "Nfce") AND (id_empresa = "'+ F_menu_principal.FIdEmpresaNfe +'") ','','')) then begin if (Trim(dm7.acbrNfce.NotasFiscais.Items[0].NomeArq) <> '') then begin //GRAVA O ARQUIVO XML - OK ManipulaNfeXmlEmitidos('', ' LIMIT 0'); dm6.QNfeXmlEmitidos.append; dm6.QNfeXmlEmitidosIdNfceCabecalho.Value := (dm5.NfceCabecalhoOffLineID.AsInteger); dm6.QNfeXmlEmitidosTipoDfe.Value := ('Nfce'); dm6.QNfeXmlEmitidosid_empresa.AsString := (F_menu_principal.FIdEmpresaNfe); dm6.QNfeXmlEmitidosNomeArquivo.AsString := ExtractFileName(dm7.acbrNfce.NotasFiscais.Items[0].NomeArq); dm6.QNfeXmlEmitidosCaminhoArquivo.Value := dm7.acbrNfce.NotasFiscais.Items[0].NomeArq; dm6.QNfeXmlEmitidosxml.LoadFromFile(dm7.acbrNfce.NotasFiscais.Items[0].NomeArq); dm6.QNfeXmlEmitidos.Post; end; p trecho do meu transmitir da NFCe até o envio: try dm7.acbrNfce.NotasFiscais.Clear; dm7.acbrNfce.WebServices.Enviar.Clear; dm7.acbrNfce.WebServices.Retorno.Clear; Result := False; StatRetorno := 0; dm7.FRetWSNfce := ''; F_Menu_Principal.FTipoRequisicao := trEnviar; if F_Menu_Principal.FSituacaoSefaz = '107' then begin ConfigurarAcbrNfce(pForm, IntToStr(pIdEmpresa)); if pTipoEmissao = 1 then begin PreencheAcbrComNfce(pIdEmpresa, pIdNfceCabecalho, True); try NotaEValida := True; dm7.acbrNfce.NotasFiscais.GerarNFe; depois de configurar e preencher o componente: dm7.acbrNfce.Enviar(0,False, True); Se puderem passar um passo a passo de como agir neste caso, não se se devo ativar eventos ( acredito que nao ), penso que somente estando como ACBrNFce.configuracoes.arquivos.salvar já deveria atualizar o XML apos o acbrNfce.NotasFiscais.GerarNFe; e dm7.acbrNfce.Enviar(0,False, True); Bem, desde já fico grato por qualquer ajuda! obrigado! -
que ótimo! resolvido Juliomar, a todos MUITO obrigado mesmo! ficou tudo certinho agora!
-
não Juliomar, ultima vez que atualizei tinha sido a 2 meses atrás, dificil passar mais que isto sem atualizar e o problema estava somente neste cliente (novo alias, acabou de entrar) nos outros não alteremos nada deixamos o padrão e vai de boa, por sorte a minha impressora aqui demonstrou o mesmo problema tambem (epson) mas já ficou beleza, agora preciso aumentar o campo do codigo do produto que está remontando, ali pelo componente do fortes eu consigo fazer isto direto ou preciso abrir um .DFM
-
muito obrigado mesmo!! era isto mesmo!! usei 10 na margem ( não era em centimetros isto? ) e ficou blza, agora, no campo CODIGO DO PRODUTO tem uns codigos bem grande e estao remontando no NOME do produto, como faço para editar este relatorio do fortes?
-
sim atualizei a 2 semanas e sempre uso no instalador recompilando. tentei com várias margens diferente, 0,6 pra cada lado é o padrao, mas tentei com 0,1 ate 3 na esquerda e ele não joga mais para o lado, na minha impressora epson l375 aqui esta acontecendo o mesmo, e mesmo alterando a margem ele não altera na impressao.
-
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...
-
Erro ao carregar certificado digital guardado no banco
AlexBecker replied to AlexBecker's tópico in ACBrNFe
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! -
Erro ao carregar certificado digital guardado no banco
AlexBecker replied to AlexBecker's tópico in ACBrNFe
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;
-
Pegar IP do celular local android com Delphi
AlexBecker replied to AlexBecker's tópico in Object Pascal - Delphi & Lazarus
peguei uma APP, MEUIP, é só executar e ele mostra o ip foi mais fácil. -
Pegar IP do celular local android com Delphi
AlexBecker replied to AlexBecker's tópico in Object Pascal - Delphi & Lazarus
Bem depois de muito consultar a internet e o velho googrisss conseguimos a solução, obrigado. -
Pegar IP do celular local android com Delphi
um tópico no fórum postou AlexBecker Object Pascal - Delphi & Lazarus
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. -
erro ao enviar a NFSe Número de lote já utilizado
AlexBecker replied to AlexBecker's tópico in ACBrNFSe
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. -
erro ao enviar a NFSe Número de lote já utilizado
AlexBecker replied to AlexBecker's tópico in ACBrNFSe
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!!