prismars

Obrigado pela resposta Francisco908! Mas esqueci o fundamental e acredito que talvez ai esteja o problema: Uso o QuickReport somente ! Qualquer dica é bem vinda.. Moacir

Juliomar, Obrigado pelo interesse. Usei o exemplo que acompanha o próprio ACBr: ACBr\Exemplos\ACBrBoleto\Delphi Gerei dois boletos e Cliquei no Botão "Gera PDF". Nada acontece e nenhum arquivo .pdf é gerado ! Cordialmente, Moacir

Boa tarde, Estou começando a usar o ACBrBoleto e não estou conseguindo exportar para PDF. Não dá mensagem de erro e não gera o pdf !! Alguma dica ? Cenário: Delphi XE2 QuickReport 5.5

Bom Dia, Após atualizar a ACBr estou com problemas ao consultar cadastro de contribuintes. Abaixo o retorno do RS: <?xml version="1.0" encoding="utf-8"?><soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope"xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"><soap:Body><soap:Fault><soap:Code><soap:Value>soap:Sender</soap:Value></soap:Code><soap:Reason><soap:Text xml:lang="en">System.Web.Services.Protocols.SoapException: Unable to handle request without a valid action parameter. Please supply a valid soap action. at System.Web.Services.Protocols.Soap12ServerProtocolHelper.RouteRequest() at System.Web.Services.Protocols.SoapServerProtocol.Initialize() at System.Web.Services.Protocols.ServerProtocol.SetContext(Type type, HttpContext context, HttpRequest request, HttpResponse response) at System.Web.Services.Protocols.ServerProtocolFactory.Create(Type type, HttpContext context, HttpRequest request, HttpResponse response, Boolean& abortProcessing)</soap:Text></soap:Reason><soap:Detail /></soap:Fault></soap:Body></soap:Envelope> Retorno PR: <env:Envelope xmlns:env='http://www.w3.org/2003/05/soap-envelope'><env:Headerxmlns:env='http://www.w3.org/2003/05/soap-envelope'><nfeCabecMsg xmlns='http://www.portalfiscal.inf.br/nfe'><cUF>41</cUF><versaoDados>2.00</versaoDados></nfeCabecMsg></env:Header><env:Body xmlns:env='http://www.w3.org/2003/05/soap-envelope'><consultaCadastro2Result xmlns='http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro2'><retConsCad versao='2.00' xmlns='http://www.portalfiscal.inf.br/nfe'><infCons><verAplic>PR-v2_9_6</verAplic><cStat>242</cStat><xMotivo>Cabecalho - Falha no Schema XML</xMotivo><cUF>41</cUF></infCons></retConsCad></consultaCadastro2Result></env:Body></env:Envelope> XML da consulta: <ConsCad xmlns="http://www.portalfiscal.inf.br/nfe"versao="2.00"><infCons><xServ>CONS-CAD</xServ><UF>PR</UF><CNPJ>94827029000195</CNPJ></infCons></ConsCad> Alguma dica ? Grato, Moacir

Juliomar, Tenho o D7 e XE2 instalados nesta máquina. Se rodar o bat citado não perderei também a instalação do ACBr no D7 ? Obrigado

Boa Tarde Italo, Grato pela resposta. 1) Estou atualizando uma instalação mais antiga já existente 2) Sim, acabei de atualizar todos os fontes 3) Estou tentando atualizar pelo instalador do ACBr Como tenho vários projetos que dependem do ACBr não tentei desinstalar completamente o ACBr e partir de uma instalação limpa. Obrigado

Boa Tarde, Hoje ao atualizar o ACBR em minha máquina, após um longo tempo, me deparei com um erro na hora da instalação do ACBRSerial: C:\componentesXE2\ACBr\Fontes\ACBrSerial\ACBrBALClass.pas(170) Error: E2003 Undeclared identifier: 'WriteLog' Alguma dica ou recomendação ? Cordialmente, Moacir Fortes

Cleber, Era exatamente este o erro. Agradeço a resposta. Forte abraço,

PessoALL, Percebi que na impressão do Cancelamento do CTe não são impressos os dados referentes ao CTe de origem. Isto esta correto ? Não seria preciso imprimir número e série do CTe no corpo do documento ? Anexo PDF da carta de cancelamento (v2.0) gerada por mim. Abraços, Moacir Cancelamento000000001.pdf

Italojjr, Obrigado pela resposta, farei desta forma. Abraços e um bom feriado, Moacir

Prezados, Estou migrando minha aplicação para a versão 2.0 e estou com o problema citado acima, no SEFAZ de SP. Posso fazer o CTe com qualquer tipo de documento (NF, NFe, Outros) e o erro sempre é o mesmo. Estou testando com Notas e NFe´s reais já utilizadas para a emissão de CTe´s. Alguem poderia me dar uma luz a respeito ? ** Corrigindo: Com tipo de documento = 'Outros' autoriza normalmente ** Agradeço desde já, Moacir

Senhores, Hoje atualizei o ACBr via ACBRInstall e a instalação correu sem erros. Fui fazer alguns testes no meu sistema e percebi que a impressão da DACTE não ocorre, e nenhuma mensagem de erro é emitida. Tentei utilizando a versão do QR e do FR e em nenhum dos casos funciona. A impressão de outros tipos de relatórios do sistema estão ok, inclusive MDFE. D XE2 W8.1 Toda a ajuda é bem vinda. Abraços, Moacir

Italo, Mais uma vez meu muito obrigado. Então vou me concentrar no Manifesto Eletrônico. Um forte abraço e uma excelente semana ao amigo ! Moacir

Bom Dia Italo, Na verdade estou tentando enviar os dois tipos: Carta de correção e o Cancelamento e o erro ocorre nos dois casos. Aproveito para perguntar: posso gerar o XML do evento e grava-lo antes de enviar ? Forte abraço, Moacir

Pessoal, Não obtendo um erro ao testar a geração de ventos em ambiente de HOMOLOGAÇÃO (não tentei em produção). Erro obtido: 'Modal não encontrado no XML.'. Abaixo como estou gerando o evento: ACBrCTe.Conhecimentos.Clear; ACBrCTe.Conhecimentos.LoadFromFile(sPathTEMP+schNfe+'.XML'); ACBrCTe.EventoCTe.Evento.Clear; ACBrCTe.EventoCTe.idLote := 1; with ACBrCTe.EventoCTe.Evento.Add do begin infEvento.cOrgao := StrToIntDef(Copy(g_EmitCodCidade, 1, 2), 0); if lHomologacao then InfEvento.tpAmb := taHomologacao else InfEvento.tpAmb := taProducao; infEvento.CNPJ := g_EmitCNPJ; infEvento.chCTe := schNfe; infEvento.dhEvento := Now; infEvento.tpEvento := StrToTpEvento(ok, sTipo); infEvento.nSeqEvento := iSeqEvento; infEvento.detEvento.nProt := sProtocolo; infEvento.detEvento.xJust := Carta.Text; infEvento.detEvento.modal := mdRodoviario; infEvento.detEvento.vICMS := qryDados_CTe.FieldByName('A06VIC').AsCurrency; infEvento.detEvento.vTPrest := qryDados_CTe.FieldByName('A06VLF').AsCurrency; infEvento.detEvento.vCarga := qryDados_CTe.FieldByName('A06VLM').AsCurrency; If qryDados_CTe.FieldByName('A06CLI').AsString=qryDados_CTe.FieldByName('A06CGR').AsString then infEvento.detEvento.Toma:=tmRemetente else If qryDados_CTe.FieldByName('A06CLI').AsString=qryDados_CTe.FieldByName('A06CGD').AsString then infEvento.detEvento.Toma:=tmDestinatario else infEvento.detEvento.Toma:=tmOutros; // // Dados do Tomador // qryClientes.Close; qryClientes.ParamByName('A01CGC').AsString := qryDados_CTe.FieldByName('A06CLI').AsString; qryClientes.Open; infEvento.detEvento.CNPJCPF := qryDados_CTe.FieldByName('A06CLI').AsString; infEvento.detEvento.IE := IfThen(qryClientes.FieldByName('A01INS').AsString='','ISENTO',qryClientes.FieldByName('A01INS').AsString); infEvento.detEvento.UF := qryClientes.FieldByName('UF_ORIGEM').AsString; qryClientes.Close; infEvento.detEvento.UFIni := g_EmitUF; infEvento.detEvento.UFFim := qryDados_CTe.FieldByName('A06DUF').AsString; end; qryDados_CTe.Close; if ACBrCTe.EnviarEventoCTe(ACBrCTe.EventoCTe.idLote) then // <<-- AQUI ocorre o ERRO Alguma dica ?? Abraços, Moacir

Caro Italo, Meu muito obrigado, seguindo suas indicações consegui instalar o componente. Grato ! Moacir

Italo, Boa Tarde ! Meu caro, não estou conseguindo instalar o ACBrMDFeDAMDFEQRpkg. Meu cenário: Delphi XE2, QR 5.05.1. Alterei no pacote ACBrMDFeDAMDFEQRpkg a versão do QR de QR5RunD7 para a minha versão QR5RunDXE2 e ao tentar compilar da o seguinte erro: "[DCC Error] E2466 Never-build package '.ACBrMDFeDAMDFEQRpkg' requires always-build package 'QR5RunDXE2'" Alguma dica ?? Forte abraço, Moacir

Um cliente solicitou que eu coloque o nome da empresa (transportadora) no canhoto da DACTe. A alegação dele é que os entregadores não sabem de quem é o CTe depois de destacar o canhoto (no caso ele tem um serviço contratado para tal e o mesmo trabalha para mais de uma transportadora). Pelo que pude notar não tem como sem alterar o layout do mesmo, ou estou enganado ? Abraços, Moacir

Italo, Mais uma vez o meu muito obrigado. Caso possa ser útil em algo basta pedir. Forte abraço, Moacir

Nem todos os estados tem a consulta de contribuintes disponível para o CTe, embora tenham para NFe. Alguns estados que não tem esta consulta no CTe: MG, ES, PR ente outros... Link´s para WS NFe (que funcionam perfeitamente com o CTe): Homologação: http://hom.nfe.fazenda.gov.br/portal/we ... k0FwB7dKs= Produção: http://www.nfe.fazenda.gov.br/portal/we ... k0FwB7dKs= Aonde proceder os ajustes: AcbrCTeUtil.pas Moacir

Fiz alguns testes aqui e observei que basta colocar os link´s dos WS da NFe para que esta opção passe a funcionar corretamente. Alguém sabe se isto pode trazer algum aborrecimento no futuro ? Abraços, Moacir

Observei que os dados da seguradora não estão presentes neste modelo A5. É correto o uso da DACTe sem os dados do seguro ?? Moacir

Italo, Cenário: D7 QR 3.0.9 Tive a necessidade de impressão em lote da DACTe e como meu QR não tem suporte a impressão em PDF utilizei o PDFCreator para tanto, mas enfrentei um problema: a formatação aplicada ao numero do CTe no DocumentTitle do QR. Fiz uma pequena alteração e pergunto se a mesma poderia ser incorporada como definitiva ? Acredito que outros mais devem ter este mesmo problema. Alterações realizadas: unit ACBrCTeDACTeQRRetrato, linha 930 de: QRCTe.ReportTitle:='CT-e: ' + FormatFloat( '000,000,000', FCTe.Ide.nCT ); para: QRCTe.ReportTitle:='CT-e: ' + FormatFloat( '000000000', FCTe.Ide.nCT ); unit ACBrCTeDACTeQRRetratoA5, linha 806 de: QRCTe.ReportTitle:='CT-e: ' + FormatFloat( '000,000,000', FCTe.Ide.nCT ); para: QRCTe.ReportTitle:='CT-e: ' + FormatFloat( '000000000', FCTe.Ide.nCT ); Forte abraço, Moacir

Bom Dia, Estou tendo os mesmos problemas que o Adriano Lucas ao tentar utilizar o DACTe A5. Houve alguma evolução quanto a resolução dos problemas relatados por ele ? Abraços, Moacir Fortes

Italo, Problema resolvido. Gratidão! Moacir