NFE PARA LEIGOS
Ele revende material de construção para clientes comuns e para a prefeitura tambem
Gostaria que vocês me auxiliasse, pois sou leigo nesse assunto.
Bom, hoje eu dei uma googada e encontrei o seguinte link:
http://www.nfe.fazenda.gov.br/portal/emissor.aspx
Alguem já usou esse emissor?
Com ele eu consigo fazer tudo (criar, enviar, cancelar e talz) ?
Tem como meu sistema gerar um txt no meu sistema e eu usar o emissor só para enviar a NFe?
Como seria esse txt?
Acho que hoje varios programadores em vb6 devem está com a mesma duvida!
Grato a todos que puderem contribuir!
Sugiro que poste lá, já que temos inúmeros colegas que compartilham deste assunto.
Citação::
Pessoal, tenho um cliente que quer uma solução para NFe.
Ele revende material de construção para clientes comuns e para a prefeitura tambem
Gostaria que vocês me auxiliasse, pois sou leigo nesse assunto.
Bom, hoje eu dei uma googada e encontrei o seguinte link:
http://www.nfe.fazenda.gov.br/portal/emissor.aspx
Alguem já usou esse emissor?
Com ele eu consigo fazer tudo (criar, enviar, cancelar e talz) ?
Tem como meu sistema gerar um txt no meu sistema e eu usar o emissor só para enviar a NFe?
Como seria esse txt?
Acho que hoje varios programadores em vb6 devem está com a mesma duvida!
Grato a todos que puderem contribuir!
O Emissor GratuÃto da Nfe, funciona tanto para preencher ou importar dados, eu utilizo ele para transmitir NFE de várias empresas, da para criar um sistema que exporte arquivos .txt, ou xml,
Ele foi feito para utilização por pequenas empresas.
Ele importa em .TXT cadastro de clientes, fornecedores, produtos, e também a nfe, depois é só validar, assinar e transmitir a NFE.
Citação::
No site tem um tópico ativo e que é utilizado para discutir o assunto NFe.
Sugiro que poste lá, já que temos inúmeros colegas que compartilham deste assunto.
amigo, o topico que vc disse que é fixo é esse ai:
FONTE NFE VB.NET
Acho que ele não atende a minhas duvidas nao!
Pois o que quero é criar o .txt no meu vb6 e importar, assinar, validadar com o emisso gratuito da Sec. Fazenda
Citação::
:
Pessoal, tenho um cliente que quer uma solução para NFe.
Ele revende material de construção para clientes comuns e para a prefeitura tambem
Gostaria que vocês me auxiliasse, pois sou leigo nesse assunto.
Bom, hoje eu dei uma googada e encontrei o seguinte link:
http://www.nfe.fazenda.gov.br/portal/emissor.aspx
Alguem já usou esse emissor?
Com ele eu consigo fazer tudo (criar, enviar, cancelar e talz) ?
Tem como meu sistema gerar um txt no meu sistema e eu usar o emissor só para enviar a NFe?
Como seria esse txt?
Acho que hoje varios programadores em vb6 devem está com a mesma duvida!
Grato a todos que puderem contribuir!
O Emissor GratuÃto da Nfe, funciona tanto para preencher ou importar dados, eu utilizo ele para transmitir NFE de várias empresas, da para criar um sistema que exporte arquivos .txt, ou xml,
Ele foi feito para utilização por pequenas empresas.
Ele importa em .TXT cadastro de clientes, fornecedores, produtos, e também a nfe, depois é só validar, assinar e transmitir a NFE.
Como seria a criação desse TXT ?
Onde encontro esse emissor gratuito?
Pois eu pesquisei no site da sec. fazenda e encontrei os seguintes emissores:
http://www.nfe.fazenda.gov.br/portal/emissor.aspx
ai eles me direciona para o emissor de SP... só que estou no Piaui
Como eu faço?
Procure aqui no fórum sobre criação de manipulação de XML, deve ter muitos exemplos.
E tbm não se esqueça de baixar o manual da NFe no site da Sec. da Fazenda, para seguir as instruções de onde cada informação deve ser colocada.
Mas olha só a função que passei praticamente o dia inteiro garimpando para encontrar.
FUNÇÃO QUE GERA DÃGITO VERIFICADOR PARA O CÓDIGO DE ACESSO DA NF-e
Function Calculo_DV11(strNumero As String) As String
[ô]declara as variáveis
Dim intContador As Integer
Dim intNumero As Integer
Dim intTotalNumero As Integer
Dim intMultiplicador As Integer
Dim intResto As Integer
[ô] se nao for um valor numerico sai da função
If Not IsNumeric(strNumero) Then
Calculo_DV11 = [Ô][Ô]
Exit Function
End If
[ô]inicia o multiplicador
intMultiplicador = 9
[ô]pega cada caracter do numero a partir da direita
For intContador = Len(strNumero) To 1 Step -1
[ô]extrai o caracter e multiplica pelo multiplicador
intNumero = Val(Mid(strNumero, intContador, 1)) * intMultiplicador
[ô]soma o resultado para totalização
intTotalNumero = intTotalNumero + intNumero
[ô]se o multiplicador for maior que 2 decrementa-o caso contrario atribuir valor padrao original
intMultiplicador = IIf(intMultiplicador > 2, intMultiplicador - 1, 9)
Next
[ô]calcula o resto da divisao do total por 11
intResto = intTotalNumero Mod 11
[ô]verifica as exceções ( 0 -> DV=0 1 -> DV=0 e retorna o DV
Select Case intResto
Case 0
Calculo_DV11 = [Ô]0[Ô]
Case 1
Calculo_DV11 = [Ô]0[Ô]
Case Else
Calculo_DV11 = Str(intResto)
End Select
End Function
Eu encontrei esta função no site http://www.macoratti.net e fiz algumas alterações, testei no Access e funcionou, agora vou implementar a geração do arquivo txt para importação pelo programa da sefaz SP.
tenho uma dll que faz tudo processo da NFe e sistema tambem , ame add no msn pcesardi@hotmail.com