Gabriel Frones

Colega, Veja esse post, e verifique se a solução sugerida resolve o seu problema: viewtopic.php?f=6&t=525

O ACBrNFe, até onde sei, é Delphi... para usar no VB6, você vai precisar usar o ACBrNFeMonitor, e comunicar-se com ele por uma das alternativas que ele oferece (arquivo texto e TCP, acredito). Tem um exemplo em CLIPPER no SVN: ACBr\Projetos\ACBrNFeMonitor\Exemplos\Clipper. Talvez mais instrutivo do que o exemplo, seja esse "tutorial" do projeto: http://acbr.sourceforge.net/drupal/?q=node/40 Abraços.

Colegas, Linha 122: I := RetornarPosEx('"', Leitor.Arquivo, I + 2); if I = 0 then raise Exception.Create('Não encontrei inicio do URI: aspas inicial'); Existe alguma razão para não haver suporte a XML's com aspas simples nos campos? Abraços.

Colegas, Linha 669 do arquivo Fontes\PCN2\pcnGerador.pas: Conteúdo atual: if StrToIntDef(Copy(ConteudoProcessado, pos(DecimalSeparator, ConteudoProcessado) + NumeroDecimais + 1, 6),0) > 0 then walerta(ID, Tag, Descricao, ERR_MSG_MAXIMO_DECIMAIS + ' ' + IntToStr(NumeroDecimais)); Problema: Quando o valor é inteiro, pos(DecimalSeparator,ConteudoProcessado) = 0, e dessa forma, o alerta é sempre gerado. Sugestão: Verificar diretamente na variável float valor se o número de casas decimais excede NumeroDecimais: if not SameValue(Abs(Frac(valor*Power(10,NumeroDecimais))), 0.0, {epsilon = }0.0000001) then walerta(ID, Tag, Descricao, ERR_MSG_MAXIMO_DECIMAIS + ' ' + IntToStr(NumeroDecimais)); Nota: Em tese, o valor de Abs(Frac(valor*Power(10,NumeroDecimais))) deveria ser exatamente igual a zero, caso não hajam mais casas decimais do que o esperado. Mas é sabido que comparações do tipo == com floats são problemáticas. Nota 2: Tem que adicionar a unit Math nos uses. Abraços.

Converter para XLS? Acho pouco provável que você consiga uma ferramenta para essa tarefa (menos provavel ainda que encontre um componente)... PDF e XLS são tipos de arquivo com propósitos totalmente distintos. Nem dá para fazer uma ferramenta que faça conversão de qualquer PDF para um XLS.

Você pode: - Copiar a função do ACBr (na unit ACBrNFeNotasFiscais.pas) e fazer as modificações necessarias; - Enviar por Indy, com um dos milhares de exemplos que existem por aí; ou - Criar uma nova função utilizando a Synapse (biblioteca leve, que o ACBr usa). Os servidores do GMail são SMTP, normal. Abraços.

As grandes empresas devolvem mercadoria quando ainda não tem XML.... costuma evitar reincidencias. rs