drezius

Claro, nada que um ctrl+barra de espaço não resolvesse. Obrigado

Olá, fiz a atualização para o Trunk2 e estou com um problema ao validar o XML. Quando compilo meu projeto o Delphi 7 acusa erro na linha "ACBrNFe1.NotasFiscais.Valida;" acusando Undeclared identifier para o comando "Valida". Essa parte do meu código foi escrita há uns cinco anos, pelo menos, e é provável que esteja desatualizada. Alguém pode me auxiliar em como fazer a validação? ... //VALIDA ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(vAux); ACBrNFe1.NotasFiscais.Valida; if MessageDlg('A NF-e é válida. Deseja EMITIR essa NF-e?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin //ENVIA ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(vAux); ACBrNFe1.Enviar(vNSU); ...

PROBLEMA RESOLVIDO. A solução foi trocar o comando de leitura do XML, onde eu usava LerXMLFromString passei a usar LerXML e funcionou. O que antes estava assim: ACBrNFeDANFERaveCB1.MostrarPreview := True; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(DM.cdsPedidoNUCHAVEACESSONFE.Text+'-NFe.XML');//<XML Nota Eletrônica> ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXMLFromString(OpenDialog1.FileName);//<XML Evento> ACBrNFe1.ImprimirEvento; Ficou assim: ACBrNFeDANFERaveCB1.MostrarPreview := True; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(DM.cdsPedidoNUCHAVEACESSONFE.Text+'-NFe.XML');//<XML Nota Eletrônica> ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXML(OpenDialog1.FileName);//<XML Evento> ACBrNFe1.ImprimirEvento;

Juliomar, qual unit acbr faz o carregamento do xml? Sobre a versão, uso Delphi 7.

Pra não abrir novo tópico eu volto nesse. Se vocês abrirem o XML verão que o cOrgao está lá, e que no retorno consta "<xMotivo>Evento registrado e vinculado a NF-e</xMotivo>". Mas ao tentar imprimir aparece 'campo cOrgao nao informado'. Depurando pelo Delphi (7) noto que o sistema entra na função LerXml da pcnNFeR e chama o raise 'Não encontrei inicio do URI: Id=', mas a mensagem não aparece na tela, e em seguida vem o 'campo cOrgao nao informado'. Já atualizei e recompilei os fontes do ACBr. Meu código de impressão é ACBrNFeDANFERaveCB1.MostrarPreview := True; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(DM.cdsPedidoNUCHAVEACESSONFE.Text+'-NFe.XML');//<XML Nota Eletrônica> ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXMLFromString(OpenDialog1.FileName);//<XML Evento> ACBrNFe1.ImprimirEvento; 4214100811038100017355001000000262100000262011011002-procEventoNFe.xml

Alguma sugestão?

Senhores, boa tarde, Reativando o tópico, pois o problema persiste. Mudei o componente e agora estou usando o ACBrNFeDANFERaveCB, mas ao tentar imprimir continua retornando a mesma mensagem, "Campo cOrgao não informado". Segue XML em anexo. Aproveitando o tópico, percebi que a tag <verEvento> no XML da CCe não está recebendo a informação que passo via código. No XML da NFe mostra a versão correta do sistema, já na CCe aparece sempre 1.00. É assim mesmo? 4214050811038100017355001000000213100000213211011004-procEventoNFe.xml

Coloquei o componente ACBrDANFeRaveCB1 no meu projeto e percebi que ao contrário do ACBrDANFeRave1, o ACBrDANFeRaveCB1 não possui a propriedade 'RavFile' para selecionar qual arquivo .rav será usado. O ACBrDANFeRaveCB1 assume automaticamente o arquivo que usa?

Obrigado, André. Qual componente tem suporte para impressão de eventos?

Italojjr, boa tarde, Acho que estou com dificuldade no entendimento do procedimento de impressão. No meu projeto delphi eu tenho o componente ACBrNFeDANFERave1. O código de impressão é aquele descrito acima. E na minha pasta de reports tenho o arquivo "NotaFiscalEletronica.rav". Pelo jeito está faltando alguma coisa, mas não consegui entender ainda o que. Pode me esclarecer? Obrigado.

Estou passando pelo mesmo problema. Já fiz algumas pesquisas no fórum e em outras fontes na internet, sem sucesso. A mensagem "Campo cOrgao não informado" aparece quando pego o XML da CCe e tento imprimir. Segue abaixo o arquivo XML e também o código implementado. O código que escrevi foi baseado no artigo do Régys Silveira. http://www.regys.com.br/como-imprimir-um-evento-utilizando-o-acbrnfe/ Meu código: procedure TFNFe.btnImprimeCCeClick(Sender: TObject); begin OpenDialog1.Title := 'Selecione o XML da CCe'; OpenDialog1.DefaultExt := '*.XML'; OpenDialog1.Filter := '*'+DM.cdsPedidoNUCHAVEACESSONFE.Text+'*.XML'; OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin ACBrNFeDANFERave1.MostrarPreview := True; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(DM.cdsPedidoNUCHAVEACESSONFE.Text+'-NFe.XML');//<XML Nota Eletrônica> ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXMLFromString(OpenDialog1.FileName);//<XML Evento> ACBrNFe1.ImprimirEvento; end; end; 4213110811038100017355001000004807100004807811011010-procEventoNFe.xml

Bom dia, Estou reativando essa discussão. Estou passando pelo mesmo problema e não consegui resolver. Já fiz algumas pesquisas no fórum e em outras fontes na internet, sem sucesso. A mensagem "Campo cOrgao não informado" aparece quando pego o XML da CCe e tento imprimir. Segue abaixo o arquivo XML e também o código implementado. O código que escrevi foi baseado no artigo do Régys Silveira. http://www.regys.com.br/como-imprimir-um-evento-utilizando-o-acbrnfe/ Meu código: procedure TFNFe.btnImprimeCCeClick(Sender: TObject); begin OpenDialog1.Title := 'Selecione o XML da CCe'; OpenDialog1.DefaultExt := '*.XML'; OpenDialog1.Filter := '*'+DM.cdsPedidoNUCHAVEACESSONFE.Text+'*.XML'; OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin ACBrNFeDANFERave1.MostrarPreview := True; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromString(DM.cdsPedidoNUCHAVEACESSONFE.Text+'-NFe.XML');//<XML Nota Eletrônica> ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXMLFromString(OpenDialog1.FileName);//<XML Evento> ACBrNFe1.ImprimirEvento; end; end; 4213110811038100017355001000004807100004807811011010-procEventoNFe.xml

Kiko, problema resolvido. Agradeço a atenção.

Kiko, boa tarde, segue XML em anexo. 42130908110381000173550010000044441000044445-NFe.xml

Kiko, boa tarde, segue em anexo.

Jorge, eu uso o CST 70 com CSOSN 201, o que é correto. Já procurei em outros tópicos, mas não encontrei resposta para o meu problema.

Amigos, continuo com o problema relatado acima, tentei algumas modificações, mas sem sucesso. Aparece a mensagem "Total da BC ICMS-ST difere do somatorio dos itens". Abaixo listo como o XML está enviando as informações. ICMS para o item da nota: -<ICMS> -<ICMSSN201> <orig>0</orig> <CSOSN>201</CSOSN> <modBCST>4</modBCST> <vBCST>14.50</vBCST> <pICMSST>12.00</pICMSST> <vICMSST>0.54</vICMSST> <pCredSN>0.00</pCredSN> <vCredICMSSN>0.00</vCredICMSSN> </ICMSSN201> </ICMS> ICMS para o total da nota: -<total> -<ICMSTot> <vBC>10.00</vBC> <vICMS>0.00</vICMS> <vBCST>14.50</vBCST> <vST>0.54</vST> <vProd>10.00</vProd> <vFrete>0.00</vFrete> <vSeg>0.00</vSeg ><vDesc>0.00</vDesc> <vII>0.00</vII> <vIPI>0.00</vIPI> <vPIS>0.00</vPIS> <vCOFINS>0.00</vCOFINS> <vOutro>0.00</vOutro> <vNF>10.54</vNF> </ICMSTot> </total>

Vinha emitindo a NF-e com o ACBr, mas por solicitação da contabilidade alterei a variável CRT para Simples Nacional, então a mensagem "Total da BC ICMS-ST difere do somatorio dos itens" começou a aparecer. Uso CST 70 e CSOSN 201. Se omito a informação "Emit.CRT := crtSimplesNacional" o faturamento ocorre normalmente. Estou informando os valores referentes a ST nas tags dos itens, e também o somatório nas tags totalizadoras. Pesquisando na internet observei alguns comentário dizendo que para Santa Catarina os valores referentes a ST não devem aparecer nos itens do pedido, e sim descritos no campo Dados Adicionais. Procede?

Passei pelo mesmo problema, só resolveu atrasando o relógio do computador em 1h.

Passei pelo mesmo problema, só resolveu atrasando o relógio do computador em 1h.

Por acaso não seria possível disponibilizar a versão compilada do DANFE_Rave513.rav para download? Grato.

Eu quis dizer onde conseguir legalmente esse update. No site da Nevrona não tem essa versão 7.6. Bem, pelo jeito fiquei pelo caminho, vou dar um jeito de recompilar o sistema no Delphi 7, e resolver meu problema. De qualquer forma agradeço pela atenção. Abraços, Drezius.

É verdade, passou em branco. O problema agora é que o único site (da embarcadero) que encontrei o update para 7.6.2 BE não me permite fazer o download. Sabe me dizer onde conseguir esse update?

A versão é 7.6.0.

João Henrique, não estou familiarizado com o Rave, mas procurei o erro nos eventos e não encontrei. O que fiz foi o seguinte, no Event Editor cliquei no botão "Show All Events on Page" e apareceu uma lista de eventos em "Defined Events". Fui passando de evento em evento e aparentemente todos eventos seguem o mesmo padrão de pontuação. Infelizmente ao clicar em Compile aparece o alerta de erro na tela, mas não indica onde está o erro.