cicerobillo

-uso da funcao "SeSenao" da classe "CTeUtil" ao invés de "DFeUtil";

tem um outro problema na unit linha 813: if not(NotaUtil.Assinar(EventoCTe.Gerador.ArquivoFormatoXML, ... deve ser: if not(CTeUtil.Assinar(EventoCTe.Gerador.ArquivoFormatoXML, ...

Imaginei q fosse algo parecido e mudei para "ACBrCTeOpenSSL". Grato Cicero

Problema aparentemente resolvido. Estava faltando o pacote "designide.dcp" na seção "Requires" do ACBrCTe.dpk e estava tentando compilar uma unit que só existe nas versões anteriores ao Delphi 6. Grato Cicero

para que serve a diretiva "ACBrMDFeOpenSSL" em ACBrCTeWebServices.pas e onde está definida?

... // TnfseSimNao = ( snSim, snNao ) case FNFSe.Servico.Valores.IssRetido of snSim : rllISSReter.Caption := 'Sim'; snNao : rllISSReter.Caption := 'Não'; end; ... [dcc32 Error] ACBrNFSeDANFSeRLRetrato.pas(341): E2010 Incompatible types: 'TnfseSituacaoTributaria' and 'TnfseSimNao' [dcc32 Error] ACBrNFSeDANFSeRLRetrato.pas(342): E2010 Incompatible types: 'TnfseSituacaoTributaria' and 'TnfseSimNao' FNFSe.Servico.Valores.IssRetido do tipo TnfseSituacaoTributaria snSim do tipo TnfseSimNao snNao do tipo TnfseSimNao

Erro ao compilar ACBrNFSe no Delphi XE3 utilizando Instalador oficial do ACBr. Compiling package C:\ACBr\Pacotes\Delphi\ACBrNFe2\ACBr_NFSe.dpk "C:\Program Files\Embarcadero\RAD Studio\10.0\bin\dcc32.exe" "C:\ACBr\Pacotes\Delphi\ACBrNFe2\ACBr_NFSe.dpk" --no-config -B -$O- -$W+ -$Y- -M -Q -H- -W- -DRELEASE -U"C:\Program Files\Embarcadero\RAD Studio\10.0\lib\Win32\release" -U"c:\program files\embarcadero\rad studio\10.0\lib\Win32\release;C:\Users\Cicero\Documents\RAD Studio\10.0\Imports;C:\Program Files\Embarcadero\RAD Studio\10.0\Imports;C:\Users\Public\Documents\RAD Studio\10.0\Dcp;C:\Program Files\Embarcadero\RAD Studio\10.0\include;C:\Program Files\FastReports\LibD17;C:\Program Files\Raize\CS5\Lib\RS-XE3\Win32;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Dcu\D17\win32;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\CodeGen;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\DataSnap;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\ZLib;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\RODEC;.C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\Synapse;C:\Program Files\RemObjects Software\Everwood\Bin;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Source;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Dcu\D17\win32;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Source\Drivers;C:\Program Files\TMSSoftware\FlexCelVCLNT\Packages\dXE3\Win32\Release;C:\Program Files\Embarcadero\RAD Studio\10.0\IBDAC459\Source\Delphi17;C:\Program Files\Embarcadero\RAD Studio\10.0\DOA;C:\Program Files\Embarcadero\RAD Studio\10.0\RBuilder\Lib\Win32;C:\Program Files\Devart\UniDAC for RAD Studio XE3\Lib\Win32;C:\Program Files\Devart\UniDAC for RAD Studio XE3\Bin\Win32;C:\Program Files\Embarcadero\RAD Studio\10.0\IBO4_9_14_b53\LIB\D2013\Win32\Release;C:\Program Files\Embarcadero\RAD Studio\10.0\IBO4_9_14_b53;C:\Program Files\DevExpress\Library\BDS_XE3;C:\Users\Public\Documents\RAD Studio\10.0\Bpl;C:\Users\Public\Documents\RAD Studio\10.0\Dcp;C:\ACBr\Fontes\synalist;C:\ACBr\Fontes\PCN2;C:\ACBr\Fontes\ACBrComum;C:\ACBr\Fontes\ACBrDiversos;C:\ACBr\Fontes\ACBrSerial;C:\ACBr\Fontes\ACBrTCP;C:\ACBr\Fontes\ACBrTEFD;C:\ACBr\Fontes\ACBrCapicom;C:\ACBr\Fontes\ACBrBoleto;C:\ACBr\Fontes\ACBrPAF;C:\ACBr\Fontes\ACBrCTe;C:\ACBr\Fontes\ACBrNFe2;C:\ACBr\Fontes\ACBrSintegra;C:\ACBr\Fontes\ACBrSPED;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDContabil;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDFCont;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDFiscal;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDPisCofins" -U"C:\ACBr\Lib\Delphi\LibD17" -I"c:\program files\embarcadero\rad studio\10.0\lib\Win32\release;C:\Users\Cicero\Documents\RAD Studio\10.0\Imports;C:\Program Files\Embarcadero\RAD Studio\10.0\Imports;C:\Users\Public\Documents\RAD Studio\10.0\Dcp;C:\Program Files\Embarcadero\RAD Studio\10.0\include;C:\Program Files\FastReports\LibD17;C:\Program Files\Raize\CS5\Lib\RS-XE3\Win32;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Dcu\D17\win32;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\CodeGen;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\DataSnap;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\ZLib;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\RODEC;.C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\Synapse;C:\Program Files\RemObjects Software\Everwood\Bin;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Source;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Dcu\D17\win32;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Source\Drivers;C:\Program Files\TMSSoftware\FlexCelVCLNT\Packages\dXE3\Win32\Release;C:\Program Files\Embarcadero\RAD Studio\10.0\IBDAC459\Source\Delphi17;C:\Program Files\Embarcadero\RAD Studio\10.0\DOA;C:\Program Files\Embarcadero\RAD Studio\10.0\RBuilder\Lib\Win32;C:\Program Files\Devart\UniDAC for RAD Studio XE3\Lib\Win32;C:\Program Files\Devart\UniDAC for RAD Studio XE3\Bin\Win32;C:\Program Files\Embarcadero\RAD Studio\10.0\IBO4_9_14_b53\LIB\D2013\Win32\Release;C:\Program Files\Embarcadero\RAD Studio\10.0\IBO4_9_14_b53;C:\Program Files\DevExpress\Library\BDS_XE3;C:\Users\Public\Documents\RAD Studio\10.0\Bpl;C:\Users\Public\Documents\RAD Studio\10.0\Dcp;C:\ACBr\Fontes\synalist;C:\ACBr\Fontes\PCN2;C:\ACBr\Fontes\ACBrComum;C:\ACBr\Fontes\ACBrDiversos;C:\ACBr\Fontes\ACBrSerial;C:\ACBr\Fontes\ACBrTCP;C:\ACBr\Fontes\ACBrTEFD;C:\ACBr\Fontes\ACBrCapicom;C:\ACBr\Fontes\ACBrBoleto;C:\ACBr\Fontes\ACBrPAF;C:\ACBr\Fontes\ACBrCTe;C:\ACBr\Fontes\ACBrNFe2;C:\ACBr\Fontes\ACBrSintegra;C:\ACBr\Fontes\ACBrSPED;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDContabil;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDFCont;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDFiscal;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDPisCofins" -R"c:\program files\embarcadero\rad studio\10.0\lib\Win32\release;C:\Users\Cicero\Documents\RAD Studio\10.0\Imports;C:\Program Files\Embarcadero\RAD Studio\10.0\Imports;C:\Users\Public\Documents\RAD Studio\10.0\Dcp;C:\Program Files\Embarcadero\RAD Studio\10.0\include;C:\Program Files\FastReports\LibD17;C:\Program Files\Raize\CS5\Lib\RS-XE3\Win32;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Dcu\D17\win32;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\CodeGen;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\DataSnap;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\ZLib;C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\RODEC;.C:\Program Files\RemObjects Software\RemObjects SDK for Delphi\Source\Synapse;C:\Program Files\RemObjects Software\Everwood\Bin;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Source;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Dcu\D17\win32;C:\Program Files\RemObjects Software\Data Abstract for Delphi\Source\Drivers;C:\Program Files\TMSSoftware\FlexCelVCLNT\Packages\dXE3\Win32\Release;C:\Program Files\Embarcadero\RAD Studio\10.0\IBDAC459\Source\Delphi17;C:\Program Files\Embarcadero\RAD Studio\10.0\DOA;C:\Program Files\Embarcadero\RAD Studio\10.0\RBuilder\Lib\Win32;C:\Program Files\Devart\UniDAC for RAD Studio XE3\Lib\Win32;C:\Program Files\Devart\UniDAC for RAD Studio XE3\Bin\Win32;C:\Program Files\Embarcadero\RAD Studio\10.0\IBO4_9_14_b53\LIB\D2013\Win32\Release;C:\Program Files\Embarcadero\RAD Studio\10.0\IBO4_9_14_b53;C:\Program Files\DevExpress\Library\BDS_XE3;C:\Users\Public\Documents\RAD Studio\10.0\Bpl;C:\Users\Public\Documents\RAD Studio\10.0\Dcp;C:\ACBr\Fontes\synalist;C:\ACBr\Fontes\PCN2;C:\ACBr\Fontes\ACBrComum;C:\ACBr\Fontes\ACBrDiversos;C:\ACBr\Fontes\ACBrSerial;C:\ACBr\Fontes\ACBrTCP;C:\ACBr\Fontes\ACBrTEFD;C:\ACBr\Fontes\ACBrCapicom;C:\ACBr\Fontes\ACBrBoleto;C:\ACBr\Fontes\ACBrPAF;C:\ACBr\Fontes\ACBrCTe;C:\ACBr\Fontes\ACBrNFe2;C:\ACBr\Fontes\ACBrSintegra;C:\ACBr\Fontes\ACBrSPED;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDContabil;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDFCont;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDFiscal;C:\ACBr\Fontes\ACBrSPED\ACBrSPEDPisCofins" -N0"C:\ACBr\Lib\Delphi\LibD17" -LE"C:\Users\Public\Documents\RAD Studio\10.0\Bpl" -LN"C:\Users\Public\Documents\RAD Studio\10.0\Dcp" -N"SWinapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;System;Xml;Data;Datasnap;Web;Soap;Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell" Embarcadero Delphi for Win32 compiler version 24.0 Copyright © 1983,2012 Embarcadero Technologies, Inc. C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(147) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(147) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(194) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(199) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(199) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(209) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(215) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(456) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeUtil.pas(927) Error: E2010 Incompatible types: 'PAnsiChar' and 'PWideChar' C:\ACBr\Fontes\ACBrNFSe\ACBrNFSeNotasFiscais.pas(1631) Fatal: F2063 Could not compile used unit 'ACBrNFSeUtil.pas' Compilation failure

Criar um numero de referencia padrão (codigo do serviço) que será vinculado a cada codigo de cada cidade. Cada usuario da NFSe cria uma tabela relacionando ao codigo padrão. Não tem necessidade de criar uma tabela para cada cidade (ideia semelhante a do arquivo texto);

se vcs utilizam o ACBRNF-e/ACBRNFS-e, nada mais justo do que compartilhar seus componentes, caso contrario, concordo com o comentário abaixo: aqui não é lugar pra vender seu peixe

podes tentar com o outro modelo de DANFe do Rave (DANFE_Rave513.rav).

vou ver. obrigado.

Por sugestão do André (anfm) estou postando a pergunta aqui: Alguém usa o Mantis ou outro bugtracker integrado com SVN/CVS ou outro software de controle de versao? Se alguem usar e puder dar uma dica de como fazer a integração, creio que irá ajudar muita gente q precisa dessa solução. Grato pela atenção Cicero A Billo

no teu formulário principal, na última linha antes do "end.": Initialization RLConsts.SetVersion(3,71,'B');

valeu. obrigado pelo esclarecimento.

creio que não precisa de maiores explicações: a variavel definida como Real, utilizada em algumas units no ACBr não mais é usada pelo Delphi, apesar de ainda dar suporte por questão de compatibilidade de codigo de versoes anteriores do Delphi e Pascal, mas que pode provocar problemas. Ao inves de usar Real é aconselhavel utilizar Double. O que minha mensagem anterior está mostrando é o resultado da busca no site Delphi Basics: http://www.delphibasics.co.uk/RTL.asp?Name=Real Atenciosamente Cicero

Delphi Basics Real Obsolete A floating point type supporting about 15 digits of precision System unit type Real; Description The Real type is obsolete. You should use the current equivalent : Double Related commands Double A floating point type supporting about 15 digits of precision

vc pode verificar o status do serviço dentro de um try ... except e, em caso de erro é pq o serviço não está ativo. Na realidade o componente emite uma mensagem de exception, mas deveria retornar o resultado da consulta como False. O mesmo deveria ocorrer qdo vc envia a NFe e o serviço não está disponivel ou sua internet está fora. Essas duas funçoes deveriam retornar False ou True, mas, infelizmente isso não ocorre. Tive que modificar o codigo do componente para poder saber a situação do serviço e/ou internet e mudar para emissão por Contingencia (o componente emitia uma mensagem em branco e o operadpr ficava sem saber o que houve). Postei uma mensagem no Mantis (870), a algum tempo, mas acho que ninguem leu, ou se leu não deu importância. Consegui dar uma amenizada no problema (emitindo uma mensagem de erro na internet ou serviço fora), mas não é o ideal. Fica dependendo um pouco de uma decisão do usuário, que nem sempre é dos mais espertos para tomar uma decisão acertada.

faça uma pesquisa no forum ( http://www.djsystem.com.br/acbr/forum/search.php ) e vc vai descobrir o q está acontecendo. essa dll sempre foi necessária para quem usa OpenSSL.

estou fazendo da mesma forma q sempre fiz. Simplesmente mando atualizar via SVN como sempre fiz sem informar login

olá! estou tentando atualizar o ACBr para a ultima revisão, mas recebo a mensagem abaixo. O que vcs aconselham que eu faça, sendo que desconheço a autoridade certificadora mencionada na mensagem. Erro ao validar o certificado de servidor para https://acbr.svn.sourceforge.net:443: Emissor de certificado desconhecido. Assinatura Digital: 94:74:b3:a9:54:ce:dc:e5:0d:d6:cf:86:b1:40:5a:48:b9:ea:15:de Identificador: GeoTrust, Inc., US Você deseja continuar?

Valeu. Obrigado.

ok. Obrigado. usei o arquivo do exemplo e funcionou. o arquivo do projeto compilado de DANFe que está junto com o executável não está ok (tamanho de 579 Kb contra 119Kb do arquivo de exemplo). Ou é um modelo diferente do Rave?

Olá! Obrigado por responder. Estou utilizando a última versão do "DANFE_Rave513.rav" disponível. não sei exatamente qual a data da última alteração, mas verifico as atualizações diariamente.

não vou enviar o xml complet, mas o q interessa está aqui: - 0 - 10 0,530 m3 45.400 49.000 ------------------------------------------------------------------- creio que isso ocorre aqui: unit ACBrNFeDANFERaveDM; linha 785 procedure TdmACBrNFeRave.CustomTransportadorCXNGetRow( Connection: TRvCustomConnection); var wfrete: string; begin with FNFe.Transp do begin case ModFrete of mfContaEmitente: begin wFrete:='0-EMITENTE'; end; mfContaDestinatario: begin wFrete:='1-DEST/REM'; end; mfContaTerceiros: begin wFrete:='2-TERCEIROS'; end; mfSemFrete: begin wFrete:='9-SEM FRETE'; end; end; Connection.WriteStrData('', wfrete); with Transporta do begin if NotaUtil.NaoEstaVazio(CNPJCPF) then begin if Length(CNPJCPF) > 11 then Connection.WriteStrData('', NotaUtil.FormatarCNPJ(CNPJCPF)) else Connection.WriteStrData('', NotaUtil.FormatarCPF(CNPJCPF)); end else Connection.WriteStrData('', ''); Connection.WriteStrData('', XNome); Connection.WriteStrData('', IE); Connection.WriteStrData('', XEnder); Connection.WriteStrData('', CollateBr(XMun)); Connection.WriteStrData('', UF); end; end; end;

Boa-tarde! no box Frete Por Conta da DANFe não deveria aparecer somente o código da modalidade de Frete (0,1,2 ou 9)? Está aparecendo o código + '-' + a primeira letra da descrição (ex: "0-E"). É isso mesmo? Vi no manual que entraram novos codigos e que não aparecem, por falta de espaço, na lista de modalidades de Frete. Att, Cicero