macs Posted July 7, 2022 Report Share Posted July 7, 2022 3 horas atrás, vilian disse: Boa Tarde Amigos, Vcs sabem me dizer se existe algum recurso na ACBrLib para exibir a lista de certificados instalados em um Micro ? ::oNfe := ACBrNFe():New( cPathFileAcbrIni ) TRY ::hResult := ::oNfe:ObterCertificados() CATCH oErr IF ! ::lClassNfeInstaciada ::oNfe:Destroy() ; ::oNfe := NIL ENDIF RETURN MsgErro( oErr:Description ) END aTokens := HB_aTokens( ::hResult, CRLF ) FOR nX := 1 TO Len( aTokens ) aTokens2 := HB_aTokens( aTokens[ nX ], "|" ) aDados := {} FOR nY := 1 TO Len( aTokens2 ) aAdd( aDados, aTokens2[ nY ] ) NEXT IF ! Empty( aDados ) aAdd( aCertificados, aDados ) ENDIF NEXT Quote Link to comment Share on other sites More sharing options...
rochinha Posted July 8, 2022 Report Share Posted July 8, 2022 Amiguinhos, Mais uma opção: /* * * Recupera informacoes do certificado * */ FUNCTION GetCertificado() Local oCerts1, oCerts2, oCerts3, oStore, oCertificates, aVETOR:={} oCertificates := TOLEAuto():New( "CAPICOM.Certificates" ) if oCertificates = NIL Return aVETOR endif oStore := TOLEAuto():New( "CAPICOM.Store" ) if oStore = NIL Return aVETOR endif oStore:open(2,'My',2) oCerts1 := oStore:Certificates() oCerts2 := oCerts1:Select("Selecione o certificado para uso da Nfe","Selecione o certificado",.F.) if oCerts2:Count() = 0 Return(aVETOR) else oCerts3 := oCerts2:Item(1) AADD(aVETOR,{oCerts3:SerialNumber,oCerts3:ValidToDate}) endif Return(aVETOR) Quote Link to comment Share on other sites More sharing options...
vilian Posted September 19, 2022 Report Share Posted September 19, 2022 Boa Noite Amigos, Fiz a migração do nosso frente de Loja para usar o ACBr, mas tenho me deparado com um problema intermitente, que leva ao encerramento do módulo, sem gerar nenhuma mensagem de erro. Algum de vocês teve o mesmo problema? Quote Link to comment Share on other sites More sharing options...
macs Posted September 20, 2022 Report Share Posted September 20, 2022 Também tenho o mesmo problema. Já falei com o pessoal do fórum, mas ninguém sabe o que pode ser. Postei agora novamente no fórum do acbr pra tentar descobrir o que pode está acontecendo. Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 20, 2022 Report Share Posted September 20, 2022 Se vocês mostrarem o código, fica mais fácil tentar ver o que pode ser. As vezes um simples SYSREFRESH() ameniza. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
macs Posted September 20, 2022 Report Share Posted September 20, 2022 Quando a aplicação é fechada inesperadamente, a primeira verificação é se há na máquina sistemas de proteção bancária. Eles costumam causar esse tipo de comportamento. Outra coisa que sempre aconselhamos é verificar o log da DLL. Se essas opções não resolverem, mais uma dica é consultar o Visualizador de Eventos do Windows há alguma informação dessa parada da aplicação. Muitas vezes há informações que ajudam no diagnóstico lá. Esta foi a resposta do pessoal do fórum do Acbr. Não é o meu caso. Quote Link to comment Share on other sites More sharing options...
lucimauromelo Posted September 20, 2022 Report Share Posted September 20, 2022 Eu uso aqui a acbrDLL em modo MT com harbour modo console e não tenho esse problema. Quote Link to comment Share on other sites More sharing options...
macs Posted September 20, 2022 Report Share Posted September 20, 2022 Talvez seja uma solução... vou tentar usar a MT e caso não ocorra mais eu informo. Quote Link to comment Share on other sites More sharing options...
macs Posted September 20, 2022 Report Share Posted September 20, 2022 Existe alguma configuração para utilização da MT. Tem alguma diretriz de compilação que precisa ser definida? Quote Link to comment Share on other sites More sharing options...
oribeiro Posted September 21, 2022 Report Share Posted September 21, 2022 Também fiquei com essa dúvida. O que é compilar no modo MT? Como se faz isso no xHarbour? Por favor, desculpem a minha ignorância e me ajudem a entender essa expressão. Quote Link to comment Share on other sites More sharing options...
vilian Posted September 21, 2022 Report Share Posted September 21, 2022 Bom dia Oscar, Usamos MT(Multithread) em nossa Frente de Loja e com Harbour funciona perfeitamente(Com xHarbour nem tentem). Usando MT conseguimos executar vários processos simultaneamente. No meu caso, utilizo pra ficar tentando aprovar as vendas feitas em contingência. Mas mesmo assim temos essas quedas intermitentes. Nos micros onde eles são executados não há aqueles programas de bancos. No log da ACBR não tem nada e nem gera um HBOUT.LOG. Vou tentar resolver o problema por mais alguns, se não tiver sucesso, vou voltar pra flexdocs mesmo Quote Link to comment Share on other sites More sharing options...
kapiaba Posted September 21, 2022 Report Share Posted September 21, 2022 25 minutos atrás, oribeiro disse: Também fiquei com essa dúvida. O que é compilar no modo MT? Como se faz isso no xHarbour? Por favor, desculpem a minha ignorância e me ajudem a entender essa expressão. http://forums.fivetechsupport.com/viewtopic.php?f=3&t=31994&p=187160&hilit=multi+threaded&sid=ee460b5b21fe93deedcfcf756fa9a664#p187160 http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=26230&p=155732&hilit=multithread#p155732 Abs. Regards, saludos. Quote Link to comment Share on other sites More sharing options...
vilian Posted September 21, 2022 Report Share Posted September 21, 2022 Com xHarbour, nem percam tempo - MT não funciona! Quote Link to comment Share on other sites More sharing options...
vilian Posted September 29, 2022 Report Share Posted September 29, 2022 Bom dia Pessoal, Algum de vocês tem o Demo da ACBrNFe com Harbour já compilado? Baixei os arquivos e tentei fazer a compilação, mas estão faltando arquivos. Quote Link to comment Share on other sites More sharing options...
lucimauromelo Posted September 29, 2022 Report Share Posted September 29, 2022 Vilian os demos são bem simples e basicamente tem a inicialização da dll e um comando de exemplo, mais pelo classe dar pra voce pegar de boa para fazer funcionar. qualquer duvida der um alo que tenho a classe baixada aqui. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.