FONTE NFE VB.NET

OTAVIOFAVERO 24/05/2010 19:08:22
#342652
posto aki a XML nfe 2.0


<?xml version=[Ô]1.0[Ô] encoding=[Ô]UTF-8[Ô]?>
<NFe xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]>
<infNFe versao=[Ô]2.00[Ô] Id=[Ô]NFe35100550151687000134550010000000032079996980[Ô]>
<ide>
<cUF>35</cUF>
<cNF>07999698</cNF>
<natOp>VENDA</natOp>
<indPag>0</indPag>
<mod>55</mod>
<serie>1</serie>
<nNF>3</nNF>
<dEmi>2010-05-24</dEmi>
<dSaiEnt>2010-05-24</dSaiEnt>
<tpNF>1</tpNF>
<cMunFG>3548807</cMunFG>
<tpImp>2</tpImp>
<tpEmis>1</tpEmis>
<cDV>0</cDV>
<tpAmb>2</tpAmb>
<finNFe>1</finNFe>
<procEmi>0</procEmi>
<verProc>RocketNFe1.0</verProc>
</ide>
<emit>
<CNPJ>50151687000134</CNPJ>
<xNome>Florbras Industria e Comercio Ltda</xNome>
<xFant>Florbras</xFant>

<enderEmit>
<xLgr>R MAXIMILIANO LORENZINI</xLgr>
<nro>177</nro>
<xBairro>FUNDAÇÃO</xBairro>
<cMun>3548807</cMun>
<xMun>Sao Caetano do Sul</xMun>
<UF>SP</UF>
<CEP>09520520</CEP>
<cPais>1058</cPais>
<xPais>BRASIL</xPais>
<fone>1142292099</fone>
</enderEmit><IE>636067458113</IE><CRT>1</CRT>
</emit>
<dest>
<CPF>88922502991</CPF>
<xNome>otavio favero</xNome>
<enderDest>
<xLgr>RUA DOUTOR ARNALDO DE CAMPOS</xLgr>
<nro>10</nro>
<xCpl>complemon</xCpl>
<xBairro>VILA DUARTE</xBairro>
<cMun>3550308</cMun>
<xMun>São Paulo</xMun>
<UF>SP</UF>
<CEP>02975160</CEP>
<cPais>1058</cPais>
<xPais>BRASIL</xPais>
<fone>122222222</fone>
</enderDest><IE>ISENTO</IE>
</dest>
<det nItem=[Ô]1[Ô]>
<prod>
<cProd>7898423105159</cProd>
<cEAN />
<xProd>Feliz Natal Mod.3 - Gde COR:Branco com Azul</xProd>
<NCM>12345678</NCM>
<CFOP>5102</CFOP>
<uCom>PC</uCom>
<qCom>39</qCom>
<vUnCom>2.6500</vUnCom>
<vProd>103.35</vProd>
<cEANTrib />
<uTrib>PC</uTrib>
<qTrib>39</qTrib>
<vUnTrib>2.6500</vUnTrib>
<indTot>0</indTot>
</prod>
<imposto>
<ICMS>
<ICMS00>
<orig>0</orig>
<CST>00</CST>
<modBC>0</modBC>
<vBC>103.35</vBC>
<pICMS>18.00</pICMS>
<vICMS>18.60</vICMS>
</ICMS00>
</ICMS>
<IPI>
<clEnq>0</clEnq>
<cSelo>0</cSelo>
<qSelo>0</qSelo>
<cEnq>999</cEnq>
<IPITrib>
<CST>00</CST>
<vBC>103.35</vBC>
<pIPI>5.00</pIPI>
<vIPI>5.17</vIPI>
</IPITrib>
</IPI>
<PIS>
<PISAliq>
<CST>01</CST>
<vBC>103.35</vBC>
<pPIS>5.00</pPIS>
<vPIS>0.00</vPIS>
</PISAliq>
</PIS>
<COFINS>
<COFINSAliq>
<CST>01</CST>
<vBC>103.35</vBC>
<pCOFINS>0</pCOFINS>
<vCOFINS>0.00</vCOFINS>
</COFINSAliq>
</COFINS>
</imposto>
</det>
<total>
<ICMSTot>
<vBC>103.35</vBC>
<vICMS>18.60</vICMS>
<vBCST>0.00</vBCST>
<vST>0.00</vST>
<vProd>103.35</vProd>
<vFrete>10.10</vFrete>
<vSeg>0.00</vSeg>
<vDesc>0.00</vDesc>
<vII>0.00</vII>
<vIPI>5.17</vIPI>
<vPIS>0.00</vPIS>
<vCOFINS>0.00</vCOFINS>
<vOutro>0.00</vOutro>
<vNF>113.45</vNF>
</ICMSTot>
</total>
<transp>
<modFrete>0</modFrete>
<transporta>
<CPF>18720623852</CPF>
<xEnder>rua jose aparecido braido</xEnder>
<xMun>mogi guaçu</xMun>
<UF>SP</UF>
</transporta>
<vol />
</transp>
<cobr>
<fat>
<nFat>1</nFat>
</fat>
<dup>
<nDup>1</nDup>
<dVenc>2010-05-05</dVenc>
<vDup>113.45</vDup>
</dup>
</cobr>
<infAdic />
</infNFe>
</NFe>


OTAVIOFAVERO 24/05/2010 19:13:29
#342653
simple não mudou muita coisa!!!

agora e so adaptar sua DLL para acessa o webservice versão 2 com soap 1.2

e mais facil ainda!

ha mudou os cabeçalhos da versão 2 da NFE então e so baixar os WSDL

e mudar seus cabeçalhos simples!!

boa sorte a todos
DANIELCPAETE 24/05/2010 22:54:49
#342667
Galera na pagina 3 do topico tem o código para enviar no Soap 1.2 é baixar e conferir.
IRENKO 25/05/2010 15:34:38
#342746
Pessoal da NF-e, deixo claro que nem penso em fazer essa NF-e, é muito pra mim. Bom, uma pergunta como usuário do site da receita referente a consulta da chave de acesso. Tendo em vista que a chave tem 44 dígitos e que o volume de DANFE recebidas na empresa onde trabalho é expressivo e que tenho que consultar todas, existe maneira de usar o leitor de código de barras para carregar esses números no campo do site usando o VB? Alguem tem um exemplo?
DANIELCPAETE 25/05/2010 15:41:38
#342747
Acredito que não va ter nenhum problema em carregar estes numeros pode simplesmente abrir o site da receita e clicar no campo e posterior passar o leitor no código da Danfe.
OTAVIOFAVERO 25/05/2010 21:28:03
#342793
bom nada que não possa ser desenvolvido! mas so um comentario!!

abç
OTAVIOFAVERO 26/05/2010 00:39:52
#342805
alguem tem o layou do xml ja com o protocolo de autorização?????
DANIELCPAETE 26/05/2010 11:59:44
#342834
Você precisa colocar sua NFE dentro desta nova tag

<nfeProc versao=[Ô]1.10[Ô] xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]><NFe xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]>


Acrescentando no final do XML

<protNFe versao=[Ô]1.10[Ô] xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]><infProt><tpAmb>1</tpAmb><verAplic>SP_NFE_PL_005e</verAplic><chNFe>0000000000000000000000000000000000</chNFe><dhRecbto>2010-04-23T20:40:52</dhRecbto><nProt>00000000</nProt><digVal>glkhdasjkdghasjkh=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso da NF-e</xMotivo></infProt></protNFe></nfeProc>
OTAVIOFAVERO 26/05/2010 12:49:44
#342837
opaa eu acabei conseguindo e to postando aki 2 coisa o XML ja montando e o codigo fonte para retirar as tags desejadas


<?xml version=[Ô]1.0[Ô] encoding=[Ô]UTF-8[Ô]?><nfeProc versao=[Ô]1.10[Ô] xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]><NFe><infNFe versao=[Ô]1.10[Ô] Id=[Ô]NFe35100508311856000190550010000001199719756685[Ô] xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]><ide><cUF>35</cUF><cNF>971975668</cNF><natOp>VENDA DE MERC. INDUSTRIALIZADA</natOp><indPag>0</indPag><mod>55</mod><serie>1</serie><nNF>119</nNF><dEmi>2010-05-24</dEmi><dSaiEnt>2010-05-24</dSaiEnt><tpNF>1</tpNF><cMunFG>3548807</cMunFG><tpImp>2</tpImp><tpEmis>1</tpEmis><cDV>5</cDV><tpAmb>1</tpAmb><finNFe>1</finNFe><procEmi>0</procEmi><verProc>RocketNFe1.0</verProc></ide><emit><CNPJ>08311856000190</CNPJ><xNome>IMPACTO PRODUTOS MEDICOS E HOSPITALARES LTDA</xNome><xFant>IMPACTO</xFant><enderEmit><xLgr>RUA ENG. ARMANDO ARRUDA PEREIRA</xLgr><nro>1307</nro><xBairro>CERAMINA</xBairro><cMun>3548807</cMun><xMun>Sao Caetano do Sul</xMun><UF>SP</UF><CEP>09581170</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>1142384070</fone></enderEmit><IE>636293485119</IE></emit><dest><CNPJ>05954241000193</CNPJ><xNome>OXI AIR EQUIPAMENTOS PARA TERAPIA RESPIRATÓRIA LTDA</xNome><enderDest><xLgr>RUA VERGUEIRO</xLgr><nro>4052</nro><xBairro>CHACARA KLABIN</xBairro><cMun>3550308</cMun><xMun>São Paulo</xMun><UF>SP</UF><CEP>04102002</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>1126289188</fone></enderDest><IE>113850036114</IE></dest><det nItem=[Ô]1[Ô]><prod><cProd>70</cProd><cEAN /><xProd>Conector e Conexões Impacto - Valvula Exalatória c/ tampa - REF. IMP11ALote: 723/0510</xProd><NCM>90192020</NCM><CFOP>5101</CFOP><uCom>PC</uCom><qCom>12</qCom><vUnCom>5.0000</vUnCom><vProd>60.00</vProd><cEANTrib /><uTrib>PC</uTrib><qTrib>12</qTrib><vUnTrib>5.0000</vUnTrib></prod><imposto><ICMS><ICMS00><orig>0</orig><CST>00</CST><modBC>0</modBC><vBC>60.00</vBC><pICMS>0.00</pICMS><vICMS>0.00</vICMS></ICMS00></ICMS><IPI><clEnq>0</clEnq><cSelo>0</cSelo><qSelo>0</qSelo><cEnq>999</cEnq><IPITrib><CST>00</CST><vBC>60.00</vBC><pIPI>0.00</pIPI><vIPI>0.00</vIPI></IPITrib></IPI><PIS><PISAliq><CST>01</CST><vBC>60.00</vBC><pPIS>0.00</pPIS><vPIS>0.00</vPIS></PISAliq></PIS><COFINS><COFINSAliq><CST>01</CST><vBC>60.00</vBC><pCOFINS>0</pCOFINS><vCOFINS>0.00</vCOFINS></COFINSAliq></COFINS></imposto></det><det nItem=[Ô]2[Ô]><prod><cProd>70</cProd><cEAN /><xProd>Conector e Conexões Impacto - Valvula Exalatória c/ tampa - REF. IMP11ALote: 727/0510</xProd><NCM>90192020</NCM><CFOP>5101</CFOP><uCom>PC</uCom><qCom>88</qCom><vUnCom>5.0000</vUnCom><vProd>440.00</vProd><cEANTrib /><uTrib>PC</uTrib><qTrib>88</qTrib><vUnTrib>5.0000</vUnTrib></prod><imposto><ICMS><ICMS00><orig>0</orig><CST>00</CST><modBC>0</modBC><vBC>440.00</vBC><pICMS>0.00</pICMS><vICMS>0.00</vICMS></ICMS00></ICMS><IPI><clEnq>0</clEnq><cSelo>0</cSelo><qSelo>0</qSelo><cEnq>999</cEnq><IPITrib><CST>00</CST><vBC>440.00</vBC><pIPI>0.00</pIPI><vIPI>0.00</vIPI></IPITrib></IPI><PIS><PISAliq><CST>01</CST><vBC>440.00</vBC><pPIS>0.00</pPIS><vPIS>0.00</vPIS></PISAliq></PIS><COFINS><COFINSAliq><CST>01</CST><vBC>440.00</vBC><pCOFINS>0</pCOFINS><vCOFINS>0.00</vCOFINS></COFINSAliq></COFINS></imposto></det><total><ICMSTot><vBC>500.00</vBC><vICMS>0.00</vICMS><vBCST>0.00</vBCST><vST>0.00</vST><vProd>500.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>500.00</vNF></ICMSTot></total><transp><modFrete>0</modFrete><transporta><CNPJ>68370568000138</CNPJ><xNome>EMPRESA BRASILEIRA DE CORREIOS E TELéGRAFOS</xNome><xEnder>RUA CARIJÓS</xEnder><xMun>Santo André</xMun><UF>SP</UF></transporta><vol><qVol>1</qVol><esp>VOLUME</esp></vol></transp><cobr><fat><nFat>1</nFat></fat><dup><nDup>1</nDup><dVenc>2010-06-21</dVenc><vDup>500.00</vDup></dup></cobr><infAdic><infCpl>DOCUMENTO EMITIDO POR EPP OPTANTE PELO SIMPLES NACIONAL - NÃO GERA CREDITO DE ICMS, ISS E IPI.</infCpl></infAdic></infNFe><Signature xmlns=[Ô]http://www.w3.org/2000/09/xmldsig#[Ô]><SignedInfo><CanonicalizationMethod Algorithm=[Ô]http://www.w3.org/TR/2001/REC-xml-c14n-20010315[Ô] /><SignatureMethod Algorithm=[Ô]http://www.w3.org/2000/09/xmldsig#rsa-sha1[Ô] /><Reference URI=[Ô]#NFe35100508311856000190550010000001199719756685[Ô]><Transforms><Transform Algorithm=[Ô]http://www.w3.org/2000/09/xmldsig#enveloped-signature[Ô] /><Transform Algorithm=[Ô]http://www.w3.org/TR/2001/REC-xml-c14n-20010315[Ô] /></Transforms><DigestMethod Algorithm=[Ô]http://www.w3.org/2000/09/xmldsig#sha1[Ô] /><DigestValue>md+cALfEEhCOVm5njDtFuJzCu7M=</DigestValue></Reference></SignedInfo><SignatureValue>YXIS9Mhh31P4vrBy+0qhdxPD8jPcd4OoJR+TsiRbG5ZKgnyiOUCX9YSP2Gp+VSEEB3dmV/og1/6LUz3ODrn7ExWB3KqqI5ZNsfYq6DKUHLhuoWjf62xb090zTGVNIgNnYoAtUFSPXix40GQsURfv8yStEAzWrZ3UCoHVMjWmY8M=</SignatureValue><KeyInfo><X509Data><X509Certificate>MIIGyzCCBbOgAwIBAgIQT7opixeNJmE7NFNnKplbzDANBgkqhkiG9w0BAQUFADCBgzELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxSDBGBgNVBAsTP1NJTkNPUi1TUCAtIFNpbmRpY2F0byBkb3MgQ29ycmV0b3JlcyBkZSBTZWd1cm9zIG5vIEVzdGFkbyBkZSBTUDEVMBMGA1UEAxMMQUMgU0lOQ09SIEcyMB4XDTEwMDIyNDAwMDAwMFoXDTEzMDIyMjIzNTk1OVowggEVMQswCQYDVQQGEwJCUjETMBEGA1UEChQKSUNQLUJyYXNpbDEuMCwGA1UECxQlQXV0ZW50aWNhZG8gcG9yIEFSIFNpbmNvciBQb2xvbWFzdGhlcjEbMBkGA1UECxQSQXNzaW5hdHVyYSBUaXBvIEEzMRQwEgYDVQQLFAsoRU0gQlJBTkNPKTEUMBIGA1UECxQLKEVNIEJSQU5DTykxFDASBgNVBAsUC0lEIC0gNjcwMjgwMTUwMwYDVQQDEyxJTVBBQ1RPIFBST0RVVE9TIE1FRElDT1MgRSBIT1NQSVRBTEFSRVMgTFREQTErMCkGCSqGSIb3DQEJARYcdmVuZGFzQGltcGFjdG9tZWRpY2FsLmNvbS5icjCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEAoUCaaXRl8GgMN/3FYDijP9txMJseDPhm14xFUZFOH2rZ2USuUqTc49hm9kTRhwwndzgizOD3jHMwj1HjGp+j86m9FlLPqT3+lxQqrMU63UrSfAy4hRd9UNbmDrPG998quiazZoU18DJrY/7Lt4bYTwbwB43j5bP9hQjBmsMgbvcCAwEAAaOCAygwggMkMIHJBgNVHREEgcEwgb6gPQYFYEwBAwSgNAQyMTYwMTE5ODAyNzE4NDQ2NzgxNzAwMDAwMDAwMDAwMDAwMDAwMDI3NTA5MDk0U1NQU1CgKwYFYEwBAwKgIgQgQkVBVFJJWiBEQSBTSUxWQSBQT1NTQVJMRSBGVVJMQU6gGQYFYEwBAwOgEAQOMDgzMTE4NTYwMDAxOTCgFwYFYEwBAwegDgQMMDAwMDAwMDAwMDAwgRx2ZW5kYXNAaW1wYWN0b21lZGljYWwuY29tLmJyMAkGA1UdEwQCMAAwHwYDVR0jBBgwFoAUZHCLHoZOg0uQkg8yqkGnWBfKxAUwDgYDVR0PAQH/BAQDAgXgMIIBAgYDVR0fBIH6MIH3MFGgT6BNhktodHRwOi8vaWNwLWJyYXNpbC5jZXJ0aXNpZ24uY29tLmJyL3JlcG9zaXRvcmlvL2xjci9BQ1NJTkNPUkcyL0xhdGVzdENSTC5jcmwwUKBOoEyGSmh0dHA6Ly9pY3AtYnJhc2lsLm91dHJhbGNyLmNvbS5ici9yZXBvc2l0b3Jpby9sY3IvQUNTSU5DT1JHMi9MYXRlc3RDUkwuY3JsMFCgTqBMhkpodHRwOi8vcmVwb3NpdG9yaW8uaWNwYnJhc2lsLmdvdi5ici9sY3IvQ2VydGlzaWduL0FDU0lOQ09SRzIvTGF0ZXN0Q1JMLmNybDBVBgNVHSAETjBLMEkGBmBMAQIDDjA/MD0GCCsGAQUFBwIBFjFodHRwOi8vaWNwLWJyYXNpbC5hY3NpbmNvci5jb20uYnIvcmVwb3NpdG9yaW8vZHBjADAdBgNVHSUEFjAUBggrBgEFBQcDBAYIKwYBBQUHAwIwgZ0GCCsGAQUFBwEBBIGQMIGNMCgGCCsGAQUFBzABhhxodHRwOi8vb2NzcC5jZXJ0aXNpZ24uY29tLmJyMGEGCCsGAQUFBzAChlVodHRwOi8vaWNwLWJyYXNpbC5hY3NpbmNvci5jZXJ0aXNpZ24uY29tLmJyL3JlcG9zaXRvcmlvL2NlcnRpZmljYWRvcy9BQ19TSU5DT1JfRzIucDdjMA0GCSqGSIb3DQEBBQUAA4IBAQBicB6L99+IOPbvrUnoSS4RauuQsToIl9p6PF4rcE809ts7wpSgE8egn+rH6Q77y70RS1alEt37yYddQvbUAACb3NbIWBfJmG6N0BRDxENU+V/j9wtMhPHR7YSgU37NODPtBJEITxfsCq4z3g8ogd32xeto+UGA0Po2USV7pBZ7bu3y1sq3ILmZabhT63U0ZFygQr6Wbc1BP3UBuswZDEIbkmQECrpCP9PSknWGvwrLRNjF/6lEv4mjLz9zS8LkIFHGQrmUoeIqTslUi+cE6O+NptrrW8ITptb0sYg3aSYVGCoGZOiozbiNDc2HlF2beXR1OS1uSKAhIUWNIsTogUPl</X509Certificate></X509Data></KeyInfo></Signature></NFe><protNFe versao=[Ô]1.10[Ô]><infProt xmlns=[Ô]http://www.portalfiscal.inf.br/nfe[Ô]><tpAmb>1</tpAmb><verAplic>SP_NFE_PL_005e</verAplic><chNFe>35100508311856000190550010000000529135391864</chNFe><dhRecbto>2010-05-07T16:38:28</dhRecbto><nProt>135100333799512</nProt><digVal>UqstltpqVaStB5guWXKA58/uvy4=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso da NF-e</xMotivo></infProt></protNFe></nfeProc>
OTAVIOFAVERO 26/05/2010 12:53:24
#342838
aki vai o botão de teste

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim valor As String = [Ô][Ô]
Dim doc As New Xml.XmlDocument()
Dim versao As String = [Ô]1.10[Ô]

valor = [Ô]<?xml version=[Ô][Ô]1.0[Ô][Ô] encoding=[Ô][Ô]UTF-8[Ô][Ô]?><nfeProc versao=[Ô][Ô][Ô] & versao & [Ô][Ô][Ô] xmlns=[Ô][Ô]http://www.portalfiscal.inf.br/nfe[Ô][Ô]>[Ô]
valor = valor & dll_rocket_nfe.rocket_Funcao.LerXMLTAG([Ô]D:\35100508311856000190550010000001199719756685-nfe.xml[Ô], [Ô]NFe[Ô], [Ô][Ô])
valor = valor & dll_rocket_nfe.rocket_Funcao.LerXMLTAG([Ô]D:    este.xml[Ô], [Ô]protNFe[Ô], versao)
valor = valor & [Ô]</nfeProc>[Ô]


Dim Grava As StreamWriter = File.CreateText([Ô]d:    este3.xml[Ô])
Grava.Write(valor)
Grava.Close()
[ô]doc.Save()

End Sub

e aki a funcao




Public Shared Function LerXMLTAG(ByVal cArquivoXML As String, ByVal tag As String, ByVal versao As String)

Try
Dim doc As New XmlDocument()
Dim resposta As String = [Ô][Ô]
doc.Load(cArquivoXML)

Dim productNodes As XmlNodeList
Dim productNode As XmlNode


productNodes = doc.GetElementsByTagName(tag)

For Each productNode In productNodes

[ô]baseDataNodes = productNode.ChildNodes
If Len(versao) > 0 Then
versao = [Ô] versao=[Ô][Ô][Ô] & versao & [Ô][Ô][Ô][Ô]
End If


resposta = [Ô]<[Ô] & tag & [Ô][Ô] & versao & [Ô]>[Ô] & productNode.InnerXml & [Ô]</[Ô] & tag & [Ô]>[Ô]


Next

Return resposta
Catch ex As Exception
MsgBox(ex.Message)
End Try

End Function
Página 10 de 228 [2276 registro(s)]
Faça seu login para responder