Painel de líderes

Valdirdill blz... Tive as mesmas dificuldades que você no início do projeto e com a ajuda deste incrível fórum e em especial de algumas pessoas daqui, e... claro dos manuais e notas técnicas alem de todos os comentários e posts disponíveis aqui também, consegui evoluir e hoje está indo tudo como deveria... Como o gradeza desse fórum é compartilhar... segue um exemplo da maneira que eu faço (lembrando que pode talvez não ser a mais correta pois existem diversas formas de se construir uma ponte e cada um vai usar o seu conhecimento e tecnologia disponível para construí-la desde que fique firme e não vá cair não é mesmo...rsrsrs) wUtlNSU := Ultimo NSU pesquisado e gravado em alguma tabela do seu BD. xUF := UF da empresa que usa seu aplicativo para realizar as pesquisas. CNPJ := CNPJ da empresa que usa seu aplicativo = CNPJ do certificado digital. xStat := 138; while xStat = 138 do begin ACBrNFe1.DistribuicaoDFe(xUF,CNPJ,wUltNSU,''); for i := 0 to ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count - 1 do begin //A partir daqui vc extrai as informações retornadas de cada arquivo xml //E se for o caso grava as informações em tabelas do seu banco de dados //para consultas posteriores das informações já armazenadas, não sendo //necessário um nova pesquisa ao webserviceDFe para isso . . . //Aqui você deve gravar o ultimo nsu retornado em um campo de alguma tabela //do seu BD para que a próxima pesquisa seja a partir desse ultimo nsu wUltNSU := ultNSU; end; // Aqui retorna o status da pesquisa e quando ele for diferente de 138 interrompe o loop... // E nesse caso, aguardar o intervalo mínimo de 1 hora entre as pesquisas conforme // Manual de Integração evitando assim o bloqueio por consumo indevido xStat := ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.cStat; end; É claro que você pode e deve ajustar da maneira que melhor lhe atender, incluindo blocos try except, separando informações resumidas das informações completas, extraindo se for o caso, as cartas de correções eletrônicas, etc... enfim, acredito que você agora consiga evoluir a partir desse raciocínio básico, o restante é usar a criatividade e sem dúvida o que te dará uma ampla visão é de fato conhecer os manuais e as notas técnicas que você vai encontrar tanto aqui no fórum quanto no site nfe.fazenda.gov.br. Espero que te ajude. Márcio M. Camilo

Deixo um botão com a função que carrega os dados no compnente, e em vez de enviar, utilizo a opção de impressão com preview para poder visualizar a nfe antes do envio, utilizando o fortes esta cortando o cfop, por exemplo sai apenas ex: 5.10 e nao 5.102. Tive este problema agora a pouco, então troquei a linha 294 da unit ACBrNFeDANFeRL para FieldDefs.Add('CFOP',ftString,5); onde estava FieldDefs.Add('CFOP',ftString,4); e o problema resolveu. Será que isto é algo a ser acertado nos fontes ?

Pessoal, eu estou subindo alguns ajustes que fiz nos componentes. Há várias correçõezinhas além de eu ter colocado os métodos Create e Destroy dos blocos padronizados como no bloco 0, utilizando os métodos CriaRegistros / LiberaRegistros. Nesta versão que estou enviando, estou gerando um arquivo com os blocos 0, J e K e os mesmos estão sendo importados no PVA. Akai, eu percebi agora no fim da tarde a ausência dos métodos RegistroXXXXNew e iria implementá-los amanhã; como você já fez o do bloco J e está fazendo os outros, vou deixar a tarefa a seu cargo. Juliomar e Isaque, vocês poderiam fazer o merge dos arquivos ajustados pelo Akai com as correções que eu coloquei hoje ? Muito obrigado a todos! ACBrSPEDECF.zip

Daniel, deu certo agora... Era minha maquina virtual!!! Valeu!! Desculpa o incomodo! Não estou achando! Como Marcar como resolvido ou melhor resposta no forum

Blz Daniel testei aqui com certificado A3 e o problema está resolvido.

Ontem após algumas tentativas resolvi instalar no delphi7 o trunk2 com o FortesReportCe, utilizei para isso uma máquina virtual.. Foi tudo tranquilo os únicos problemas que tive com o FortesReportCe foram: 1 - antes de compilar criar a pasta Win32_D7_vcl dentro da pasta trunk\Binary\ vai ficar assim trunk\Binary\Win32_D7_vcl 2 - Após compilar e instalar, Copiar o arquivo RLReport.res que vai estar em trunk\Source para a pasta trunk\Binary\Win32_D7_vcl 3 - Nos relatórios que contém TRLPDFFilter vai dar um erro em TRLPDFFilter.FontEnconding e TRLPDFFilter.ViewerOptions pois ao que parece essas propriedades foram retiradas apenas ignorei-as. Um detalhe interessante, não sei se isso vem ao caso, é que apliquei um patch de correção no meu Delphi7 (Update1). Ainda não testei as cópias do DANFE da NFe. Fausto Alves Franca-SP

Bom dia a todos, No meu entendimento uma empresa emitente de NF-e que não se preocupa em guardar de forma segura os XMLs e envia-los aos destinatários, são irresponsáveis. Primeiro por não guardar um arquivo de computador com validade jurídica e segundo por se recusar ou achar desnecessário enviar esse mesmo arquivo ao seu cliente. É a mesma coisa que vender e se recusar a entregar a nota ao cliente. A cláusula décima deixa claro logo no inicio: "O emitente e o destinatário...." sendo assim de uma vez por todas o DANFE não é a Nota Fiscal. Pelo simples fato de ser chamado de Documento Auxiliar da Nota, se é um documento auxilar da nota, conclui-se que não é a nota.

Bom dia Jorge! Pelo que diz a lei entendemos que embora a SEFAZ tenha disponibilizado para download não é responsabilidade dela manter este XML para download pelo prazo em que a lei determina que o emitente e o destinatário deve apresentar ao fisco caso solicitado. Claro que em extrema necessidade pode até ser que com um pedido formal junto a Secretaria da Fazenda a empresa possa até conseguir o XML. Mas o que tem que ficar muito claro é que a responsabilidade de manter o XML é do emitente e do destinatário. Por isto aqui no fórum sempre existiu a preocupação de alertar sobre a importância do destinatário exigir o XML e do emitente fazer o envio do XML. Mesmo que venham tirar benefício da possibilidade do download, que seja feito então dentro do prazo, mas lembrando-se que o propósito da SEFAZ nunca foi disponibilizar para que se faça baixa de 100% dos XML e na prática a gente percebe que isto está ocorrendo em muitas empresas.

Daniel, Fiz uma revisão sobre a questão estou mudando de opinião - você tem razão, não deve mesmo cortar...

Boa noite Pessoal! Foi uma pauleira lascada, mas hoje conseguimos fechar todos os blocos restantes, com exceção do T e U, que não iremos fazer pois não temos necessidade e o prazo está apertadíssimo. Eu aproveitei e corrigi a geração dos registros dos blocos L, M, N, P, X e Y para que fique no padrão do componente, de acordo com o implementado no bloco 0 e nas mudanças feitas pelo Arielguareschi (obrigado, amigo!) nos blocos J e K. Acredito que agora o componente está funcional e com a geração do arquivo OK. Quem puder agora adicionar as validações básicas a fim de melhorar o componente, esteja a vontade. Amanhã eu começo a montar meu programa para alimentar o componente e vou tentar gerar um primeiro arquivo que seja validado no PVA. Conforme for efetuando correções nos fontes do componente, vou atualizando aqui. ACBrECFBloco_Y_Class.pas ACBrECFBloco_X_Class.pas ACBrECFBloco_P_Class.pas ACBrECFBloco_N_Class.pas ACBrECFBloco_M_Class.pas ACBrECFBloco_L_Class.pas ACBrECFBloco_X.pas ACBrECFBloco_Y.pas ACBrECFBloco_L.pas ACBrSpedEcf.pas

Boa noite Ramon. Na NFSe temos os seguintes passos: 1. Gerar o XML do RPS; 2. Assinar o XML (depende do provedor); 3. Montar o lote com 1 ou mais RPS; 4. Assinar o lote (depende do provedor); 5. validar o lote; 6. Enviar o lote; 7. Consultar a situação do lote mediante o numero de protocolo; 8. Se processado com sucesso, Consultar o lote para obter as NFSe; 9. Imprimir o DANFSE; 10. Enviar por e-mail o XML da NFSe ao destinatário ou apenas o link para que o mesmo possa obter o DANFSE via site do provedor. Observação: Os passos de 1 a 9 são executados automaticamente pela function Enviar Note que no caso da NFSe o componente gera o XML do RPS o que temos como retorno do provedor é o XML da NFSe. O componente ACBrNFSe cria varias pastas: Ger, NFSe, RPS, entre outras. Na pasta Ger ficam os XMLs gerais ou seja os de envio e retorno. Na pasta RPS ficam os XMLs dos RPS gerados pelo componente, ja na pasta NFSe ficam os XML das NFSe retornados pelo provedor. Espero ter ajudado. André Luis.

Na página de disponibilidade do serviço da NF-e, há a informação: Aparentemente, além do RS, apenas os estados do AC, RN, PB e SC são atendidos pelo web service de consulta cadastro.

Disponível no svn! Obrigado

Boa tarde, Segue os últimos arquivos de hoje, já gerando agora os registros do bloco K ACBrECFBloco_K_Class.pas ACBrSpedECF.pas

Boa tarde a todos, Resumindo o que o Camilo disse: Primeiramente, quem emite um documento fiscal eletrônico tem a obrigação de guardar o XML assinado e protocolado para uma eventual fiscalização do fisco. Portanto não faz nenhum sentido o emitente querer fazer o download das próprias notas, alias isso não é possível. Segundo, utilizando-se o método DistribuicaoDFe obtemos uma relação das notas emitidas contra o nosso CNPJ. Realizando a manifestação de cada uma delas, dependendo da manifestação realizada ao executar o DistribuicaoDFe obtemos os XML assinado e protocolo das notas. Por favor leiam a Nota Técnica 2014/002 versão 1.01 que trata sobre DistribuicaoDFe.

Datilas, Mas você pode pegar o status e a descrição do erro e salvar no banco de dados e ou apresentar na tela.

Pelo que Li no fórum... O Elgin é idêntico ao DIMEP... (ambos tem a mesma fábrica)

estou exatamente com o mesmo problema.

opa, Compilei o Acbr_Install na linha 231 da uPrincipal if oDirList.Attr = faDirectory then FindDirPackage(sDir + oDirList.Name, sPacote) este oDirList.Attr está vindo sempre com o valor 8208... porem acredito que no caso de um diretorio deveria vir com faDirectory (16)... eu forcei esta situação no meu código então ele encontrou normalmente... Estou utilizando windows server 2012 e delphi xe8 Att Marciano Bandeira descobri o problema \o/ o direitorio base precisa estar indexado, caso contrario vem com este atributo 8208... apenas alterei o diretorio para ficar com conteudo indexado e funcionou ai veio com o atributo 16... por isso de funcionar em algumas maquinas e outras nao, funciona quando os arquivos estao indexados pelo windows att Marciano Bandeira Consegui instalar de boa agora, com o ACBrInstall_Trunk2 do SVN, basta ir no diretório do acbr, nas propriedades avançadas e marcar opção de permitir que o conteudo seja indexado e aplicar as subpastas. Att,

Boa tarde Valdir, Esqueça o método ConsultaNFeDest passe a usar o DistribuicaoDFe, Mais detalhes leia o Manual ACBrNFe versão 1.04 que encontra-se dentro da pasta ...\Doctos\Manuais Com o DistribuicaoDFe não vai ocorrer o problema de Consumo indevido.

Boa tarde Daniel, Na medida do possível estou reescrevendo as rotinas e idealizando uma maneira de eliminar todas aquelas Units (uma para cada provedor). Para aqueles provedores que seguem o padrão ABRASF a ideia é simplesmente incluir a cidade no arquivo Cidades.INI e se necessário criar a configuração do provedor novo também em um arquivo INI como exemplo o Ginfes.INI Toda ajuda é bem vida. Muito obrigado.

Boa tarde Valdir, Como a NFS-e foge completamente a lógica da NF-e que foi de forma competente utilizada no CT-e e MDF-e por parte da SEFAZ, a migração desses dois últimos componente até tranquila e rápida. A NFS-e alem da lógica ser diferente temos um leque de provedores que não seguem um padrão, até arrendondar tudo isso vamos perder vários dias de sono.