Suélio Santos
-
Total de ítens
16 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Suélio Santos
-
-
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
-
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
-
É... 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
-
#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;
-
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.
-
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.
-
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
-
Boa tarde, estou validando o SPED PIS COFINS e verifiquei que na leitura do TBloco_C.WriteRegistroC010. não esta informado o registro filho C400 WriteRegistroC400.
Erro ao imprimir com mais de um cartão
em Dúvidas sobre TEF
Postado
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.