Luciano Ramos Palandi

Boa tarde Juliomar, por favor pode me indicar onde devo analisar?, o xml esta valido no site da sefaz, no exemplo funciona, sera que esta faltando declarar alguma dll? uso estas configurações para gerar a danfe ACBrNFe1.Configuracoes.Geral.SSLLib:= libWinCrypt;//libOpenSSL; ok ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; //ok ACBrNFe1.Configuracoes.Geral.sslhttplib:= httpWinHttp; ACBrNFe1.Configuracoes.Geral.sslxmlsignlib:= xsMsXml;//xsXmlSec; ok isso pode afetar?

na verdade eu copie e colei exatamente como esta no exemplo, uso Midaslib no form. var ano,mes: integer; begin // AjustaNFE; mes:= monthof(date); ano:= yearof(date); OpenDialog1.FileName := ''; OpenDialog1.Title := 'Selecione o XML do Cupom'; OpenDialog1.DefaultExt := '*.XML'; OpenDialog1.Filter := 'Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := 'C:\SCI-DEPOSITO\Software\DOCUMENTOS\ARQUIVOS\' + intTOstr(ano)+ intTOstr(mes) + '\'; if OpenDialog1.Execute then begin ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName,False); // ACBrNFe1.NotasFiscais.ImprimirPDF; ACBrNFe1.NotasFiscais.Imprimir; end; end;

Senhores, por favor peço ajuda na seguinte situação, no menu principal da minha aplicação toda vez que eu tento reimprimir nfe, carta de correção ou salvar em pdf, antes gera um A.V. e depois mostra o preview, no exemplo do demo funciona sem problemas, oque posso estar fazer para corrigir na minha aplicação?

Se servir de ajuda... if ACBrNFe2.Enviar(NumeroLote, false, true) then // Envia o lote contendo apenas 1 nota no modo sincrono begin // guardar o status da nota atual StatusNota := ACBrNFe2.NotasFiscais.Items[0].NFe.procNFe.cStat; MsgRetorno := ''; if ValueIn(StatusNota, [100, 150, 110, 301, 302]) then begin

Senhores, era uma questão de espelhamento, o sistema estava carregando uma configuração de outro form. Por favor pode ser finalizado.

Senhores, por favor após um cliente ir para o regime normal estou me deparando com a seguinte situação: informo Emit.CRT := crtRegimeNormal; e no XML sempre grava emit.crt:= 1, se alguém souber o porque desde já agradeço.

Bom dia Thiago, estou precisando implementar no meu sistema a importação de xml para entrada de notas, por favor poderia me dar um exemplo de como fez?, se possível segue e-mail [email protected], desde ja obrigado.

Boa noite Juliomar, acrescentei no evento ACBrTEFD1ComandaECFImprimeVia o seguinte : ACBrPosPrinter1.Ativar; ACBRPOSPRINTER1.Imprimir(ImagemComprovante.Text); ai imprimiu legal, muito obrigado pela atenção, valeu.

Boa tarde Juliomar, me perdoe, faltou programar ACBrTEFD1.ComandaECFSubtotaliza, muito obrigado, o projeto de teste esta passando cartões, por favor você tem alguma dica de como imprimir, com os dados carregados do acbrtef já serve para montar um comprovante?

Juliomar, por favor, quando executo ACBrTEFD1.ImprimirTransacoesPendentes, o componente fica em looping subtotalizando..., consegue me ajudar a passar e imprimir por favor.

Juliomar, desenvolvi um projeto para testes com o que necessito e até agora esta ok, qualquer coisa peço socorro, obrigado pela ajuda.

Juliomar, baixei novamente o exemplo, quando vou rodar pela primeira vez, da a seguinte mensagem: The ACBrCliSiTefObtemCampo method reference by CliSiTf.ObtemCampo has an incompatible parameter list. Remove the reference? ai tenho a opção de yes, no, cancel. Neste caso, como posso proceder por favor.

Obrigado pela prontidão, prosseguindo, foi a vez do evento TEFCLISITEF\ONObtemCampo, só que quando clico para preencher, de esta mensagem: Property and Method ACBrTEFD1CliSiTefObtemCampo are not compatible, por favor, como proceder?

Boa noite Juliomar, por favor, executando o exemplo, quando clico em Inicializar o TEF, mostra a seguinte mensagem: Evento "OnAguardaResp" não configurado. qual a configuração deve ser usada?

Pessoal, por favor, estou iniciando o processo de homologação com SITEF, estou tendo muita dificuldade no desenvolvimento TEF com SAT, se alguém já implementou ACBrTEFD com SAT e puder ajudar fico muito grato.

Sergio, realizando testes hoje, percebi que quando passo o código de pagamento de minha tabela para o componente, ele esta incrementando em 1 valor a mais..., porque sera?

Bom dia Sérgio, gravo as forma de pagamento na tabela da seguinte forma: if dm.CD_VENDA.FieldByName('forma_01').AsString = '' then begin dm.CD_VENDA.Edit; dm.CD_VENDA.FieldByName('pg_01').AsString:= CodPG; dm.CD_VENDA.FieldByName('forma_01').AsString:= FormaPG; dm.CD_VENDA.FieldByName('valor_01').AsString:= editvalor.Text; dm.CD_VENDA.Post; end caso a forma_01 estiver livre e assim por diante... Para repassar os valores para o XML faço da seguinte forma: if dm.CD_VENDA.FieldByName('pg_01').AsString <> '' then begin with Pagto.Add do begin cMP := dm.CD_VENDA.FieldByName('pg_01').Value; vMP := dm.CD_VENDA.FieldByName('valor_01').AsCurrency; end; end; Na tabela de pagamentos, o campo esta sendo preenchido corretamente..., quando passo para o XML o valor fica incorreto.

Pessoal, por favor, preciso de ajuda para corrigir o valor que esta sendo gravado na TAG cMP, na venda estou gravando o código da forma de pagamento em um campo varchar(OP_PG01), quando gero o XML faço da seguinte maneira: cMP:= dm.clientdataset.fieldbyname('op_pg01').value;, se eu fizer um pagamento em Dinheiro(01),depois que o XML esta pronto a TAG cMP aparece assim <cMP>02</cMP> como se eu estivesse escolhido Cheque(02), desde já grato.