TEF Daruma / Direção

[joseadolfojr]

Olá a todos,

Estou em busca de alguma Solução TEF.

Já dei uma olhada na solução da DATAREGIS e agora estou

analisando a solução da DARUMA.

O interessante da DARUMA que pode-se fazer a homologação remota.

Alguém já fez ou está desenvolvendo na solução da Daruma ?

O ACBR já suporta ?

Grato

[Daniel Simoes]

O TEFD não suporta o TEF da Direção (ainda)

Atualmente todos os TEFs permitem homologação remota... SiTEF, discado, etc

[marciodc]

Eu tenho uma implementação pronta do TEF Direção, integrada ao ACBr, e até já me comprometi em enviar o código para análise mas ainda não tive tempo de fazer o exemplo. Se alguém estiver necessitando, posso tentar fazer isso até a próxima semana.

Márcio D. Carvalho

www.techsistemas.com.br

[Daniel Simoes]

Marcio,

Não é possível usar o Exemplo já existente ?

[EMBarbosa]

Márcio,

Você pode postar o código. Se tiver o início já ajuda quem estiver precisando, mesmo que não tenha o exemplo. Na medida do possível você adiciona o restante.

Se seguir o padrão do ACBrTEFD tenho certeza que não vai precisar de muita coisa.

[marciodc]

Pessoal, além do Direção eu tenho também o CrediShop (muito utilizado no Maranhão e Piaui) e TicketCar (parcial), todos no padrão ao ACBr. Vou tentar fazer o exemplo completo até o início da próxima semana e posto aqui. Assim, se tiver mais alguém interessado fica mais fácil de dar prosseguimento.

Estou encaminhando também uma atualização do Banese Card.

E é possível utilizar o exemplo existente, só não tive tempo de adaptá-lo completamente para esses cartões.

Estou encaminhando as units e o exemplo incompleto, caso alguém necessite com mais urgência.

Márcio D. Carvalho

http://www.techsistemas.com.br

Demo.zip

ACBrTEFD.zip

[Daniel Simoes]

Estou aplicando os Patchs... notei a falta da Unit: ACBrTEFDPetroCard.pas

[marciodc]

Olá Daniel, o arquivo está no tópico viewtopic.php?f=16&t=4837.

Márcio D. Carvalho

Desenvolvimento

www.techsistemas.com.br

[Daniel Simoes]

Oi Marcio,

Algumas dúvidas sobre os arquivos das novas classes...

* Em ACBrTEFDBanese.pas

linha 610... temos um Sleep(1000), que aprentemente está sem necessidade... pois ele está depois da leitura da Resposta... Posso remove-lo ?

* Em ACBrTEFDClass.pas

linha: 2471... fiquei com receio de aplicar o seguinte bloco:

     { Se é Multiplos Cartoes, e ainda Resta SALDO deve enviar um CNF }

     //if MultiplosCartoes and (RespostasPendentes.SaldoRestante > 0) then

     if ((MultiplosCartoes = True)and

         (RespostasPendentes.Count 
         (NumeroMaximoCartoes = 2)) then

  [/code]


Qual a finalidade desta modificação ? 

Fizemos algumas modificações nesse método... que acho que podem funcionar corretamente em todas as classes sem essa modificação...



* Linha: 2534... vi que você comentou o bloco abaixo:

[code]    //if MultiplosCartoes and (NumeroMaximoCartoes > 0) and   // Tem multiplos Cartoes ?

    //   (Valor  RespostasPendentes.SaldoRestante) and      // Valor é diferente do Saldo Restante a Pagar ?

    //   ((NumeroMaximoCartoes - RespostasPendentes.Count) 
    //   raise Exception.Create( ACBrStr( 'Multiplos Cartões Limitado a '+

    //         IntToStr(NumeroMaximoCartoes)+' operações.'+sLineBreak+

    //         'Esta Operação TEF deve ser igual ao Saldo a Pagar' ) );

Mas acho importante mante-lo....

Notei alguns Warnings para a Unit: ACBrTEFDTicketCar.pas...

[Warning] ACBrTEFDTicketCar.pas(667): Variable 'FechaGerencialAberto' might not have been initialized

[Warning] ACBrTEFDTicketCar.pas(653): Variable 'HouveImpressao' might not have been initialized

E olhando nos fontes, essas váriaveis locais realmente nunca foram inicializadas... A Unit ACBrTEFDTicketCar.pas está operacional ? Porque nessa Unit, a classe não pode ser herdada de: TACBrTEFDClass ?

[marciodc]

Olá Daniel, seguem abaixo os meus comentários:

* Em ACBrTEFDBanese.pas

linha 610... temos um Sleep(1000), que aprentemente está sem necessidade... pois ele está depois da leitura da Resposta... Posso remove-lo ?

-> Pode remover sim. O arquivo já foi carregado, realmente não há necessidade.

* Em ACBrTEFDClass.pas

linha: 2471... fiquei com receio de aplicar o seguinte bloco:

* Linha: 2534... vi que você comentou o bloco abaixo:

-> Pode alterar para o bloco padrão. Essas alterações foram feitas em uma época em que eu estava tendo problemas com as vendas de múltiplos cartões. Hoje utilizo a unit ACBrTEFDClass sem alterações.

[Warning] ACBrTEFDTicketCar.pas(667): Variable 'FechaGerencialAberto' might not have been initialized

[Warning] ACBrTEFDTicketCar.pas(653): Variable 'HouveImpressao' might not have been initialized

-> Pode excluir... elas estão sem função. Acho que a ideia se perdeu no meio do caminho

* E olhando nos fontes, essas váriaveis locais realmente nunca foram inicializadas... A Unit ACBrTEFDTicketCar.pas está operacional ? Porque nessa Unit, a classe não pode ser herdada de: TACBrTEFDClass ?

-> Está operacional.

-> Ela está sendo herdada de TACBrTEFDClass (linha 85), se não constar na sua cópia, pode efetuar a alteração.

Qualquer dúvida é só falar (ou escrever... hehehe).

[Daniel Simoes]

Oi Marcio,

Obrigado pelas respostas... Você poderia me enviar a Unit ACBrTEFDTicketCar.pas atualizada ? acredito que a minha não seja a última versão...

[Daniel Simoes]

Finalmente consegui concluir a analise a comitar as suas modificações...

Elas foram tantas, que mudei a versão do componente para 2.00

Tente modificar a Classe TACBrTEFDRespCliDTEF para fazer chamadas para a DLL usando o padrão já utilizado em todo o ACBr.. (PAnsiChar)... mas não pude testa-la pois não tenho o Gerenciados do TEF da Direção... então não sei se quebrei algo...

Revisei os fontes em busca de memory leaks e fiz alguns ajustes para evitar Warnings e Hints...

Por favor revise o código postado e veja se há algo errado...

[marciodc]

Ok. Vou baixar a nova versão e fazer alguns testes.

Segue anexa a unit do TicketCar.

ACBrTEFDTicketCar.pas

[Daniel Simoes]

Obrigado Marcio,

Acho que no fim eu já estava com a versão correta... comparando com a sua atual, vi apenas as minhas modificações...

[_asseinfo]

Olá Daniel,

Vou fazer os testes também e assim que terminar postarei o resultado.

Você integrou meu código? Ver:

Muito obrigado!

Marcos

[Daniel Simoes]

Oi Marcos,

Sim, levei ele em consideração... principalmente com as correções de Memory Leak

[Alexsander]

Olá Daniel,

Vou fazer os testes também e assim que terminar postarei o resultado.

Você integrou meu código? Ver:

Muito obrigado!

Marcos

Como foram os testes?

[_asseinfo]

Olá Alexsander,

Os testes na pré-homologação com o Luiz da Daruma ocorreram tudo OK.

Depois que o Daniel integrou os códigos no ACBc, a gente desviou nosso TEF para outro caminho e acabamos não fazendo os testes no código atual do ACBr.

Se você fizer esse teste/homologação agradeço se poder reportar aqui!

[]`s

Marcos de Melo.

[Alexsander]

Olá Alexsander,

Os testes na pré-homologação com o Luiz da Daruma ocorreram tudo OK.

Depois que o Daniel integrou os códigos no ACBc, a gente desviou nosso TEF para outro caminho e acabamos não fazendo os testes no código atual do ACBr.

Se você fizer esse teste/homologação agradeço se poder reportar aqui!

[]`s

Marcos de Melo.

Na verdade nosso ERP tinha um módulo PDV que foi descontinuado em favor da integração com soluções PDV de terceiros. Agora, com o projeto da NF-e ao Consumidor no horizonte, volta a ser interessante ter um módulo PDV que não requeira uma impressora fiscal. Vi que o D-TEF da Direção seria uma opção, mas mandei email pra eles e não tive retorno ainda.

[arrobba]

boa tarde,

 

Estou implantando o TEF Direção, mas não consigo baixar os exemplos, dos link's.  tem outro lugar para baixar, ou enviar por email: [email protected].

 

 

agradeço.