Suélio Santos

Obrigado pelo retorno Régys...era isso mesmo, estava chamando o DMACBr.ECF.EfetuaPagamento antes de imprimir o segundo pagamento, dessa forma ele zerava o valor quando tentava imprimir o segundo comprovante vinculado.

Boa noite a vários dias estou penando no meu sistema, tentando imprimir uma venda com mais de um cartão, quando faço pela demo o processo da certo, mas quando tento pela minha aplicação da erro. Estou enviando os 2 logs, do ACBR e da minha aplicação Um detalhe, debugando o código consegui encontrar onde esta dando o erro: _ O erro acontece dentro do método function TACBrECFEpson.EnviaComando_ECF(cmd : AnsiString) : AnsiString ; o sistema pergunta: ErroMsg := EpsonResposta.DescRetorno ; if ErroMsg <> '' then onde ErroMsg é forma de pagamento não encontrado, interessante que a forma de pagamento enviado esta cadastrado (quando mando verificar via leitura x mostra a forma 2 - cartão vinculado) Se alguém poder me dar uma dica agradeço muito log_acbr.log log_ecf.log log_aplicacao.log

RESOLVIDO Depois de muito penar, revisei todos os eventos e encontrei um erro no método onComandaECF na hora de varrer os pagamentos e chamar o método FechaCupon estava enviando o retorno errado, ai na hora de verificar nao mudava o valor da variável RetornoECF. Muito obrigado aos amigos que tentaram me ajudar

Boa noite o erro da dentro do evento TEFDComandaECF, o que eu preciso passar exatamente no FechaCupom('Projeto ACBr|http://acbr.sf.net')? se eu deixar em branco ele pega as informações do rodape(impostos IBPT), mas sempre da o mesmo erro Deseja tentar novamente ? Em anexo o log do acbr, agradeço a quem poder me da uma ajuda log.txt

É... não sei mais o que fazer..infelizmente nao deu certo!

Obg pelo retorno Juliomar, vou revisar os eventos do componente, ver se esta faltando algo. Criei todos que tem no exemplo do Acbr, mas vou ver se tem algo que esqueci

Boa noite senhores, a dois dias estou com um erro na hora de fazer o pagamento TEF em meu sistema e não consigo resolver, explicando a situação: Entro em meu sistema faço a venda e chamo a opção CRM faz a venda normal, debugando vejo que a venda é aprovada, mas na hora de imprimir da a mensagem "Erro na hora da impressão, deseja tentar novamente?" ja vi nesse link http://www.projetoacbr.com.br/forum/topic/18311-erro-na-impressão-deseja-tentar-novamente/ as dicas sobre o erro no pagamento mas estou passando na mão o que esta cadastrado no ECF EPSON (2) e mesmo assim da erro. Estava dando erro no demo do AcBr e passando na mão o valor deu certo, mas em meu código não vai de jeito nenhum, se alquiem poder me dar uma dica eu agradeço de coração. Em anexo o log da ecf não achei o log do ACBR..enquanto isso vou tentado achar onde o que pode setar acontecendo log.txt

#RESOLVIDO

Boa noite senhores, também estou entrando no mundo do TEF agora, sou freelancer e peguei um serviço para integrar um PDV com o TEF. Estou procurando informações sobre empresas integradoras(não sei se chama assim), manuais, exemplos, tudo que for relacionado. Minha duvida inicial é: usar Pay&Go ou Sitef, pelo que estou percebendo Pay&Go sai mais em conta(R$). Ate agora nas minhas pesquisas sobre empresas Integradoras Pay&Go: NTK (Não vi valores) Dataregis valores variando 140~180 mensalidades fora adesão em alguns casos Sugerem Mais alguma para analise Sitef: SkyTef ainda não verifiquei valores reais, pelo que li em foruns parece ser mais caro que usar pay&go

Boa tarde senhores. Estou iniciando a batalha do TEF e queria a opnião dos mais esperientes no assunto qual a diferença entre PayGo e Sitef... qual usar PayGo ou Sitef? Os colegas poderiam detalhar melhor isso? Como funciona a certificação? anual? quais os custos? E pra desenvolver, é tranquilo? qual o mais "fácil" para quem nunca mexeu com TEF, (simulador, documentação, exemplos, etc.) E a operação, suporta todos os cartões? recarga? correspondente? Suporta discado e via internet?

Criação das tabelas e atualização das classes. 1- Classe ACBrEPCBlocos //Indicador de Origem de crédito(Registros 1100 e 1500 - ORIG_CRED) TACBrIndicadorOrigemCredito = ( crDecOperacaoPropria, //01 – Crédito decorrente de operações próprias; crTrasPessoaJuridica //02 – Crédito transferido por pessoa jurídica sucedida. ); 2 - Registros 1100 e 1500. //Campo 03 - COD_CRED, já existe a tabela: TACBrCodCred //Faltando apenas declarar o tipo da variável 3- Alteração tipo da variável - Registro 1100 e 1500 * linhas alteradas: 1100: fORIG_CRED: TACBrIndicadorOrigemCredito; property ORIG_CRED: TACBrIndicadorOrigemCredito read FORIG_CRED write FORIG_CRED; 1500: fCOD_CRED: TACBrCodCred; property COD_CRED: TACBrCodCred; read FCOD_CRED write FCOD_CRED; 4 - Alteração nas procedures TBloco_1.WriteRegistro1100 e 1500 ; *Atualizado nos 2 registros 1100 e 1500* case ORIG_CRED of crDecOperacaoPropria: strORIG_CRED := '01'; crTrasPessoaJuridica: strORIG_CRED := '02'; end; case COD_CRED of //CÓDIGOS VINCULADOS À RECEITA TRIBUTADA NO MERCADO INTERNO - Grupo 100 ccRTMIAliqBasica: strCOD_CRED := '101'; ccRTMIAliqDiferenciada: strCOD_CRED := '102'; ccRTMIAliqUnidProduto : strCOD_CRED := '103'; ccRTMIEstAbertura : strCOD_CRED := '104'; ccRTMIAquiEmbalagem : strCOD_CRED := '105'; ccRTMIPreAgroindustria: strCOD_CRED := '106'; ccRTMIImportacao : strCOD_CRED := '107'; ccRTMIAtivImobiliaria : strCOD_CRED := '109'; ccRTMIOutros : strCOD_CRED := '199'; //CÓDIGOS VINCULADOS À RECEITA NÃO TRIBUTADA NO MERCADO INTERNO - Grupo 200 ccRNTMIAliqBasica : strCOD_CRED := '201'; ccRNTMIAliqDiferenciada : strCOD_CRED := '202'; ccRNTMIAliqUnidProduto: strCOD_CRED := '203'; ccRNTMIEstAbertura : strCOD_CRED := '204'; ccRNTMIAquiEmbalagem : strCOD_CRED := '205'; ccRNTMIPreAgroindustria: strCOD_CRED:= '206'; ccRNTMIImportacao : strCOD_CRED := '208'; ccRNTMIOutros : strCOD_CRED := '299'; //CÓDIGOS VINCULADOS À RECEITA DE EXPORTAÇÃO - Grupo 300 ccREAliqBasica : strCOD_CRED := '301'; ccREAliqDiferenciada : strCOD_CRED := '302'; ccREAliqUnidProduto : strCOD_CRED := '303'; ccREEstAbertura : strCOD_CRED := '304'; ccREAquiEmbalagem : strCOD_CRED := '305'; ccREPreAgroindustria : strCOD_CRED := '306'; ccREPreAgroindustriaPCR: strCOD_CRED:= '307'; ccREImportacao : strCOD_CRED := '308'; ccREOutros : strCOD_CRED := '399'; end; alterações.rar

Correção: Classe: ACBrEPCBloco_1_Class * Registro 1500 LFill( PER_APU_CRED, 6) + // Ou criar tabela no ACBrEPCBlocos ou colocar delimitador e deixar que o desenvolvedor passe a informação correta. Ex: 042011 LFill( ORIG_CRED, 2 ) + // Ou criar tabela no ACBrEPCBlocos ou colocar delimitador e deixar que o desenvolvedor passe a informação correta. Ex: 01 LFill( COD_CRED, 3 ) // Ou criar tabela no ACBrEPCBlocos ou colocar delimitador e deixar que o desenvolvedor passe a informação correta. Ex: 101 Mesmo caso do 1100 Correção em anexo. ACBrEPCBloco_1_Class.rar

Boa tarde, algumas melhorias: 1) Classe: ACBrEPCBloco_C_Class * Registro C400, LFill(ECF_CX, 2) colocar delimitador, para não trazer formato de data não encontrada, exemplo: 31121899. Esse campo é um integer. 2) Classe: ACBrEPCBloco_1_Class * Registro 1100 LFill( PER_APU_CRED, 6) + // Ou criar tabela no ACBrEPCBlocos ou colocar delimitador e deixar que o desenvolvedor passe a informação correta. Ex: 042011 LFill( ORIG_CRED, 2 ) + // Ou criar tabela no ACBrEPCBlocos ou colocar delimitador e deixar que o desenvolvedor passe a informação correta. Ex: 01 LFill( COD_CRED, 3 ) // Ou criar tabela no ACBrEPCBlocos ou colocar delimitador e deixar que o desenvolvedor passe a informação correta. Ex: 101 LFill( SLD_CRED_FIM, 0, 2) é um valor currency e não esta com o (0, 2) Segue em anexo. Correções_PISCOFINS.rar

Bom dia, desculpe a pergunta, pelo que entendi a idéia é agente que esta usando o componente fazer a alteração e postar a unit? Se for já tenho algumas correções para postar.

Ainda em relação ao registro C400, achei outro erro, na hora de escrever o registro o ultimo campo esta como inteiro mais aparece como uma data, EX: |C400|2D|URANO POS-LOGGER|UR010701169|31121899|, se colocar por exemplo um numero 1 mesmo assim ele escreve do jeito acima. O campo é do RegistroC400New --> ECF_CX