Ir para conteúdo
  • Cadastre-se

murilo cosme da silva

Membros
  • Total de ítens

    196
  • Registro em

  • Última visita

Posts postados por murilo cosme da silva

  1. Bom dia,

     

    Mais uma vez sei que muito tópicos são repetitivos, mais não identifiquei como pegar

    todos os retornos assim que executo a função enviar ``ACBrNFe1.Enviar``

     

    dentro desta funcao tem varias mensagens lote, lote recebido, e lote processado, 

    existe uma path para salvar automaticamente esta mensagem mais não entendi

    como pegar em tempo real para salvar algumas mensagem no banco de dados,

    entendo que não posso mexer dentro do código do componente já que se houver 

    alguma alteração no fonte vou perder este código, pelo menos é o que eu acredito,

    alguém tem uma dica ou se este postagem já exista manda um link para que eu possa

    entender, já fiz algumas busca mais nada do tipo que estou precisando.

     

    Agradeço desde já.

     

  2. Boa tarde,
     
    Sei que tem muitos tópicos repetidos mais não estou identificando um com este problema, caso já tenha em algum tópico peço desculpa pela repetição de postagem.
     
    estou gerando uma NFe na versão 3.10 hora de validar ok, mais quando vou enviar dentro desta função a versaoDF mudar para ve200, e ai o xml todo e automaticamente ajustado para versão 2.00.
     
    procedure TNotasFiscais.Assinar;
     
     
     
     Self.Items.NFe.infNFe.Versao := DFeUtil.StringToFloat(GetVersaoNFe(FConfiguracoes.Geral.ModeloDF,
                                                  FConfiguracoes.Geral.VersaoDF,
                                                  LayNfeRecepcao));
     
  3. bom dia a todos,
     
    estou com dificuldade sobre identificar este erro na versão 3.10, mudou algo sobre
    NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL, porque o CNPJ coloco
    99.999.999/0001-91 e a inscrição esta isento como fazia antes, mais observei que ele criou outro parametro:
     
    <indIEDest>1</indIEDest>
     
    <IE>ISENTO</IE>
     
     
    Erro Completo: Falha na validação dos dados da nota 163
    'ISENTO' violates pattern constraint of '[0-9]{2,14}'.
    The element '{http://www.portalfiscal.inf.br/nfe}IE'with value 'ISENTO' failed to parse.
     
     
    e se alguém tem um link de onde vejo o manual correspondente ao xml 3.10.
     
     
    agradeço desde já.
     
    aproveitando o momento alguém tem como responder sobre um comentário que eu vi sobre pagar mensalidade no valor 150,00 reais aparte de 15 mensagem, ou podemos colaborar com outros valores.  
     
     
     
  4. Bom dia,

     

    Estou com uma dificuldade para assinar e valida NFe 3.10, dentro da função assinar nesta propriedade.

     
    Self.Items.NFe.infNFe.Versao :=   DFeUtil.StringToFloat(GetVersaoNFe(FConfiguracoes.Geral.ModeloDF,
                                                  FConfiguracoes.Geral.VersaoDF, 'a versão que ele trás aqui e sempre a                                                                                                     ve200'
                                                  LayNfeRecepcao));
     
     
    Mesmo eu configurando a versão:= para ve310, como mostra abaixo.
     

    ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;

  5. Boa noite,

     

    tem como solicitar a informação de que certificado é  na hora de enviar, ou só pode mediante pré cadastro.

     

    porque para mim seria mais interessante passa no momento de assinar e enviar.

  6. Já vi mais minha duvida é na variação do cst, no caso se for cst040, mando toda as tag e o componente lança de acordo com o st ?

     

     with ICMS do
                 begin
                   CST          := cst00;
                   ICMS.orig    := oeNacional;
                   ICMS.modBC   := dbiValorOperacao;
                   ICMS.vBC     := 100;
                   ICMS.pICMS   := 18;
                   ICMS.vICMS   := 18;
                   ICMS.modBCST := dbisMargemValorAgregado;
                   ICMS.pMVAST  := 0;
                   ICMS.pRedBCST:= 0;
                   ICMS.vBCST   := 0;
                   ICMS.pICMSST := 0;
                   ICMS.vICMSST := 0;
                   ICMS.pRedBC  := 0;
                 end;
  7. Boa noite como disse em outro tópico que estava acostumado com outro componente estou com uma dificuldade de entender como preencher os st de icms dos itens.

    Alguém pode me da uma exemplo. 

     

     

    é assim que estou tentando preencher:

     

     if sSTProd = '101' then
                        begin
                          PreparaICMS(sSTProd);
                          with ICMS do
                             begin
                               CST          := cstICMSSN;
                               ICMS.orig    := oeNacional;
                               ICMS.modBC   := dbiValorOperacao;
                               ICMS.vBC     := ICMS.vBC;
                               ICMS.pICMS   := ICMS.pICMS;
                               ICMS.vICMS   := ICMS.vICMS;
                               ICMS.modBCST := dbisMargemValorAgregado;
                               ICMS.pMVAST  := ICMS.pMVAST;
                               ICMS.pRedBCST:= ICMS.pRedBCST;
                               ICMS.vBCST   := ICMS.vBCST;
                               ICMS.pICMSST := ICMS.pICMSST;
                               ICMS.vICMSST := ICMS.vICMSST;
                               ICMS.pRedBC  := ICMS.pRedBC;
                             end;

     

     

    Agradeço desde já as contribuições de ajuda.

  8. como ta xml

     

    <?xml version="1.0"?>
     
     
     
    -<infNFe Id="NFe26141020344939000180550010000001401000000703" versao="2.00">
     
     
    -<ide>
     
    <cUF>26</cUF>
     
    <cNF>00000070</cNF>
     
    <natOp>VENDA DE MERCADORIA ADQUIRIDA OU RECEBIDA DE TERCEIRO</natOp>
     
    <indPag>0</indPag>
     
    <mod>55</mod>
     
    <serie>1</serie>
     
    <nNF>140</nNF>
     
    <dEmi>2014-10-15</dEmi>
     
    <dSaiEnt>2014-10-15</dSaiEnt>
     
    <tpNF>1</tpNF>
     
    <cMunFG>2611606</cMunFG>
     
    <tpImp>1</tpImp>
     
    <tpEmis>1</tpEmis>
     
    <cDV>3</cDV>
     
    <tpAmb>2</tpAmb>
     
    <finNFe>1</finNFe>
     
    <procEmi>0</procEmi>
     
    <verProc>2.0.5</verProc>
     
    </ide>
     
     
    -<emit>
     
    <CNPJ>20344939000180</CNPJ>
     
    <xNome>V J B PRODUTOS ODONTOLOGICOS EIRELE ME</xNome>
     
    <xFant>V J B PRODUTOS ODONTOLOGICOS EIRELE ME</xFant>
     
     
    -<enderEmit>
     
    <xLgr>RUA CARLOS GOMES</xLgr>
     
    <nro>044</nro>
     
    <xBairro>MADALENA</xBairro>
     
    <cMun>2611606</cMun>
     
    <xMun>RECIFE</xMun>
     
    <UF>PE</UF>
     
    <CEP>50720100</CEP>
     
    <cPais>1058</cPais>
     
    <xPais>Brasil</xPais>
     
    <fone>8132276079</fone>
     
    </enderEmit>
     
    <IE>057863202</IE>
     
    <IEST>00000000000000</IEST>
     
    <CRT>3</CRT>
     
    </emit>
     
     
    -<dest>
     
    <xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome>
     
     
    -<enderDest>
     
    <xLgr>RUA ALBA VALDEZ</xLgr>
     
    <nro>017</nro>
     
    <xBairro>TIMBI</xBairro>
     
    <cMun>2603454</cMun>
     
    <xMun>CAMARAGIBE</xMun>
     
    <UF>PE</UF>
     
    <CEP>54774430</CEP>
     
    <cPais>1058</cPais>
     
    <xPais>Brasil</xPais>
     
    </enderDest>
     
    <IE>5897694</IE>
     
    </dest>
     
     
    -<total>
     
     
    -<ICMSTot>
     
    <vBC>0.00</vBC>
     
    <vICMS>0.00</vICMS>
     
    <vBCST>0.00</vBCST>
     
    <vST>0.00</vST>
     
    <vProd>22.20</vProd>
     
    <vFrete>0.00</vFrete>
     
    <vSeg>0.00</vSeg>
     
    <vDesc>0.00</vDesc>
     
    <vII>0.00</vII>
     
    <vIPI>0.00</vIPI>
     
    <vPIS>0.37</vPIS>
     
    <vCOFINS>1.69</vCOFINS>
     
    <vOutro>0.00</vOutro>
     
    <vNF>22.20</vNF>
     
    </ICMSTot>
     
    </total>
     
     
    -<transp>
     
    <modFrete>0</modFrete>
     
    </transp>
     
     
    -<infAdic>
     
    <infCpl>Val aprox Tributos: R$ 7,57 (34,10%) Fonte:IBPT</infCpl>
     
    </infAdic>
     
    </infNFe>
     
    </NFe>
  9. Cara ainda não consigo enteder desta forma vamos ao exemplo que temos:

     

      with ACBrNFe1.NotasFiscais.Add.NFe do
       begin
         Ide.cNF       := StrToInt(NumNFe); //Caso não seja preenchido será gerado um número aleatório pelo componente
         Ide.natOp     := 'VENDA PRODUCAO DO ESTAB.';
         Ide.indPag    := ipVista;
         Ide.modelo    := 55;
         Ide.serie     := 1;
         Ide.nNF       := StrToInt(NumNFe);
         Ide.dEmi      := Date;
     
        //depois na linha 1857
         Emit.CNPJCPF           := edtEmitCNPJ.Text;
         Emit.IE                := edtEmitIE.Text;
         Emit.xNome             := edtEmitRazao.Text;
         Emit.xFant             := edtEmitFantasia.Text;
     
         Emit.EnderEmit.fone    := edtEmitFone.Text;
         Emit.EnderEmit.CEP     := StrToInt(edtEmitCEP.Text);
         Emit.EnderEmit.xLgr    := edtEmitLogradouro.Text;
     
      //depois na linha 2146
         with Det.Add do
           begin
             Prod.nItem    := 1; // Número sequencial, para cada item deve ser incrementado
             Prod.cProd    := '123457';
             Prod.cEAN     := '';
             Prod.xProd    := 'Descrição do Serviço';
             Prod.NCM      := '99';
             Prod.EXTIPI   := '';
             Prod.CFOP     := '5933';
             Prod.uCom     := 'UN';
     
     
    //depois na linha 2302
     
       exporta.UFembarq   := '';;
          exporta.xLocEmbarq := '';
     
          compra.xNEmp := '';
          compra.xPed  := '';
          compra.xCont := '';
       end;                     ==>" acredito que este end finaliza o with lá do inicio, então logo entendo que tudo esta com
                                          ACBrNFe1.NotasFiscais.Add.NFe embutido, porque todas as outras tags vieram ok,
                                          se fosse desta forma para cada declaração feita antes estaria uma nova nota e não foi isto
                                          que aconteceu tudo esta aparecendo no xml emitente, destinatário, total menos o produto "   
     
  10. Eu já vi é não vejo diferença no que ta lá com o que estou escrevendo.

     

    no acbr

     

    with ACBrNFe1.NotasFiscais.Add.NFe do
    begin
    Ide.cNF := StrToInt(NumNFe);
    ...

    //Adicionando Produtos
    with Det.Add do
    begin
    Prod.nItem := 1;
    ...

     

    meu 

     

    with ACBrNFe1.NotasFiscais.Add.NFe.Det.Add do

                begin
                  Prod.nItem   := iCont;
                  Prod.cProd   := Produto.cProd;
                  Prod.cEAN    := Produto.cEAN;
                  Prod.xProd   := Produto.xProd;
                  Prod.NCM     := Produto.NCM;
                  Prod.EXTIPI  := Produto.ExTIPI;
                  Prod.CFOP    := Produto.CFOP;
                  Prod.uCom    := Produto.uCom;
                  Prod.qCom    := StrToFloat(Produto.qCom);
                  Prod.vUnCom  := StrToFloat(Produto.vUnCom);
                  Prod.vProd   := StrToFloat(Produto.vProd);
     
                  Prod.cEANTrib:= Produto.cEANTrib;
                  Prod.uTrib   := produto.uTrib;
                  Prod.qTrib   := StrToFloat(produto.qTrib);
                  Prod.vUnTrib := StrToFloat(produto.vUnTrib);
     
                  Prod.vOutro := StrToFloat(Produto.vOutro);
                  Prod.vFrete := StrToFloat(Produto.vFrete);
                  Prod.vSeg   := StrToFloat(Produto.vSeg);
                  Prod.vDesc  := StrToFloat(Produto.vDesc);
     
    só que no meu estou usando with separados. 
  11.  with ACBrNFe1.NotasFiscais.Add.NFe.Det.Add do
                begin
                  Prod.nItem   := iCont;
                  Prod.cProd   := Produto.cProd;
                  Prod.cEAN    := Produto.cEAN;
                  Prod.xProd   := Produto.xProd;
                  Prod.NCM     := Produto.NCM;
                  Prod.EXTIPI  := Produto.ExTIPI;
                  Prod.CFOP    := Produto.CFOP;
                  Prod.uCom    := Produto.uCom;
                  Prod.qCom    := StrToFloat(Produto.qCom);
                  Prod.vUnCom  := StrToFloat(Produto.vUnCom);
                  Prod.vProd   := StrToFloat(Produto.vProd);
     
                  Prod.cEANTrib:= Produto.cEANTrib;
                  Prod.uTrib   := produto.uTrib;
                  Prod.qTrib   := StrToFloat(produto.qTrib);
                  Prod.vUnTrib := StrToFloat(produto.vUnTrib);
     
                  Prod.vOutro := StrToFloat(Produto.vOutro);
                  Prod.vFrete := StrToFloat(Produto.vFrete);
                  Prod.vSeg   := StrToFloat(Produto.vSeg);
                  Prod.vDesc  := StrToFloat(Produto.vDesc);
  12. bom dia,

     

    valeu cara muito obrigado por responder, mais não conseguir visualizar no exemplo como alimentar as tags só vejo como dar um openfile em um arquivo já existente.

    E que eu usava um componente da empresa ncs e ta tinha cada no e tags para ser alimentada e não estou identificando isto no exemplo.

×
×
  • 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.