André Melim

Resumindo... ao emitir a nfs-e, caso a nota ja exista la no provedor (ja tenha sido transmitida anteriormente) o componente AcbrNFSEX teria que retornar alguma informação (Numero de Protocolo, Numero da Nota, etc) através da qual eu possa utiliza-la para consultar essa nota de forma a preencher o componente com as informações dessa nota para que eu possa salvar ela no meu banco de dados.

No arquivo txt em anexo tem o trecho de código onde quando da erro na transmissão da nfs-e o sistema verifica no trecho da mensagem de erro e se for ref. a 'nota ja consta no provedor' então o sistema usa o comando 'ConsultarLoteRps' para consultar a nota la no provedor pelo 'NumeroLote' e 'Protocolo' que retornou no componente para que os dados da nota sejam carregados para o componente e com isso se consiga gravar os dados da nota na base de dados do sistema, foi o que pude entender desse código fonte. Basicamente seria essa a ideia, ou seja, se a nota de serviço que estou tentando enviar ja existe la no provedor eu preciso trazer as informações dessa nota de serviço pra gravar na base de dados para contornar a situação onde por exemplo caiu a energia entre o tempo de enviar a nota e gravar nas tabelas do sistema (coisa que o sistema ja faz normalmente). Note que como houve a queda de energia apos o envio eu nao tenho nenhuma informação pra enviar para o comando de consulta, teria que ser algo que o componente devolve no resultado da tentativa de transmissao. DocumentoFiscalServicosENVIAR.txt

Sim, mas no método 'AcbrNFSEX.ConsultarLoteRps' é exigido passar por parametro o 'Protocolo' e o 'Lote' e ai de onde eu vou pegar essa informação? Lembra que se trata de um caso onde não deu tempo de gravar a informação na base de dados pois caiu a energia do computador ou ocorreu um travamento do computador, por exemplo.

Olá pessoal, Temos no nosso sistema a emissão de notas fiscais de serviços NFS-e para alguns provedores e esta funcionando normalmente. O problema é que quando usávamos o componente antigo 'TACBrNFSe' a gente tinha um tratamento la na emissão da NFS-e que fazia com que caso a nota fiscal já estivesse constando no provedor, o sistema já puxasse os dados da nota automaticamente sem dar aqueles tipos de mensagens de erro dizendo que a nota ja foi transmitida (explicando... logicamente ao emitir a nota fiscal, o próximo passo é gravar a informação na base de dados do nosso sistema de forma que o sistema não tente transmitir 2 ou mais vezes a mesma nota, mas imagina que por algum motivo como uma queda de energia faça com que a nota seja emitida/transmitida porém antes de gravar as informações na base de dados tenha ocorrido a queda de energia). Aí vai gerar essa situação onde a nota consta no provedor mas não consta na nossa base de dados por isso existe esse tratamento para quando dá esse tipo de erro o sistema, após carregar os dados da nota fiscal no componente vá para uma procedure que com base nesses dados, grave a nota na nossa base de dados. No arquivo em anexo tem o exemplo. Porém agora que estamos utilizando o componente 'TACBrNFSeX' não estou conseguindo utilizar o mesmo raciocínio para implementar isso pois no componente novo não me retorna o 'NumeroLote' e nem o 'Protocolo'. Alguma idéia de como implementar isso no componente 'TACBrNFSeX'? No exemplo do arquivo em anexo (rotina antiga) estamos implementando isso para o provedor 'proAssessorPublico' porém no caso aqui o cliente pediu para fazer no provedor 'proRLZ' mas creio que a lógica deve ser a mesma. DocumentoFiscalServicosENVIAR.txt

Só te pedir um favor, @Juliomar Marchetti pra voce me avisar ai se a minha alteração foi aprovada a fim de que a gente possa ficar na expectativa de quando atualizar da proxima vez os componentes do ACBr aqui na empresa para que a alteração já possa vir no download dessa atualização, blz? Grato pela atenção.

Segue em anexo os fontes atualizados do ACBr onde após contato com o suporte da Elgin eu consegui implementar a questão do cancelamento do Pix. - ACBrTEFAPI.pas: Acrescentada a propriedade 'bCancelarColeta'. - ACBrTEFAPIElgin.pas: Alterado o procedimento 'TACBrTEFAPIClassElgin.Coletar' para verificar se a propriedade 'bCancelarColeta' estiver 'True' entao executar os comandos para cancelar a coleta. Fontes Atualizados.rar

Novidades com relacao ao cancelamento do PIx da Elgin (componente TACBrTEFAPI).... Entrei em contato com o suporte da Elgin e eles me informaram que eu necessariamente tenho que colocar um comando la dentro do evento 'Coletar' (no caso da Elgin, mais especificamente dentro do evento 'TACBrTEFAPIClassElgin.Coletar') do componente do ACBr. Eu testei aqui e aparentemente funcionou para cancelar a tela do Pix aberta esperando pagamento. O problema é que eu testei isso utilizando uma tecnica que eu nao acho que seja a mais adequada para resolver esse tipo de situacao. No botao 'Cancelar' por exemplo eu crio um arquivo txt no hd e la dentro do evento 'Coletar' eu testo se existe esse arquivo para eventualmente executar os comandos de cancelamento que vai fazer cancelar o pix atual. Eu gostaria de saber se voces conseguem me ajudar no sentido de que la dentro da nossa automacao comercial eu consiga colocar alguma propriedade por exemplo que eu seto ela e que isso seja visivel la dentro do componente para ele entender que o usuario clicou no botao de cancelar, para ficar mais correto, mais profissional. A logica da coisa é que toda as transacoes TEF e PIX sao gerenciadas a partir de uma variavel que eu crio do tipo 'TACBrTEFAPI'. Essa variavel se chama 'API' e dentro dela é que eu teria que setar alguma propriedade por exemplo pra quando passar la no 'Coletar', uma vez que eu seto essa variavel o procedimento consiga 'enxergar' que eu quero tomar uma acao de cancelamento. Alguma ideia?

Será que ninguém mais ta usando esse TEF Elgin pelo componente do ACBr, não esta passando pelos mesmos problemas que eu to passando e pode ajudar?

Onde la no componente 'TACBrTEFAPI' que eu posso mexer para alterar o timeout da operacao do Pix? Ja que eu nao consigo resolver esse problema do componente usando o TEF da Elgin onde pelo que percebi a nova versao de software do TEF da Elgin muda algumas coisas (gera umas tags diferentes) o que faz com que o componente do ACBr por exemplo nao funcione na reimpressao. A minha ideia é baixar la de 3 minutos de timeout para uns 30 segundos para o cliente nao ter que ficar esperando um tempao para conseguir mudar a forma de pagamento quando ta o QRCode do Pix na tela. Alguem pode me ajudar?

Olá. Realmente a função do componente é devolver o espelho para que a aplicação imprima. Mas o que esta acontecendo é que no evento 'QuandoFinalizarOperacao' logo no inicio a propriedade 'RespostaTEF.TextoEspecialOperador' já esta vindo como False o que faz com que o processamento nao entre no 'Else' onde esta o comando para impressão do comprovante TEF. E o que é curioso mesmo se eu desviar o processamento para entrar no 'Else' quando entra na impressão do comprovante 'TclasseTEF.ImprimirTodosComprovantes' la não imprime nada (nao encontra informação para se imprimir, a propriedade 'FTEFAPI.RespostasTEF.Count' esta zerada ). Ver imagens em anexo.

Ta, vamos la... Questão da reimpressão eu estava debugando la onde ta passando e ta disparando o evento 'QuandoFinalizarOperacao', como tem que ser. O problema que eu percebi a principio é que logo ao entrar no evento, a propriedade 'RespostaTEF.Sucesso' ja vem 'False', ou seja, nao passa no 'Else' onde vai imprimir o comprovante (parece que o componente devolveu algo como se não tivesse tido sucesso em encontrar o espelho do comprovante). Ai, na sequencia, para forçar o sistema executar os comandos que estão no 'Else' (para imprimir o comprovante) eu substitui a linha de teste 'if not RespostaTEF.Sucesso then' por 'if 1=0 then'. Então quando executou o 'FTEF.ImprimirTodosComprovantes' eu vi que la dentro do procedimento a propriedade 'FTEFAPI.RespostasTEF.Count' está 'Zero' (dessa forma não imprime nada). Ou seja, tem no sistema a parte da reimpressão implementada porém pelo que entendi o componente não devolve a imagem a ser impressa. OBS: No que se refere a propriedade 'RespostaTEF.TextoEspecialOperador' ela ta vindo como 'REIMPRESSAO'.

Sobre a reimpressão, é simples, não reimprime, não funciona. É isso.

Olá amigos, tudo bom? @Juliomar Marchetti, @Italo Giurizzato Junior alguma novidade sobre a correção desses bugs do TEF Elgin, no que se refere ao cancelamento (este pos) e no que se refere a reimpressão (outro post) ?

@Italo Giurizzato Junior, creio que mediante ao seu relato e ao relato da @rizzotec, acho que podemos encerrar esse tópico por aqui blz? Agradecido pela atenção de todos!

Boa tarde, no que se refere ao material para testes eu acabei de confirmar com o suporte da Elgin e eles me informaram que não ha problema algum em repassar o link do material de apoio ai pra voces testarem os componentes para correção de bugs. Vou anexar o print da conversa. Obrigado.

Suspeito que sim, na verdade quem fez essa parte do TEF originalmente não fui eu. Eu recentemente que comecei a mexer em algumas tarefas relacionadas ao TEF. Ref. ao TEF da Elgin tambem estou com problemas na reimpressão que não funciona (assunto desse tópico ai que postei também.)

Creio que com esse material ai vocês vão conseguir fazer os testes necessários. Se puder me dar um retorno depois dos testes realizados eu agradeço. Agradecido pela atenção de vocês. Valeu.

Bom dia, então, o que eu tenho aqui na minha pasta dos Schemas\NFSe é a sub-pasta RLZ\2.03 dessa forma creio que serja esse layout '2.03' mesmo que está usando. Ref. ao questionamento do Juliomar se os fontes estão atualizados, eu olhei la na pasta do componente ACBr e pelo que vi, sim, estão atualizados, até mesmo porque fizemos uma atualização ha poucos dias.

Bom dia, grato pelo retorno. Então eu tenho aqui os links de todo o material necessário para os testes, que o próprio suporte da Elgin me passou, segue abaixo: Software do TEF https://github.com/ElginDeveloperCommunity/TEF-Elgin/blob/master/ELGIN TEF HUB/Instaladores Windows/86Elgin TEFHUB-v02.24.01.exe DLL do TEF (colocar na pasta da aplicacao, alterar o nome da dll "E1_Tef_hml.dll" para "E1_Tef01.dll") https://github.com/ElginDeveloperCommunity/TEF-Elgin/blob/master/ELGIN TEF HUB/Instaladores Windows/Bibliotecas/E1_Tef-v02.26.02.zip Simulador do TEF (colocar as DLL na pasta do simulador, mesma coisa do procedimento ref. a pasta da aplicacao) https://github.com/ElginDeveloperCommunity/TEF-Elgin/tree/master/Exemplos TEF/Exemplos TEF DLL - ATIVO/C%23/NET Framework 4/ApiTefElgin-executavel >>> Dar um Ctrl+Shift+S para fazer o download

Olá, tenho uma situação aqui onde eu estou enviado a informacao ref. a Inscricao Estadual do tomador de servico para o componente 'TACBrNFSeX' porém ao gerar o xml eu olhei la e o componente não está preechendo essa tag no xml. Com isso a informação não chega no provedor e o cliente reclama que a informacao esta faltando. Segue em anexo os prints e o xml que o componente gerou. O provedor que o 'RLZ'. Tomador.IdentificacaoTomador.InscricaoEstadual := qInfAux.FieldByName('IE').AsString; <-- lugar onde atribuo a inscricao estadual Alguma idéia? NFSeTempGerarXML.xml

Situação atual --> Para resolver esse bug do print anterior ref. ao 'ResolveOperacaoPendente' eu tive que reinstalar de novo o software do TEF da Elgin la no servidor de programação para voltar a funcionar... mas a situação é essa, ou seja, durante o Pix do TEF eu coloquei um breakpoint la no evento 'QuandoEsperarOperacao' e realmente nao passa la durante todo o processo do Pix para esse caso do TEF da Elgin (nao sei se em outro caso software diferente da Elgin passa) mas como usamos o software da Elgin temos que arrumar uma solucao para este caso. Não tem realmente nenhum comando que seja independente de ter que passar em evento do componente? Algo como uma linha de comando parecido como ""TEFAPi.CancelarOperacao;"" (ou algo parecido) ?

Estou rodando e testando o programa do ACBR ref. ao TEFAPI. Ocorre que depois que eu finalizei uma venda la no 'Cartao de Credito' ai buga o TEF e nao consigo executar mais nada (segue o print). Parece que ele finaliza a venda no TEF, imprime o comprovante e por algum bug aparentemente deixa algo pendente que nao consegue resolver depois e nao se consegue fazer mais nada no TEF (nem abrir a funcao administrativa). Como resolver isso? Obs: Meu TEF é o Elgin.

Eu instalei o software do TEF aqui no meu computador (local) para testar o programa 'TEFAPIDemo.exe' ... ai como eu faço la dentro desse demo para gerar a situacao do QRCode do Pix na tela e simular um cancelamento?

Entao, aqui a gente trabalha vis TS tudo centralizado no computador que é o servidor de programação, onde todos os programadores da empresa acessam, entao é preciso todo o cuidado do mundo para nao desconfigurar nada la senao todo mundo sofre as consequencias. Eu nao quis rodar mais aquele programa de exemplo do TEF pois nao sei se é paranóia minha ou se foi real mesmo, mas eu fiquei com a impressão de que depois de rodar ele la no servidor de programação e tentar algumas opcoes la da tela o TEF parou de funcionar. Mas estranho é que eu debuguei o sistema e coloquei um 'BreakPoint' la no evento 'QuandoEsperarOperacao' mas e vi que na verdade nao estava passando la o processamento depois que eu setei a variavel (esse que ta sendo o problema aqui).

Mas esse evento ai é disparado quando? é quando ocorre alguma ação ou de X em X segundos? como ele funciona? Pois eu esse é o ponto que eu quero saber... depois que passou na linha de comando 'DMClasseTEF.FCanceladoPeloOperador := True;' quando que o evento vai ocorrer?