Luciano Ramos Palandi
Membros-
Total de ítens
43 -
Registro em
-
Última visita
-
Days Won
1
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Luciano Ramos Palandi postou
-
Access violation para impressão via acbrnfe
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in ACBrNFe
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? -
Access violation para impressão via acbrnfe
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in ACBrNFe
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?
-
ERRO: Porta não definida (Aconteceu do nada)
Luciano Ramos Palandi replied to abrahaofv's tópico in ACBrMonitor PLUS
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- 9 replies
-
- acbrmonitor
- acbrmonitorplus
- (e 4 mais)
-
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.
-
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
Boa noite Juliomar, acrescentei no evento ACBrTEFD1ComandaECFImprimeVia o seguinte : ACBrPosPrinter1.Ativar; ACBRPOSPRINTER1.Imprimir(ImagemComprovante.Text); ai imprimiu legal, muito obrigado pela atenção, valeu. -
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
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? -
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
Juliomar, por favor, quando executo ACBrTEFD1.ImprimirTransacoesPendentes, o componente fica em looping subtotalizando..., consegue me ajudar a passar e imprimir por favor. -
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
Juliomar, desenvolvi um projeto para testes com o que necessito e até agora esta ok, qualquer coisa peço socorro, obrigado pela ajuda. -
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
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. -
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
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? -
Homologar TEF com SAT
Luciano Ramos Palandi replied to Luciano Ramos Palandi's tópico in Dúvidas sobre TEF
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.