peterson161

Download da cadeia V2: http://www.certisign.com.br/downloads/v2/ICP-V2c.p7b

Exato, devem estar zerados porque você não os informa nos itens. Seus itens são do grupo , os quais não existem as tags e .

Acabei de resolver um problema assim com Windows 7 64 bits e agora está funcionando perfeitamente. Faça o download da nova cadeia de Certificação V2 pelo link: http://www.certisign.com.br/downloads/v2/ICP-V2c.p7b Depois proceda a instação conforme a imagem abaixo:

Dê uma olhada no link abaixo e veja se te ajuda. http://www.delphibr.com.br/artigos/previewrave.php

No grupo de totais da nota você está informando um valor de R$ 171,91 de base de cálculo do ICMS e o emitente é Simples Nacional. No grupo , experimente deixar o zerado já que a nota não tem itens com o para serem somados.

Atualize seu componente via SVN, posicione o logo e os dados do emitente conforme sua preferência e comente as linhas: 1309 - // rlmEndereco.Top := 48; 1310 - // rllFone.Top := 82; 1311 - // rlmSiteEmail.Top := 92; 1316 - // rlmEndereco.Top := 58; 1317 - // rllFone.Top := 96;

Correção enviada para o SVN, revisão 3318

Dê uma olhada neste anexo. A partir de 01/02/2012, estas validações entraram em vigor, conforme NT2011.005, pág 3. Pelo o que eu entendi, se ambos valores vUnCom o vUnTrib forem informados, estes devem ser iguais, pois: - O erro 629 acontece quando a multiplicação vUnCom * qCom é diferente do vProd - O erro 630 acontece quando a multiplicação vUnTrib * qTrib é diferente do vProd Nos dois casos, o resultado é comparado com o vProd. Logo, vUnCom e vUnTrib não podem ser diferentes. (obviamente qCom e qTrib também não podem ser diferentes) O que me deixou com dúvida é que estas validações entraram em vigor em 01/02/2012, porém seu arquivo validado é do dia 22/02/2012.

Primeiro abra o arquivo "ACBrNFeDANFeRL.pas"; Depois o arquivo "ACBrNFeDANFeRLRetrato.pas" e/ou "ACBrNFeDANFeRLPaisagem.pas" e altere a posição do logo. Nestes dois arquivos, você deve comentar as linhas que fazem referência à altura do endereço e do telefone.

Informações por completo: 1º - Setar as pastas onde deseja salvar os arquivos: ACBrNFe1.DANFE.PathPDF := ExtractFilePath(Application.ExeName) + 'Dados\' + 'PDF\' + sCNPJEmit + '\'; ACBrNFe1.Configuracoes.Arquivos.PathNFe := ExtractFilePath(Application.ExeName) + 'Dados\' + 'NFe\' + sCNPJEmit + '\'; ACBrNFe1.Configuracoes.Arquivos.PathCan := ExtractFilePath(Application.ExeName) + 'Dados\' + 'Can\' + sCNPJEmit + '\'; ACBrNFe1.Configuracoes.Arquivos.PathInu := ExtractFilePath(Application.ExeName) + 'Dados\' + 'Inu\' + sCNPJEmit + '\'; ACBrNFe1.Configuracoes.Arquivos.PathDPEC := ExtractFilePath(Application.ExeName) + 'Dados\' + 'DPEC\' + sCNPJEmit + '\'; ACBrNFe1.Configuracoes.Arquivos.Salvar := True; ACBrNFe1.Configuracoes.Arquivos.EmissaoPathNFe := True; 2º - Setar a pasta de arquivos gerais: ACBrNFe1.Configuracoes.Geral.PathSalvar := ExtractFilePath(Application.ExeName) + 'Dados\' + 'Temp\' + sCNPJEmit + '\'; ACBrNFe1.Configuracoes.Geral.Salvar := True; 3º - Apagar os arquivos temporários da pasta {Sistema}\Temp: // Apaga os arquivos temporários da pasta {Sistema}\Temp sCaminho := ExtractFilePath(Application.ExeName) + 'Dados\' + 'Temp\' + sCNPJEmit + '\'; i := FindFirst(sCaminho + '*.*', faAnyFile, SR); while i = 0 do begin if (SR.Attr and faDirectory) <> faDirectory then if not DeleteFile(sCaminho + SR.Name) then ShowMessage('Não foi possível excluir ' + sCaminho); i := FindNext(SR); end;

Eu sempre apago os arquivos temporários ao sair do sistema e nunca tive problemas.

Dê uma olhada neste XML validado em homologação:

Minha opinião: Se para Simples Nacional usa-se CSOSN ao invés de CST, logo no DANFE faremos a mesma coisa: Usar CSOSN ao invés de CST.

O Danfe exibe na mesma ordem que stá no XML. Dê uma verificada em que sequência está no seu XML.

Estes dois itens que você mencionou mais o PIS e o COFINS somam um total de R$ 132,07, que é o valor o desconto . Isso é apenas um detalhamento do desconto dado, conforme exigência da Riachuelo. É que para a Zona Franca de Manaus (no nosso caso) não se destaca nenhum imposto (ICMS, PIS, COFINS). Então faturamos pelo preço que seria vendido para SP, e a Riachuelo exige este desconto, devido ao não pagamento destes impostos. Neste caso, o desconto foi de R$ 132,07, sendo: - BONIFICACAO.........: 11,86% => R$ 73,72 <<== Relativo à dif. de alíq. de ICMS entre SP e AM - DESCONTO SEFAZ...: 7,00% => R$ 38,35 <<== Relativo ao não pagamento do ICMS - PIS.......................: 0,65% => R$ 3,56 <<== Relativo ao não pagamento do PIS - COFINS.................: 3,00% => R$ 16,44 <<== Relativo ao não pagamento do COFINS

Qual Danfe que você utiliza ?

No meu caso: O emitente trabalha somente com 1 segmento, que é confecção e a alíquota é regulamentada basada nisso. 1.) Sendo assim, tenho um cadastro de Estados, onde já encontra-se cadastrado a alíquota de ICMS e conforme o Estado selecionado, já é inserida a alíquota correta: ID CÓD IBGE UF ICMS ------------------------ 1 12 AC 7,00 2 27 AL 7,00 ... 11 31 MG 12,00 ... 26 35 SP 18,00 2.) Tenho um cadastro de Situação Tributária e conforme a ST selecionada, já ajusta o valor da base de cálculo, conforme o percentual de redução: ID ST DESCRIÇÃO % REDUÇÃO --------------------------------------------------- 1 00 TRIBUTADA INTEGRALMENTE 0,00 2 20 COM REDUÇÃO DE BASE DE CÁLCULO 33,33 ... 6 41 NÃO TRIBUTADA 100,00 3.) Tenho um cadastro de NATUREZA DE OPERAÇÃO, onde insere-se o CFOP, o qual informa se gera ICMS, PIS, COFINS e duplicatas e conforme o CFOP selecionado, já insere os valores calculados: ID NATUREZA DE OPERAÇÃO CFOP GERA DUPLICATA GERA ICMS GERA PIS GERA COFINS SUFRAMA ------------------------------------------------------------------------------------------------------------ 1 VENDA DE PRODUÇÃO DO ESTABELECIMENTO 5101 SIM SIM SIM SIM NÃO 2 REMESSA PARA INDUSTRIALIZAÇÃO 5901 NÃO NÃO NÃO NÃO NÃO 3 VENDA FORA DO ESTADO 6101 SIM SIM SIM SIM NÃO 4 VENDA ZONA FRANCA DE MANAUS 6109 SIM NÃO NÃO NÃO SIM 4.) Estas informações são salvas no meu CADASTRO DE CLIENTES e conforme o cliente é selecionado, estas informação já são inseridas na nota, como padrão. Conforme cada produto é inserido na nota fiscal, ele utiliza estas informações e já calcula base de cálculo e impostos. Se o produto já estiver cadastrado no sistema, basta o usuário digitar seu código e informar a quantidade do mesmo. Isso nos poupa um trabalho imenso que você nem imagina. Então fica aí mais uma sugestão.

Seguem anexos

O link é esse: http://www.lojamestre.com.br/lojas/ramo ... e+com+acbr Pelo que eu entendi, o cara tá cobrando pela mesma coisa que nós fazemos aqui no forum. Na minha opinião, ele está sendo SAFADO, pois todo mundo foi beneficiado com o ACBr e justamente por isso, todos frequentam o forum para tirar ou esclarecer dúvidas e de alguma maneira contribuir com o ACBr. Se os criadores do componente não cobram por que um cara desses se acha no direito de cobrar ? Entendo que ele está cobrando pela explicação e pelo código fonte do sistema dele, mas por que ele não faz isso de graça aqui no fórum, já que ele obteve o componente de graça ? 90% de qualquer sistema de notas fiscais é o ACBr. Os outros 10% são os cadastros e as telas.

// Aqui você informa os dados: ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.WebServices.Inutilizacao.CNPJ := sCNPJEmit; ACBrNFe1.WebServices.Inutilizacao.Modelo := iModelo; ACBrNFe1.WebServices.Inutilizacao.Serie := iSerie; ACBrNFe1.WebServices.Inutilizacao.Ano := iAno; ACBrNFe1.WebServices.Inutilizacao.NumeroInicial := iNotaInicio; ACBrNFe1.WebServices.Inutilizacao.NumeroFinal := iNotaFim; ACBrNFe1.WebServices.Inutilizacao.Justificativa := strNFJust; // Executa a inutilização ACBrNFe1.WebServices.Inutilizacao.Executar; // E por fim, pega o resultado da inutilização sDoc := ACBrNFe1.WebServices.Inutilizacao.Protocolo; sMotivo := ACBrNFe1.WebServices.Inutilizacao.xMotivo; sStat := IntToStr(ACBrNFe1.WebServices.Inutilizacao.cStat); sDataHora := DateTimeToStr(ACBrNFe1.WebServices.Inutilizacao.dhRecbto);

No Win7 você deve utilizar o arquivo instala.bat como administrador, senão ele abre a tela do prompt e fecha em seguida passando a falsa impressão de que as DLL's foram registradas.

Quem gera o PDF é o Danfe. Altere as units do Danfe que você utiliza.

O DanfeFR é do FastReport. O do Fortes é DanfeRL.

Segue em anexo um trecho do meu sistema. Funciona perfeitamente, veja se te dá uma luz.

Veja se esta idéia te agrada: Consulte o Demo, para efetuar os processos de envio separadamente (Explore o método "ACBrNFe1.Enviar"). Desta forma você terá como consultar o número do recibo e obter o status de cada nota que está no lote. Durante a consulta ao recibo, você pode efetuar este "for" e antes do "end" alimentar o seu grid.