pauloaraujo

citação:Posso estar errado mas acho que não tem nada a ver. acho que o DBF do Dbase, Fox Clipper e xHarbour tem o mesmo padrão. Luiz Arruda-Corumba(MS) ico.corumba@gmail.com FiveWin Desde 2004id=blue> [x]Harbour xDev WS Não Abandone seu tópico Retorne avisando se a dica funcionou id=red> id=quote>id=quote>Luiz, tudo bem??? Faça um teste. - criar um BD usando o Dbase III - criar um prg usando o xHarbour e no início colocar: REQUEST DBFCDX RDDSETDEFAULT("DBFCDX") Nesse prg, dê um APPEND BLANK e também algum REPLACE Depois disso tente abrir novamente o mesmo DBF pelo Dbase III. Nem a pau, Juvenal. O RDD DBFCDX é do Fox e com ele você abre o DBF. Um abraço

citação:Olá Pessoal. Estou tentando imprimir nfe no I.explorer 7.0 e não estou conseguindo. Será que é por causa da versão? Sei que tem um forma de configurar o IE como um versão anterior, mas não lembro como faz. Alguém dá uma luz? Grato João id=quote>id=quote>João, tudo bem?? É o Danfe que você está tentando imprimir??

E ainda assim fazem um monte de m....

citação:Valeu Paulo. Funcionou direitinho. Gilmer isso já não deveria constar na classe para que inclusive outros amigos que a estão usando não tivessem essa alteração incorporada ? id=quote>id=quote>Sei lá, mas acho que não tem mais volta com relação à NFe. Acharia justissimo o Gilmer cobrar uma manutenção mensal para quem adquiriu a classe dele, comprometendo-se a atualizá-la de acordo com a legislação. Eu me sentiria muito mais seguro e seria o 1º a aderir. A versão 4.0 está aí ..... Abraços

citação:Opa Paulo Legal Preciso ver como criar isso na classe do gilmer pois olhei a classe e ela não cria essas chaves. Acredito que é exatamente isso que o contador quer. Editado por - jcleoner on 26/03/2010 12:11:38 Editado por - jcleoner on 26/03/2010 12:14:58 id=quote>id=quote>Bom, o Gilmer vai pegar no meu pé, mas não resisto de dar um pitaco (hehe) Modificar a classe: METHOD StruIPI() METHOD StruIPITrib() METHOD StruIPINT() // criar aqui // ------------ METHOD StruIPI() CLASS TVoNFe local axArray axArray := {} aadd(axArray, {"cIEnq" , TVoNFeItem():New("C", 0, 05,,,,oItem:cIEnq) } ) aadd(axArray, {"CNPJProd", TVoNFeItem():New("N", 0, 14,,,,oItem:CNPJProd) } ) aadd(axArray, {"cSelo" , TVoNFeItem():New("C", 0, 1,,60,,oItem:cSelo) } ) aadd(axArray, {"qSelo" , TVoNFeItem():New("N", 0, 1,12,,oItem:qSelo) } ) aadd(axArray, {"cEnq" , TVoNFeItem():New("N", 1, 3,,,,oItem:cEnq) } ) if AT(oItem:cST_IPI,"00;49;50;99;")>0 aadd(axArray, {"IPITrib" , ::StruIpiTrib(oItem) } ) else aadd(axArray, {"IPINT" , ::StruIpiNT(oItem) } ) endif return( axArray ) METHOD StruIPINT() CLASS TVoNfe Local axArray axArray := {} aadd(axArray, {"CST" , TVoNFeItem():New("C", 0, 02,,,, oItem:cST_IPI) } ) Return( axArray ) id=code>id=code> Editado por - pauloaraujo on 26/03/2010 13:37:00

citação:Pessoal Quando um item da NFe tem IPI, informo CST_IPI = 50, base, aliquota, valor e enquadramento. Quando não tem, não informo nada, nenhuma chave referente ao IPI. Ocorre que um contador afirma que precisa constar ( para um cliente ) no CST_IPI o código 55 ( Saída com suspensão ). O problema está aí, se informar o código 55, a nfe não vai nem a pau, já tentei preencher outros campos colocando 0 na base, aliquota e valor, mas não adianta, ela é recusada. Alguem sabe algo a respeito, ou o contador está enganado e não tem que por nada mesmo ? id=quote>id=quote>Zé, beleza, Como tenho uma câmera escondida aí, ví que você está tentando passar esses dados através do IPITrib, quando deveria ser pelo IPINT 999 55 id=code>id=code>Fui

citação:Olá Paulo Obrigado pela resposta. Mais algumas questões: Meus clientes são incapazes de abrir um arquivo zip, então instalar certificados vai ser algo penoso. Vc disse: "Frame Work" (2.0 ou superior). Esse frame work é fornecido pela Receita ? " programa da NFe deve ser instalado no drive "C" da máquina do faturamento. Ou seja, se o executável do teu sistema estiver no servidor, você terá que ter programas separados." Quer dizer, se o faturamento usar mais de uma maquina tem que ter o exec da nfe em cada máquina? []´s Rogerio id=quote>id=quote>Rogério, Só complementando o João, o Frame Work é da Microsoft. Te aconselho não se meter na instalação do Certificado Digital. Isso cabe ao Contador de cada empresa. Tenha em mente que o Certificado é quase como se fosse um Cartão de Banco. Nós não temos nada a ver com isso. Se houver mais de uma máquina de faturamento, tem que instalar em TODAS. Outros procedimentos, como registro da DLL e instalação das fontes, o Gilmer vai te orientar. É muito fácil de se fazer por telefone com o cliente. Um abraço Editado por - pauloaraujo on 25/02/2010 16:39:15

Rogério, tudo bem?? 1º) "A primeira questão é sobre certificado que o cliente tem que adquirir. Tem o A1 e A3. Qual o mais recomendado, que dá menos problema de implantção?" R: O certificado A3 vai exigir que o usuário digite a senha (PIN) a cada entrada. O custo dele é um pouco maior, mas tem validade por 3 anos, enquanto que a do A1 é de apenas um ano. A escolha por um ou outro vai depender do perfil do teu cliente. Se ele emite muitas notas, é altamente recomendável o A1. Caso contrário, tanto faz. 2º) "Implantação no cliente: vocês conseguiram fazer tudo remotamente ou exigiu visitas no local ?" R: A instalação do Certificado cabe ao teu cliente. Portanto, a instalação do teu programa pode ser feita remotamente. Só implantei pessoalmente o 1º cliente. 3º) "Além do certificado e do nosso aplicativo o cliente tem que providenciar alguma outra burocracia, tipo registro, cadastro em algum serviço da receita? O contador é quem faz isso?" R: Bom, ele tem que instalar o "Frame Work" (2.0 ou superior). O contador dele tem que habilitar o teu cliente na área de teste da Sefaz, ou direto na área de produção. 4º) Existe alguma outra dica que vc acha importante? R: Lembrar que o programa da NFe deve ser instalado no drive "C" da máquina do faturamento. Ou seja, se o executável do teu sistema estiver no servidor, você terá que ter programas separados. Outra coisa, você terá que comprar a licença da FlexDocs para cada cliente que implantar. Um abraço e boa sorte Editado por - pauloaraujo on 25/02/2010 12:54:27

Anderson, tudo bem?? Basicamente, após a geração do XML, a rotina fica assim: oNFEUtil:=tVoNFeUtil():New(CADPARAM->UF,val(cTpAmb),cCertificado,wProxy,wUsuario,wSenha,cLicenca,.t.) //-. Consulta Status do SITE DA SEFAZ NX := oNFEUtil:ConsultaStatus() If NX = 0 //-> nada a fazer ELSE TONE( 900, 2 ) DO CASE CASE NX = 105 cMensa := ( "em processamento na secretaria da fazenda" ) CASE NX = 107 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE NX = 108 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE NX = 109 cMensa := ( "Serviço Paralisado sem Previsão de Retorno " ) CASE NX = 281 cMensa := ( "Rejeição: Certificado Transmissor Data Validade" ) OTHERWISE cMensa := OemToAnsi( "Problemas na TransmissÆo/ConexÆo. " + ; "Internet Pode Estar com Problemas." ) ENDCASE oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() //-> Abre Notas Fiscais SELECT CADNFE XFOCUS( oBmp6 ) //-> permanecer somente transmissao habilitado lGerar := .T. lTransmite := .F. lConsulta := .F. lCancela := .F. lConsStatus := .F. RETURN NIL ENDIF SELECT CADNFE cChaveAcesso:=alltrim(CADNFE->CHAVEACES) cMensa:="";cRetorno:="";xRecibo:="";cDetalhes:="" oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() carq:="REMESSA\nfe"+cChaveAcesso+"-nfe.xml" cXmlAssinado:="" cRecibo:="" IF oNFeUtil:ValidaXml(cArq, 1) != 0 oNfeUtil:End() lProblema_na_transmissao:= .T. SELECT CADNFE RLOCK() REPL STATUS WITH " " // voltar para pendente de geracao - 30/08/2009 COMMIT UNLOCK // habilitar somente gerar // desabilitar botao transmitir / consulta //-> permanecer somente transmissao habilitado lGerar := .F. lTransmite := .T. lConsulta := .F. lCancela := .F. lConsStatus := .F. RETURN( .F. ) ENDIF SELECT CADNFE RLOCK() REPL RETNFE WITH "IT" COMMIT //-> Aqui, o RETORNO tem que ser 103 - LOTE RECEBIDO COM SUCESSO - MANUAL //-> NX ‚ numerico nX:=oNFEUtil:EnviaNFe(cArq,@cxmlassinado,@crecibo) IF oNfeUtil:lAutorizada oNfe := TVoNFe():New() oNfe:PegaChaveAcesso(cXmlAssinado) oNFe:SaveXml(,cXmlAssinado, 2 ) CURSORWAIT() RETURN( .T. ) id=code>id=code>

Maurício, tudo bem?? Cadê o nome do índice ?? INDE ON STR(CODIGO,5) TAG CLICOD TO ??????? id=code>id=code>Um abraço

Narlen, tudo bem?? Você está errando no registro 54 aquí: Base Calculo Sub.Tributária.....: 100,00 Não é a base de substituição tributária que está sendo pedido, e sim a base do ICMS. Ou seja, o valor é 0 (zero), cuja soma tem que bater com o valor da Base de Cálculo do Icms do Registro 50 Um abraço

citação:Bom dia, alguem já desenvolveu NFe com solução do Gilmer? Como desenvolver utilizando TXTs ? Fw 2.6 | Clipper 5.3b | DBFCDX -- FwxH 8.02 | xHb 1.1.0 | DBFCDX -- FwxH 9.06 | xHb 1.2.1 | SqlLib id=brown>O burro nunca aprende, o inteligente aprende com sua própria experiência, o sábio com a experiência dos outros. id=quote>id=quote>Anderson, tudo bem?? O que o Luiz falou é verdade, existe um layout de TXT que pode ser importado pelo programa da Sefaz. Estamos exatamente neste momento criando um módulo utilizando esse TXT, para fazer a mesma coisa que o da Sefaz: - criar o XML - transmitir - consultar o lote - imprimir o Danfe Se for a mesma coisa que você quer, basta obter esse layout no site da Sefaz. Ele vem na mesma ordem do manual de integração e é muito fácil de se utilizar, desde que você domine manipulação de TXT. Na solução Gilmer, basta, em vez de pegar os dados dos bancos de dados, pegar diretamente do TXT. Resolvemos fazer isso, porque fomos consultados por um grupo de 4 empresas que não querem trocar o sistema deles. Porém, o programador não teve capacidade de criar o XML (hehe). Um abraço

Evaldo, tudo bem?? Em xHarbour você não precisa criar índices em ordem crescente ou decrescente. OrdDescend( ,, .T. ) // indice em ordem crescente OrdDescend( ,, .F. ) // indice em ordem decrescente Agora o comando que você quer é DESCENDING Um abraço

citação:Pessoal ve se alguém pode me ajudar, preciso fazer uma nota de entrada o CFOP de entrada é 1.102 , coloco a opcao 0 no tpNF , envio e pego o retorno sem erro, na impressão do DANFE sai certo o CFOP e o 1 de entrada no inicio, mais a descrição da natureza vem "VENDA MERCA ADQ/REC DE TERC EM OPER" o certo seria "COMPRA PARA COMERCIALIZAÇÃO", se alguém tiver alguma diga. Obs: Usando solução Gilmer Obrigado Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR 1.1,PELES,XDEV,VLIB,ADS 8.1 FWH 9.09,XHARHOUR 1.2 id=quote>id=quote>Luiz, tudo bem?? Não usamos a solução Gilmer para geração do XML, mas somente a partir da transmissão. Agora, tenho certeza que isso é um parâmetro a ser passado por você NA HORA DA GERAÇÃO DO XML, pois na classe nao tem a descrição de cada CFOP. Acredito que você tenha um banco de dados contendo todos os códigos fiscais e as respectivas descrições. Ou seja, você precisa dar um SEEK no 1102 e passar a descrição. Um abraço

citação:Boa tarde a todos, o Pacote Fornecido pelo GILMER apresenta o seguinte erro: Erro: XML mal formado - Erro durante a análise de EntityName. Linha 41, posição 16. Em uma empresa que o Certificado foi fornecido por CertiSign não apresenta esse problema, mas com o fornecido pelos Correios / Serpro apresenta. Agradeço a todos por qualquer colaboração. André Meneghetti SP-SP Informax FWH 2.8 + xHarbour 1.20.01 + BCC 5.5 email: andre.informax@terra.com.br id=quote>id=quote>André, Não acho que seja problema de Certificado Abra o arquivo XML com algum editor e retorne o que contém na Linha 41, posição 16. Verifique se você não está ultrapassando o tamanho de algum campo definido no manual de integração. Erros mais comuns: - descrição do produto com mais de 120 caracteres - unidade comercial e tributável com mais de 6 dígitos - ST "00" sem base de cálculo e icms

Amigos, Só para desabafar e deixar a solução do tópico. A maioria dos nossos clientes são empresas de cestas básicas e de natal. Nesta época do ano, cada uma delas chega a emitir cerca de 500 notas POR DIA. Umas mais e outras menos. A chance de dar algum problema é imensa, pois não depende só de nós. Estruturamos o nosso sistema marcando num BD cada fase do processo da NFe. Quando gerado, alteramos o status para "GER" e habilitamos o botão TRANSMITIR. Após transmitido, alteramos o status para "ENV" e habilitamos o botão CONSULTA LOTE. É aí que a coisa pegou. Em 2 clientes nossos a "mardita" da Sefaz retornou o número do RECIBO, com data e hora. Portanto, ela atestou que RECEBEU as Notas. Só que comprovadamente elas SUMIRAM na base de dados deles. Quando se consulta o lote num caso desses, fornecendo o número do recibo, dá o erro apontado pelo João. Só que nós não podemos simplesmente voltar o status para a fase anterior. A solução foi acrescentar a rotina abaixo num botão "Consulta Status". Ela, ANTES de "voltar" para o status inicial, pesquisa se a nota realmente está ou não na base do Sefaz. IF CADNFE->STATUS = "ENV" // nfe já transmitida oNFEUtil:=tVoNFeUtil():New(CADPARAM->UF,val(cTpAmb),cCertificado,wProxy,wUsuario,wSenha,cLicenca,.t.) NX := oNFEUtil:ConsultaStatus() If NX = 0 //-> nada a fazer ELSE TONE( 900, 2 ) DO CASE CASE NX = 105 cMensa := ( "em processamento na secretaria da fazenda" ) CASE NX = 107 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE NX = 108 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE NX = 109 cMensa := ( "Serviço Paralisado sem Previsão de Retorno " ) CASE NX = 281 cMensa := ( "Rejeição: Certificado Transmissor Data Validade" ) OTHERWISE cMensa := OemToAnsi( "Problemas na TransmissÆo/ConexÆo. " + ; "Internet Pode Estar com Problemas." ) ENDCASE oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() //-> Abre Notas Fiscais SELECT CADNFE //-> permanecer somente consulta lote/status habilitado lGerar := .F. lTransmite := .F. lConsulta := .T. lCancela := .F. lConsStatus := .T. RETURN NIL ENDIF SELECT CADNFE cChaveAcesso:=alltrim(CADNFE->CHAVEACES) cMensa:="";cRetorno:="";xRecibo:="";cDetalhes:="" oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() carq:="REMESSA\nfe"+cChaveAcesso+"-nfe.xml" cXmlAssinado:="" cRecibo:="" nRet:=oNfeUtil:ConsultaNf(cChaveAcesso,cXmlAssinado) IF oNfeUtil:lAutorizada // nota está na SEFAZ wtexto:=oNfeUtil:aUltStatus[3] wpos:=AT("",wTexto)+7 nProtocolo := SUBSTR( wTexto, wPos, 15 ) wposData := AT( "", wTexto ) + 10 cDataNfe := SUBSTR( wtexto, wposData, 10 ) wposHora := AT( "", wTexto ) + 21 cHoraNfe := SUBSTR( wtexto, wposHora, 8 ) cXmlRemessaSemestarassinado:=oNfeUtil:ReadXml(cArq) cXmlAssinado:=Space(Len(cXmlRemessaSemestarassinado)) oNfeUtil:Assinar(cXmlRemessaSemestarassinado ,"infNFe", @cXmlAssinado) nRet:=oNfeUtil:ConsultaNf(cChaveAcesso,cXmlAssinado) oNfe := TVoNFe():New() oNfe:PegaChaveAcesso(cXmlAssinado) oNFe:SaveXml(,cXmlAssinado, 2 ) //-> Enviadas - Funcionou OK oNFe:SaveXml(,oNfeUtil:cXmlProtocolo, 3 ) //-> Protocolos SELECT CADNFE RLOCK() REPL PROTOCOLO WITH nProtocolo REPL PROTODATA WITH CTOD(SUBS(cDataNfe,9,2)+"/"+SUBS(cDataNfe,6,2)+"/"+SUBS(cDataNfe,1,4)) REPL PROTOHORA WITH cHoraNfe REPL STATUS WITH "APR" REPL RETNFE WITH "TR" COMMIT UNLOCK TONE( 900, 2 ) cMensa := OemToAnsi( "CLIENTE: " ) + NOME_CLIENTE_VIEW() + " - " + ; + VERIFICA_STATUS_CLIENTE() cRetorno := "PROT: " + ALLTRIM( CADNFE->PROTOCOLO ) xRecibo := "REC.: " + ALLTRIM( CADNFE->RECIBO ) cChave := ALLTRIM(CADNFE->CHAVEACES) cGerado := OemToAnsi( "Arquivo XML da Nota Fiscal Eletr“nica " + ; "Gerada, Est no Diret¢rio: " ) +CRLF+CRLF cBackup := OemToAnsi( "Recomenda‡Æo: " +CRLF+CRLF+ ; "Altamente recomend vel, que se fa‡a, " + ; "C¢pia de Seguran‡a(BACKUP) Di ria, " + ; "em um PENDRIVE. " +CRLF+ ; "Vocˆ pode usar o BRAZIP.EXE ou o " + ; "WINZIP.EXE ou o PKZIP.EXE " + ; "Estes compactadores de Arquivos, sÆo " + ; "gratuitos e podem ser(em) baixados " + ; "em: http://www.baixaki.com.br " +CRLF+CRLF+ ; "Contato Sistemas e Processamentos @" + ; ALLTRIM( STR( D_ANO ) ) + " - " + ; "http://www.pleno.com.br " +CRLF+ ; "Todos os direitos reservados." ) // cXml := cPathNFe := CURDRIVE() + ":\" + GETCURDIR() + ; "\REMESSA\ENVIADAS\" + ; ALLTRIM( cChave ) + ; "nfe.xml" + CRLF + CRLF + ; "DATA: " + ; DTOC(CADNFE->DATA ) + ; + " - " + ; "HORA: " + ; CADNFE->HORA + ; + " - " + ; "PROTOCOLO: " + ; CADNFE->PROTOCOLO + ; + CRLF + ; "DATA PROT: " + ; DTOC( CADNFE->PROTODATA ) + ; + " - " + ; "HORA PROT: " + ; CADNFE->PROTOHORA +CRLF + ; "RECIBO: " + ; CADNFE->RECIBO +CRLF+CRLF cDetalhes := cGerado + cXml + cbackup oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() // desligar: gerar / transmitir / consulta lote // habilitar imprimir danfe lDanfe := .T. lGerar := .F. lTransmite := .F. lConsulta := .F. lCancela := .F. lConsStatus := .F. oBmp4:Disable() oBmp4:Refresh() ELSE IF nRet = 105 .OR. nRet = 108 .OR. nRet = 109 DO CASE CASE nRet = 105 cMensa := ( "Em Processamento na Sefaz. Tente Novamente " ) CASE nRet = 108 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE nRet = 109 cMensa := ( "Serviço Paralisado sem Previsão de Retorno " ) ENDCASE // nada a fazer, permanecer na consulta de lote lGerar := .F. lTransmite := .F. lConsulta := .T. lCancela := .F. lConsStatus := .F. oBmp4:Enable() oBmp4:Refresh() oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() //-> Abre Notas Fiscais SELECT CADNFE RETURN ( .F. ) ELSE // retornar SELECT CADNFE RLOCK() REPL STATUS WITH " " REPL RETNFE WITH "NT" COMMIT UNLOCK // desligar: transmitir / consulta lote // habilitar: gerar lGerar := .T. lTransmite := .F. lConsulta := .F. lCancela := .F. lConsStatus := .F. oBmp4:Disable() oBmp4:Refresh() ENDIF ENDIF ENDIF id=code>id=code> Editado por - pauloaraujo on 03/12/2009 10:56:40

citação:Ola Luis, qual a qtd de registro deste arquivos que estao lendo a consulta, e qual o tempo que esta demorando...dai faço um teste direto com meus banco de dados aqui... Abraços Luiz Fernando msn: empresoft@globo.com skype:empresoft empresoft@globo.com FWH 8.04,XHARBOUR 1.1,PELES,XDEV,VLIB,ADS 8.1 id=quote>id=quote>Luiz Fernando, APOSTO AS BRAHMAS em você... O outro Luis, VAI PERDER!! KKKKKKKKKK Abraços. João Santos - São Paulo. (11)3106-2832 Editado por - pauloaraujo on 01/10/2009 12:23:39

Más infelizmente não faço mais parte da empresa que ajudei a criar. Não sei se é uma despedida, pois não sei ainda qual rumo tomar. Foi muito bom participar com vocês e aprender com vocês. Fala friend, NÃO SE PREOCUPE, NÃO SERà UMA DESPEDIDA, pois o conhecimento que tens, NÃO MORRE com a empresa que ajudastes a criar e agora você se DESPEDE DELA. É somente dela que você se despede. DO FIVEWIN, JAMÃS! Acredite, amanhã, é outro dia e você estará por aqui, perguntando e respondendo. Quem é FANTASTICO como você, NÃO SE DESPEDE NUNCA! Força e conte conosco. Abraços e sorte, alias, tens MUITA SORTE, ÉS FIVEWINNER! Quem pode te VENCER? João Santos - São Paulo (11) 3106-2832 Editado por - pauloaraujo on 01/10/2009 12:20:17

Putz, Gilmer Como você notou, não resistí até amanhã (hehe) Com a sua dica o número do protocolo não é mais problema e funcionará redondo. Mas não sei se já estou no "pó da rabiola", mas acredito que a rotina quebre antes de executar esses comandos na TRANSMISSÃO: oNfe := TVoNFe():New() oNfe:PegaChaveAcesso(cXmlAssinado) oNFe:SaveXml(,cXmlAssinado, 2 ) Portanto, não tenho o XML assinado. Estou errado ou bebí pouco ?? (hehe) Como montar o XML assinado completo nessa situação?? Um abraço

Gilmer, Obrigado mesmo. Vamos testar amanhã e retornamos aquí mesmo. Um abraço

citação:João / Paulo Usando a rotina do Gilmer Quando voce enviou a NFe houve foi através de uma chave. Ok. Utiliza-se essa chave para pegar o retorno do recibo. Se cair a energia ou ctrl+del ou qualquer outra coisa, basta executar novamente a validação com a mesma chave. A validação pode ser executada mais de uma vez. Já fiz isso e retorna sempre com mesmo nro de protocolo. id=quote>id=quote>Zé, Você falow() "retorna sempre com mesmo nro de protocolo" Estamos precisando é do RECIBO. Se você transmite mais de uma vez COM A MESMA CHAVE retorna números de RECIBO diferentes. Já tínhamos feito este teste. Outra coisa, nem consultando o PORTAL esse "mardito" aparece lá. Um abraço

Pessoal, Se não tiver um jeito de se obter o número do recibo no caso de algum problema, posso afirmar que isso é um "furo" no Projeto da NFe. No caso de empresas que emitem trocentas notas, a chance de ocorrer algum problema alheio ao sistema é grande, pois depende de provedor de internet, eletricidade, equipamento, usuário, virus, etc. Paulo/CONTATO SISTEMAS

Marcos, Você usa o xDev ?? Se sim faça uma pesquisa geral (Find in Files) de cada banco: BRADESCO BANCO DO BRASIL UNIBANCO ITAU etc Ou seja, faça uma pesquisa se não escapou alguma coisa em um PRG qualquer. Basta um nome para ele derrubar o sistema. No meu caso, se não fosse essa opção do xDev, tava aferrado (hehe). Outra coisa, você usa o UPX?? Um abraço

citação:Falou pouco e falou tudo, esse é o kRA. Por falar nisso a qto tempo não dá as kRas por aqui.....até imagino pq !!!! rsrsrsr um grande abraço para ti Paulo. Alessandroid=blue> FW20d+CL53b+Blk7+@Say+CDX FW9.02+xHb110+@Say+CDX Seja Felizid=red> id=quote>id=quote>Alessandro, Cara, estou trabalhando para o governo, mas infelizmente não tenho férias, nem recebo 15 salários por ano. Tô aferrado (hehe) de trabalho e acredito que a coisa não vá mudar nos próximos 6 meses. Um abraço para você também

Pessoal, Não podia deixar passar em branco. Ontem foi emitida a minha 1ª Nota Fiscal eletrônica, com SUCESSO TOTAL. Soube que seria obrigatório dia 1º de Abril somente no dia 15 de Março, ou seja, desespero total, pois não tinha nem o Manual. Somente com a solução do Gilmer e o seu SUPORTE cheguei nesse resultado. Teve também a ajuda de um amigo do Fórum, que não posso citar o nome, se não a vida dele vai virar um inferno (hehe), a quem tenho que agradecer muito também. Abraços