FONTE NFE VB.NET

 Tópico anterior Próximo tópico Novo tópico

FONTE NFE VB.NET

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#495054 - 21/09/2020 14:49:08

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Pessoal Alguem tem algum documento de NFe Rural?
um dos meus clientes esta precisando Dessa Bendita NFe


Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


#495295 - 05/10/2020 17:59:24

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Pessoal alguem sabe me dar uma dica de como resolvar o erro
Algoritmo inválido especificado.
quando vai assimar o XML?

Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


#495629 - 11/11/2020 10:50:22

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Pessoal alguém tem o exemplo de nfe aqui do forum?
não estou conseguindo Initilizar NFE queria ver o projeto Exemplo para ver onde estou errando

Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


#495630 - 11/11/2020 11:42:52

NILSONTRES
SAO PAULO
Cadast. em:Março/2012


MFLAVIO,
Estou vendo um exemplo pra você, mas o que você esta recebendo de retorno(erro). ?



#495631 - 11/11/2020 18:59:22

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Citação:
:
MFLAVIO,
Estou vendo um exemplo pra você, mas o que você esta recebendo de retorno(erro). ?

225 falha de shema de lote

Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


#495639 - 12/11/2020 19:54:11

FUTURA
.
Cadast. em:Maio/2004


tentou validar o xml do lote na sefaz RS ?



#495824 - 10/12/2020 12:45:27

WPIMENTEL
BARUERI
Cadast. em:Janeiro/2013


Bom dia pessoal.
Vários clientes estão me informando que não estão conseguindo baixar o XML da nota, consegue efetuar a manifestação mas não consegue baixar o XML.
Efetuei vários testes, e parece ser um problema no sefaz.
Alguém mais esta tendo este problema?



#495843 - 12/12/2020 11:41:59

CASTROBASS
GOIANIRA
Cadast. em:Dezembro/2020


estou com erro no schema xml.. to tentando baixar o xml


olha o retorno do sefaz :

<retDistDFeInt xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' versao='1.01' xmlns='http://www.portalfiscal.inf.br/nfe'>
  <tpAmb>1</tpAmb>
  <verAplic>1.2.1</verAplic>
  <cStat>215</cStat>
  <xMotivo>Rejeicao: Falha no esquema xml</xMotivo>
  <dhResp>2020-12-12T10:35:24-03:00</dhResp>
  <ultNSU>000000000000000</ultNSU>
  <maxNSU>000000000000000</maxNSU>
</retDistDFeInt>

segue o codigo da funcao:

  private void BaixarXml(XmlDocument xml)
        {
            var NFe_Sc = new NFeDistribuicaoDFe.NFeDistribuicaoDFeSoapClient();
          
            // X509Certificate2 vRetorna;
            X509Certificate2 certificado = new X509Certificate2();
            X509Store store = new X509Store('MY', StoreLocation.CurrentUser);
            store.Open(OpenFlags.ReadOnly | OpenFlags.OpenExistingOnly);
            X509Certificate2Collection collection = (X509Certificate2Collection)store.Certificates;
            X509Certificate2Collection collection1 = (X509Certificate2Collection)collection.Find(X509FindType.FindByTimeValid, DateTime.Now, false);
            X509Certificate2Collection collection2 = (X509Certificate2Collection)collection.Find(X509FindType.FindByKeyUsage, X509KeyUsageFlags.DigitalSignature, false);
            X509Certificate2Collection scollection = X509Certificate2UI.SelectFromCollection(collection2, 'Certificado(s) Digital(is) disponível(is)', 'Selecione o certificado digital para uso no aplicativo', X509SelectionFlag.SingleSelection);
            if (scollection.Count == 0)
            {
                string msgResultado = 'Nenhum certificado digital foi selecionado ou o certificado selecionado está com problemas.';
                MessageBox.Show(msgResultado, 'Advertência', MessageBoxButtons.OK, MessageBoxIcon.Warning);
                // vRetorna = false;      
                // vRetorna = null;      
            }
            else
            {
                certificado = scollection[0];
            }

            NFe_Sc.ClientCredentials.ClientCertificate.Certificate=certificado;

           XElement x = XElement.Parse(xml.InnerXml);

            var arquivo = NFe_Sc.nfeDistDFeInteresse(x).ToString();

            var xmlNota = ConverterStringToXml(arquivo);
            var conteuZip = xmlNota.GetElementsByTagName('docZip')[0].InnerText;

            byte[] dados = Convert.FromBase64String(conteuZip);
            //TODO: fazer uso dos dados da variável retorno
            var xmlRetorno = descompactar(dados);

           // MessageBox.Show(xmlRetorno);

            var BaixarArquivXml = 'D:\\'+ txtChave.Text +'.xml';
            File.WriteAllText(BaixarArquivXml, xmlRetorno);

            //var fileResp = 'c:\\' + DateTime.Now.ToString('yyyy-MM-dd HH-mm-ss') + '-tempResp.xml';
            //var fileReq = 'c:\\' + DateTime.Now.ToString('yyyy-MM-dd HH-mm-ss') + '-tempRequ.xml';

            //File.WriteAllText(fileReq, xml.OuterXml);
           // File.WriteAllText(fileResp, resp.OuterXml);
            System.Diagnostics.Process.Start(BaixarArquivXml);
            //System.Diagnostics.Process.Start(fileResp);


        }

        private XmlDocument ConverterStringToXml(string texto)
        {
            var xml = new XmlDocument();
            xml.LoadXml(texto);
            return xml;
        }

        public string descompactar(byte[] conteudo)
        {
            using (var memory = new MemoryStream(conteudo))
            using (var compression = new GZipStream(memory, CompressionMode.Decompress))
            using (var reader = new StreamReader(compression))
            {
                return reader.ReadToEnd();
            }
        }


        private void button4_Click(object sender, EventArgs e)
        {
            //Download da NFe, Para Download da xml por chave é necessario que a versão seja 1.01
            var texto = @'<distDFeInt xmlns=''http://www.portalfiscal.inf.br/nfe'' versao = ''1.01''>
                <tpAmb>1</tpAmb>
                <cUFAutor>91</cUFAutor>
                <CNPJ>meucnpj</CNPJ>
                <consChNFe>
                <chNFe>chavenota</chNFe>
                </consChNFe>
                </distDFeInt>';
            
            var xml = ConverterStringToXml(texto);
            BaixarXml(xml);

        }





#496102 - 19/01/2021 19:16:39

ANDERATL
VENANCIO AIRES
Cadast. em:Junho/2009


Boa tarde pessoal, estou precisando implementar no meu projeto, o módulo de NFe, hj em dia eu gero um txt pelo módulo fiscal e importo no  emissor gratuito do Sebrae, e pelo emissor do Sebrae Gero a NFE.
Gostaria de melhorar este processo com a geração direto no sistema. A ultima atualização aqui do fórum e de 2018 e parece que o danfe não esta funcionando. Teria como colocarem a versão atual para baixar.
Dei uma olhada no projeto em C#, ele tá mais atualizado, mas não me achei bem no c#, esse projeto em vb.net tá bem show, só tá desatualizado.
Conseguem o fonte mais atual?
Obrigado!



#496115 - 20/01/2021 16:46:20

LCSMACEDO
SUMARÉ
Cadast. em:Janeiro/2021


Recomendo contratar algum emissor como a tecnospeed ou vinco.

Pq NFe atualiza sempre, fazer na unha não é recomendado.

---
Lucas Macedo

 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário