Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 2604 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Bom dia pessoal, tudo bem?

 

Estou estudando o acbr para implantar nfce em uma loja, estou fazendo testes usando os exemplo que vem com o componente, estou aprendendo bastante, só que estava testando usando crtregimenormal, estava tudo funcionando, enviando para homologação, mas agora mudei o crt para crtsimplesnacional fiz algumas adaptações como mudar de cst para cson conforme li em algumas postagem, só que agora me da a seguinte mensagem quando tento enviar:

Rejeição: Total da BC ICMS difere do somatorio dos itens. 

 

Já depurei e até onde consegui entender os valores estão ok, alguem pode me dar uma ajuda, segue trecho do codigo. obrigado.

 

 

 


      Emit.CRT               := crtSimplesNacional;// (1-crtSimplesNacional, 2-crtSimplesExcessoReceita, 3-crtRegimeNormal)

      Dest.CNPJCPF           := SoNumero(cdsPedidoCpf.Value);
//      Dest.IE                := '687138770110'; //NFC-e não aceita IE
      Dest.ISUF              := '';
      Dest.xNome             := cdsPedidoNome.Value;
      Dest.indIEDest         := inNaoContribuinte;
      Dest.EnderDest.Fone    := SoNumero(cdsPedidoFoneresidencial.Text);
      Dest.EnderDest.CEP     := StrToInt( SoNumero(cdsPedidoCep.Value));
      Dest.EnderDest.xLgr    := cdsPedidoEndereço.Value;
      Dest.EnderDest.nro     := SoNumero(cdsPedidoEndereço.Value);
      Dest.EnderDest.xCpl    := '';
      Dest.EnderDest.xBairro := cdsPedidoBairro.Value;
      Dest.EnderDest.cMun    := 4304606;
      Dest.EnderDest.xMun    := 'Canoas';
      Dest.EnderDest.UF      := 'RS';
      Dest.EnderDest.cPais   := 1058;
      Dest.EnderDest.xPais   := 'BRASIL';


//Adicionando Produtos
     itemnro := 0;
     totalvbc :=0;
     totalvicms :=0;
     totaldesc :=0;
     cdsItens.First;
     totalprod:=0;
     while not cdsItens.eof do
     begin
      with Det.Add do
       begin
         itemnro := itemnro + 1;
         Prod.nItem    := itemnro; // Número sequencial, para cada item deve ser incrementado
         Prod.cProd    := cdsItensCoditem.value.ToString;
         Prod.xProd    := cdsItensDescricao.Value;
         Prod.NCM      := cdsItensNCM.Value; // Tabela NCM disponível em http://www.receita.fazenda.gov.br/Aliquotas/DownloadArqTIPI.htm
         Prod.EXTIPI   := '';
         Prod.CFOP     := '5102';
         Prod.uCom     := 'UN';
         Prod.qCom     := cdsItensQtd.Value;
         Prod.vUnCom   := cdsItensValorunid.Value;
         Prod.vProd    := (cdsItensValorunid.Value*cdsItensQtd.value) ; //o valor do produto tem ser bruto por cuasa do desconto.
         totalprod := totalprod +  (cdsItensValorunid.Value*cdsItensQtd.value);
         Prod.uTrib     := 'UN';
         Prod.qTrib     := cdsItensQtd.Value;
         Prod.vUnTrib   := cdsItensValorunid.Value;

         Prod.vOutro    := 0;
         Prod.vFrete    := 0;
         Prod.vSeg      := 0;
         Prod.vDesc     := cdsItensDescunid.Value*cdsItensQtd.Value;
         totaldesc := totaldesc + (cdsItensDescunid.Value*cdsItensQtd.Value);


         Prod.CEST := '1111111'; //verificar


         with Imposto do
          begin
            // lei da transparencia nos impostos
            vTotTrib := 0;

            with ICMS do
             begin
               CSOSN  := csosn102;
//               CST          := cst00;
               ICMS.orig    := oeNacional;
               ICMS.modBC   := dbiValorOperacao;
               ICMS.vBC     := cdsItensValorunid.Value*cdsItensQtd.value;
               ICMS.pICMS   := cdsItenspICMS.Value ;
               ICMS.vICMS   := ((cdsItensValorunid.Value*cdsItensQtd.value)*cdsItenspICMS.Value)/100;
               ICMS.modBCST := dbisMargemValorAgregado;
               ICMS.pMVAST  := 0;
               ICMS.pRedBCST:= 0;
               ICMS.vBCST   := 0;
               ICMS.pICMSST := 0;
               ICMS.vICMSST := 0;
               ICMS.pRedBC  := 0;

               totalvbc   := totalvbc +  (cdsItensValorunid.Value*cdsItensQtd.value);
               totalvicms := totalvicms +  (((cdsItensValorunid.Value*cdsItensQtd.value)*cdsItenspICMS.Value)/100);
               // partilha do ICMS e fundo de probreza
               with ICMSUFDest do
                begin
                  vBCUFDest      := 0.00;
                  pFCPUFDest     := 0.00;
                  pICMSUFDest    := 0.00;
                  pICMSInter     := 0.00;
                  pICMSInterPart := 0.00;
                  vFCPUFDest     := 0.00;
                  vICMSUFDest    := 0.00;
                  vICMSUFRemet   := 0.00;
                end;
             end;

          end;
       end ;
       cdsItens.Next;
     end;

      Total.ICMSTot.vBC     := totalvbc;
      Total.ICMSTot.vICMS   := totalvicms;
      Total.ICMSTot.vBCST   := 0;
      Total.ICMSTot.vST     := 0;
      Total.ICMSTot.vProd   := totalprod;
      Total.ICMSTot.vFrete  := 0;
      Total.ICMSTot.vSeg    := 0;
      Total.ICMSTot.vDesc   := totaldesc;
      Total.ICMSTot.vII     := 0;
      Total.ICMSTot.vIPI    := 0;
      Total.ICMSTot.vPIS    := 0;
      Total.ICMSTot.vCOFINS := 0;
      Total.ICMSTot.vOutro  := 0;
      Total.ICMSTot.vNF     := cdsPedidoTotal.value;

      // partilha do icms e fundo de probreza
      Total.ICMSTot.vFCPUFDest   := 0.00;
      Total.ICMSTot.vICMSUFDest  := 0.00;
      Total.ICMSTot.vICMSUFRemet := 0.00;

      Total.ISSQNtot.vServ   := 0;
      Total.ISSQNTot.vBC     := 0;
      Total.ISSQNTot.vISS    := 0;
      Total.ISSQNTot.vPIS    := 0;
      Total.ISSQNTot.vCOFINS := 0;

Postado

Bom dia tudo bem? Tirei os  ICMS.vBC                   ICMS.pICMS                  ICMS.vICMS   , blz foi, mas como fica aquela parte transparencia nos impostos , não tem aquele aparecer na danfe a informação dos tributos? Ele fica zerado.

Postado

Boa tarde pessoal, tudo bem? Estou muito inseguro, se puderem me ajudar, olhem como ficou o xml, o icms zerado mesmo, pela homologação do sefaz passou, estou com uma pulga atras da orelha ta falando algo, como fazer a parte da danfe do valor dos tributos?

 

Obrigado


            <ide>
                <cUF>43</cUF>
                <cNF>00287273</cNF>
                <natOp>VENDA</natOp>
                <indPag>1</indPag>
                <mod>65</mod>
                <serie>1</serie>
                <nNF>287273</nNF>
                <dhEmi>2016-11-28T12:56:51-02:00</dhEmi>
                <tpNF>1</tpNF>
                <idDest>1</idDest>
                <cMunFG>4309209</cMunFG>
                <tpImp>4</tpImp>
                <tpEmis>1</tpEmis>
                <cDV>2</cDV>
                <tpAmb>2</tpAmb>
                <finNFe>1</finNFe>
                <indFinal>1</indFinal>
                <indPres>1</indPres>
                <procEmi>0</procEmi>
                <verProc>ACBrNFe</verProc>
            </ide>
            <emit>
                <CNPJ>999999</CNPJ>
                <xNome>JXXXXXXXXXXXXXX</xNome>
                <xFant>JXXXXXXXXXXXXXX</xFant>
                <enderEmit>
                    <xLgr>MARI</xLgr>
                    <nro>333</nro>
                    <xBairro>SITIO GAUCHO</xBairro>
                    <cMun>4309209</cMun>
                    <xMun>GRAVATAI</xMun>
                    <UF>RS</UF>
                    <CEP>90140285</CEP>
                    <cPais>1058</cPais>
                    <xPais>BRASIL</xPais>
                    <fone>5199666666</fone>
                </enderEmit>
                <IE>666666</IE>
                <CRT>1</CRT>
            </emit>
            <dest>
                <CPF>73605042015</CPF>
                <xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome>
                <enderDest>
                    <xLgr>MONTE</xLgr>
                    <nro>200</nro>
                    <xBairro>RIO BRANCO</xBairro>
                    <cMun>4304606</cMun>
                    <xMun>Canoas</xMun>
                    <UF>RS</UF>
                    <CEP>92200450</CEP>
                    <cPais>1058</cPais>
                    <xPais>BRASIL</xPais>
                    <fone>30311014</fone>
                </enderDest>
                <indIEDest>9</indIEDest>
            </dest>
            <det nItem="1">
                <prod>
                    <cProd>27497</cProd>
                    <cEAN/>
                    <xProd>NOTA FISCAL EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xProd>
                    <NCM>61179000</NCM>
                    <CEST>1111111</CEST>
                    <CFOP>5102</CFOP>
                    <uCom>UN</uCom>
                    <qCom>1.0000</qCom>
                    <vUnCom>99.9000000000</vUnCom>
                    <vProd>99.90</vProd>
                    <cEANTrib/>
                    <uTrib>UN</uTrib>
                    <qTrib>1.0000</qTrib>
                    <vUnTrib>99.9000000000</vUnTrib>
                    <indTot>1</indTot>
                </prod>
                <imposto>
                    <ICMS>
                        <ICMSSN102>
                            <orig>0</orig>
                            <CSOSN>102</CSOSN>
                        </ICMSSN102>
                    </ICMS>
                </imposto>
            </det>
            <det nItem="2">
                <prod>
                    <cProd>24612</cProd>
                    <cEAN/>
                    <xProd>T05015-25 MEIA BB CANO CURTO</xProd>
                    <NCM>61179000</NCM>
                    <CEST>1111111</CEST>
                    <CFOP>5102</CFOP>
                    <uCom>UN</uCom>
                    <qCom>1.0000</qCom>
                    <vUnCom>5.9000000000</vUnCom>
                    <vProd>5.90</vProd>
                    <cEANTrib/>
                    <uTrib>UN</uTrib>
                    <qTrib>1.0000</qTrib>
                    <vUnTrib>5.9000000000</vUnTrib>
                    <indTot>1</indTot>
                </prod>
                <imposto>
                    <ICMS>
                        <ICMSSN102>
                            <orig>0</orig>
                            <CSOSN>102</CSOSN>
                        </ICMSSN102>
                    </ICMS>
                </imposto>
            </det>
            <total>
                <ICMSTot>
                    <vBC>0.00</vBC>
                    <vICMS>0.00</vICMS>
                    <vICMSDeson>0.00</vICMSDeson>
                    <vFCPUFDest>0.00</vFCPUFDest>
                    <vBCST>0.00</vBCST>
                    <vST>0.00</vST>
                    <vProd>105.80</vProd>
                    <vFrete>0.00</vFrete>
                    <vSeg>0.00</vSeg>
                    <vDesc>0.00</vDesc>
                    <vII>0.00</vII>
                    <vIPI>0.00</vIPI>
                    <vPIS>0.00</vPIS>
                    <vCOFINS>0.00</vCOFINS>
                    <vOutro>0.00</vOutro>
                    <vNF>105.80</vNF>
                </ICMSTot>
            </total>
            <transp>
                <modFrete>9</modFrete>
            </transp>
            <pag>
                <tPag>05</tPag>
                <vPag>105.80</vPag>
            </pag>
        </infNFe>


    </NFe>

</nfeProc>

Postado
3 horas atrás, xtjoras disse:

Bom dia tudo bem? Tirei os  ICMS.vBC                   ICMS.pICMS                  ICMS.vICMS   , blz foi, mas como fica aquela parte transparencia nos impostos , não tem aquele aparecer na danfe a informação dos tributos? Ele fica zerado.

Para essa parte da lei "olho no imposto", vc deve informar o campo vTotTrib nos itens (Imposto.vTotTrib) e no total da nota (ICMSTot.vTotTrib)

Att

Ricardo

  • 8 meses depois ...
Postado

Bom dia...

Estou com um problema que não consigo resolver. Procurei aqui nos foruns do ACBr, mas não encontrei especificamente esta solução. Uso o componente do QCBr, em DELPHI7, para gerar e emitir a NFCe e funciona perfeitamente, mas.... não consigo vender quantidade menos que 0,100. EXPLICANDO:

Meu prato quilo custa 72,90, se eu vendo 0,100, tudo bem, sai no cupom a quantidade 0,100 (mudei a mascara para tres casas decimais) o valor unitario 72,90 e o valor a pagar de 7,29... 

Porém, se eu vendo 0,001, e forneço o valor unitário de 72,90 e o valor a pagar de 0,07, no cupom sai a quantidade de 0,001, O VALOR UNITÁRIO ELE MUDA SOZINHO PARA 70,00 e o valor a pagar fica 0,07. O valor unitário TEM QUE SAIR 72,90 e não 70,00 como está sozinho. Como resolvo isso?

Segue o trecho de codigo...:

                        qCom := aqddf_sds.FieldByName('QUADDF').AsFloat; // forneço 0,001
                           vUnCom := aqddf_sds.FieldByName('VALDDF').AsFloat; // forneço 72,90
                           vProd := funcs_var.F_strtoreal(funcs_var.F_formata_numero_simples(
                              floattostr(aqddf_sds.FieldByName('VALDDF').AsFloat * aqddf_sds.FieldByName('QUADDF').AsFloat),
                              6, '', 2, '', '0', false)); // FORNEÇO 0,07
                        qTrib := aqddf_sds.FieldByName('QUADDF').AsFloat; // 0,001
                           vUnTrib := aqddf_sds.FieldByName('VALDDF').AsFloat; // 72,90
 

 

 

  • 1 mês depois ...
  • Este tópico foi criado há 2604 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.