CODIGO FONTE NF ELETRONICA ATUALIZADA 22-02-10

FOXMAN 19/08/2009 11:39:35
#320238
Citação:

FGSANTOS escreveu:
Tenho umas rotinas dentro de um sistema meu que gera todas as TAGs do xml, mas como é muito específica para meu sistema, vou fazer adaptaçoes e disponibilizar aqui para que todos possam utilizar. Já comentei num outro post sobre isto e me pediram o código por mensagem interna. Sinceramente nao será útil para ninguem, pois utiliza recordsets específicos de tabelas de meu sistema. Por isto vou arrumar um tenho no fim de semana para poder fazer bem genérico para poder disponibilizar a todos.

Mas tem uma coisa que me deixa louco: alguem consegue via VB6 comunicar com o Certificado Digital modelo A1 para assinar o documento?

Tenho o código da unimake, já postado link por outro aqui, e estou fazendo adaptaçoes para assinar, transmitir, etc, etc via um projeto em VB.NET. Mas minha vontade mesmo era de fazer algo em VB6 para poder fazer este processo. Alguem tem ideia de como fazer isto? Ou realmente é verdade que via VB6 nao conseguiremos assinar e consumir os webservices?

Atualmente minha aplicação gera o xml, importa no emissor da receita para finalizar o processo (validacao, assinatura, transmissao, resposta de liberacao ou nao, emissao de danfe). Mas é muito ruim isto, os clientes que utilizam assim estao reclamando de nao ter um processo automático, pois fica dependendo de gerar em meu sistema e fazer o processo por outro.



Com relação a isso eu até acho que é inviável , mas tem alguma vantagem nisso, o PREÇO.

RFERREIRA 19/08/2009 13:33:56
#320266
Pessoal to com um problema que não sei dirito o que é...
eu abro o validador da NFE seleciono e empresa e coloco a pasta que está o arquivo mas o validador não carrega o arquivo...
Alguem já passou por isso??
FOXMAN 19/08/2009 15:00:59
#320285
Que tipo de arquivo é ? XML ou TXT ?

Posta parte dele ae
RFERREIRA 19/08/2009 15:49:16
#320289
Ele é TXT
Citação:

A|1.00|
B|SP||VENDA|1|55|0|002399|2009-08-07|2009-08-07|1|||||1|0|TESTE 1.4.0
C|FAMA MOLAS E ARRUELAS LTDA||149441614117|||
C02|08323525000170
C05|AV. VINTE E QUATRO DE FEVEREIRO|173||PENHA|3550308|SAO PAULO|SP|03734090|1058|BRASIL|1126850112
E|SIDER COMERCIAL INDUSTRIAL LTDA.|110651079116
E02|49050164000112
E05|AV.SAPOPEMBA|1671||AGUA RASA|3550308SAO PAULO|SP|03345001|1058|BRASIL
H|1|
I|APMM 6|ARR. PRES DIN 127 M-6||||5101|MIL|150,0000|7,1000|1065,00||MIL|150,0000|7,1000|0,00|0,00|0,00
M
N
N02|0|00|3|1065,00|18,00|191,70
O|||||999
O7|50|106,50
010|1065,00
011|0,00|0,00
W
W02|1065,00|191,70|1065,00|0,00|1065,00|0,00|0,00|0,00|0,00|106,50|0,00|0,00|0,00|1171,50
X|0


Eu estava vendo que ele tem que estar na codificação UTF-8 e não sei se tem que mudar alguma coisa na rotina para ele gravar nesse codificação...
LROSSI 19/08/2009 15:54:03
#320290
galera, eu desenvolvi a dll em .net aqui pra empresa que gera o xml, valida o schema, assina o xml com A1ou A3, gera o danfe e envia para a SEFAZ... não posso postar tudo por ser proprietário, mas se vcs quiserem, posso analisar como ajudar o pessoal por aqui, pq como vcs, tbm passei maior sufoco ano passado pra criar a dll...

mas já adiantando, não vale a pena desenvover nada para nfe em vb6... é perder tempo no desenvolvimento, pois no .net é muito mais facil trabalhar com xml, web services e certificados digitais.
FOXMAN 19/08/2009 15:55:04
#320292
Faltou o identificador NOTAFISCAL|QTDE DE NF no começo do arquivo.

Citação:

NOTAFISCAL|2



ONDE 2 no meu caso é a quantidade de nfs que serão exportada.

Ve se vai agora

FOXMAN 19/08/2009 16:14:23
#320296
Citação:

RFERREIRA escreveu:
Ele é TXT
A|1.00|
B|SP||VENDA|1|55|0|002399|2009-08-07|2009-08-07|1|||||1|0|TESTE 1.4.0
C|FAMA MOLAS E ARRUELAS LTDA||149441614117|||
C02|08323525000170
C05|AV. VINTE E QUATRO DE FEVEREIRO|173||PENHA|3550308|SAO PAULO|SP|03734090|1058|BRASIL|1126850112
E|SIDER COMERCIAL INDUSTRIAL LTDA.|110651079116
E02|49050164000112
E05|AV.SAPOPEMBA|1671||AGUA RASA|3550308SAO PAULO|SP|03345001|1058|BRASIL
H|1|
I|APMM 6|ARR. PRES DIN 127 M-6||||5101|MIL|150,0000|7,1000|1065,00||MIL|150,0000|7,1000|0,00|0,00|0,00
M
N
N02|0|00|3|1065,00|18,00|191,70
O|||||999
O7|50|106,50
010|1065,00
011|0,00|0,00
W
W02|1065,00|191,70|1065,00|0,00|1065,00|0,00|0,00|0,00|0,00|106,50|0,00|0,00|0,00|1171,50
X|0

Eu estava vendo que ele tem que estar na codificação UTF-8 e não sei se tem que mudar alguma coisa na rotina para ele gravar nesse codificação...



Observei que o seu txt está gerando valores com [Ô],[Ô] ao inves de [Ô].[Ô]

W02|1065,00|191,70|1065,00|0,00|1065,00|0,00|0,00|0,00|0,00|106,50|0,00|0,00|0,00|1171,50

qdo deveria ser assim

W02|1065.00|191.70|1065.00|0.00|1065.00|0.00|0.00|0.00|0.00|106.50|0.00|0.00|0.00|1171.50
EJKOHL 19/08/2009 17:13:43
#320315
[txt-size=2] Boa Tarde Senhore!!!
Sou Iniciante em NFe... e programo em VB6... gostaria muito de porder ajudar... e sei que desta forma também serei ajudado!!! se alguem tiver alguns códigos para que eu posso dar uma analizada, por favor me envie!!![/txt-size]
LOOZE 19/08/2009 17:17:47
#320316
[txt-size=2] Boa tarde a todos.. Gente o intuito e GERAR O XML pelo proprio VB, ja existe na primeira parte o forum uma parte do codigo fonte, eu estou trabalhando na parte de seleção de certificado.. assintura.. ja até postei uma tela de qual será o projeto. SE quiserem ajudar, basta pegar o manual.. não precisa fazer tudo, somente monte a estrutura de uma TAG, se cada um fizer isso ja estaremos meio caminho andando. [/txt-size]
EJKOHL 19/08/2009 17:32:22
#320320
Amigo Looze.... Desculpa Sou novo aqui... por onde posso começar?? vc[ô]s estão querendo montar uma dll ou apenas modulos?
Página 4 de 30 [292 registro(s)]
Tópico encerrado , respostas não são mais permitidas