FONTE NFE VB.NET

ELUCIMAR 13/08/2014 18:35:55
#440412
MFLAVIO,sim os endereços mudaram mais a resposta do webservice continua igual a versão 2.00.Acrescentaram o processo Síncrono(ou seja a resposta de autorização é obtida no ato do envio para o webservice), só que esse processo não está implementado em produção nem GO e MG que testei só tá funcionando em homologação. Meu Sistema tá gerando tanto na versão 2.00 e na 3.10, parametrizei de forma que é só mudar em uma tabela informando qual a versão da NFe.
ELUCIMAR 13/08/2014 18:45:05
#440413
Está dando erro porque está faltando o campo indIEDest que tem que ficar antes do IE.
Documentação sobre indIEDest:

/// <summary>
/// Versão NFe 3.10
/// 1=Contribuinte ICMS (informar a IE do destinatário);
/// 2=Contribuinte isento de Inscrição no cadastro de Contribuintes do ICMS;
/// 9=Não Contribuinte, que pode ou não possuir Inscrição Estadual no Cadastro de Contribuintes do ICMS.
/// Nota 1: No caso de NFC-e informar indIEDest=9 e não informar a tag IE do destinatário;
/// Nota 2: No caso de operação com o Exterior informar
/// indIEDest=9 e não informar a tag IE do destinatário;
/// Nota 3: No caso de Contribuinte Isento de Inscrição
/// (indIEDest=2), não informar a tag IE do destinatário.
/// </summary>
FOXMAN 13/08/2014 19:01:42
#440415
MFLAVIO,

Boa noite, primeiramente para que possamos lhe ajudar, sempre que lhe retornar um erro, vc precisa passar EXATAMENTE o erro retornado.
No seu caso o erro está na informação da IE do Destinatário(que neste caso não deveria ser informado a tag IE).
Observei também que vc não está tratando os campos DATA/TIME de acordo com o manual no formato UTC : YYYY-MM-DDTHH:MM:SS-SSSS

Eu também comecei hoje a atualização do meu sistema para versão 3.10 da NFe.
Abaixo segue um arquivo que gerei com sucesso hoje(FIZ ALGUMAS ALTERAÇÕES PARA PRESERVAR A IDENTIDADE DO MEU CLIENTE).

Citação:

<?xml version=[Ô]1.0[Ô] encoding=[Ô]utf-8[Ô]?>
<nfeProc versao=[Ô]3.10[Ô] xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô] xmlns:ds=[Ô]http://www.w3.org/2000/09/xmldsig#[Ô] xmlns:xsi=[Ô]http://www.w3.org/2001/XMLSchema-instance[Ô]>
<NFe xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]>
<infNFe Id=[Ô]NFe351408XXXXXXXXXXXXXX550010000022741430576405[Ô] versao=[Ô]3.10[Ô]>
<ide>
<cUF>35</cUF>
<cNF>43057640</cNF>
<natOp>Venda de Mercadoria</natOp>
<indPag>0</indPag>
<mod>55</mod>
<serie>1</serie>
<nNF>2274</nNF>
<dhEmi>2014-08-13T11:51:53-03:00</dhEmi>
<dhSaiEnt>2014-08-13T11:51:53-03:00</dhSaiEnt>
<tpNF>1</tpNF>
<idDest>1</idDest>
<cMunFG>3505500</cMunFG>
<tpImp>1</tpImp>
<tpEmis>1</tpEmis>
<cDV>5</cDV>
<tpAmb>2</tpAmb>
<finNFe>1</finNFe>
<indFinal>1</indFinal>
<indPres>3</indPres>
<procEmi>0</procEmi>
<verProc>2.2.0</verProc>
</ide>
<emit>
<CNPJ>00000000000000</CNPJ>
<xNome>XXXXXXXXXXXXXX. MEDICOS E ORT. LTDA ME</xNome>
<xFant>XXXXXXXXXXXXXX. MEDICOS E ORT. LTDA ME</xFant>
<enderEmit>
<xLgr>XXXXXXXX</xLgr>
<nro>XXXX</nro>
<xCpl>x</xCpl>
<xBairro>XXXXXXX</xBairro>
<cMun>3505500</cMun>
<xMun>Barretos</xMun>
<UF>SP</UF>
<CEP>14783090</CEP>
<cPais>1058</cPais>
<xPais>BRASIL</xPais>
<fone>1234567890</fone>
</enderEmit>
<IE>XXXXXXXXXX</IE>
<CRT>3</CRT>
</emit>
<dest>
<CNPJ>99999999000191</CNPJ>
<xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome>
<enderDest>
<xLgr>ROD BR 153 KM 07 AREA 01 GALPAO 02</xLgr>
<nro>0</nro>
<xCpl>S/N</xCpl>
<xBairro>JARDIM DA LUZ</xBairro>
<cMun>3505500</cMun>
<xMun>BARRETOS</xMun>
<UF>SP</UF>
<CEP>14783090</CEP>
<cPais>1058</cPais>
<xPais>BRASIL</xPais>
<fone>1733231489</fone>
</enderDest>
<indIEDest>2</indIEDest>
<email>teste@satfiscal.net</email>
</dest>
<det nItem=[Ô]1[Ô]>
<prod>
<cProd>1</cProd>
<cEAN>7897486202508</cEAN>
<xProd>CAFE MOIDO VOVO 250G</xProd>
<NCM>09012100</NCM>
<CFOP>5102</CFOP>
<uCom>UN</uCom>
<qCom>1</qCom>
<vUnCom>10.99</vUnCom>
<vProd>10.99</vProd>
<cEANTrib>7897486202508</cEANTrib>
<uTrib>UN</uTrib>
<qTrib>1</qTrib>
<vUnTrib>10.99</vUnTrib>
<indTot>1</indTot>
</prod>
<imposto>
<ICMS>
<ICMS40>
<orig>0</orig>
<CST>41</CST>
</ICMS40>
</ICMS>
<PIS>
<PISNT>
<CST>04</CST>
</PISNT>
</PIS>
<COFINS>
<COFINSNT>
<CST>04</CST>
</COFINSNT>
</COFINS>
</imposto>
</det>
<det nItem=[Ô]2[Ô]>
<prod>
<cProd>146196</cProd>
<cEAN>7897486202553</cEAN>
<xProd>CAFE MOIDO VOVO 500G</xProd>
<NCM>09012100</NCM>
<CFOP>5102</CFOP>
<uCom>UN</uCom>
<qCom>1</qCom>
<vUnCom>50.80</vUnCom>
<vProd>50.80</vProd>
<cEANTrib>7897486202553</cEANTrib>
<uTrib>UN</uTrib>
<qTrib>1</qTrib>
<vUnTrib>50.80</vUnTrib>
<indTot>1</indTot>
</prod>
<imposto>
<ICMS>
<ICMS00>
<orig>0</orig>
<CST>00</CST>
<modBC>3</modBC>
<vBC>50.80</vBC>
<pICMS>17.00</pICMS>
<vICMS>8.64</vICMS>
</ICMS00>
</ICMS>
<PIS>
<PISNT>
<CST>04</CST>
</PISNT>
</PIS>
<COFINS>
<COFINSNT>
<CST>04</CST>
</COFINSNT>
</COFINS>
</imposto>
</det>
<total>
<ICMSTot>
<vBC>50.80</vBC>
<vICMS>8.64</vICMS>
<vICMSDeson>0</vICMSDeson>
<vBCST>0</vBCST>
<vST>0</vST>
<vProd>61.79</vProd>
<vFrete>0</vFrete>
<vSeg>0</vSeg>
<vDesc>0</vDesc>
<vII>0</vII>
<vIPI>0</vIPI>
<vPIS>0</vPIS>
<vCOFINS>0</vCOFINS>
<vOutro>0</vOutro>
<vNF>61.79</vNF>
</ICMSTot>
</total>
<transp>
<modFrete>0</modFrete>
<transporta>
<CNPJ>00000001111111</CNPJ>
<xNome>XXXXXXXXXXXXXXXXXXXXXX</xNome>
<IE>000000000</IE>
<xEnder>XXXXXXXXXXXXXXXXXXXXXXXXXXXX</xEnder>
<xMun>TESTE</xMun>
<UF>GO</UF>
</transporta>
<vol>
<qVol>1</qVol>
<esp>CX</esp>
<nVol>0</nVol>
<pesoL>10</pesoL>
<pesoB>10</pesoB>
</vol>
</transp>
<cobr>
<dup>
<nDup>45444</nDup>
<dVenc>2014-12-01</dVenc>
<vDup>30.00</vDup>
</dup>
<dup>
<nDup>45444</nDup>
<dVenc>2015-02-01</dVenc>
<vDup>31.79</vDup>
</dup>
</cobr>
<infAdic>
<infCpl>TESTE.</infCpl>
</infAdic>
</infNFe>
</NFe>
<protNFe versao=[Ô]3.10[Ô] xmlns=[Ô][Ô]>
<infProt>
<tpAmb>2</tpAmb>
<verAplic>SP_NFE_PL_008d</verAplic>
<chNFe>351408XXXXXXXXXXXXXX550010000022741430576405</chNFe>
<dhRecbto>2014-08-13T11:51:43-03:00</dhRecbto>
<nProt>135140004084628</nProt>
<digVal>xu+yZ8SkVIQxdWgZquRvRrqhufY=</digVal>
<cStat>100</cStat>
<xMotivo>Autorizado o uso da NF-e</xMotivo>
</infProt>
</protNFe>
</nfeProc>

MFLAVIO 14/08/2014 12:01:47
#440440
Eu corrigi o XML mais ainda esta dando erro agora da Falha no Schema XML do Lote
procurei no manual nt2013.005 mais não achei nada que me ajude o que pode ser esse erro?
este e o XML ocultei os dados do cliente então onde tem *** seia dados pessoais do cliente

  <?xml version=[Ô]1.0[Ô] encoding=[Ô]utf-8[Ô]?>
<NFe xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]>
  <infNFe versao=[Ô]3.10[Ô] Id=[Ô]NFe35140816849871000114550010000003051584283059[Ô]>
    <ide>
      <cUF>35</cUF>
      <cNF>82262305</cNF>
      <natOp>venda/st</natOp>
      <indPag>2</indPag>
      <mod>55</mod>
      <serie>1</serie>
      <nNF>305</nNF>
      <dhEmi>2014-08-14T11:50:59-02:00</dhEmi>
      <dhSaiEnt>2014-08-14T11:50:59-02:00</dhSaiEnt>
      <tpNF>1</tpNF>
      <idDest>1</idDest>
      <cMunFG>3509502</cMunFG>
      <tpImp>1</tpImp>
      <tpEmis>1</tpEmis>
      <cDV>6</cDV>
      <tpAmb>2</tpAmb>
      <finNFe>1</finNFe>
      <indFinal>0</indFinal>
      <indPres>9</indPres>
      <procEmi>0</procEmi>
      <verProc>PL_8e</verProc>
    </ide>
    <emit>
      <CNPJ>***49871000***</CNPJ>
      <xNome>********** - ME</xNome>
      <xFant>MabInformatica</xFant>
      <enderEmit>
        <xLgr>Rua Conselheiro A. Carlos</xLgr>
        <nro>311</nro>
        <xBairro>JD. Campos Eliseos</xBairro>
        <cMun>3509502</cMun>
        <xMun>Campinas</xMun>
        <UF>SP</UF>
        <CEP>13060024</CEP>
        <cPais>1058</cPais>
        <xPais>BRASIL</xPais>
        <fone>19****1378</fone>
      </enderEmit>
      <IE>***298392***</IE>
      <CRT>1</CRT>
    </emit>
    <dest>
      <CNPJ>99999999000191</CNPJ>
      <xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome>
      <enderDest>
        <xLgr>RUA DA ABOLICAO</xLgr>
        <nro>1466</nro>
        <xBairro>PONTE PRETA</xBairro>
        <cMun>3509502</cMun>
        <xMun>CAMPINAS</xMun>
        <UF>SP</UF>
        <CEP>130**445</CEP>
        <cPais>1058</cPais>
        <xPais>BRASIL</xPais>
        <fone>19****5600</fone>
      </enderDest>
      <indIEDest>2</indIEDest>
      <email>SHAIRA@@@@@@@@.COM.BR</email>
    </dest>
    <det nItem=[Ô]1[Ô]>
      <prod>
        <cProd>042014</cProd>
        <cEAN />
        <xProd>CABO DE FLAT</xProd>
        <NCM>99000781</NCM>
        <CFOP>5102</CFOP>
        <uCom>UND</uCom>
        <qCom>50.0000</qCom>
        <vUnCom>24.9800</vUnCom>
        <vProd>1249.00</vProd>
        <cEANTrib />
        <uTrib>UND</uTrib>
        <qTrib>50.0000</qTrib>
        <vUnTrib>24.9800</vUnTrib>
        <indTot>1</indTot>
      </prod>
      <imposto>
        <vTotTrib>268.41</vTotTrib>
        <ICMS>
          <ICMSSN500>
            <orig>0</orig>
            <CSOSN>500</CSOSN>
            <vBCSTRet>0.00</vBCSTRet>
            <vICMSSTRet>0.00</vICMSSTRet>
          </ICMSSN500>
        </ICMS>
        <PIS>
          <PISNT>
            <CST>07</CST>
          </PISNT>
        </PIS>
        <COFINS>
          <COFINSNT>
            <CST>07</CST>
          </COFINSNT>
        </COFINS>
      </imposto>
      <infAdProd>Imposto Aproximado:R$ 268,41 |</infAdProd>
    </det>
    <total>
      <ICMSTot>
        <vBC>0.00</vBC>
        <vICMS>0.00</vICMS>
        <vICMSDeson>0.00</vICMSDeson>
        <vBCST>0.00</vBCST>
        <vST>0.00</vST>
        <vProd>1249.00</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>1249.00</vNF>
        <vTotTrib>268.41</vTotTrib>
      </ICMSTot>
    </total>
    <transp>
      <modFrete>1</modFrete>
      <transporta>
        <xNome>CLIENTE RETIRA</xNome>
      </transporta>
      <vol>
        <qVol>1</qVol>
        <pesoL>0.001</pesoL>
        <pesoB>0.001</pesoB>
      </vol>
    </transp>
    <cobr />
    <infAdic>
      <infCpl>DOCUMENTO EMITIDO POR ME OU EPP OPTANTE PELO SIMPLES NACIONAL ESTABELECIMENTO IMPEDIDO DE RECOLHER O ICMS/ISS PELO SIMPLES NACIONAL, NOS TERMOS DO § 1  DO ART. 20 DA LC 123/2006 NAO GERA DIREITO A CREDITO FISCAL DE IPI | Total Aproximado dos Impostos 268,41 Tabela IBPT</infCpl>
    </infAdic>
  </infNFe>
</NFe>
MFLAVIO 14/08/2014 14:16:05
#440444
Pessoal Uma pergunta,eu mudei os endereços dos webserver para os novos 3.10 mais estou usando o envio de lote do projeto só mudei a versão do cabeçario e o endereço do para o novo
só que da erro [Ô][Ô]Unable to handle request. The action [ô]http://www.portalfiscal.inf.br/nfe/wsdl/NfeRecepcao2/nfeRecepcaoLote2[ô] was not recognized.[Ô]


  Public Function EnviaLote2(ByVal EndArquivoXml As String) As RetEnvio
        Dim strRetorno As XmlElement
        Dim xmldoc = New XmlDocument()

        Try
            xmldoc.Load(EndArquivoXml) [ô]Carrega o arquivo XML 
            Dim CERT As X509Certificate2
            CERT = SelecionarCertificado([Ô][Ô])

            Dim wsMsg As Recepcao2.NfeRecepcao2
            Dim cab As New Recepcao2.nfeCabecMsg

            [ô]UF E VERSÃO DO CABEÇALHO
            cab.cUF = S_Url.CodigoUF
            cab.versaoDados = VersaoAtualNfe

            Dim Notas As String
            [ô]CABEÇALHO USADA PARA ENVIO DE LOTE
            wsMsg = New Recepcao2.NfeRecepcao2(S_Url.UrlNfeRecepcao) [ô] esta eviando para https://homologacao.nfe.fazenda.sp.gov.br/ws/nfeautorizacao.asmx
            wsMsg.nfeCabecMsgValue = cab

            wsMsg.Timeout = 100000
            wsMsg.ClientCertificates.Add(CERT)
            wsMsg.SoapVersion = SoapProtocolVersion.Soap12
            Notas = xmldoc.OuterXml

            [ô]RETORNO DA SEFAZ
            strRetorno = wsMsg.nfeRecepcaoLote2(xmldoc) [ô]Erro acontece aqui

            [ô]DESMEMBRA RETORNO XML
            Dim StrRetNota As RetEnvio = Nothing
            Dim XmlText As XmlDocument = New XmlDocument

            For Each outerNode As XmlNode In strRetorno
                For Each InnerNode As XmlNode In outerNode.ChildNodes
                    If (InnerNode.Name = [Ô]verAplic[Ô] Or outerNode.Name = [Ô]verAplic[Ô]) Then
                        StrRetNota.verAplic = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]cStat[Ô] Or outerNode.Name = [Ô]cStat[Ô]) Then
                        StrRetNota.cStat = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]xMotivo[Ô] Or outerNode.Name = [Ô]xMotivo[Ô]) Then
                        StrRetNota.xMotivo = InnerNode.InnerText
                        STRRetornoX = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]cUF[Ô] Or outerNode.Name = [Ô]cUF[Ô]) Then
                        StrRetNota.cUF = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]nRec[Ô] Or outerNode.Name = [Ô]nRec[Ô]) Then
                        StrRetNota.nRec = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]dhRecbto[Ô] Or outerNode.Name = [Ô]dhRecbto[Ô]) Then
                        StrRetNota.dhRecbto = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]tMed[Ô] Or outerNode.Name = [Ô]tMed[Ô]) Then
                        StrRetNota.tMed = InnerNode.InnerText
                    End If
                Next
            Next

            Return StrRetNota
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Information, [Ô][Ô])
            Return Nothing
        End Try
    End Function


eu não to conseguindo entender esse erro.
LEANDROSANTOS 15/08/2014 00:41:02
#440461
Para o leiaute 3.10 use o WS NFeAutorizacao no lugar de NFeRecepcao
MFLAVIO 15/08/2014 10:02:01
#440464
Citação:

:
Para o leiaute 3.10 use o WS NFeAutorizacao no lugar de NFeRecepcao


Leandro eu estou usando o https://homologacao.nfe.fazenda.sp.gov.br/ws/nfeautorizacao.asmx

o nfeRecepcao vem de retorno do Sefaz eu não sei o que fazer
MFLAVIO 15/08/2014 13:43:00
#440470
Caraba ta fogo Hoje viu heheh

eu revi todo o Código alterei os endereços para [ô]https://nfe.fazenda.sp.gov.br/ws/nferetautorizacao[ô]
mais continua dando erro
[Ô]Unable to handle request. The action [ô]https://nfe.fazenda.sp.gov.br/ws/nferetautorizacao[ô] was not recognized.[Ô]
 Public Function EnviaLote2(ByVal EndArquivoXml As String) As RetEnvio
        Dim strRetorno As XmlElement
        Dim xmldoc = New XmlDocument()

        Try
            xmldoc.Load(EndArquivoXml) [ô]Carrega o arquivo XML 
            Dim CERT As X509Certificate2
            CERT = SelecionarCertificado([Ô][Ô])

            Dim wsMsg As Recepcao2.NfeRecepcao2
            Dim cab As New Recepcao2.nfeCabecMsg

            [ô]UF E VERSÃO DO CABEÇALHO
            cab.cUF = S_Url.CodigoUF
            cab.versaoDados = VersaoAtualNfe

            Dim Notas As String
            [ô]CABEÇALHO USADA PARA ENVIO DE LOTE
            wsMsg = New Recepcao2.NfeRecepcao2(S_Url.UrlNfeRecepcao)
            wsMsg.nfeCabecMsgValue = cab

            wsMsg.Timeout = 100000
            wsMsg.ClientCertificates.Add(CERT)
            wsMsg.SoapVersion = SoapProtocolVersion.Soap12
            Notas = xmldoc.OuterXml

            [ô]RETORNO DA SEFAZ
            strRetorno = wsMsg.nfeRecepcaoLote2(xmldoc) [ô] O erro acontece aqui

            [ô]DESMEMBRA RETORNO XML
            Dim StrRetNota As RetEnvio = Nothing
            Dim XmlText As XmlDocument = New XmlDocument

            For Each outerNode As XmlNode In strRetorno
                For Each InnerNode As XmlNode In outerNode.ChildNodes
                    If (InnerNode.Name = [Ô]verAplic[Ô] Or outerNode.Name = [Ô]verAplic[Ô]) Then
                        StrRetNota.verAplic = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]cStat[Ô] Or outerNode.Name = [Ô]cStat[Ô]) Then
                        StrRetNota.cStat = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]xMotivo[Ô] Or outerNode.Name = [Ô]xMotivo[Ô]) Then
                        StrRetNota.xMotivo = InnerNode.InnerText
                        STRRetornoX = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]cUF[Ô] Or outerNode.Name = [Ô]cUF[Ô]) Then
                        StrRetNota.cUF = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]nRec[Ô] Or outerNode.Name = [Ô]nRec[Ô]) Then
                        StrRetNota.nRec = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]dhRecbto[Ô] Or outerNode.Name = [Ô]dhRecbto[Ô]) Then
                        StrRetNota.dhRecbto = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = [Ô]tMed[Ô] Or outerNode.Name = [Ô]tMed[Ô]) Then
                        StrRetNota.tMed = InnerNode.InnerText
                    End If
                Next
            Next

            Return StrRetNota
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Information, [Ô][Ô])
            Return Nothing
        End Try
    End Function
MESTRE 20/08/2014 12:23:48
#440612
o link do projeto atualizado ta off :(

alguem tem poderia passar?

Abraços!
VANTO 20/08/2014 13:41:11
#440616
Olá, pessoal, alguém já fez ou tem interesse de fazer o download do xml diretamente pelo webservice da sefaz, pensei em listar pro usuário todos os xmls emitidos para ele e ele escolhe quais baixar, o que vcs acham?
Página 172 de 228 [2276 registro(s)]
Faça seu login para responder
Voltar