Jean Peixoto

Resolvido. No evento onComandaECF, não tinha tratado o opeImprimePagamentos.

Vc já olhou pra ver se seu certificado não está vencido? Qual a versão do documento fiscal configurado no componente, ve100 ou ve100a? Você esta usando os schemas corretos para a versão escolhida?

Boa tarde tidra, Você colocou o post em lugar errado! neste forum são assuntos apenas do componente ACBrTEFD. Sugiro que pude antes de receber bronca dos moderadores! Qual erro está dando qdo vc envia?

Bom dia, Não estou conseguindo realizar os passos 12 quando tem saque, e 14 quando tem saque e desconto da NTK. No passo 12, diz pra fazer assim: -> uma venda no valor de R$ 10,00 -> Valor total (final) R$ 14,00 -> Valor original R$ 10,00 -> Troco (saque) de R$ 4,00 Componente ACBrTefD atualizado hoje. Propriedades SuportaDesconto e SuportaSaque = true. AutoEfetuarPagamento = false.No evento ACBrTEFComandaECFSubtotaliza está assim: Var Est : TACBrECFEstado ; MeuAcresDesc : Double ; begin MeuAcresDesc := StringToFloatDef(frmCAIXA_PAGAMENTO.DESCONTO.Text, 0 ); try Est := ACBrECF.Estado; if Est = estNaoFiscal then ACBrECF.SubtotalizaNaoFiscal( DescAcre + MeuAcresDesc, 'Projeto ACBr|http://acbr.sf.net' ) else ACBrECF.SubtotalizaCupom( DescAcre + MeuAcresDesc, 'Projeto ACBr|http://acbr.sf.net' ); RetornoECF := 1 ; except RetornoECF := 0 ; end; O pessoal da NTK reprovou minha homologação dizendo que o cupom não está saindo com os descontos/ acréscimos. Alguém sabe me informar como corrijo isso?

RobertoRP, O Passo 49 é de simulação de queda de energia, portanto a simulação disso seria você desligar o computador no momento da impressao do compromante! Atente-se para isso.

Sim, isso procede, se você mudar a versão do seu sistema você terá que fazer a homologação novamente, MAIS..... sabemos que nossos executáveis sempre estão sofrendo alterações, sejam pra correção ou pra inclusão de novas funcionalidades, portanto, você nao precisa fazer novamente a homologação se fizer apenas correções.

Realmente não estou conseguindo encontrar onde posso colocar essas informações. Vi que tem o evento 'AntesSubtotalizaCupom', mais MensagemRodape é uma constante: ACBrECFAntesSubtotalizaCupom(const DescontoAcrescimo: Double; const MensagemRodape: AnsiString) Sinceramente não estou conseguindo encontrar onde posso colocar, se puder me orientar, agradeço muito. Obrigado!

Onde coloco as informações sobre o imposto aproximado quando vou fechar o cupom fiscal quando a venda tem a forma de pagamento cartão? Quando a forma de pagamento não tem cartão coloco as informações do imposto aproximado no componente ACBrECF, conforme citei acima. Mais quando tem forma de pagamento de cartão, o componente que fecha o cupom é o ACBrTEFD.FinalizarCupom. Não estou achando o lugar onde coloco as informações pra o imposto aproximando quando utilizo o fechamento pelo ACBrTEFD.

Bom dia, Na impressão do Cupom Fiscal pelo componente, faço da seguinte maneira: ACBrECF.InfoRodapeCupom.Imposto.ValorAproximadoFederal ACBrECF.InfoRodapeCupom.Imposto.ValorAproximadoEstadual ACBrECF.InfoRodapeCupom.Imposto.ValorAproximadoMunicipal Mais quando tem TEF, não estou achando no componente onde coloco essas informações!

Bom dia, Fiz a substituição das .dlls e funcionou perfeitamente! Obrigado.

Este é o log completo, desde o momento em que abri meu .exe até o momento do travamento. Apaguei o histórico antes de iniciar o .exe pra não confundir. Obs: No Demo não dá esse problema.

Vou colocar aqui o log do arquivo CliSiTef.txt pra possível ajuda! -- 02/05 16:41:33:252 - *** ConfiguraIntSiTefInterativoEx. EnderecoIP: localhost CodigoLoja: 00000000 NumeroTerminal: SE000001 Resultado: 0 ParametrosAdicionais: [VersaoAutomacaoCielo=ACBr 10] -- 02/05 16:41:33:336 - CliSiTef Inicializado CliSiTEF -- 02/05 16:41:33:336 - InfoECF: ineEstadoECF -- 02/05 16:41:34:735 - Ret: V -- 02/05 16:41:34:735 - CliSiTef CancelarTransacoesPendentesClass -- 02/05 16:41:51:908 - InfoECF: ineEstadoECF -- 02/05 16:41:51:938 - Ret: V -- 02/05 16:41:51:938 - InfoECF: ineSubTotal -- 02/05 16:41:52:011 - Ret: 12,5 -- 02/05 16:41:52:011 - InfoECF: ineTotalAPagar

Boa tarde, Estou enfrentando um problema em meu software. Quando chamo qualquer função do TEF (ADM, CRT) ele trava. Consegui ver em qual linha ele trava: Arquivo: ACBrTEFDCliSiTef, Linha:1065. Utilizo o CliSiTef, com a DLL na pasta do executável. Fontes atualizados e compilados hoje (02/05/2016). Segue imagem Alguém já passou por essa situação

Também estou como o mesmo problema! Alguém já conseguiu resolver? Consegui achar o que é: Estava usando a mensagem assim: ACBrMail.Body.Text := strMSGMAIL; O que funcionou foi assim: AcbrMail.AltBody.Add(strMSGMAIL);

Graça, realmente está falando de comércio eletrônico. Mais também das empresas do simples nacional, veja isso: http://www.stf.jus.br/portal/cms/verNoticiaDetalhe.asp?idConteudo=310143 Vamos aguardar...

O STF suspendeu através de liminar: http://oglobo.globo.com/economia/stf-da-liminar-suspendendo-cobranca-de-icms-no-comercio-eletronico-18695607 A cada dia me surpreendo com nosso governo, além da grande bagunça que é nossa legislação fiscal, e de não terem interesse de "organizar a casa", ainda continuam inventando moda! Como será que vai ficar? Teremos que esperar as cenas do próximo capítulo. Depois da trabalheira danada que tivemos pra colocar isso pra rodar.... Só em nosso Brasil mesmo!!

Boa tarde, consegui resolver, obrigado a todos. Ficou assim meu código: Estorno := EstornoDTO.Create; Estorno.nuCnpj := cds_CONFFP_CNPJ_USUARIO.AsString; Estorno.nuAutorizacao := clone_cds_1.FieldByName('FP_CODIGO_AUTORIZACAO').AsString; Estorno.nuAutorizacao := clone_cds_1.FieldByName('FP_CODIGO_AUTORIZACAO').AsString; SETLENGTH(Med,clone_cds_1.RecordCount); {COLOCA TODOS OS MEDICAMENTOS SELECIONADOS PARA ESTORNO} for I := 0 to clone_cds_1.RecordCount - 1 do begin Med[I] := MedicamentoDTO.Create; Med[I].coCodigoBarra := clone_cds_1.FieldByName('CODIGO_BARRAS').AsString; Med[I].qtDevolvida := clone_cds_1.FieldByName('FP_QUANTIDADE_AUTORIZADA').AsCurrency; clone_cds_1.Next; end; Estorno.arrMedicamentoDTO := Med; try Confirma := ConfirmacaoEstornoDTO.Create; Confirma := GetServicoSolicitacaoWS().executarEstorno(Estorno,Usuario); finally

Alguém tem um exemplo de como estornar medicamentos vendidos pela farmácia popular? Não estou conseguindo. Obrigado!

Bom dia Centuryinf, Eu também estou do mesmo jeito ainda, está dando o mesmo problema onde quer que eu coloque o executável. Não desisti, mais está ficando sem muita opção pra eu achar onde está esse problema. Estou usando os parametros a seguir para enviar o email: ACBrMail.Clear; ACBrMail.IsHTML := false; ACBrMail.From := 'aqui coloco o email'; ACBrMail.FromName := 'jean'; ACBrMail.Host := 'smtp.mail.yahoo.com'; ACBrMail.Username := 'aqui coloco o email de origem'; ACBrMail.Password := 'senha do email de origem'; ACBrMail.Port := '587'; ACBrMail.SetTLS := false; ACBrMail.AddAddress('email de destino', 'destinatario jean'); AcbrMail.AltBody.Add('Notas fiscais eletrônicas compactadas em anexo.'); AcbrMail.Subject := 'teste subject'; AcbrMail.Send(false); Quais parametros vc utiliza?

Não consegui resolver o meu também! Cheguei a excluir e incluir novamente! Fiz a atualização das dll e do componente. Centuryinf vc chegou a testar em mais de uma máquina? Fiz os testes no Win7 e trava sempre. Não fiz o teste em outras versões do windows. Estou tentando descobrir, se tiver novidades posto aqui!

Matheus, minha sugestão pra você é: Não faça isso! Motivo 01: você vai ficar com seus fontes do ACBr desatualizados, sempre que surgir correções e novas funcionalidades você terá que colocar isso manualmente nos seus ou não utilizar as novas alterações do ACBr. Motivo 02: A função de termos o ACBr é que todos possam usar um modelo padrão para fazermos nossos sistemas de modo a atender a legislação. Motivo 03: Meu amigo, a legislação muda muito e você vai ter um trabalhão pra acompanhar isso manualmente. Essa é minha opinião!

Não sei se a dúvida é neste forum, mais lá vai: Como vocês fazem a cobrança da mensalidade de seus clientes? Emitem boleto registrado? Cobrança sem registro era ideal pra nós, o cliente podia gerar o boleto da sua mensalidade, agora não dá mais. Alguém faz esse tipo de cobrança de algum modo diferente?

Instalei em outro computador e aconteceu o seguinte: 1 - Quando estou executando o programa pelo delphi ele trava do mesmo jeito, dando a mensagem que o sistema parou de funcionar 2 - Quando abro direto pelo executável ele não dá o problema. Em ambas as situações ele envia o e-mail. No primeiro computador ele não envia de nenhum jeito e trava de qualquer uma das formas que executo o sistema.

Bom dia Juliomar, obrigado pela atenção! Ainda estou com o mesmo problema! Sim, tenho meus fontes atualizados e recompilados. Atualizado em 14/01/2016, trunk2. Estou instalando em outra máquina pra ver se ocorre o mesmo problema. Assim que fizer o teste posto aqui o resultado. Obrigado

Pois é Juliomar, genérica mesmo! Uso os arquivos ssleay32.dll e libeay32.dll na mesma pasta do executável e na versão 0.9.8.14. Já testei também na versão 0.9.8.1. Algo que não coloquei na minha primeira mensagem é que ACBrMail.SetSSL := true. Debugando, verifiquei que ele dá esse problema na linha 636 do arquivo AcbrMail, conforme imagem abaixo.