Marcelo Grando

Arquivo: PagFor.Itau.GravarTxtRemessa.pas Local do arquivo: \ACBr_II\trunk2\Fontes\ACBrPagFor\Bancos Comentar ou excluir as linhas 369, 522 e 959 GeraSegmentoB(mSegmentoBList: TSegmentoBList); 369 - // Inc(FSequencialDoRegistroNoLote); GeraSegmentoJ52(mSegmentoJ52List: TSegmentoJ52List); 522 - // Inc(FSequencialDoRegistroNoLote); GeraSegmentoW(mSegmentoWList: TSegmentoWList); 959 - // Inc(FSequencialDoRegistroNoLote); CORRIGIDO: PagFor.Itau.GravarTxtRemessa.pas

Desinstalei a ACBr, FR, o Delphi 2010 e Delphi 12.3 e reinstalei somente o Delphi 12.3 com a FR e ACBr; A principio resolveu o problema no Delphi 12.3, agora esta funcionando os componentes da ACBr vinculados ao FR. Muito obrigado pela ajuda!

Tem que corrigir essas linhas também: linha 168, 199, 315 e 346 ARetornoWS.DadosRet.TituloRet.Vencimento := DateCresolToDateTime(LJsonObject.AsString['dtvencimento']); // não encontra o dtvencimento corrigido ARetornoWS.DadosRet.TituloRet.Vencimento := DateCresolToDateTime(LJsonObject.AsString['dtVencimento']); // o "V" tem que ser maiúsculo;

Realmente tinha caminhos referenciando o delphi 2010 dentro do path do enviroment variables, removi esses caminhos reiniciei a maquina mas mesmo assim o erro continua. Depois, tentei desinstalar o FR e o ACBr nos 2 delphi, removi todos os path dentro dos delphi do FR e o ACBr, removi as bpl do ACBr manualmente e depois executei o arquivo apagarAcbr.bat, depois de tudo removido, reiniciei a maquina novamente, instalei o FR e o ACBr somente no delphi 12 e o erro continua, estou pensando em desinstalar os 2 delphi da maquina e instalar a princípio somente o delphi 12 com o FR e o ACBr, só que o meu medo agora é fazer isso e o erro continuar a acontecer.

Sim, tenho instalado na mesma maquina o Delphi 2010 com o FastReport versão 4.15.13 + ACBr (esta funcionando normalmente) o Delphi 12.3 com o FastReport VCL Reporting versão 2025.1.8 + ACBr único problema que ocorreu foi esse "Invalid parameter" ao adicionar no form qualquer um desses componentes: ACBrCTeDACTEFR, ACBrMDFeDAMDFEFR, ACBrNFeDANFEFR, ACBrNFSeDANFSeFR e ACBrNFSeXDANFSeFR, Tentei alterar, mas continua com o mesmo problema; Tentei executar o arquivo "apagarAcbr.bat" e reinstalar novamente o ACBr, mas também não adiantou. Será que é porque tenho 2 versões do Delphi e do FR na mesma maquina ?

A versão do FR que você tem, tem ainda a propriedade CheckboxAsShape no componente frxPDFExport ? Caso não tenha, estou achando que é isso que esta causando o problema no ACBr pra mim, o frxPDFExport esta sendo usado nos componentes de impressão do ACBr e no caso, ao tentar criar o frxPDFExport, a falta dessa propriedade "CheckboxAsShape" seria o "Invalid parameter".

Após o meu projeto pronto não abrir, o primeiro teste que fiz foi tentar por o componente em um projeto novo , simplesmente ao pegar o componente da palette e jogar ele no form já ocorre o erro de "Invalid parameter" e não salva nada no dfm.

O FR versão Embarcadero tinha sido instalado dentro da pasta \OneDrive\Documentos\Embarcadero\Studio\23.0\CatalogRepository, depois que desinstalei ele, eu exclui a pasta do FR que estava dentro desta pasta \CatalogRepository Agora o FR esta instalado dentro da pasta C:\Program Files (x86)\Embarcadero\Componentes\Fast Reports\VCL\2025.1.8\Sources

No library path, tem somente o apontamento para a nova instalação do FR. dcu/.dcp/.bpl também não encontrei nada referente ao FR versão Embarcadero. Inclusive, depois que desinstalei essa versão, eu exclui a pasta aonde tinha instalado o FR versão Embarcadero e a nova versão do FR instalei em uma pasta diferente, na verdade foi o próprio FR que solicitou o caminho da instalação.

Justamente, o componente não fica visual porque ocorre o erro, "invalid parameter". Se for salvar o form, o Delphi pergunta se desejo remover a declaração do componente.

Pior que não, o mesmo erro ocorre ao adicionar o componente ACBrCTeDACTEFR, ACBrMDFeDAMDFEFR, ACBrNFeDANFEFR, ACBrNFSeDANFSeFR e ACBrNFSeXDANFSeFR em um form novo no Delphi 12. Essa propriedade no frxPDFExport1.CheckboxAsShape que não existe mais no FastReport atual, mas esse componente abre normalmente ignorando o erro, o frxPDFExport1 permanece na tela, os demais que ocorre o erro de "invalid parameter" somem da tela e não permite recoloca-los. Esse erro ocorre em todas os componentes da ACBr ACBrCTeDACTEFR, ACBrMDFeDAMDFEFR, ACBrNFeDANFEFR, ACBrNFSeDANFSeFR e ACBrNFSeXDANFSeFR, abrindo no form já existente e ignorando o erro, o componente some da tela e se for colocar manualmente ocorre o erro e não adiciona o componente, mesmo sendo em um form novo de um novo projeto. Será que por causa dessa propriedade frxPDFExport1.CheckboxAsShape que não existe mais no fastreport estaria causando o erro de invalid parameter nos componentes do ACBr ?

Eu adquiri o delphi 12 e tentei usar com o fastreport que vem junto no Delphi, ocorreu esse erro que reportei acima, vi que a versão que vem junto com o Delphi não é completa, então adquiri a versão completa do Fastreport, desinstalei o fastreport que veio junto com o delphi e instalei o FastReport VCL Reporting versão 2025.1.8, reinstalei também o ABCr novamente. mas o erro continuou ocorrendo. O erro ocorre ao abrir no Delphi 12 o form que já tinha os componentes adicionados (desenvolvido no delphi 2010), O mesmo erro ocorre ao adicionar o componente ACBrCTeDACTEFR, ACBrMDFeDAMDFEFR, ACBrNFeDANFEFR, ACBrNFSeDANFSeFR e ACBrNFSeXDANFSeFR em um form novo no Delphi 12. OBS: estou tentando migrar o meu sistema do Delphi 2010 para o Delphi 12; Tem essa propriedade no frxPDFExport que não existe mais no FastReport atual, mas esse componente abre normalmente ignorando o erro, Será que não seria isso que esta causando o erro no componente do ACBr, pelo que eu vi ele usa esse componente frxPDFExport nos componentes da ACBr citados acima. O mesmo DataModule usando no Delphi 2010 e no Delphi 12, no Delphi 2012 ocorre o erro e não visualiza o componente.

Já tinha o ACBr instalado com essa opção "Deixar somente a pasta LibXX no Library Path do Delphi" desmarcado.

Obrigado pelo retorno! O FastReport que adquiri é a versão completa, mas não leva o nome 'Enterprise'. Além disso, minha versão já está acima da 2025.1.7. Há alguma funcionalidade específica da edição 'Enterprise' que seja necessária para o uso?

Alguém já se deparou com esse erro "Invalid parameter." ao adicionar o componente TACBrCTeDACTERFR no form ? O erro esta ocorrendo no: Delphi 12.3 Professional Estou usando o FastReport VCL Reporting versão 2025.1.8 Esta instalado a ultima versão ACBr;

Eu fiz essas alterações e apliquei no meu sistema e a princípio esta registrando e consultando o boleto normalmente. INCLUI_CONSULTA_BAIXA.rar

Arquivo: ACBrBoletoRet_Cresol.pas Local do arquivo: \ACBr_II\trunk2\Fontes\ACBrBoleto\WS Correções na função LerRetorno do ACBrBoletoRet_Cresol.pas (WS) linha 92 function TRetornoEnvio_Cresol.LerRetorno(const ARetornoWS: TACBrBoletoRetornoWS): Boolean; ... linha 109 if Pos('[', RetWS) > 0 then //estava executando esse comando tendo o '[' em qualquer lugar do "RetWS"; alterado para if Pos('[', RetWS) = 1 then //executa o comando somente se o primeiro carácter do "RetWS" for '['; linha 168 e 199 ARetornoWS.DadosRet.TituloRet.Vencimento := DateCresolToDateTime(LJsonObject.AsString['dtvencimento']); // não encontra o dtvencimento corrigido ARetornoWS.DadosRet.TituloRet.Vencimento := DateCresolToDateTime(LJsonObject.AsString['dtVencimento']); // o "V" tem que ser maiúsculo; ACBrBoletoRet_Cresol.pas

Arquivo: ACBrMDFeDAMDFEFR.pas ...\ACBr_II\trunk2\Fontes\ACBrDFe\ACBrMDFe\DAMDFE\Fast\ACBrMDFeDAMDFEFR.pas linha 1059 procedure TACBrMDFeDAMDFEFR.CarregaContratantes; var i:integer; begin with cdsContratantes, FMDFe.rodo.infANTT do begin for I := 0 to infContratante.Count - 1 do begin Append; if Length(infContratante[i].CNPJCPF)=11 then FieldByName('CNPJCPF').AsString := FormatarCPF(infContratante[i].CNPJCPF) else FieldByName('CNPJCPF').AsString := FormatarCNPJ(infContratante[i].CNPJCPF); Post; end; end; end; O Append; e o Post; estão fora do "for I", carregando somente o primeiro contratante, caso tenha mais de 1 não carrega todos; ACBrMDFeDAMDFEFR.pas

[4201703] ; Atualizado em 03/03/2025 Nome=Ascurra UF=SC Provedor=IPM Versao=1.01 ProRecepcionar=https://ws-ascurra.atende.net:7443/?pg=rest&service=WNERestServiceNFSe

Boa tarde Italo, Depois de atualizar os fontes, reinstalar o ACBr, gerou o XML correto e autorizou o CT-e Simplificado em homologação! Obrigado!

Boa tarde, tudo bem? Estou implementando o CT-e Simplificado em nossa aplicação, porém ao tentar transmitir um CT-e em homologação, está ocorrendo o seguinte erro: (Delphi) No primeiro momento, ao usar o comando "ACBrCTe1.Conhecimentos.GerarCTe", esta gerando o XML com a tag <infNFe><chNFe> preenchida corretamente; ao tentar assinar o XML, usando o comando "ACBrCTe1.Conhecimentos.Assinar" ou o comando "ACBrCTe1.Enviar(vLote,.. ", esta gerando o XML com a tag <infNFe><chNFe> em branco, no caso, não esta montando o XML com a chave da NF-e, mesmo tendo a chave informada. os demais dados esta preenchendo normal, somente a chave esta sendo excluída, Estou fazendo algo de errado? Alguém poderia me ajudar? Lembrando que ACBr e os Schemas estão atualizados! Obrigado.

Bom dia Italo, Foi necessário alterar o valor recebido da tag MunicipioPrestacao, ACBrNFSeX - provedor Bauhaus: estava recebendo o valor o "NFSe.Prestador.Endereco.CodigoMunicipio" do endereço do prestador do serviço, foi alterado para receber o "NFSe.Servico.CodigoMunicipio" aonde o serviço foi prestado, já que nem sempre o serviço é prestado na cidade do prestador de serviço; Segue arquivo em anexo. Bauhaus.GravarJson.pas