ti_smig

Obrigado novamente meu nobre! Acredito que vou ter que ir por esse caminho ai mesmo que você falou. Eu estava tentando fazer algo parecido com o sistema atual que é terceirizado para não precisar mexer na minha MENSAGEIRA . Estou convicto que será menos custoso fazer essa alteração na MENSAGEIRA para me retornar o XML completo autorizado e utilizar o componente ACBrNFe nas duas pontas de uma forma mais correta. Ao menos esta tentativa inicial valeu como experiência. Agradeço novamente pela ajuda!

Boa tarde meu nobre! Obrigado por tentar me ajudar! É quase isso. A MENSAGERIA que é o meu autorizador está com esta informação preenchida, porém o PDV nem sabe que a nota foi autorizada. O PDV é uma aplicação que somente gera um arquivo e entrega para a MENSAGERIA. A MENSAGERIA tem a resposta da SEFAZ e ela (a MENSAGERIA) gera um arquivo resposta para o PDV. O único informação que o PDV tem sobre a autorização da nota é esse arquivo. O PDV não está utilizando o serviço de envio de nota para a SEFAZ, quem o faz é a MENSAGERIA. Preciso que o PDV leia o XML de resposta gerado pela MENSAGERIA. Estou estudando a possibilidade de fazer da seguinte forma: Faria a aplicação do PDV carregar o arquivo XML para WebServices Retorno e varreria o conteudo do arquivo alimentando os valores/propriedades. Porém não queria refazer algo que talvez já exista no ACBr. //----------------------------------------------------------- ACBrNfe1.WebServices.Retorno.NFeRetorno.Leitor.Arquivo := ParseTex(arquivo_XML_Retorno); With ACBrNfe1.WebServices.Retorno.NFeRetorno do begin i := 0; while (Leitor.rExtrai(1, 'nfce', '', i + 1) <> '') do begin ProtNFe.Add; if Leitor.rExtrai(2, 'nfce' ) <> '' then begin ProtNFe.tpAmb := StrToTpAmb(ok, Leitor.rCampo(tcStr, 'tpAmb')); ProtNFe.verAplic := Leitor.rCampo(tcStr, 'verAplic'); ProtNFe.chNFe := Leitor.rCampo(tcStr, 'id'); ProtNFe.dhRecbto := Leitor.rCampo(tcDatHor, 'dhRecbto'); ProtNFe.nProt := Leitor.rCampo(tcStr, 'nProt1'); ProtNFe.digVal := Leitor.rCampo(tcStr, 'digVal'); ProtNFe.cStat := Leitor.rCampo(tcInt, 'codigo'); ProtNFe.xMotivo := Leitor.rCampo(tcStr, 'descricao'); end; end; end; //----------------------------------------------------------- Eu não sei se o layout desse arquivo é próprio ou se é uma convenção adotada por algumas empresas.

Bom dia a todos! Temos um rede supermercados e estamos desenvolvendo o nosso próprio sistema de PDV. Atualmente utilizamos um sistema de terceiros no PDV que não envia diretamente o xml para a SEFAZ iremos desenvolver o nosso sistema seguindo esse modelo. O PDV gera o XML e irá disponibilizar este arquivo em um pasta específica no servidor de rede. Temos uma aplicação chamada de MENSAGERIA que monitora os xmls desta pasta. A MENSAGERIA pega o XML gerado pelo PDV, assina e envia para a SEFAZ autorizar. Quando a SEFAZ retorna o resultado para a mensageria a mesma deve gerar um arquivo de retorno XML para o PDV em uma pasta chamado RETORNO. O PDV deverá ler o conteúdo desse arquivo e se autorizado deverá imprimir o DANFE do cliente, caso contrário será gerado um XML de contingência. O meu problema está sendo na leitura do arquivo de retorno gerado pela MENSAGERIA. Não estou conseguindo obter/ler o retorno do XML utilizando o ACBrNFe. Eu sei que para carregar um NFCe por inteiro devo utilizar ACBrNfe1.NotasFiscais.LoadFromFile(vArquivoXML) Já para ler só o XML de retorno (que contem apenas o retorno) não estou sabendo como fazer. Quando eu gero o XML no PDV as informações ficam carregadas no componente ACBrNFe. Porém não estou utilizando o evento de envio para autorizar na SEFAZ diretamente pelo PDV o qual apenas gera um arquivo XML e passa para a MENSAGERIA fazer o envio para SEFAZ. Sendo assim o PDV fica aguardando o retorno via arquivo XML. O que eu preciso fazer que não estou conseguindo é carregar o conteúdo do arquivo retorno XML no componente ACBrNFe. Este arquivo possui apenas este conteúdo abaixo que pode variar de acordo com a resposta da SEFAZ: PDV -> Gera arquivo XML -> MENSAGERIA -> Envia XML -> SEFAZ -> Envia Retorno -> MENSAGERIA -> Envia arquivo XML de Retorno -> PDV Resumindo eu preciso obter o retorno do XML no PDV diretamente pelo arquivo de retorno gerado pela MENSAGERIA. LGDUNI2000001003.000005863_env.xml

Bom dia a todos! Hoje consegui finalizar a instalação do Lazarus no Linux 32 bits. Após copiar as libs do sitef 32 bits, criar os links simbólicos e instalar os componentes do ACBr compilei o TefDemo. Executei o programa, iniciei o gpClisitef e cliquei e ADM e a tela de opções do onExibeMenu apareceu. Resumindo, o TEFDemo funcionou no Linux 32 bits. Os mesmo procedimentos que fiz na instalação na plataforma 32 foi a que fiz na 64. A diferença por enquanto são as libs. Linux 32 bits - libiclisitef.so - libiclisitef32.so - libemv.dll - libseppemv.dll - rechargeRPC.dll Linux 64: - libclisitef.so - libclisitef64.so - libseppemv.so Vou continuar na luta aqui até conseguir.

Recebi novas dlls(so) do clisitef porém o problema persiste. Ainda não terminei de instalar minha vm Linux em 32 bits. No momento estou instalando o Lazarus. Nesse meio tempo estava debugando o programa tanto no Windows quanto no Linux 64 bits. Uma das coisas que reparei foi que no CliSitef.log do Linux sempre o ProximoComando é retornado como -1. Como ele nunca recebe um valor positivo a rotina fica em loop. Log do Windows: Log do Linux 64:

Bom dia Rafael! Abri o fonte do exemplo do ACBr do TEFDemo no Lazarus (instalado no Linux 64 bits) e compilei. Tá muito estranho, como tinha dito anteriormente no Windows funcionou 100%. Tô pensando em instalar o Ubuntu 32 bits em uma vm(máquina virtual) pra testar.

Acredito que não, porque quando solicitei falei que eu precisava para 64 bits. Inclusiva a casca do arquivo .zip tinha a nomeclatura para 64bits (clisitef.4.0.133.3.r1-Linux64.zip). Estou comparando os arquivos que eu tenho no Windows 32bits com os do Linux64bits. No Windows eu tenho: - CliSitef32.dll - CliSitef32I.dll - libemv.dll - libseppemv.dll - RechargeRPC.dll No Linux eu tenho: - libclisitef.so - libclisitef64.so - libseppemv.so Ou seja o Windows tem mais dll. Vou enviar um e-mail pra software para perguntar se não ficou faltando me enviar alguma lib (so) 64bits.

Boa tarde! Estou desconfiado das dll's, o estranho é que obtive as mesmas recentemente da softwareexpress. - libclisitef.so - libclisitef64.so - libseppemv.so Fiz um teste no Windows XP, instalei o Lazarus, ACBr e compilei o TefDemo e funcionou corretamente. (OperaçãoADM 110 ) Porém no Ubuntu 64 bits fica com a tela escurecida e não apresenta o menu. (Veja que nem apareceu no log da tela Início de ADM.) Alguém conseguiu testar o CliSitef no TEFDemo no Linux 64bits? Ps. Não conseguir editar o post anterior.

Bom dia! Acredito que esteja programado corretamente pois não fiz nenhuma modificação nos eventos já programados no TEFDemo. Estou enviando um print do evento para análise. Eu tenho que fazer alguma modificação no fonte do TEFDemo?

Bom dia a todos! Estou com dificuldades no uso do TEFDemo. Tenho uma máquina com o Simulador Sitef rodando em Windows 2003 Server. Estou testando o TEFDemo em uma outra máquina com IDE Lazarus rodando no SO Linux Ubuntu 15.10 64bits . Tenho 01 Pinpad Serial, Impressora não Fiscal Daruma DR700. Na propriedade EnderecoIP informei o IP da máquina onde está rodando o SiTef Simulador. 1 - Executo a aplicação TEFDemo 2 - Escolha o Modelo de ECF ecfNaoFiscal, informo a porta e clico e Ativar. 3 - Seleciono o G.P. gpCliSitef e clico em Inicializar. 4 - Na aba Operação clico no botão ADM. Daí a tela fica inativa e não apresenta nenhum menu de opções. Olhando o logo CliSitef.log vejo que o sistema fica aguardando que seja selecionado alguma opção, porém não é exibido nenhuma tela para que seja selecionado alguma opção. Gostaria de saber se é alguma configuração que está faltando ou se é alguma incompatibilidade com o SO 64bits. Log CliSiTef.log. -- 09-04 10:30:36:718 - *** ConfiguraIntSiTefInterativoEx. EnderecoIP: 192.168.100.97 CodigoLoja: 00000006 NumeroTerminal: SE000001 Resultado: 0 ParametrosAdicionais: [PortaPinPad=1;VersaoAutomacaoCielo=ACBr 10] -- 09-04 10:30:38:406 - CliSiTef Inicializado CliSiTEF -- 09-04 10:30:38:407 - InfoECF: ineEstadoECF -- 09-04 10:30:38:407 - Ret: O -- 09-04 10:30:38:407 - CliSiTef CancelarTransacoesPendentesClass -- 09-04 10:30:51:174 - *** IniciaFuncaoSiTefInterativo. Modalidade: 110 Valor: 0,00 Documento: 103051 Data: 20160409 Hora: 103051 Operador: Restricoes: -- 09-04 10:30:51:174 - BloquearMouseTeclado: SIM -- 09-04 10:30:51:176 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:579 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = v.4.0.113.3/4.0.0.30 - Selecione a opcao desejada Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:579 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:589 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = 1:Reimpressao de comprovante;2:Cancelamento de transacao;3:Outros Cielo; Tam.Min = 1 Tam.Max = 2 -- 09-04 10:30:54:589 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:600 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:600 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:610 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = v.4.0.113.3/4.0.0.30 - Selecione a opcao desejada Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:610 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:620 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = 1:Reimpressao de comprovante;2:Cancelamento de transacao;3:Outros Cielo; Tam.Min = 1 Tam.Max = 2 -- 09-04 10:30:54:620 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:631 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:631 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:641 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = v.4.0.113.3/4.0.0.30 - Selecione a opcao desejada Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:641 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:651 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = 1:Reimpressao de comprovante;2:Cancelamento de transacao;3:Outros Cielo; Tam.Min = 1 Tam.Max = 2 -- 09-04 10:30:54:651 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:662 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:662 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:672 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = v.4.0.113.3/4.0.0.30 - Selecione a opcao desejada Tam.Min = 0 Tam.Max = 0 -- 09-04 10:30:54:672 - ContinuaFuncaoSiTefInterativo, Chamando: Continua = 0 Buffer = -- 09-04 10:30:54:682 - ContinuaFuncaoSiTefInterativo, Retornos: STS = 10000 ProximoComando = -1 TipoCampo = -1 Buffer = 1:Reimpressao de comprovante;2:Cancelamento de transacao;3:Outros Cielo; Tam.Min = 1 Tam.Max = 2 Desde já agradeço a todos que estarão dispondo do seu tempo para ajudar.

Obrigado Neimar! Copiei a dll para dentro desta pasta e funcionou.

Bom dia! Tenho um pinpad serial PPC-800 da gertec. Sistema Operacional Ubuntu 15.10 Lazarus IDE v1.6 O pinpad está conectado na COM 1 a impressora (não fiscal) na COM8. Ao executar o programa seleciono gpCliSiTef e ao clicar no botão [Inicializar] o programa me retorna a mensagem: Inicializando: gpCliSiTef Erro ao carregar a função:ConfiguraIntSiTefInterativoEx de: libclisitef.so Degubando o programa vi que na chamada da função LibHandle := dynlibs.LoadLibrary(LibName) o valor retornado é 0. A parte comentada do fonte diz que { Se 0 não pegou o Handle, falhou } E após isso é exibida a mensagem de Erro. Essa lib está na pasta do executável do programa. Pesquisei no fórum mas não achei nada em específico a esse problema. Alguém sabe dizer o que está faltando ou onde eu estou pecando? Desde já agradeço pela ajuda.

Bom dia Daniel! Comecei a usar o Lazarus a pouco tempo, poderia me dizer como faço para atualizar essa Unit (libeay32.pas)?

Bom dia pessoal! Eu uso Lazarus no Ubuntu. Consegui compilar a maioria dos componentes ACBr Trunk2, porém ao tentar compilar qualquer um dos componentes do ACBrDFe me deparo com alguns erros de compilação. Os erros abaixo apareceram quando foi compilar o ACBrDFeComum.lpk. ACBRDFeOpenSSl.pas(398,13) Errror: Identifier not found "xmlSecKeysMngrCreate" ACBRDFeOpenSSl.pas(405,8) Errror: Identifier not found "xmlSecCryptoAppDefaultKeysMngrInit" ACBRDFeOpenSSl.pas(413,9) Errror: Identifier not found "xmlSecCryptoAppKeysMngrCertLoadMemory" ACBRDFeOpenSSl.pas(427,13) Errror: Identifier not found "xmlSecFindChild" ACBRDFeOpenSSl.pas(502,13) Errror: Identifier not found "xmlSecFindChild" Alguém já passou por essa situação?

Acabei de descobrir que ele coloca o Timezone quando utilizo o Save do próprio componente, o meu XML de origem que fica sem. Obrigado.