FONTE NFE VB.NET

FBGSYSTEMS 01/04/2016 12:47:17
#460274
MFLAVIO, nao me lembro exatamente, mas acho que eu mando sem a tag IE
JOHNSTEVE 02/04/2016 16:32:15
#460326
Tabela CEST

Boa tarde a todos,estou iniciando minha tabela com o novo código CEST.
alguem tem essa tabela pronta ? em execel. preciso implantar essa tabela CEST vinculado ao NCM.

agradeço a todos.
MFLAVIO 05/04/2016 15:01:40
#460476
Pessoal a partilha de ICMS foi prorrogado também?

eu sei que o CEST foi Prorrogado para o mês 8
FUTURA 05/04/2016 15:49:55
#460480
MFlavio, o CEST foi prorrogado para 01/10 e a partilha do icms, não foi prorrogada, mas as empresas do simples estão desobrigadas de pagar mais este imposto, por decisão do STF, porém alguns contadores pedem para que a instrução saia nas notas..
GEORGENES 10/04/2016 23:43:15
#460841
Citação:

:
Tabela CEST

Boa tarde a todos,estou iniciando minha tabela com o novo código CEST.
alguem tem essa tabela pronta ? em execel. preciso implantar essa tabela CEST vinculado ao NCM.

agradeço a todos.



olhe este link, esta em html facilmente pode ser convertido em execel, bastando copiar e colar

https://www.confaz.fazenda.gov.br/legislacao/convenios/2015/convenio-icms-146-15
ARSOFTINFORMATI 22/04/2016 20:58:27
#461273
Alguem pode me enviar como faço para cancelar uma NFe? estou tentando usar o exemplo mais da erro HTTP
exemplo que estou utilizando

Dim StrRetorno As RetEnvio
Dim CancelarDocumento As New NFe
CancelarDocumento.Id = Replace(CAMINHONFEGERADA.Text, [Ô].Xml[Ô], [Ô][Ô])
CancelarDocumento.versao = [Ô]2.00[Ô]
CancelarDocumento.nProt = PROTOCOLO.Text
CancelarDocumento.xJust = [Ô]Erro na impressao da nota[Ô]
Dim WebCanc As New C_WebService(UrlAcesso)
Dim certificado As X509Certificate2 = CertificadoDigital.SelecionarCertificado([Ô][Ô])
[ô]assina o xml
Dim xmlAssinado As XmlDocument = CertificadoDigital.Assinar(CancelarDocumento.GerarXMLCancelamento, [Ô]infCanc[Ô], certificado)
xmlAssinado.Save(My.Application.Info.DirectoryPath & [Ô]\NFE\CANC.XML[Ô])
Dim DocXml As New XmlDocument
DocXml.Load(My.Application.Info.DirectoryPath & [Ô]\NFE\CANC.XML[Ô])

Dim resultado As String = ValidaXML.ValidarXML(DocXml, [Ô]cancNFe_v2.00.xsd[Ô])
If resultado.Trim().Length = 0 Then
resultado = [Ô]Validação Concluida com sucesso[Ô]
Else
Exit Sub
End If

StrRetorno = WebCanc.CancelaNFe(xmlAssinado.OuterXml)
If StrRetorno.xMotivo = [Ô]Cancelamento de NF-e homologado[Ô] Then
MsgBox([Ô]Cancelamento Homologado[Ô])
End If
AUTEMP 25/04/2016 08:40:55
#461348
Alguém sabe me dizer como Gravar o resultado QRCode,

Resultado: <![CDATA[https://www.sefaz.rs.gov.br/NFCE/NFCE-COM.aspx?chNFe=43160405705411000104650010000051081274748158&nVersao=100&tpAmb=1&dhEmi=323031362d30342d30325431313a32323a31382d30333a3030&vNF=62.00&vICMS=0.00&digVal=2B535A4E5234347979574F4F73436C427056782B774232537238773D&cIdToken=000001&cHashQRCode=02b36535671959d22457847714e2f0a12e68e0f1]]>

no Arquivo XML já assinado, pois eu tenho que grava-lo depois de assinar o arquivo XML de NFCe, então eu teria que gerar o arquivo XML com os dois elementos
<infNFeSupl><qrCode> por aqui o resultado no formato CDATA </qrCode></infNFeSupl> mas isto depois que o arquivo for gerado e assinado, estou há dois dias tentando modificar o valor destes elementos com [Ô]ReplaceChild[Ô] com [Ô]m_node.ChildNodes.Item(0).InnerText = UrlQRCode[Ô] e nada, alguém poderia ajudar este cidadão ?
MFLAVIO 26/04/2016 11:50:43
#461412
Citação:

:
Alguem pode me enviar como faço para cancelar uma NFe? estou tentando usar o exemplo mais da erro HTTP
exemplo que estou utilizando

Dim StrRetorno As RetEnvio
Dim CancelarDocumento As New NFe
CancelarDocumento.Id = Replace(CAMINHONFEGERADA.Text, [Ô].Xml[Ô], [Ô][Ô])
CancelarDocumento.versao = [Ô]2.00[Ô]
CancelarDocumento.nProt = PROTOCOLO.Text
CancelarDocumento.xJust = [Ô]Erro na impressao da nota[Ô]
Dim WebCanc As New C_WebService(UrlAcesso)
Dim certificado As X509Certificate2 = CertificadoDigital.SelecionarCertificado([Ô][Ô])
[ô]assina o xml
Dim xmlAssinado As XmlDocument = CertificadoDigital.Assinar(CancelarDocumento.GerarXMLCancelamento, [Ô]infCanc[Ô], certificado)
xmlAssinado.Save(My.Application.Info.DirectoryPath & [Ô]NFECANC.XML[Ô])
Dim DocXml As New XmlDocument
DocXml.Load(My.Application.Info.DirectoryPath & [Ô]NFECANC.XML[Ô])

Dim resultado As String = ValidaXML.ValidarXML(DocXml, [Ô]cancNFe_v2.00.xsd[Ô])
If resultado.Trim().Length = 0 Then
resultado = [Ô]Validação Concluida com sucesso[Ô]
Else
Exit Sub
End If

StrRetorno = WebCanc.CancelaNFe(xmlAssinado.OuterXml)
If StrRetorno.xMotivo = [Ô]Cancelamento de NF-e homologado[Ô] Then
MsgBox([Ô]Cancelamento Homologado[Ô])
End If



Amigo esse Exemplo que você posto esta em versão 2.0
baixe o aplicativo exemplo deste tópico na primeira pagina tem o Link, lá você vai ter o cancelamento por evento
S4NGU3 04/05/2016 08:35:53
#461816
sefaz sp fora do ar , alguem com o mesmo problema ?
GLEDSON26 04/05/2016 19:52:55
#461832
Preciso do Projeto Atualizado da NF-e com a rotina da NFC-e .

Alguem poderia me ajudar ?
Página 203 de 228 [2276 registro(s)]
Faça seu login para responder
Voltar